Home » Personal collection » Commodore tapes » Commodore_16 » drawer_br_tape04b_c16_c60_computer_tape_1.wav » ...number...

...number...

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_tape04b_c16_c60_computer_tape_1.wav
Filename: ...number...
Read OK:
File size: 04DA bytes
Load address: 1001
Exec address: 0000
File contents
     5 GOTO 30
    10 PRINT
    15 PRINT"NUMBER? 1🭸9"
    17 GETKEY A$
    20 IF A$="1"THEN GOSUB 10000
    21 IF A$="2"THEN GOSUB 20000
    22 IF A$="3"THEN GOSUB 30000
    23 IF A$="4"THEN GOSUB 40000
    24 IF A$="5"THEN GOSUB 50000
    25 IF A$="6"THEN GOSUB 60000
    26 IF A$="7"THEN GOSUB 60100
    27 IF A$="8"THEN GOSUB 60200
    28 IF A$="9"THEN GOSUB 60300
    29 GOTO 10
    30 PRINT"             HIT"
    40 GETKEY A$
    50 PRINT
    60 PRINT"                HIT"
    70 GETKEY A$
    80 PRINT
    90 PRINT
    95 PRINT"IF YOU HIT E AND WAIT I END"
   100 Q=0
   110 W=1
   120 E=2
   130 R=3
   140 T=4
   150 Y=5
   160 U=6
   170 I=7
   180 O=8
   190 P=9
   200 S=10
   210 D=11
   220 F=12
   230 G=13
   240 H=14
   250 J=15
   260 K=16
   270 L=17
   280 Z=18
   290 X=19
   300 C=20
   310 V=21
   320 B=22
   330 N=23
   350 GOTO 10
 10000 M=1
 10010 GOTO 61000
 20000 M=2
 20010 GOTO 61000
 30000 M=3
 30010 GOTO 61000
 40000 M=4
 40010 GOTO 61000
 50000 M=5
 50010 GOTO 61000
 60000 M=6
 60010 GOTO 61000
 60100 M=7
 60110 GOTO 61000
 60200 M=8
 60210 GOTO 61000
 60300 M=9
 60310 GOTO 61000
 61000 GETKEY A$
 61004 DO
 61005 PRINT Q
 61010 PRINT W
 61020 PRINT E
 61030 PRINT R
 61040 PRINT T
 61050 PRINT Y
 61060 PRINT U
 61070 PRINT I
 61080 PRINT O
 61090 PRINT P
 61100 PRINT S
 61110 PRINT D
 61120 PRINT F
 61130 PRINT G
 61140 PRINT H
 61150 PRINT J
 61160 PRINT K
 61170 PRINT L
 61180 PRINT Z
 61190 PRINT X
 61200 PRINT C
 61210 PRINT V
 61220 PRINT B
 61230 PRINT N
 61250 IF A$="E"THEN RETURN
 61260 Q=Q+M
 61270 W=W+M
 61280 E=E+M
 61290 R=R+M
 61300 T=T+M
 61310 Y=Y+M
 61320 U=U+M
 61330 I=I+M
 61340 O=O+M
 61350 P=P+M
 61360 S=S+M
 61370 D=D+M
 61380 F=F+M
 61390 G=G+M
 61400 H=H+M
 61410 J=J+M
 61420 K=K+M
 61430 L=L+M
 61440 Z=Z+M
 61450 X=X+M
 61460 C=C+M
 61470 V=V+M
 61480 B=B+M
 61490 N=N+M
 61510 LOOP

