TOUCH TONE
FILE INFORMATION
FILENAME(S): TOUCH TONE
FILE TYPE(S): PRG
FILE SIZE: 1.4K
FIRST SEEN: 2025-11-30 19:36:45
APPEARS ON: 1 disk(s)
FILE HASH
877a4cf856cd58c9ee2106a8e046215adc7d3b6311618264a9d7c079cbc35b9c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JBR C64 RADIO MM | TOUCH TONE | PRG | Curtcool, Bo | 14 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 0A 00 8F 20 54 4F 55 43 48 2D 54 4F |....... TOUCH-TO|
00000010: 4E 45 20 44 49 41 4C 45 52 00 2E 08 14 00 8F 20 |NE DIALER...... |
00000020: 42 59 20 42 4F 42 20 48 55 46 46 4D 41 4E 00 34 |BY BOB HUFFMAN.4|
00000030: 08 1E 00 3A 00 61 08 28 00 8F 20 54 4F 52 4F 4E |...:.a.(.. TORON|
00000040: 54 4F 20 42 42 53 20 4E 55 4D 42 45 52 53 20 42 |TO BBS NUMBERS B|
00000050: 59 20 52 49 43 48 41 52 44 20 42 52 41 44 4C 45 |Y RICHARD BRADLE|
00000060: 59 00 75 08 32 00 86 20 42 24 28 35 30 29 2C 43 |Y.u.2.. B$(50),C|
00000070: 24 28 35 30 29 00 9C 08 64 00 83 20 53 4F 45 42 |$(50)...d.. SOEB|
00000080: 4F 52 47 20 46 52 41 20 31 30 20 54 49 4C 20 37 |ORG FRA 10 TIL 7|
00000090: 30 20 57 41 54 54 2C 39 31 38 33 32 00 BE 08 6E |0 WATT,91832...n|
000000A0: 00 83 20 4C 4F 45 53 4E 45 20 53 51 55 45 4C 53 |.. LOESNE SQUELS|
000000B0: 20 53 4F 45 42 4F 52 47 2C 39 31 38 33 33 00 DA | SOEBORG,91833..|
000000C0: 08 78 00 83 20 41 41 42 4E 45 20 53 4F 45 42 4F |.x.. AABNE SOEBO|
000000D0: 52 47 2C 39 31 38 30 35 30 35 00 FC 08 82 00 83 |RG,9180505......|
000000E0: 20 4F 5A 20 36 41 58 20 20 51 52 56 20 31 34 34 | OZ 6AX QRV 144|
000000F0: 2E 38 32 35 2C 36 31 31 38 33 30 30 00 1E 09 8C |.825,6118300....|
00000100: 00 83 20 4F 5A 20 31 49 46 4A 20 51 52 56 20 31 |.. OZ 1IFJ QRV 1|
00000110: 34 35 2E 35 37 35 2C 31 39 35 34 33 32 38 00 28 |45.575,1954328.(|
00000120: 09 DE 03 83 20 30 2C 30 00 42 09 E0 03 97 20 35 |.... 0,0.B.... 5|
00000130: 33 32 38 31 2C 31 35 3A 97 20 35 33 32 38 30 2C |3281,15:. 53280,|
00000140: 31 32 00 55 09 E1 03 99 20 C7 28 31 34 37 29 C7 |12.U.... .(147).|
00000150: 28 31 35 31 29 00 5D 09 E8 03 50 B2 31 00 6F 09 |(151).]...P.1.o.|
00000160: F2 03 87 20 42 24 28 50 29 2C 43 24 28 50 29 00 |... B$(P),C$(P).|
00000170: 86 09 FC 03 8B 20 42 24 28 50 29 B2 22 30 22 20 |..... B$(P)."0" |
00000180: A7 20 31 30 34 30 00 97 09 06 04 50 B2 50 AA 31 |. 1040.....P.P.1|
00000190: 3A 89 20 31 30 31 30 00 B9 09 10 04 50 4D B2 50 |:. 1010.....PM.P|
000001A0: AB 31 3A 43 46 B2 31 2E 30 31 33 32 3A 4B B2 2E |.1:CF.1.0132:K..|
000001B0: 30 35 39 36 30 34 36 34 35 00 D4 09 1A 04 81 20 |059604645...... |
000001C0: 4E B2 30 20 A4 20 33 3A 87 20 46 3A 46 B2 46 AC |N.0 . 3:. F:F.F.|
000001D0: 43 46 AD 4B 00 FB 09 24 04 52 48 28 4E 29 B2 B5 |CF.K...$.RH(N)..|
000001E0: 28 46 AD 32 35 36 29 3A 52 4C 28 4E 29 B2 46 AB |(F.256):RL(N).F.|
000001F0: 32 35 36 AC 52 48 28 4E 29 3A 82 00 11 0A 2E 04 |256.RH(N):......|
00000200: 83 20 36 39 37 2C 37 37 30 2C 38 35 32 2C 39 34 |. 697,770,852,94|
00000210: 31 00 2C 0A 38 04 81 20 4E B2 30 20 A4 20 32 3A |1.,.8.. N.0 . 2:|
00000220: 87 20 46 3A 46 B2 46 AC 43 46 AD 4B 00 53 0A 42 |. F:F.F.CF.K.S.B|
00000230: 04 43 48 28 4E 29 B2 B5 28 46 AD 32 35 36 29 3A |.CH(N)..(F.256):|
00000240: 43 4C 28 4E 29 B2 46 AB 32 35 36 AC 43 48 28 4E |CL(N).F.256.CH(N|
00000250: 29 3A 82 00 68 0A 43 04 83 20 31 32 30 39 2C 31 |):..h.C.. 1209,1|
00000260: 33 33 36 2C 31 34 37 37 00 88 0A 44 04 56 31 B2 |336,1477...D.V1.|
00000270: 35 34 32 37 32 3A 56 32 B2 56 31 AA 37 3A 97 20 |54272:V2.V1.7:. |
00000280: 56 31 AA 32 34 2C 31 35 00 A0 0A 45 04 97 20 56 |V1.24,15...E.. V|
00000290: 31 AA 35 2C 30 3A 97 20 56 31 AA 36 2C 32 34 30 |1.5,0:. V1.6,240|
000002A0: 00 B8 0A 46 04 97 20 56 32 AA 35 2C 30 3A 97 20 |...F.. V2.5,0:. |
000002B0: 56 32 AA 36 2C 32 34 30 00 C0 0A 4C 04 50 B2 31 |V2.6,240...L.P.1|
000002C0: 00 E7 0A 56 04 99 20 C7 28 31 34 37 29 22 4B 45 |...V.. .(147)"KE|
000002D0: 59 20 20 50 41 52 54 59 22 A3 32 37 29 22 4E 55 |Y PARTY".27)"NU|
000002E0: 4D 42 45 52 22 3A 99 00 FE 0A 60 04 8B 20 42 24 |MBER":....`.. B$|
000002F0: 28 50 29 B2 22 30 22 20 A7 20 31 32 32 30 00 19 |(P)."0" . 1220..|
00000300: 0B 6A 04 99 20 50 3B A3 34 29 42 24 28 50 29 3B |.j.. P;.4)B$(P);|
00000310: A3 32 33 29 43 24 28 50 29 00 23 0B 74 04 50 B2 |.23)C$(P).#.t.P.|
00000320: 50 AA 31 00 45 0B 7E 04 8B 20 28 50 AB 31 29 AD |P.1.E.~.. (P.1).|
00000330: 31 38 B2 B5 28 28 50 AB 31 29 AD 31 38 29 20 A7 |18..((P.1).18) .|
00000340: 20 31 31 37 30 00 4F 0B 88 04 89 31 31 32 30 00 | 1170.O....1120.|
00000350: 7E 0B 92 04 99 3A 85 20 22 45 4E 54 45 52 20 4B |~....:. "ENTER K|
00000360: 45 59 20 4F 52 20 52 45 54 55 52 4E 20 46 4F 52 |EY OR RETURN FOR|
00000370: 20 4E 45 58 54 20 50 41 47 45 22 3B 41 24 00 8F | NEXT PAGE";A$..|
00000380: 0B 9C 04 41 B2 C5 28 41 24 AA C7 28 30 29 29 00 |...A..(A$..(0)).|
00000390: A0 0B A6 04 8B 20 41 B2 30 20 A7 20 31 31 31 30 |..... A.0 . 1110|
000003A0: 00 C7 0B B0 04 8B 20 41 B1 50 4D 20 A7 20 99 22 |...... A.PM . ."|
000003B0: 54 52 59 20 41 47 41 49 4E 22 3A 41 24 B2 22 22 |TRY AGAIN":A$.""|
000003C0: 3A 89 20 31 31 37 30 00 DC 0B BA 04 4E 42 24 B2 |:. 1170.....NB$.|
000003D0: 43 24 28 41 29 3A 89 20 31 32 37 30 00 04 0C C4 |C$(A):. 1270....|
000003E0: 04 99 3A 85 20 22 45 4E 54 45 52 20 4B 45 59 20 |..:. "ENTER KEY |
000003F0: 4F 52 20 52 45 54 55 52 4E 20 54 4F 20 45 4E 44 |OR RETURN TO END|
00000400: 22 3B 41 24 00 15 0C CE 04 41 B2 C5 28 41 24 AA |";A$.....A..(A$.|
00000410: C7 28 30 29 29 00 35 0C D3 04 8B 20 41 24 B2 22 |.(0)).5.... A$."|
00000420: 52 22 20 A7 20 50 B2 31 3A 41 24 B2 22 22 3A 89 |R" . P.1:A$."":.|
00000430: 20 31 31 31 30 00 43 0C D8 04 8B 20 41 B2 30 20 | 1110.C.... A.0 |
00000440: A7 20 80 00 6A 0C E2 04 8B 20 41 B1 50 4D 20 A7 |. ..j.... A.PM .|
00000450: 20 99 22 54 52 59 20 41 47 41 49 4E 22 3A 41 24 | ."TRY AGAIN":A$|
00000460: B2 22 22 3A 89 20 31 32 32 30 00 78 0C EC 04 4E |."":. 1220.x...N|
00000470: 42 24 B2 43 24 28 41 29 00 8B 0C F6 04 81 20 4A |B$.C$(A)...... J|
00000480: B2 31 20 A4 20 C3 28 4E 42 24 29 00 9D 0C 00 05 |.1 . .(NB$).....|
00000490: 4E 24 B2 CA 28 4E 42 24 2C 4A 2C 31 29 00 B4 0C |N$..(NB$,J,1)...|
000004A0: 0A 05 8B 20 4E 24 B2 22 30 22 20 A7 20 4E 24 B2 |... N$."0" . N$.|
000004B0: 22 31 31 22 00 CB 0C 14 05 8B 20 4E 24 B2 22 2A |"11"...... N$."*|
000004C0: 22 20 A7 20 4E 24 B2 22 31 30 22 00 E2 0C 1E 05 |" . N$."10".....|
000004D0: 8B 20 4E 24 B2 22 23 22 20 A7 20 4E 24 B2 22 31 |. N$."#" . N$."1|
000004E0: 32 22 00 0A 0D 28 05 8B 20 4E 24 B2 22 20 22 B0 |2"...(.. N$." ".|
000004F0: 4E 24 B2 22 2D 22 B0 4E 24 B2 22 28 22 B0 4E 24 |N$."-".N$."(".N$|
00000500: B2 22 29 22 A7 20 31 34 31 30 00 19 0D 32 05 56 |.")". 1410...2.V|
00000510: 41 B2 C5 28 4E 24 29 AB 31 00 25 0D 3C 05 52 25 |A..(N$).1.%.<.R%|
00000520: B2 56 41 AD 33 00 34 0D 46 05 43 25 B2 56 41 AB |.VA.3.4.F.C%.VA.|
00000530: 33 AC 52 25 00 52 0D 50 05 97 20 56 31 AA 31 2C |3.R%.R.P.. V1.1,|
00000540: 52 48 28 52 25 29 3A 97 20 56 31 2C 52 4C 28 52 |RH(R%):. V1,RL(R|
00000550: 25 29 00 70 0D 5A 05 97 20 56 32 AA 31 2C 43 48 |%).p.Z.. V2.1,CH|
00000560: 28 43 25 29 3A 97 20 56 32 2C 43 4C 28 43 25 29 |(C%):. V2,CL(C%)|
00000570: 00 88 0D 64 05 97 20 56 31 AA 34 2C 31 37 3A 97 |...d.. V1.4,17:.|
00000580: 20 56 32 AA 34 2C 31 37 00 9A 0D 6E 05 81 20 4E | V2.4,17...n.. N|
00000590: B2 31 20 A4 20 31 30 30 3A 82 00 B0 0D 78 05 97 |.1 . 100:....x..|
000005A0: 20 56 31 AA 34 2C 30 3A 97 20 56 32 AA 34 2C 30 | V1.4,0:. V2.4,0|
000005B0: 00 C7 0D 82 05 82 3A 50 B2 31 3A 41 24 B2 22 22 |......:P.1:A$.""|
000005C0: 3A 89 20 31 31 31 30 00 00 00 FF 46 |:. 1110....F |
....... TOUCH-TONE DIALER...... BY BOB H
UFFMAN.4...:.A.(.. TORONTO BBS NUMBERS B
Y RICHARD BRADLEY.U.2.. B$(50),C$(50)...
D.. SOEBORG FRA 10 TIL 70 WATT,91832...N
.. LOESNE SQUELS SOEBORG,91833.Z.X.. AAB
NE SOEBORG,9180505...... OZ 6AX QRV 144
.825,6118300...... OZ 1IFJ QRV 145.575,1
954328.(.... 0,0.B.... 53281,15:. 53280,
12.U.... G(147)G(151).]...P.1.O.... B$(P
),C$(P)...... B$(P)."0" . 1040.....P.P.1
:. 1010.....PM.P.1:CF.1.0132:K..05960464
5.T.... N.0 . 3:. F:F.F.CF.K...$.RH(N)..
(F.256):RL(N).F.256.RH(N):....... 697,77
0,852,941.,.8.. N.0 . 2:. F:F.F.CF.K.S.B
.CH(N)..(F.256):CL(N).F.256.CH(N):..H.C.
. 1209,1336,1477...D.V1.54272:V2.V1.7:.
V1.24,15. .E.. V1.5,0:. V1.6,240...F.. V
2.5,0:. V2.6,240...L.P.1...V.. G(147)"KE
Y PARTY".27)"NUMBER":....`.. B$(P)."0"
. 1220...J.. P;.4)B$(P);.23)C$(P).#.T.P.
P.1.E.~.. (P.1).18..((P.1).18) . 1170.O.
...1120.~....:. "ENTER KEY OR RETURN FOR
NEXT PAGE";A$.....A.E(A$.G(0)). .... A.
0 . 1110.G.... A.PM . ."TRY AGAIN":A$.""
:. 1170.....NB$.C$(A):. 1270...D..:. "EN
TER KEY OR RETURN TO END";A$...N.A.E(A$.
G(0)).5.S.. A$."R" . P.1:A$."":. 1110.C.
X.. A.0 . ..J.... A.PM . ."TRY AGAIN":A$
."":. 1220.X...NB$.C$(A)...... J.1 . C(N
B$).....N$.J(NB$,J,1)...... N$."0" . N$.
"11".K.... N$."*" . N$."10"...... N$."#"
. N$."12"...(.. N$." ".N$."-".N$."(".N$
.")". 1410...2.VA.E(N$).1.%.<.R%.VA.3.4.
F.C%.VA.3.R%.R.P.. V1.1,RH(R%):. V1,RL(R
%).P.Z.. V2.1,CH(C%):. V2,CL(C%)...D.. V
1.4,17:. V2.4,17...N.. N.1 . 100:....X..
V1.4,0:. V2.4,0.G....:P.1:A$."":. 1110.
...F
> CLICK IMAGE PREVIEW FOR FULL MODAL