sioseis << eof
procs diskin weight tredit shift stack mix filter wbt swell mute t2d plot end
diskin
   ftr 1 ltr 2 ntrgat 2
   set .2 .7
   fno 11 lno 30000
    ipath newraw.segy end
end
diskoa
   opath tredit-1.segy end
end
tredit
   lprint 8
    pass 200 500 mintype absval minval .1 kill yes end
end
weight
    fno 0 lno 99999 twp 1 -1.3 end
end
shift
    fno 0 lno 9999 tsp 2 -.0006 end
end
filter
   pass 120 500 ftype 0 dbdrop 48 end
end
mute
   fno 0 lno 999999 ttp 1 -.002 2 -.002 addwb yes end
end
mix
  type 3 weight 1 1 end
end
wbt 
    thres .1 track .003 end 
 end 
 swell 
    n 6 end 
 end 
t2d
    osi .1 sdepth 0 edepth 500 vtp 1500 0 end
end
plot
   secs .5
  tlines .05 .1 ann2 shotno
  dptr 1 colors  .004 gray1 .005 gray7
   def .02 clip .02 trpin 300
   dir ltr
    opath siofil.ras
    vscale 10 end
end
end
eof
sio2sun siofil.ras sunfil.ras
convert -resize 50% -rotate 270 sunfil.ras db.png
display db.png &