0 CLR
10 REM PROGRAMMER'S PAGE
100 POKE 53280,0:POKE 53281,0:PRINT "[147]"
110 FOR I=12288 TO 12295:POKE I,0:POKE I+40,0:NEXT
120 FOR I=828 TO 854:READ D:POKE I,D:C=C+D:NEXT
130 IF C<>3100 THEN PRINT "ERROR IN DATA STATEMENTS":END
140 POKE 53272,(PEEK(53272) AND 240) OR 12:POKE 1523,0:POKE 55795,13:SYS 828
150 DATA 162,7,173,17,208,48,251,173
160 DATA 17,208,16,251,189,0,48,024
170 DATA 105,1,157,0,048,208,233,202
180 DATA 16,242,96