Home » Personal collection » Acorn tapes » Own_Work » drawer_tl_tape03a_d60_acorn_repton_inf.wav » GAME2

GAME2

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn tapes » Own_Work » drawer_tl_tape03a_d60_acorn_repton_inf.wav
Filename: GAME2
Read OK: ✔
File size: 027F bytes
Load address: FFFF0E00
Exec address: FFFF8023
File contents
   10 DIM A(1000,1)
   20 MODE 5
   30 VDU 19,1,4,0,0,0
   40 VDU 19,2,2,0,0,0
   50 VDU 19,3,7,0,0,0
   60 GCOL 1,1
   70 MOVE0,1000:MOVE 0,0
   80 PLOT 85,100,1000
   90 PLOT 85,100,0
  100 MOVE 101,100:MOVE 101,0
  110 PLOT 85,900,100
  120 PLOT 85,900,0
  130 MOVE 901,1000:MOVE 901,0
  140 PLOT 85,1300,1000
  150 PLOT 85,1300,0
  160 MOVE 101,1000:MOVE 101,900
  170 PLOT 85,900,1000
  180 PLOT 85,900,900
  190 GCOL 1,3
  200 VDU 5
  210 MOVE 950,775
  220 PRINT"SCORE"
  230 GCOL 0,2
  240 MOVE 101,899
  250 MOVE 101,101
  260 PLOT 85,500,899
  270 MOVE 899,899:PLOT 85,899,101
  280 LEV=1
  290 CRA=0
  300 LIN=1
  310 PROCLoad
  320 FOR A=100 TO 500
  330 IF A(A-100,0)=0 THEN NEXT ,A:GOTO 400 
  340 MOVE A+200,150
  350 PRINT D(A,0)
  360 IF A(A-100,1)=0 THEN NEXT A:GOTO 400
  370 MOVE A+200,750 
  380 PRINT D(A,1)
  390 NEXT A
  400 


 � A(1000,1)
 � 5
 � 19,1,4,0,0,0
