een simpel programma om een punt te laten bewegen
:repeat 1 =/= 1 (begin van oneindige lus) :0→A:1→X:1→Y :repeat A=1 :getket→B :pt-off(x,y,2 (wist het vorge punt) :if b =/= 0 (zorgt ervoor dat hij niet stopt) :b→c :if c= (verandert de coordinaten van X of Y) :x+3→x :if c= :x-3→x :if c= :y+3→y :if c= :y-3→y :pt-on(x,y,2 (tekent het nieuwe punt) :if x > 94 or x < 0 or y > 64 or y < 0 (controleert of het punt binnen de marges ligt) :1→a :end :end