#script to set markers for s2 and s3 to see perturbation effects
#during scratch
#edited: Sept 10, 2002 by Katinka Stecina
# edited: Apr 25, 2002 by katinka stecina
#usage: pert filename 
#Note: wf 11 must be the waveform with the stim markers
#Before using: set analysis range, set average wf list
#Remove used file_s1/s2/s3 files if they already exist

if [ $# -ne 1 ]
then
  echo "Usage: filename needed"
  exit 1
fi

analysis $1 <<!
sab1
ww600
d-300
qqcw11
tyqqw11
sss257
e-255
d668
tadqqqk
qawcgb$1_s1

w11
sss823
e0
d1692
tadqqqk
qawcgb$1_s2

w11
sss1896
d0
tadqqqk
qawcgb$1_s3

qy


!
echo "y" | appendrun $1_s2 $1_s1
echo "y" | appendrun $1_s3 $1_s1
qm $1_s2
