#!/bin/bash

rm -rf ranspot
mkdir ranspot

for((nr=1; nr<=100; nr++))
do
printf -v nr0 "%04d" $nr
cat >ranspotin.asc <<EOF
Ff
12344
4, 1, 12345
1,  1000,  34,  14.5,  2.9,  0.3,  90,  [RANSPOT $nr0]
2,  1006
0, 34, 11.5, 3
1, 34, 11.5, 28.7
0, 34, 3, 15.85
1, 34, 20, 15.85
11, 34, 6.5, 10.85, 10, 10,
17, 34, 11.5, 15.85, 
 10, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5
 10, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5, -5,5
-1
EOF

echo "LOADCONFIG configs/help3demo.gier" > ranspot.demo
echo "HIDE KB2" >>ranspot.demo
echo "LOADREADER ranspotin.asc" >>ranspot.demo
echo "LOADPUNCH ranspot.flx" >>ranspot.demo
echo "SELECT 3 64" >>ranspot.demo
echo "SELECT 4 0" >>ranspot.demo
./maketext.sh "run,plot2<" >>ranspot.demo
echo "WAITINPUT" >>ranspot.demo
echo "TYPE 0" >>ranspot.demo
echo "WAITINPUT" >>ranspot.demo
echo "FINISHPUNCH" >>ranspot.demo
echo "QUIT" >>ranspot.demo

./GIER ranspot.demo
flx2plot <ranspot.flx >ranspot.ps
ps2pdf ranspot.ps ranspot/ranspot_$nr0.pdf
xmin=`awk 'BEGIN { printf "%d", (5.5-2)/2.54*300}'`
ymin=`awk 'BEGIN { printf "%d", (9.85-2)/2.54*300}'`
width=`awk 'BEGIN { printf "%d", (10+4)/2.54*300}'`
height=`awk 'BEGIN { printf "%d", (10+4)/2.54*300}'`


convert -density 300 ranspot.ps -alpha off -crop ${width}x${height}+${xmin}+${ymin} +repage -compress lzw ranspot/ranspot_$nr0.tiff
mv ranspot.ps ranspot/ranspot_$nr0.ps
done