Moving Pixels BASIC 80 You can move pixels around the screen! /START80/ /NAME=PIXEL/ :AxesOff :ClrDraw:ClrHome :0->X :31->A :46->B :Lbl 1 :If B<1 :Then :94->B :End :If A<1 :Then :62->A :End :If A>62 :Then :1->A :End :ClrDraw :Pxl-On(A,B :For(X,1,10000 :getKey->T :If T=24 :Then :B-1üB :Goto 1 :End :If T=25 :Then :A-1->A :Goto 1 :End :If T=26 :Then :B+1->B :Goto 1 :End :If T=34 :Then :A+1->A :Goto 1 :End :If T=22 :Then :Text(1,2,"BYE NOW" :For(K,1,400 :End :ClrDraw:ClrHome :Stop :End :End