Demonstrates a side scroll technique.
Content
Image Gallery
Source Code
5 CLS
10 CLEAR 31999
20 LET j=32000
30 READ a: IF a=9999 THEN GO TO 100
40 POKE j,a: LET j=j+1: GO TO 30
50 DATA 33,255,87,14,32,167,203,22,43,13,32,250,62,63,188,32,242,201,0,0
60 DATA 33,0,64,14,32,167,203,30,35,13,32,250,62,88,188,32,242,201
100 FOR j=1 TO 22: PRINT "LIST SINCLAIR TIMEX GROUP L.I.NY" : NEXT J
105 FOR J=1 TO 8*16
110 RANDOMIZE USR 32020
115 NEXT J
120 FOR J=1 TO 8*16
125 RANDOMIZE USR 32000
130 NEXT J: STOP
9998 SAVE "SCROLL" LINE 0: SAVE "SCROLL"CODE 32000,38
9999 DATA 9999