5 print"{clr}"
10 v=53248:poke v+21,0:x=120:y=120:poke v+4,x:poke v+5,y:poke v+21,4
11 poke 2042,13:poke 53277,15:poke 53289,7
20 for n=0 to 62:read q:poke 832+n,q:next:dx=7:dy=3
30 x=x+dx:if x>255 then x=255:dx=-dx
31 if x<65 then x=65:dx=-dx
35 y=y+dy:if y>200 then y=200:dy=-dy
36 if y<65 then y=65:dy=-dy
40 poke v+4,x:poke v+5,y:goto 30
200 data 0,0,0, 0,0,0, 12,68,96, 56,108,56, 120,124,60, 120,124,60
207 data 252,124,126, 255,255,254, 255,255,254, 255,255,254
211 data 143,255,226, 7,255,192, 3,255,128, 2,124,128
215 data 0,56,0, 0,56,0, 0,16,0, 0,16,0, 0,0,0, 0,0,0, 0,0,0