Home » Personal collection » Commodore tapes » Commodore_16 » drawer_br_tape04a_c16_c60_computer_tape_1.wav » move

move

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 » Commodore tapes » Commodore_16 » drawer_br_tape04a_c16_c60_computer_tape_1.wav
Filename: move
Read OK:
File size: 012D bytes
Load address: 1001
Exec address: 0000
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
    10 GRAPHIC 1,1
    20 A=20:B=12
    30 IF B<0 THEN B=0:GOTO 90
    40 IF B>24 THEN B=24:GOTO 90
    50 IF A<0 THEN A=0:GOTO 90
    60 IF A>39 THEN A=39:GOTO 90
    80 CHAR 1,A,B,"╳"
    90 GETKEY A$
   100 IF A$=";" THEN CHAR 0,A,B,"X":B=B-1:GOTO 30
   110 IF A$="/" THEN CHAR 0,A,B,"X":B=B+1:GOTO 30
   120 IF A$="Z" THEN CHAR 0,A,B,"X":A=A-1:GOTO 30
   130 IF A$="X" THEN CHAR 0,A,B,"X":A=A+1:GOTO 30
   140 GOTO 90


� 1,1A�20:B�12.� B�0 � B�0:� 90E(� B�24 � B�24:� 90Z2� A�0 � A�0:� 90q<� A�39 � A�39:� 90�P� 1,A,B,"�"�Z�� A$�d� A$�";" � � 0,A,B,"X":B�B�1:� 30�n� A$�"/" � � 0,A,B,"X":B�B�1:� 30�x� A$�"Z" � � 0,A,B,"X":A�A�1:� 30#�� A$�"X" � � 0,A,B,"X":A�A�1:� 30,�� 90
KPJ@. 1,1@YPT@a.20:b.12@.P.@. b.0 . b.0:. 90@eP(@. b.24 . b.24:. 90@zP2@. a.0 . a.0:. 90@QP<@. a.39 . a.39:. 90@.Pp@. 1,a,b,"."@.Pz@.. a$@.PD@. a$.";" . . 0,a,b,"x":b.b.1:. 30@.PN@. a$."/" . . 0,a,b,"x":b.b.1:. 30@.PX@. a$."z" . . 0,a,b,"x":a.a.1:. 30@#Q.@. a$."x" . . 0,a,b,"x":a.a.1:. 30@,Q.@. 90@@@
00000000  0b 10 0a 00 de 20 31 2c  31 00 19 10 14 00 41 b2  |..... 1,1.....A.|
00000010  32 30 3a 42 b2 31 32 00  2e 10 1e 00 8b 20 42 b3  |20:B.12...... B.|
00000020  30 20 a7 20 42 b2 30 3a  89 20 39 30 00 45 10 28  |0 . B.0:. 90.E.(|
00000030  00 8b 20 42 b1 32 34 20  a7 20 42 b2 32 34 3a 89  |.. B.24 . B.24:.|
00000040  20 39 30 00 5a 10 32 00  8b 20 41 b3 30 20 a7 20  | 90.Z.2.. A.0 . |
00000050  41 b2 30 3a 89 20 39 30  00 71 10 3c 00 8b 20 41  |A.0:. 90.q.<.. A|
00000060  b1 33 39 20 a7 20 41 b2  33 39 3a 89 20 39 30 00  |.39 . A.39:. 90.|
00000070  81 10 50 00 e0 20 31 2c  41 2c 42 2c 22 d6 22 00  |..P.. 1,A,B,".".|
00000080  8b 10 5a 00 a1 f9 20 41  24 00 b1 10 64 00 8b 20  |..Z... A$...d.. |
00000090  41 24 b2 22 3b 22 20 a7  20 e0 20 30 2c 41 2c 42  |A$.";" . . 0,A,B|
000000a0  2c 22 58 22 3a 42 b2 42  ab 31 3a 89 20 33 30 00  |,"X":B.B.1:. 30.|
000000b0  d7 10 6e 00 8b 20 41 24  b2 22 2f 22 20 a7 20 e0  |..n.. A$."/" . .|
000000c0  20 30 2c 41 2c 42 2c 22  58 22 3a 42 b2 42 aa 31  | 0,A,B,"X":B.B.1|
000000d0  3a 89 20 33 30 00 fd 10  78 00 8b 20 41 24 b2 22  |:. 30...x.. A$."|
000000e0  5a 22 20 a7 20 e0 20 30  2c 41 2c 42 2c 22 58 22  |Z" . . 0,A,B,"X"|
000000f0  3a 41 b2 41 ab 31 3a 89  20 33 30 00 23 11 82 00  |:A.A.1:. 30.#...|
00000100  8b 20 41 24 b2 22 58 22  20 a7 20 e0 20 30 2c 41  |. A$."X" . . 0,A|
00000110  2c 42 2c 22 58 22 3a 41  b2 41 aa 31 3a 89 20 33  |,B,"X":A.A.1:. 3|
00000120  30 00 2c 11 8c 00 89 20  39 30 00 00 00           |0.,.... 90...|
0000012d