EW9914 SIOSEIS tape copy/reformat script

run on "grampus" in directory:    /net/heezen/ldata/realtime/reformat


sioseis << eof
procs segdin output end
segdin
   secs 10
   ffilen 99999   # take all shots (this is the preset!)
   ftr 1 ltr 480  # skip the auxiliary channels - 161-172 and 161-180
   fcset 1 lcset 1
   offline yes  # eject after the rewind after EOT
   newfile yes  # start a new SEG-Y file on every SEG-D tape
   iunit 43 end
end
output
   ontrcs 480
   rewind 0   # leave the tape alone!  
   ounit 66 end
end
eof