100 FORI=679TO758:READA:POKEI,A:CK=CK+A:NEXT
110 IFCK<>11167THENPRINT"ERROR IN DATA STATEMENTS.":STOP
120 SYS679:PRINT"[147]BLICK ENABLED"
130 DATA 169,15,141,24,212,141,19,212,169,120
140 DATA 141,15,212,169,1,141,14,212,169,0
150 DATA 141,20,212,162,201,160,2,142,38,3
160 DATA 140,39,3,96,32,202,241,133,251,134
170 DATA 252,132,253,169,33,141,18,212,169,175
180 DATA 32,202,241,162,234,160,0,200,208,253
190 DATA 232,208,250,169,32,141,18,212,169,20
200 DATA 32,202,241,165,251,166,252,164,253,96