1 :' Deep Strike
2 :' by Peter Featherstone
3 :' 128
10 BORDER 0:INK 0,18
11 INK 1,26:INK 2,6
12 INK 3,2:MODE 1
20 OPENOUT"Y":MEMORY 999
30 OUT &BC00,1:OUT &BD00,32
40 OUT &BC00,2:OUT &BD00,42
50 OUT &BC00,6:OUT &BD00,24
60 FOR f=&BE00 TO &BE23
70 READ a$
80 POKE f,VAL("&"+a$):NEXT
90 CALL &BE00
100 DATA 21,00,86,11,64,00
110 DATA 3E,16,CD,A1,BC,21
120 DATA 14,BE,22,47,86,C3
130 DATA 00,86,3E,C9,32,E0
140 DATA 57,32,77,57,AF,32
150 DATA 29,57,CD,98,23,00