10 SCREEN6,3:COLOR=(1,7,0,0):COLOR=(2,0,0,7):COLOR=(3,7,7,7)
20 S1$="":S2$="":FOR I=0 TO 15:READA$,B$:S1$=S1$+CHR$(VAL("&b"+A$)):S2$=S2$+CHR$(VAL("&b"+B$)):NEXT I:SPRITE$(0)=S1$+S2$
30 PUTSPRITE0,(112,90),15,0
31 _TURBO ON
40 FOR I=0 TO 15:VPOKE&H7600+I-512,RND(1)*16:NEXTI
50 IF NOT STRIG(0) GOTO 40
60  DATA 00000000,00000000
70  DATA 00000000,00000000
80  DATA 00000000,00000000
90  DATA 00000000,00000000
100 DATA 00011111,11111111
110 DATA 00000000,01000000
120 DATA 00000000,11100000
130 DATA 00000001,10010000
140 DATA 10000001,10001100
150 DATA 11000011,11000110
160 DATA 11111111,11111111
170 DATA 01111111,11111111
180 DATA 00000001,11111110
190 DATA 00000000,11111100
200 DATA 00000000,10001001
210 DATA 00000011,11111110