Here's another one...
Tron light cycles in 240 bytes. Cursors to control, Esc to exit. If you hit your trail you die.
Tron light cycles in 240 bytes. Cursors to control, Esc to exit. If you hit your trail you die.
a=640b=480h=1x=b/2y=x;Graphics a,b;Repeat;If KeyDown(37)h=-1v=0 If KeyDown(38)v=-1h=0 If KeyDown(39)h=1v=0 If KeyDown(40)v=1h=0 x:+h+a;y:+v+b;x:Mod a;y:Mod b;i=GrabPixmap(x,y,1,1)Plot(x,y)p=ReadPixel(i,0,0)Flip;Until p=-1Or KeyHit(27)