1 :' Angleball - tape
2 :' by Darren Ash
10 FOR t=&FE3 TO &1019
20 READ a$:POKE t,VAL("&"+a$)
30 NEXT
40 CALL &FE3
50 DATA 06,00,21,00,a0,11,00,a0
60 DATA cd,77,bc,21,00,a0,cd,83
70 DATA bc,cd,7a,bc,21,00,10,22
80 DATA 3a,a0,cd,00,a0,e5,f5,21
90 DATA 4a,21,22,c0,23,3e,01,32
100 DATA 92,23,3e,10,32,97,23,32
110 DATA 9a,23,f1,e1,c3,00,20
120 END