1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
do getkey > input if (input & 4) rand 479 > x rand 319 > y rand 479 > i rand 319 > j rand 32767 > purple line x y i j purple end while (1) print "done"