10 REM              ODIN
11 REM
12 REM          FRANK LINDSEY
13 REM          RT. 14 BOX 74
14 REM          BOWLING GREEN
15 REM          KENTUCKY, USA
16 REM          (502)781-3117
17 REM
18 REM LET'S HEAR IT FOR FREE SOFTWARE!
19 REM
20 REM LET'S ALSO HEAR IT FOR MAKING A
21 REM BUCK. WATCH FOR MY OTHER COMMER-
22 REM CIALLY AVAILABLE PROGRAMS.
23 REM
100 POKE53280,3:POKE53281,6
110 PRINT"[147][152][142] [169]  [223][146]    [223][146]     [146]   [223][146]   [146]"
120 PRINT"  [146]   [146]   [146]  [223][146]   [146]     [223][146]  [146]"
130 PRINT"  [146]   [146]   [146]   [146]   [146]    [146][223] [223] [146] "
140 PRINT"  [146]   [146]   [146]  [169]   [146]    [146] [223]  [146] "
150 PRINT" [223]  [146][169]    [146][169]     [146]   [146]  [223] [146] "
160 PRINT"[209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209]"
170 PRINT"[209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209]"
180 PRINT"     SHOOT OBSTACLES WHILE AVOIDING
181 [153]"        COLLISIONS OR BEING SHOT
182 PRINT"        PAUSE WITH THE SHIFT KEY
183 [153]"        *PRESS ANY KEY TO START*
200 M=0:N=20:MC=0:NC=0
210 M=M+1:IFM>39THENM=0:MC=MC+1:IFMC>15THENMC=0
220 N=N+1:IFN>39THENN=0:NC=NC+1:IFNC>15THENNC=0
230 POKE55336+M,MC:POKE55656+N,NC
240 GETA$:IFA$=""THEN210
250 SYS3122