� 30
�#�"NUMBER? 1�9"-�� A$C� A$�"1"� � 10000Y� A$�"2"� � 20000o� A$�"3"� � 30000�� A$�"4"� � 40000�� A$�"5"� � 50000�� A$�"6"� � 60000�� A$�"7"� � 60100�� A$�"8"� � 60200�� A$�"9"� � 60300�� 10�"             HIT"(�� A$$2�?<�"                HIT"IF�� A$OP�UZ�x_�"IF YOU HIT E AND WAIT I END"�dQ�0�nW�1�xE�2��R�3��T�4��Y�5��U�6��I�7��O�8��P�9��S�10��D�11��F�12��G�13��H�14��J�15K�16L�17Z�18""X�19+,C�2046V�21=@B�22FJN�23O^� 10W'M�1c'� 61000k NM�2w*N� 610000uM�3�:u� 61000�@�M�4�J�� 61000�P�M�5�ZÉ 61000�`�M�6�j� 61000���M�7��� 61000�(�M�8�2� 61000���M�9�� 61000
H� A$L��M� Q#R� W+\� E3f� R;p� TCz� YK�� US�� I[�� Oc�� Pk�� Ss�� D{�� F��� G��� H��� J��� K��� L��� Z�� X�� C�� V�$� B�.� N�B� A$�"E"� ��L�Q�Q�M�V�W�W�M`�E�E�Mj�R�R�Mt�T�T�M~�Y�Y�M)��U�U�M3��I�I�M=��O�O�MG��P�P�MQ��S�S�M[��D�D�Me��F�F�Mo��G�G�My��H�H�M���J�J�M���K�K�M���L�L�M��Z�Z�M�
�X�X�M��C�C�M��V�V�M�(�B�B�M�2�N�N�M�F��
JPE@. 30@PPJ@.@#PO@."number? 1.9"@-PQ@.. a$@cPT@. a$."1". . 10000@yPU@. a$."2". . 20000@OPV@. a$."3". . 30000@.PW@. a$."4". . 40000@.PX@. a$."5". . 50000@.PY@. a$."6". . 60000@.PZ@. a$."7". . 60100@.P[@. a$."8". . 60200@.P£@. a$."9". . 60300@.P]@. 10@TQ.@."             hit"@.Q(@.. a$@$Q2@.@?Q<@."                hit"@iQf@.. a$@oQp@.@uQz@.@XQ.@."if you hit e and wait i end"@.QD@q.0@.QN@w.1@.QX@e.2@.Q.@r.3@.Q.@t.4@.Q.@y.5@.Q.@u.6@.Q.@i.7@.Q.@o.8@.Q.@p.9@.Q.@s.10@.Q.@d.11@.Q.@f.12@.Q.@g.13@.Q.@h.14@.Q.@j.15@GRDAk.16@PRNAl.17@YRXAz.18@"R"Ax.19@+R,Ac.20@4R6Av.21@=R@Ab.22@fRjAn.23@oR.A. 10@wRP'm.1@CRZ'. 61000@KR nm.2@WR*n. 61000@.R0Um.3@.R:U. 61000@.R@.m.4@.Rj.. 61000@.Rp.m.5@.Rz.. 61000@.R..m.6@.RJ.. 61000@.R..m.7@.R... 61000@.R(.m.8@.R2.. 61000@.R..m.9@CS... 61000@MSh... a$@SSl..@[Sm.. q@#Sr.. w@+S£.. e@3SF.. r@;SP.. t@cSZ.. y@kS... u@sS... i@[S... o@CS... p@KS... s@SS... d@.S... f@.S... g@.S... h@.S... j@.S... k@.S... l@.S... z@.SF.. x@.SP.. c@.SZ.. v@.S$.. b@.S... n@.Sb.. a$."e". .@.Sl.q.q.m@.Sv.w.w.m@AT..e.e.m@KTJ.r.r.m@UTT.t.t.m@.T..y.y.m@)T..u.u.m@3T..i.i.m@=T..o.o.m@gT..p.p.m@qT..s.s.m@[T..d.d.m@ET..f.f.m@OT..g.g.m@YT..h.h.m@.T..j.j.m@.T..k.k.m@.T..l.l.m@.T@.z.z.m@.TJ.x.x.m@.TT.c.c.m@.T..v.v.m@.T(.b.b.m@.T2.n.n.m@.Tf..@@@
00000000  0a 10 05 00 89 20 33 30  00 10 10 0a 00 99 00 23  |..... 30.......#|
00000010  10 0f 00 99 22 4e 55 4d  42 45 52 3f 20 31 c3 39  |...."NUMBER? 1.9|
00000020  22 00 2d 10 11 00 a1 f9  20 41 24 00 43 10 14 00  |".-..... A$.C...|
00000030  8b 20 41 24 b2 22 31 22  a7 20 8d 20 31 30 30 30  |. A$."1". . 1000|
00000040  30 00 59 10 15 00 8b 20  41 24 b2 22 32 22 a7 20  |0.Y.... A$."2". |
00000050  8d 20 32 30 30 30 30 00  6f 10 16 00 8b 20 41 24  |. 20000.o.... A$|
00000060  b2 22 33 22 a7 20 8d 20  33 30 30 30 30 00 85 10  |."3". . 30000...|
00000070  17 00 8b 20 41 24 b2 22  34 22 a7 20 8d 20 34 30  |... A$."4". . 40|
00000080  30 30 30 00 9b 10 18 00  8b 20 41 24 b2 22 35 22  |000...... A$."5"|
00000090  a7 20 8d 20 35 30 30 30  30 00 b1 10 19 00 8b 20  |. . 50000...... |
000000a0  41 24 b2 22 36 22 a7 20  8d 20 36 30 30 30 30 00  |A$."6". . 60000.|
000000b0  c7 10 1a 00 8b 20 41 24  b2 22 37 22 a7 20 8d 20  |..... A$."7". . |
000000c0  36 30 31 30 30 00 dd 10  1b 00 8b 20 41 24 b2 22  |60100...... A$."|
000000d0  38 22 a7 20 8d 20 36 30  32 30 30 00 f3 10 1c 00  |8". . 60200.....|
000000e0  8b 20 41 24 b2 22 39 22  a7 20 8d 20 36 30 33 30  |. A$."9". . 6030|
000000f0  30 00 fc 10 1d 00 89 20  31 30 00 14 11 1e 00 99  |0...... 10......|
00000100  22 20 20 20 20 20 20 20  20 20 20 20 20 20 48 49  |"             HI|
00000110  54 22 00 1e 11 28 00 a1  f9 20 41 24 00 24 11 32  |T"...(... A$.$.2|
00000120  00 99 00 3f 11 3c 00 99  22 20 20 20 20 20 20 20  |...?.<.."       |
00000130  20 20 20 20 20 20 20 20  20 48 49 54 22 00 49 11  |         HIT".I.|
00000140  46 00 a1 f9 20 41 24 00  4f 11 50 00 99 00 55 11  |F... A$.O.P...U.|
00000150  5a 00 99 00 78 11 5f 00  99 22 49 46 20 59 4f 55  |Z...x._.."IF YOU|
00000160  20 48 49 54 20 45 20 41  4e 44 20 57 41 49 54 20  | HIT E AND WAIT |
00000170  49 20 45 4e 44 22 00 80  11 64 00 51 b2 30 00 88  |I END"...d.Q.0..|
00000180  11 6e 00 57 b2 31 00 90  11 78 00 45 b2 32 00 98  |.n.W.1...x.E.2..|
00000190  11 82 00 52 b2 33 00 a0  11 8c 00 54 b2 34 00 a8  |...R.3.....T.4..|
000001a0  11 96 00 59 b2 35 00 b0  11 a0 00 55 b2 36 00 b8  |...Y.5.....U.6..|
000001b0  11 aa 00 49 b2 37 00 c0  11 b4 00 4f b2 38 00 c8  |...I.7.....O.8..|
000001c0  11 be 00 50 b2 39 00 d1  11 c8 00 53 b2 31 30 00  |...P.9.....S.10.|
000001d0  da 11 d2 00 44 b2 31 31  00 e3 11 dc 00 46 b2 31  |....D.11.....F.1|
000001e0  32 00 ec 11 e6 00 47 b2  31 33 00 f5 11 f0 00 48  |2.....G.13.....H|
000001f0  b2 31 34 00 fe 11 fa 00  4a b2 31 35 00 07 12 04  |.14.....J.15....|
00000200  01 4b b2 31 36 00 10 12  0e 01 4c b2 31 37 00 19  |.K.16.....L.17..|
00000210  12 18 01 5a b2 31 38 00  22 12 22 01 58 b2 31 39  |...Z.18.".".X.19|
00000220  00 2b 12 2c 01 43 b2 32  30 00 34 12 36 01 56 b2  |.+.,.C.20.4.6.V.|
00000230  32 31 00 3d 12 40 01 42  b2 32 32 00 46 12 4a 01  |21.=.@.B.22.F.J.|
00000240  4e b2 32 33 00 4f 12 5e  01 89 20 31 30 00 57 12  |N.23.O.^.. 10.W.|
00000250  10 27 4d b2 31 00 63 12  1a 27 89 20 36 31 30 30  |.'M.1.c..'. 6100|
00000260  30 00 6b 12 20 4e 4d b2  32 00 77 12 2a 4e 89 20  |0.k. NM.2.w.*N. |
00000270  36 31 30 30 30 00 7f 12  30 75 4d b2 33 00 8b 12  |61000...0uM.3...|
00000280  3a 75 89 20 36 31 30 30  30 00 93 12 40 9c 4d b2  |:u. 61000...@.M.|
00000290  34 00 9f 12 4a 9c 89 20  36 31 30 30 30 00 a7 12  |4...J.. 61000...|
000002a0  50 c3 4d b2 35 00 b3 12  5a c3 89 20 36 31 30 30  |P.M.5...Z.. 6100|
000002b0  30 00 bb 12 60 ea 4d b2  36 00 c7 12 6a ea 89 20  |0...`.M.6...j.. |
000002c0  36 31 30 30 30 00 cf 12  c4 ea 4d b2 37 00 db 12  |61000.....M.7...|
000002d0  ce ea 89 20 36 31 30 30  30 00 e3 12 28 eb 4d b2  |... 61000...(.M.|
000002e0  38 00 ef 12 32 eb 89 20  36 31 30 30 30 00 f7 12  |8...2.. 61000...|
000002f0  8c eb 4d b2 39 00 03 13  96 eb 89 20 36 31 30 30  |..M.9...... 6100|
00000300  30 00 0d 13 48 ee a1 f9  20 41 24 00 13 13 4c ee  |0...H... A$...L.|
00000310  eb 00 1b 13 4d ee 99 20  51 00 23 13 52 ee 99 20  |....M.. Q.#.R.. |
00000320  57 00 2b 13 5c ee 99 20  45 00 33 13 66 ee 99 20  |W.+.\.. E.3.f.. |
00000330  52 00 3b 13 70 ee 99 20  54 00 43 13 7a ee 99 20  |R.;.p.. T.C.z.. |
00000340  59 00 4b 13 84 ee 99 20  55 00 53 13 8e ee 99 20  |Y.K.... U.S.... |
00000350  49 00 5b 13 98 ee 99 20  4f 00 63 13 a2 ee 99 20  |I.[.... O.c.... |
00000360  50 00 6b 13 ac ee 99 20  53 00 73 13 b6 ee 99 20  |P.k.... S.s.... |
00000370  44 00 7b 13 c0 ee 99 20  46 00 83 13 ca ee 99 20  |D.{.... F...... |
00000380  47 00 8b 13 d4 ee 99 20  48 00 93 13 de ee 99 20  |G...... H...... |
00000390  4a 00 9b 13 e8 ee 99 20  4b 00 a3 13 f2 ee 99 20  |J...... K...... |
000003a0  4c 00 ab 13 fc ee 99 20  5a 00 b3 13 06 ef 99 20  |L...... Z...... |
000003b0  58 00 bb 13 10 ef 99 20  43 00 c3 13 1a ef 99 20  |X...... C...... |
000003c0  56 00 cb 13 24 ef 99 20  42 00 d3 13 2e ef 99 20  |V...$.. B...... |
000003d0  4e 00 e3 13 42 ef 8b 20  41 24 b2 22 45 22 a7 20  |N...B.. A$."E". |
000003e0  8e 00 ed 13 4c ef 51 b2  51 aa 4d 00 f7 13 56 ef  |....L.Q.Q.M...V.|
000003f0  57 b2 57 aa 4d 00 01 14  60 ef 45 b2 45 aa 4d 00  |W.W.M...`.E.E.M.|
00000400  0b 14 6a ef 52 b2 52 aa  4d 00 15 14 74 ef 54 b2  |..j.R.R.M...t.T.|
00000410  54 aa 4d 00 1f 14 7e ef  59 b2 59 aa 4d 00 29 14  |T.M...~.Y.Y.M.).|
00000420  88 ef 55 b2 55 aa 4d 00  33 14 92 ef 49 b2 49 aa  |..U.U.M.3...I.I.|
00000430  4d 00 3d 14 9c ef 4f b2  4f aa 4d 00 47 14 a6 ef  |M.=...O.O.M.G...|
00000440  50 b2 50 aa 4d 00 51 14  b0 ef 53 b2 53 aa 4d 00  |P.P.M.Q...S.S.M.|
00000450  5b 14 ba ef 44 b2 44 aa  4d 00 65 14 c4 ef 46 b2  |[...D.D.M.e...F.|
00000460  46 aa 4d 00 6f 14 ce ef  47 b2 47 aa 4d 00 79 14  |F.M.o...G.G.M.y.|
00000470  d8 ef 48 b2 48 aa 4d 00  83 14 e2 ef 4a b2 4a aa  |..H.H.M.....J.J.|
00000480  4d 00 8d 14 ec ef 4b b2  4b aa 4d 00 97 14 f6 ef  |M.....K.K.M.....|
00000490  4c b2 4c aa 4d 00 a1 14  00 f0 5a b2 5a aa 4d 00  |L.L.M.....Z.Z.M.|
000004a0  ab 14 0a f0 58 b2 58 aa  4d 00 b5 14 14 f0 43 b2  |....X.X.M.....C.|
000004b0  43 aa 4d 00 bf 14 1e f0  56 b2 56 aa 4d 00 c9 14  |C.M.....V.V.M...|
000004c0  28 f0 42 b2 42 aa 4d 00  d3 14 32 f0 4e b2 4e aa  |(.B.B.M...2.N.N.|
000004d0  4d 00 d9 14 46 f0 ec 00  00 00                    |M...F.....|
000004da