#!/usr/bin/bash
#
PGPLOT_TYPE=pgxdmp#.xwd/wd;PGPLOT_WD_WIDTH=800;PGPLOT_WD_HEIGHT=600
export PGPLOT_TYPE PGPLOT_WD_WIDTH PGPLOT_WD_HEIGHT
#
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9040102.ksr
89,04,01
07,31,28
89,04,01
08,53,29
3585


0
0
4
2
0
2a
32
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9040103.ksp
89,04,01
08,51,36
89,04,01
09,08,33
1793


0
0
2
2
0
2a
32
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9041002.asr
89,04,10
07,54,14
10,12,31
09,51,35
3585


0
0
4
2
0
2a
32
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9041002.ksp
89,04,10
08,50,55
89,04,10
09,07,55
1793


0
0
2
2
0
2a
32
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9041102.ksp
89,04,10
10,41,23
89,04,10
10,58,18
1793


0
0
2
2
0
2a
32
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9041301.ksp
89,04,13
01,45,50
89,04,13
02,02,47
1793


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9041302.asr
89,04,13
06,05,59
89,04,13
07,58,11
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9041302.ksp
89,04,13
06,14,16
89,04,13
06,31,13
1793


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9041402.asr
89,04,14
06,39,53
89,04,14
08,19,36
1793


0
0
2
2
0
2a
32
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9041402.ksp
89,04,14
06,43,31
89,04,14
07,51,20
1793


0
0
2
2
0
2a
32
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9041503.asr
89,04,15
10,54,28
89,04,15
12,23,15
3585


0
0
4
2
0
2a
32
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042002.asr
89,04,20
06,38,29
89,04,20
08,35,41
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042002.ksp
89,04,20
07,05,27
89,04,20
07,22,24
1793


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042003.asr
89,04,20
10,13,45
89,04,20
12,14,41
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042005.asr
89,04,20
17,14,38
89,04,20
18,51,37
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042006.asr
89,04,20
20,39,25
89,04,20
22,06,21
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042100.asr
89,04,21
00,02,51
89,04,21
01,39,01
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042101.asr
89,04,21
03,49,15
89,04,21
05,22,05
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042102.asr
89,04,21
07,12,40
89,04,21
09,03,42
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042103.asr
89,04,21
10,49,19
89,04,21
12,49,35
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042104.asr
89,04,21
14,25,57
89,04,21
16,10,39
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042105.asr
89,04,21
17,48,39
89,04,21
19,21,48
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042106.asr
89,04,21
21,25,40
89,04,21
22,41,00
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042200.asr
89,04,22
00,44,27
89,04,22
02,14,52
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042201.asr
89,04,22
04,26,33
89,04,22
06,00,04
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042201.ksp
89,04,21
21,17,44
89,04,21
21,34,38
1793


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042502.asr
89,04,25
05,49,20
89,04,25
07,54,11
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042502.ksp
89,04,25
05,59,58
89,04,25
06,16,53
1793


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042503.asr
89,04,25
09,35,40
89,04,25
11,33,35
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042504.asr
89,04,25
13,12,14
89,04,25
14,59,51
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042505.asr
89,04,25
16,38,40
89,04,25
18,13,31
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042506.asr
89,04,25
19,59,40
89,04,25
21,27,47
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042507.asr
89,04,25
23,20,42
89,04,26
00,56,59
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042601.asr
89,04,26
02,58,32
89,04,26
04,40,03
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042702.asr
89,04,27
06,58,40
89,04,27
09,06,36
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042703.asr
89,04,27
10,35,29
89,04,27
12,41,08
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042704.asr
89,04,27
14,20,17
89,04,27
15,41,48
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042705.asr
89,04,27
17,45,29
89,04,27
19,06,16
3585


0
0
2
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042706.asr
89,04,27
21,07,34
89,04,27
22,33,16
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042800.asr
89,04,28
00,38,38
89,04,28
02,08,32
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042801.asr
89,04,28
03,55,37
89,04,28
05,56,04
3585


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042801.ksp
89,04,27
07,12,20
89,04,27
07,28,45
1793


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91
/exosd/jdt/sms_darts/fsp_pg <<EOF
/exosd/sms_archive/y1989/m04/
s9042901.ksp
89,04,29
04,50,31
89,04,29
05,07,28
1793


0
0
1
2
0
2c
33
0
0
yyyyyyy
EOF
for n in 1 2 3 4 5 6;do PGF=pgxdmp$n.xwd;if [ -f $PGF ]; then i=`grep ^$n fort.91|cut -b 3-8,10-13`;mv $PGF $i.xwd;rm -f $PGF; echo -n "$i.jpg ">>$INDEX;grep ^$n fort.91>>$INDEX;rm -f $PGF;fi;done
rm -f fort.91