1 :' Gunstar - tape
2 :' by Phil Howard
10 DATA 21,37,bd,36,c3,23
20 DATA 36,36,23,36,be,21
30 DATA 70,11,36,c3,23,36
40 DATA 19,23,36,be,c3,00
50 DATA 11,32,46,a5,14,7a
60 DATA fe,93,28,01,e9,e5
70 DATA 21,70,11,36,32,23
80 DATA 36,46,23,36,a5,21
90 DATA 3e,01,36,c3,e1,e9
100 DATA 21,61,01,36,41,23
110 DATA 36,be,c3,4b,01,21
120 DATA 76,50,36,c9,af,32
130 DATA e5,4a,c3,1e,a5
140 OPENOUT"!":MEMORY &1000
150 y=0:MODE 1
160 FOR x=&BE00 TO &BE4C
170 READ a$:a=VAL("&"+a$)
180 POKE x,a:y=y+a:NEXT
190 IF y<>&1B45 THEN 220
200 LOAD"gunstar1"
210 CALL &BE00
220 PRINT"data error"