1 :' Mag Max - tape
2 :' by Tony Hoyle
3 :' 120
10 MEMORY &37BA: LOAD"",&37C1
20 x=&37BB: GOSUB 60
30 x=&37EA: GOSUB 60
40 x=&A000: GOSUB 60
50 CALL &37BB
60 READ a$
70 IF a$="xx" THEN RETURN
80 POKE x,VAL("&"+a$): x=x+1
90 GOTO 60
100 DATA 11,40,00,21,ff,ab,xx
110 :'
120 DATA 3e,5b,32,4b,00,3e,99
130 DATA 32,4e,00,xx
140 :'
150 DATA 3e,b9,32,0b,b9,54,4d
160 DATA 48,3e,2e,32,0e,b9,ed
170 DATA 4b,02,bc,06,8a,11,00
180 DATA b9,c5,1a,d5,11,79,03
190 DATA 91,21,8a,b9,ae,77,23
200 DATA 1d,20,fa,15,20,f7,d1
210 DATA 13,c1,4f,05,20,e6,dd
220 DATA 21,d9,bb,11,83,00,cd
230 DATA 67,bb,21,43,a0,22,5a
240 DATA bc,c3,03,bc,3e,c9,32
250 DATA c1,1a,c3,00,02,xx

1 :' Mag Max - disk
2 :' By Phil Howard
3 :' 121
10 DATA 21,00,1f,11,00,02
20 DATA 01,00,87,3e,55,ae
30 DATA 12,23,13,0b,78,b1
40 DATA 20,f5,21,1a,16,22
50 DATA c0,02,3e,1c,32,bb
60 DATA 02,21,2d,be,11,15
70 DATA 16,01,0e,00,ed,b0
80 DATA c3,00,02,cb,67,c8
90 DATA 18,09,3e,06,32,e8
100 DATA c7,cd,cc,42,c9
110 MEMORY &1E00:y=0
120 FOR x=&BE00 TO &BE3A
130 READ a$:a=VAL("&"+a$)
140 POKE x,a:y=y+a:NEXT
150 IF y<>&11C8 THEN 180
160 LOAD"magcode.sbf",&1F00
170 CALL &BE00
180 PRINT"Data Error"