File fid.com:

#!/bin/csh

set dirList = (‘getTabCol.tcl -in $meta -var DIR_NAME’)

set proc = (‘getTabCol.tcl -in $meta -var PROC_FLAG’)

set origDir = ‘pwd’

@ i = 0

foreach d ($dirList)

@ i++

if $proc[$i] then

cd $d

if (!(-e title)) then

echo None > title

endif

set tStr = (‘cat title’)

echo $d/test.fid $tStr

bruker -auto -nosleep -notk -exit >& conv.out

fid.com >>& conv.out

sethdr test.fid -title $tStr

$origDir/report2D.com test.fid

echo ””

cd $origDir

else

echo $d pre-processed

endif

end