#!/bin/bash
tmpfile=/tmp/logfile
reloadpage ()
{
echo "Content-type: text/html"
echo "Status: 204 No Response" 
echo
exit
}
val ()
{
num=`echo $1|sed -n '/^[0-9]\{1,3\}$/p'`
inum=${2:-127}
echo ${num:-$inum}
}

########
# MAIN #
########
dump=`cat -|/usr/local/bin/proccgi`
echo $dump >> $tmpfile
eval $dump
#i0=`cat initial|awk '{print $1}'`
#i1=`cat initial|awk '{print $2}'`
#i2=`cat initial|awk '{print $3}'`
#i3=`cat initial|awk '{print $4}'`
#i4=`cat initial|awk '{print $5}'`
#i5=`cat initial|awk '{print $6}'`
#i6=`cat initial|awk '{print $7}'`
#i7=`cat initial|awk '{print $8}'`
#echo "INITIAL: $i0 $i1 $i2 $i3 $i4 $i5 $i6 $i7" >> $tmpfile
count=0
step2=15
step=1
while [ $count -lt $step2 ]
do
i0=`cat initial|awk '{print $1}'`
i1=`cat initial|awk '{print $2}'`
i2=`cat initial|awk '{print $3}'`
i3=`cat initial|awk '{print $4}'`
i4=`cat initial|awk '{print $5}'`
i5=`cat initial|awk '{print $6}'`
i6=`cat initial|awk '{print $7}'`
i7=`cat initial|awk '{print $8}'`
case $CAM in
	right)	s0=`val $(($i0 - $step))`;;
	left)	s0=`val $(($i0 + $step))`;;
	down)	s0=$i0;s1=`val $(($i1 - $step))`;;
	up)	s0=$i0;s1=`val $(($i1 + $step))`;;
	center)	s0=127;s1=127;;
	downright)	s0=`val $(($i0 - $step))`;s1=`val $(($i1 - $step))`;;
	upright)	s0=`val $(($i0 - $step))`;s1=`val $(($i1 + $step))`;;
	downleft)	s0=`val $(($i0 + $step))`;s1=`val $(($i1 - $step))`;;
	upleft)	s0=`val $(($i0 + $step))`;s1=`val $(($i1 + $step))`;;
esac
	s0=`val $s0 $i0`
	s1=`val $s1 $i1`
	echo $s0 $s1 $s2 $s3 $s4 $s5 $s6 $s7|/usr/local/bin/servo
	count=$(($count+1))
done

#case $TANK in
	#left)	s2=`val $(($i2 - $step))`;;
	#right)	s2=`val $(($i2 + $step))`;;
	#up)	s2=$i2;s3=`val $(($i3 - $step))`;;
	#down)	s2=$i2;s3=`val $(($i3 + $step))`;;
	#center)	s2=127;s3=127;;
	#upleft)	s2=`val $(($i2 - 1))`;s3=`val $(($i3 - $step))`;;
	#downleft)	s2=`val $(($i2 - $step))`;s3=`val $(($i3 + $step))`;;
	#upright)	s2=`val $(($i2 + $step))`;s3=`val $(($i3 - $step))`;;
	#downright)	s2=`val $(($i2 + $step))`;s3=`val $(($i3 + $step))`;;
#esac
#s0=`val $s0 $i0`
#s1=`val $s1 $i1`
#s2=`val $s2 $i2`
#s3=`val $s3 $i3`
#s4=`val $s4 $i4`
#s5=`val $s5 $i5`
#s6=`val $s6 $i6`
#s7=`val $s7 $i7`
#echo $s0 $s1 $s2 $s3 $s4 $s5 $s6 $s7|/usr/local/bin/servo
#echo $s0 $s1 $s2 $s3 $s4 $s5 $s6 $s7 >> $tmpfile
reloadpage