100 POKE53280,0:POKE53281,0:PRINT"[147]"
110 FORX=832TO894:READA:POKEX,A:NEXT
120 FORN=0TO7:POKE2040+N,13:POKE53287+N,N+7:NEXT
130 X1=150:Y1=150:X2=150:Y2=150
140 V1=2:W1=3:V2=-3:W2=-4:POKE53269,255
150 X1=X1+V1:Y1=Y1+W1:X2=X2+V2:Y2=Y2+W2
160 POKE53248,X1:POKE53249,Y1:POKE53250,X2:POKE53251,Y2
170 IF(X1>220)OR(X1<50)THENV1=-V1:GOSUB220
180 IF(Y1>220)OR(Y1<50)THENW1=-W1:GOSUB220
190 IF(X2>220)OR(X2<50)THENV2=-V2:GOSUB220
200 IF(Y2>220)OR(Y2<50)THENW2=-W2:GOSUB220
210 GOTO150
220 POKE54273,16:POKE54278,242
230 POKE54296,15:POKE54276,129
240 POKE54276,128:RETURN
1000 DATA 0,60,0,1,255,128,7
1010 DATA 255,224,15,255,240,31,255
1020 DATA 248,63,255,252,127,255,254
1030 DATA 127,255,254,255,255,255,255
1040 DATA 255,255,255,255,255,255,255
1050 DATA 255,255,255,255,127,255,254
1060 DATA 127,255,254,63,255,252,31
1070 DATA 255,248,15,255,240,7,255
1080 DATA 224,1,255,128,0,60,0