10 SCREEN 1
20 S$=""
20 FOR N=0 TO 7
30 READD$:S$=S$+CHR$("&B"+D$)
40 NEXT
50 SPRITE$(0)=S$
60 PUT SPRITE 0,(100,100),15,0
70 GOTO 70
80  DATA 01111110
90  DATA 10000001
100 DATA 10100101
110 DATA 10100101
120 DATA 10000001
130 DATA 01000010
140 DATA 10111101
150 DATA 10111101