100 REM  SCREENSAVER # 1
110 REM  BY MARTIN FENSOME
120 REM
130 PRINT"POKING":FORJ=880TO991:PRINT".";:READX:C=C+X:POKEJ,X:NEXT:PRINT""
140 IF C<>14526 THEN PRINT"ERROR IN DATA!":STOP
150 INPUT"MINUTES UNTIL BLANKING (1-18)";X:IFX<.1ORX>18THENPRINT"ERROR":GOTO150
160 X=X*60*60:Y=INT(X/256):X=X-Y*256:POKE965,X:POKE970,Y:SYS880
170 PRINT"[147]SCREENSAVER INSTALLED!"
180 PRINT"SYS 880 TO ACTIVATE"
190 PRINT"SYS 886 TO DEACTIVATE"
200 PRINT"NEW[145][145][145]":END
210 DATA169,142,162,3,208,4,169,49,162,234,120,141,20,3,142,21,3,88,162,0
220 DATA142,252,3,142,253,3,142,254,3,96,174,141,2,208,6,166,197,224,64,240
230 DATA25,162,0,142,253,3,142,254,3,174,252,3,240,9,174,255,3,142,33,208
240 DATA206,252,3,76,49,234,174,252,3,208,248,238,253,3,208,3,238,254,3,72
250 DATA56,173,253,3,233,128,173,254,3,233,0,104,144,225,174,33,208,142,255
260 DATA3,174,134,2,142,33,208,238,252,3,24,144,207