10 REM Program 2
100 GOSUB
110 VARNAME
120 FOR
130 PHYSIC
140 GOSUB
150 GOTO
160 ANIM
170 WHILE
180 RETURN
190 REM get the sprite positions 
20 GOSUB
200 RESTORE
210 FOR
220 FOR
230 RETURN
240 DATA
250 DATA
260 REM set the animation
270 VARNAME
280 RETURN
290 REM set up screen and colours
30 RESERVE
300 REM *************************
310 KEY
320 VARNAME
330 FOR
340 RETURN
40 EXTENSION (Index #0) (Token 0x80)
50 DIM
60 GOSUB
70 VARNAME
80 FOR
90 PHYSIC