10 REM eddies mega fast buffered scroller 
100 LOGIC
1000 REM set up the letter data 
10000 REM TEXT MESSAGE GOES HERE 
10010 VARNAME
10020 FOR
10030 VARNAME
10040 IF
10041 IF
10042 IF
10043 IF
10044 IF
101 VARNAME
1010 VARNAME
10100 MID$
10110 NEXT
10120 RETURN
102 GOSUB
1020 FOR
103 VARNAME
1030 FOR
104 VARNAME
1040 VARNAME
105 GOSUB
1050 INC
106 VARNAME
1060 NEXT
1061 VARNAME
107 IF
1070 RETURN
108 IF
110 REPEAT
120 SCREEN COPY
130 SCREEN COPY
140 SCREEN$
150 SCREEN COPY
151 INC
153 IF
160 SCREEN SWAP
161 IF
162 IF
163 IF
164 SCREEN COPY
166 IF
167 IF
168 IF
169 IF
190 UNTIL
20 REM uses loads of memory but is bloody fast!!! 
2000 REM sort out shifter font!! using sprite file! 
2030 REM ~~~~~~~~ 
2040 FOR
2050 REM first frame
2060 CLS
2070 UPDATE
2080 VARNAME
2090 NEXT
2091 SPRITE
2100 RETURN
30 REM coded 16 July 1991 - THB are the best!!!!! 
3000 REM turn sprite bank into a screen 
3010 MODE
3020 RESERVE
3030 HIDE
3040 CURS
3050 KEY
3060 CLS
3080 VARNAME
3090 REM ~~~~~~~~~~~~~~~~~~~
3100 FOR
3110 SPRITE
3120 REDRAW
3130 PUT SPRITE
3140 VARNAME
3150 IF
3160 NEXT
3161 SCREEN COPY
3170 RETURN
3180 REM set up screen and colours
3190 VARNAME
3200 FOR
3210 RETURN
40 REM ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 
50 KEY
60 MODE
70 HIDE
80 CURS
81 REM set up screens for font
90 GOSUB
99 DIM