1 :' Starglider
2 :' by Tony Hoyle
10 MEMORY &19FF
20 MODE 1
30 BORDER 0
40 WINDOW #1,15,27,10,10
50 WINDOW #2,15,27,13,13
60 x=&8000:t2=0:l=280
70 t=0
80 FOR j=0 TO 7
90 READ a$
100 a=VAL("&"+a$)
110 t=t+a
120 t2=t2+a
130 POKE x,a
140 x=x+1
150 NEXT j
160 READ c$:c=VAL("&"+c$)
170 IF t<>c THEN PRINT"Error in line ";l:END
180 l=l+10
190 IF x<&80E4 THEN 70
200 READ c$:c=VAL("&"+c$)
210 IF t2<>c THEN PRINT"Error in data":END
220 LOAD"!glider"
230 POKE &30,&C3
240 POKE &31,0
250 POKE &32,&80
260 POKE &1A6C,&F7
270 CALL &1A00
280 DATA 7a,fe,57,e5,c0,e1,3e,e9,057c
290 DATA 32,6c,1a,fd,e5,cd,e0,1a,0461
300 DATA cd,82,1a,cd,eb,1a,be,28,0421
310 DATA 07,06,00,cd,4a,1b,18,ed,0244
320 DATA 01,00,f6,ed,49,f3,e1,2e,042f
330 DATA 00,ed,5b,18,11,1a,ae,24,025d
340 DATA ae,25,12,2c,1c,20,f6,ed,0330
350 DATA 5b,18,11,21,40,01,1a,ae,01ae
360 DATA 77,1c,2c,20,f9,cd,37,bd,0399
370 DATA ed,5b,18,11,2a,1a,11,1a,01e0
380 DATA ae,77,23,1c,20,f9,3a,1d,02d4
390 DATA 11,bc,20,f3,cd,00,30,fb,03d8
400 DATA 3e,01,cd,b4,bb,3e,03,cd,0389
410 DATA 96,bb,3e,02,cd,b4,bb,3e,040b
420 DATA 03,cd,96,bb,21,82,80,11,0355
430 DATA 80,00,01,61,00,ed,b0,c3,0342
440 DATA 80,00,3e,39,01,02,01,cd,01c8
450 DATA 00,1c,01,01,01,cd,38,bc,01e0
460 DATA 3e,0f,01,00,00,f5,cd,32,0242
470 DATA bc,f1,3d,fe,ff,20,f3,01,04fb
480 DATA 10,27,0b,78,b1,20,fb,3e,02c4
490 DATA 3a,cd,00,1e,af,32,fa,37,0337
500 DATA 32,fb,37,32,09,38,32,0a,0213
510 DATA 38,32,19,38,32,1a,38,32,0171
520 DATA 8f,58,32,9c,61,32,0a,63,02b5
530 DATA 32,0b,63,32,37,63,32,38,01d6
540 DATA 63,32,64,63,32,65,63,32,0288
550 DATA f6,64,32,f7,64,32,07,65,0385
560 DATA c3,1e,11,00,00,00,00,00,00f2
570 DATA 55ea

1 :' Star Glider - disk
2 :' by John Shinnick
3 :' 133
10 MODE 1:BORDER 0:INK 0,26
20 INK 1,0:INK 2,6:INK 3,2
30 LOAD"loadpic.scr",&C000
40 MEMORY &1FFF
50 LOAD"K32",&2000
60 LOAD"K16",&C000
70 :'infinite missiles
80 POKE &6504,0
90 :'infinite laser fire
100 POKE &6363,&C3:POKE &6364,&71
110 :'Infinite plasma drive
120 POKE &6309,&C3:POKE &630A,&17
130 :'infinite shield
140 POKE &6336,&C3:POKE &6337,&44
150 :'rear view scanner
160 POKE &F60E,1
170 :'inductive energy pod
180 POKE &F60F,1:POKE &190F,&18
190 :'proton missiles
200 POKE &F610,1:POKE &64F3,&18
210 POKE &64F4,7
220 :'indestructibility
230 POKE &98C8,0:POKE &98C9,0
240 POKE &98CA,0
250 CALL &F700