( � 19,2,2,0,0,0
2 � 19,3,7,0,0,0
<
 � 1,1
F �0,1000:� 0,0
P � 85,100,1000
Z � 85,100,0
d � 101,100:� 101,0
n � 85,900,100
x � 85,900,0
� � 901,1000:� 901,0
� � 85,1300,1000
� � 85,1300,0
� � 101,1000:� 101,900
� � 85,900,1000
� � 85,900,900
�
 � 1,3
� � 5
� � 950,775
�
 �"SCORE"
�
 � 0,2
� � 101,899
� � 101,101
 � 85,500,899
 � 899,899:� 85,899,101

 LEV=1
"
 CRA=0
,
 LIN=1
6
 �Load
@ � A=100 � 500
J" � A(A-100,0)=0 � � ,A:� �tPA 
T � A+200,150
^
 � D(A,0)
h  � A(A-100,1)=0 � � A:� �tPA
r � A+200,750 
|
 � D(A,1)
� � A
� 
�
00000000  0d 00 0a 10 20 de 20 41  28 31 30 30 30 2c 31 29  |.... . A(1000,1)|
00000010  0d 00 14 08 20 eb 20 35  0d 00 1e 13 20 ef 20 31  |.... . 5.... . 1|
00000020  39 2c 31 2c 34 2c 30 2c  30 2c 30 0d 00 28 13 20  |9,1,4,0,0,0..(. |
00000030  ef 20 31 39 2c 32 2c 32  2c 30 2c 30 2c 30 0d 00  |. 19,2,2,0,0,0..|
00000040  32 13 20 ef 20 31 39 2c  33 2c 37 2c 30 2c 30 2c  |2. . 19,3,7,0,0,|
00000050  30 0d 00 3c 0a 20 e6 20  31 2c 31 0d 00 46 12 20  |0..<. . 1,1..F. |
00000060  ec 30 2c 31 30 30 30 3a  ec 20 30 2c 30 0d 00 50  |.0,1000:. 0,0..P|
00000070  12 20 f0 20 38 35 2c 31  30 30 2c 31 30 30 30 0d  |. . 85,100,1000.|
00000080  00 5a 0f 20 f0 20 38 35  2c 31 30 30 2c 30 0d 00  |.Z. . 85,100,0..|
00000090  64 16 20 ec 20 31 30 31  2c 31 30 30 3a ec 20 31  |d. . 101,100:. 1|
000000a0  30 31 2c 30 0d 00 6e 11  20 f0 20 38 35 2c 39 30  |01,0..n. . 85,90|
000000b0  30 2c 31 30 30 0d 00 78  0f 20 f0 20 38 35 2c 39  |0,100..x. . 85,9|
000000c0  30 30 2c 30 0d 00 82 17  20 ec 20 39 30 31 2c 31  |00,0.... . 901,1|
000000d0  30 30 30 3a ec 20 39 30  31 2c 30 0d 00 8c 13 20  |000:. 901,0.... |
000000e0  f0 20 38 35 2c 31 33 30  30 2c 31 30 30 30 0d 00  |. 85,1300,1000..|
000000f0  96 10 20 f0 20 38 35 2c  31 33 30 30 2c 30 0d 00  |.. . 85,1300,0..|
00000100  a0 19 20 ec 20 31 30 31  2c 31 30 30 30 3a ec 20  |.. . 101,1000:. |
00000110  31 30 31 2c 39 30 30 0d  00 aa 12 20 f0 20 38 35  |101,900.... . 85|
00000120  2c 39 30 30 2c 31 30 30  30 0d 00 b4 11 20 f0 20  |,900,1000.... . |
00000130  38 35 2c 39 30 30 2c 39  30 30 0d 00 be 0a 20 e6  |85,900,900.... .|
00000140  20 31 2c 33 0d 00 c8 08  20 ef 20 35 0d 00 d2 0e  | 1,3.... . 5....|
00000150  20 ec 20 39 35 30 2c 37  37 35 0d 00 dc 0d 20 f1  | . 950,775.... .|
00000160  22 53 43 4f 52 45 22 0d  00 e6 0a 20 e6 20 30 2c  |"SCORE".... . 0,|
00000170  32 0d 00 f0 0e 20 ec 20  31 30 31 2c 38 39 39 0d  |2.... . 101,899.|
00000180  00 fa 0e 20 ec 20 31 30  31 2c 31 30 31 0d 01 04  |... . 101,101...|
00000190  11 20 f0 20 38 35 2c 35  30 30 2c 38 39 39 0d 01  |. . 85,500,899..|
000001a0  0e 1b 20 ec 20 38 39 39  2c 38 39 39 3a f0 20 38  |.. . 899,899:. 8|
000001b0  35 2c 38 39 39 2c 31 30  31 0d 01 18 0a 20 4c 45  |5,899,101.... LE|
000001c0  56 3d 31 0d 01 22 0a 20  43 52 41 3d 30 0d 01 2c  |V=1..". CRA=0..,|
000001d0  0a 20 4c 49 4e 3d 31 0d  01 36 0a 20 f2 4c 6f 61  |. LIN=1..6. .Loa|
000001e0  64 0d 01 40 12 20 e3 20  41 3d 31 30 30 20 b8 20  |d..@. . A=100 . |
000001f0  35 30 30 0d 01 4a 22 20  e7 20 41 28 41 2d 31 30  |500..J" . A(A-10|
00000200  30 2c 30 29 3d 30 20 8c  20 ed 20 2c 41 3a e5 20  |0,0)=0 . . ,A:. |
00000210  8d 74 50 41 20 0d 01 54  10 20 ec 20 41 2b 32 30  |.tPA ..T. . A+20|
00000220  30 2c 31 35 30 0d 01 5e  0d 20 f1 20 44 28 41 2c  |0,150..^. . D(A,|
00000230  30 29 0d 01 68 20 20 e7  20 41 28 41 2d 31 30 30  |0)..h  . A(A-100|
00000240  2c 31 29 3d 30 20 8c 20  ed 20 41 3a e5 20 8d 74  |,1)=0 . . A:. .t|
00000250  50 41 0d 01 72 11 20 ec  20 41 2b 32 30 30 2c 37  |PA..r. . A+200,7|
00000260  35 30 20 0d 01 7c 0d 20  f1 20 44 28 41 2c 31 29  |50 ..|. . D(A,1)|
00000270  0d 01 86 08 20 ed 20 41  0d 01 90 05 20 0d ff     |.... . A.... ..|
0000027f
GAME2.m0
GAME2.m1
GAME2.m2
GAME2.m4
GAME2.m5

© Dominic Ford 2021–2024.

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .