#! /bin/bash

start_date=$(date +%s)
energy=0

calc() {
echo "scale=15;$1" | bc
}

(
echo "n Florz"
v=7
a=0
da=30
dv=3
noop=0

while read -n1 key; do
	case $key in
		W)
		   a=0
		   da=30
		   ;;
		S)
		   a=180
		   da=30
		   ;;
		A)
		   a=270
		   da=30
		   ;;
		D)
		   a=90
		   da=30
		   ;;
		w)
		   v=$(calc "$v+$dv")
		   da=30
		   echo "c"
		   ;;
		s)
		   v=$(calc "$v-$dv")
		   da=30
		   echo "c"
		   ;;
		.)
		   da=30
		   a=$(calc "$a+$da")
		   echo "c"
		   ;;
		:)
		   da=3
		   a=$(calc "$a+$da")
		   echo "c"
		   ;;
		,)
		   da=30
		   a=$(calc "$a-$da")
		   echo "c"
		   ;;
		\;)
		   da=3
		   a=$(calc "$a-$da")
		   echo "c"
		   ;;
		a)
		   da=$(calc "$da/2")
		   a=$(calc "$a-$da")
		   ;;
		d)
		   da=$(calc "$da/2")
		   a=$(calc "$a+$da")
		   ;;
		-)
		   echo "c"
		   v=7
		   noop=1
		   ;;
		*)
		   noop=1
		   ;;
esac
[ $v -lt 1 ] && v=1
[ $(echo $a | cut -d. -f1) -ge 360 ] && a=$(calc "$a-360")
[ $(echo $a | cut -d. -f1) -lt 0 ] && a=$(calc "360+$a")
echo "v $v"
[ $noop -ne 1 ] && echo "$a"
noop=0
done

) > /dev/tcp/192.168.8.8/3490