AMOEBA DIALER V4
FILE INFORMATION
FILENAME(S): AMOEBA DIALER V4
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-11-30 16:59:30
APPEARS ON: 1 disk(s)
FILE HASH
25d3a796c5f4430d80a04bbde5fc109dfa5c919de2493c4653838d3e07b299aa
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TALENTED RULERZ | AMOEBA DIALER V4 | PRG | High Voltage Complete C64 Collection | 8 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 09 08 01 00 89 31 36 00 29 08 02 00 99 22 |.......16.)...."|
00000010: 47 45 54 20 4E 55 4D 42 45 52 53 20 46 52 4F 4D |GET NUMBERS FROM|
00000020: 20 44 49 53 4B 3F 20 22 3B 00 3C 08 03 00 A1 20 | DISK? ";.<.... |
00000030: 41 24 3A 8B 41 24 B2 22 22 20 A7 33 00 56 08 04 |A$:.A$."" .3.V..|
00000040: 00 8B 20 41 24 B2 22 4E 22 20 A7 20 99 22 4E 4F |.. A$."N" . ."NO|
00000050: 21 22 3A 89 33 32 00 66 08 05 00 8B 20 41 24 B3 |!":.32.f.... A$.|
00000060: B1 22 59 22 A7 33 00 72 08 06 00 99 22 59 45 53 |."Y".3.r...."YES|
00000070: 21 22 00 93 08 07 00 9F 20 34 2C 38 2C 34 2C 22 |!"...... 4,8,4,"|
00000080: 41 4D 4F 45 42 41 20 4E 55 4D 42 45 52 53 2C 53 |AMOEBA NUMBERS,S|
00000090: 2C 52 22 00 9F 08 08 00 A1 23 34 2C 53 4E 3A 00 |,R"......#4,SN:.|
000000A0: B7 08 09 00 99 22 93 47 45 54 54 49 4E 47 20 52 |.....".GETTING R|
000000B0: 45 43 4F 52 44 53 22 00 D6 08 0A 00 99 22 54 4F |ECORDS"......"TO|
000000C0: 54 41 4C 20 4F 46 20 22 3B 53 4E 3B 22 20 52 45 |TAL OF ";SN;" RE|
000000D0: 43 4F 52 44 53 22 00 EA 08 0B 00 86 44 44 24 28 |CORDS"......DD$(|
000000E0: 53 4E 29 2C 44 4E 28 53 4E 29 00 07 09 0C 00 81 |SN),DN(SN)......|
000000F0: 20 58 B2 31 A4 53 4E 3A 84 34 2C 44 44 24 28 58 | X.1.SN:.4,DD$(X|
00000100: 29 2C 44 4E 28 58 29 00 24 09 0D 00 99 22 13 11 |),DN(X).$...."..|
00000110: 11 11 47 45 54 54 49 4E 47 20 52 45 43 4F 52 44 |..GETTING RECORD|
00000120: 22 58 3A 82 00 2B 09 0E 00 A0 34 00 31 09 0F 00 |"X:..+....4.1...|
00000130: 8E 00 48 09 10 00 49 58 B2 30 3A 97 36 35 30 2C |..H...IX.0:.650,|
00000140: 31 32 38 3A 89 31 33 33 00 51 09 11 00 41 54 B2 |128:.133.Q...AT.|
00000150: 30 00 5C 09 12 00 9F 35 2C 32 2C 33 00 6E 09 13 |0.\....5,2,3.n..|
00000160: 00 97 33 36 38 37 39 2C 38 3A 99 22 05 22 00 86 |..36879,8:."."..|
00000170: 09 14 00 42 31 B2 35 36 35 37 37 3A 42 32 B2 35 |...B1.56577:B2.5|
00000180: 36 35 37 39 3A 8F 00 9C 09 15 00 97 35 33 32 38 |6579:.......5328|
00000190: 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 B4 09 16 |0,0:.53281,0....|
000001A0: 00 97 35 34 32 37 33 2C 31 37 3A 97 35 34 32 37 |..54273,17:.5427|
000001B0: 32 2C 33 37 00 BA 09 17 00 3A 00 C0 09 18 00 3A |2,37.....:.....:|
000001C0: 00 C6 09 19 00 3A 00 CC 09 1A 00 8F 00 D2 09 1B |.....:..........|
000001D0: 00 8F 00 F9 09 1C 00 97 42 32 2C 33 32 3A 8F 20 |........B2,32:. |
000001E0: 53 45 54 20 55 50 20 50 4F 52 54 20 42 20 46 4F |SET UP PORT B FO|
000001F0: 52 20 44 49 41 4C 49 4E 47 00 04 0A 1D 00 97 20 |R DIALING...... |
00000200: 42 31 2C 30 00 13 0A 1E 00 8B 53 4E B3 B1 30 20 |B1,0......SN..0 |
00000210: A7 33 35 00 1E 0A 1F 00 8D 32 3A 89 33 35 00 45 |.35......2:.35.E|
00000220: 0A 20 00 85 22 48 4F 57 20 4D 41 4E 59 20 53 59 |. .."HOW MANY SY|
00000230: 53 54 45 4D 53 20 49 4E 20 54 48 45 20 4C 49 53 |STEMS IN THE LIS|
00000240: 54 22 3B 53 4E 00 7E 0A 21 00 86 44 4E 28 53 4E |T";SN.~.!..DN(SN|
00000250: 29 2C 44 44 24 28 53 4E 29 3A 81 20 58 B2 31 20 |),DD$(SN):. X.1 |
00000260: A4 20 53 4E 3A 85 20 22 4E 41 4D 45 20 4F 46 20 |. SN:. "NAME OF |
00000270: 53 59 53 54 45 4D 22 3B 44 44 24 28 58 29 00 9A |SYSTEM";DD$(X)..|
00000280: 0A 22 00 85 22 50 48 4F 4E 45 20 4E 55 4D 42 45 |.".."PHONE NUMBE|
00000290: 52 22 3B 44 4E 28 58 29 3A 82 00 A3 0A 23 00 99 |R";DN(X):....#..|
000002A0: 22 93 22 00 C0 0A 24 00 85 22 54 45 52 4D 49 4E |"."...$.."TERMIN|
000002B0: 41 4C 20 46 49 4C 45 4E 41 4D 45 22 3B 45 51 24 |AL FILENAME";EQ$|
000002C0: 00 FA 0A 25 00 4E 54 B2 30 3A 59 43 B2 30 3A 41 |...%.NT.0:YC.0:A|
000002D0: 54 B2 41 54 AA 31 3A 4E 42 B2 30 3A 56 58 B2 32 |T.AT.1:NB.0:VX.2|
000002E0: 32 3A 81 47 B2 31 A4 31 30 3A A1 41 24 3A 8B 41 |2:.G.1.10:.A$:.A|
000002F0: 24 B2 22 20 22 A7 8A 3A 82 47 00 07 0B 26 00 8B |$." "..:.G...&..|
00000300: 59 B2 30 A7 59 B2 31 00 1C 0B 27 00 55 B2 55 AA |Y.0.Y.1...'.U.U.|
00000310: 31 3A 8B 20 55 B3 B1 33 20 A7 34 31 00 36 0B 28 |1:. U..3 .41.6.(|
00000320: 00 59 B2 59 AA 31 3A 55 B2 31 3A 8B 59 B1 53 4E |.Y.Y.1:U.1:.Y.SN|
00000330: 20 A7 20 59 B2 31 00 4D 0B 29 00 44 B2 44 4E 28 | . Y.1.M.).D.DN(|
00000340: 59 29 3A 53 59 24 B2 44 44 24 28 59 29 00 8E 0B |Y):SY$.DD$(Y)...|
00000350: 2A 00 99 22 13 11 48 41 4E 47 49 4E 47 20 55 50 |*.."..HANGING UP|
00000360: 20 20 20 20 20 20 20 20 20 3A 20 22 3B 44 3A 99 | : ";D:.|
00000370: 22 4E 55 4D 42 45 52 20 4F 46 20 41 54 54 45 4D |"NUMBER OF ATTEM|
00000380: 50 54 53 20 3A 20 22 3B 55 3A 52 43 B2 30 00 B8 |PTS : ";U:RC.0..|
00000390: 0B 2B 00 99 22 53 59 53 54 45 4D 20 4E 41 4D 45 |.+.."SYSTEM NAME|
000003A0: 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |: |
000003B0: 20 20 20 20 20 20 20 22 00 D2 0B 2C 00 99 22 91 | "...,..".|
000003C0: 53 59 53 54 45 4D 20 4E 41 4D 45 3A 20 22 3B 53 |SYSTEM NAME: ";S|
000003D0: 59 24 00 01 0C 2D 00 99 22 13 11 11 11 11 1C 41 |Y$...-.."......A|
000003E0: 4D 4F 45 42 41 20 44 49 41 4C 20 33 2E 30 20 42 |MOEBA DIAL 3.0 B|
000003F0: 59 20 44 4F 43 54 4F 52 20 41 4D 4F 45 42 41 20 |Y DOCTOR AMOEBA |
00000400: 22 00 24 0C 2E 00 99 22 4D 4F 44 49 46 49 45 44 |".$...."MODIFIED|
00000410: 20 42 59 20 2D 2D 2D 3E 54 48 45 20 52 41 4E 47 | BY --->THE RANG|
00000420: 45 52 05 22 00 42 0C 2F 00 99 22 53 59 53 54 45 |ER.".B./.."SYSTE|
00000430: 4D 22 2C 2C 22 50 48 4F 4E 45 20 4E 55 4D 42 45 |M",,"PHONE NUMBE|
00000440: 52 22 00 60 0C 30 00 99 22 A3 A3 A3 A3 A3 A3 22 |R".`.0.."......"|
00000450: 2C 2C 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 |,,"............"|
00000460: 00 92 0C 31 00 81 20 58 B2 31 A4 53 4E 3A 99 44 |...1.. X.1.SN:.D|
00000470: 44 24 28 58 29 2C 3A 8B 20 C3 28 44 44 24 28 58 |D$(X),:. .(DD$(X|
00000480: 29 29 B3 B2 39 20 A7 20 99 20 2C 44 4E 28 58 29 |))..9 . . ,DN(X)|
00000490: 3A 82 00 A9 0C 32 00 8B 58 B1 53 4E A7 35 32 3A |:....2..X.SN.52:|
000004A0: 99 20 44 4E 28 58 29 3A 82 00 B7 0C 33 00 99 20 |. DN(X):....3.. |
000004B0: 44 4E 28 58 29 3A 82 00 C1 0C 34 00 97 42 31 2C |DN(X):....4..B1,|
000004C0: 30 00 D7 0C 35 00 81 53 57 B2 31 A4 34 30 30 3A |0...5..SW.1.400:|
000004D0: 97 42 31 2C 30 3A 82 00 FD 0C 36 00 97 42 31 2C |.B1,0:....6..B1,|
000004E0: 33 32 3A 99 22 13 11 50 49 43 4B 49 4E 47 20 55 |32:."..PICKING U|
000004F0: 50 20 20 20 20 20 20 20 20 20 3A 22 3B 00 07 0D |P :";...|
00000500: 37 00 54 B2 31 30 30 00 2F 0D 38 00 54 B2 54 AB |7.T.100./.8.T.T.|
00000510: 31 3A 8B 54 B3 B1 30 A7 35 36 3A 8F 20 57 41 49 |1:.T..0.56:. WAI|
00000520: 54 20 46 4F 52 20 44 49 41 4C 20 54 4F 4E 45 00 |T FOR DIAL TONE.|
00000530: 6B 0D 39 00 99 22 93 11 44 49 41 4C 49 4E 47 20 |k.9.."..DIALING |
00000540: 4E 55 4D 42 45 52 20 20 20 20 20 3A 20 22 3B 44 |NUMBER : ";D|
00000550: 3A 99 22 4E 55 4D 42 45 52 20 4F 46 20 41 54 54 |:."NUMBER OF ATT|
00000560: 45 4D 50 54 53 20 3A 20 22 3B 55 00 99 0D 3A 00 |EMPTS : ";U...:.|
00000570: 99 22 53 59 53 54 45 4D 20 4E 41 4D 45 3A 20 20 |."SYSTEM NAME: |
00000580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000590: 20 20 20 20 20 20 20 20 22 00 B3 0D 3B 00 99 22 | "...;.."|
000005A0: 91 53 59 53 54 45 4D 20 4E 41 4D 45 3A 20 22 3B |.SYSTEM NAME: ";|
000005B0: 53 59 24 00 E2 0D 3C 00 99 22 13 11 11 11 11 1C |SY$...<.."......|
000005C0: 41 4D 4F 45 42 41 20 44 49 41 4C 20 33 2E 30 20 |AMOEBA DIAL 3.0 |
000005D0: 42 59 20 44 4F 43 54 4F 52 20 41 4D 4F 45 42 41 |BY DOCTOR AMOEBA|
000005E0: 20 22 00 05 0E 3D 00 99 22 4D 4F 44 49 46 49 45 | "...=.."MODIFIE|
000005F0: 44 20 42 59 20 2D 2D 2D 3E 54 48 45 20 52 41 4E |D BY --->THE RAN|
00000600: 47 45 52 05 22 00 23 0E 3E 00 99 22 53 59 53 54 |GER.".#.>.."SYST|
00000610: 45 4D 22 2C 2C 22 50 48 4F 4E 45 20 4E 55 4D 42 |EM",,"PHONE NUMB|
00000620: 45 52 22 00 41 0E 3F 00 99 22 A3 A3 A3 A3 A3 A3 |ER".A.?.."......|
00000630: 22 2C 2C 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |",,"............|
00000640: 22 00 73 0E 40 00 81 20 58 B2 31 A4 53 4E 3A 99 |".s.@.. X.1.SN:.|
00000650: 44 44 24 28 58 29 2C 3A 8B 20 C3 28 44 44 24 28 |DD$(X),:. .(DD$(|
00000660: 58 29 29 B3 B2 39 20 A7 20 99 20 2C 44 4E 28 58 |X))..9 . . ,DN(X|
00000670: 29 3A 82 00 8A 0E 41 00 8B 58 B1 53 4E A7 36 37 |):....A..X.SN.67|
00000680: 3A 99 20 44 4E 28 58 29 3A 82 00 98 0E 42 00 99 |:. DN(X):....B..|
00000690: 20 44 4E 28 58 29 3A 82 00 A4 0E 43 00 41 24 B2 | DN(X):....C.A$.|
000006A0: C4 28 44 29 00 B3 0E 44 00 41 24 B2 C9 28 41 24 |.(D)...D.A$..(A$|
000006B0: 2C 37 29 00 B9 0E 45 00 3A 00 C5 0E 46 00 45 B2 |,7)...E.:...F.E.|
000006C0: C3 28 41 24 29 00 D3 0E 47 00 81 20 58 B2 31 20 |.(A$)...G.. X.1 |
000006D0: A4 20 45 00 E4 0E 48 00 4E 24 B2 CA 28 41 24 2C |. E...H.N$..(A$,|
000006E0: 58 2C 31 29 00 EA 0E 49 00 3A 00 03 0F 4A 00 4E |X,1)...I.:...J.N|
000006F0: B2 C5 28 4E 24 29 3A 8F 20 43 41 4C 4C 20 44 49 |..(N$):. CALL DI|
00000700: 47 49 54 00 11 0F 4B 00 8B 4E B2 30 A7 4E B2 31 |GIT...K..N.0.N.1|
00000710: 30 00 19 0F 4C 00 8D 38 34 00 20 0F 4D 00 82 58 |0...L..84. .M..X|
00000720: 00 26 0F 4E 00 3A 00 5A 0F 4F 00 3A 20 20 20 20 |.&.N.:.Z.O.: |
00000730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000750: 20 20 20 20 20 20 20 20 20 20 00 62 0F 50 00 89 | .b.P..|
00000760: 39 39 00 68 0F 51 00 3A 00 8A 0F 52 00 8F 20 53 |99.h.Q.:...R.. S|
00000770: 55 42 2E 2E 20 54 4F 20 50 55 4C 53 45 20 4C 49 |UB.. TO PULSE LI|
00000780: 4E 45 20 4E 20 54 49 4D 45 53 00 90 0F 53 00 3A |NE N TIMES...S.:|
00000790: 00 D4 0F 54 00 8B 4E B2 31 30 A7 99 22 13 22 3A |...T..N.10..".":|
000007A0: 99 22 44 49 41 4C 49 4E 47 20 4E 55 4D 42 45 52 |."DIALING NUMBER|
000007B0: 20 20 20 20 20 3A 20 22 3B 44 3B 3A 99 22 13 22 | : ";D;:."."|
000007C0: 3A 99 A6 56 58 29 22 12 22 3B 4E 24 3B 22 92 22 |:..VX)".";N$;"."|
000007D0: 3A 89 38 36 00 0E 10 55 00 99 22 13 22 3A 99 22 |:.86...U..".":."|
000007E0: 44 49 41 4C 49 4E 47 20 4E 55 4D 42 45 52 20 20 |DIALING NUMBER |
000007F0: 20 20 20 3A 20 22 3B 44 3B 3A 99 22 13 22 3A 99 | : ";D;:.".":.|
00000800: A6 56 58 29 22 12 22 3B 4E 24 3B 22 92 22 00 1A |.VX)".";N$;"."..|
00000810: 10 56 00 81 4E 31 B2 31 A4 4E 00 24 10 57 00 97 |.V..N1.1.N.$.W..|
00000820: 42 31 2C 30 00 2C 10 58 00 54 B2 33 00 3F 10 59 |B1,0.,.X.T.3.?.Y|
00000830: 00 54 B2 54 AB 31 3A 8B 54 B3 B1 30 A7 38 39 00 |.T.T.1:.T..0.89.|
00000840: 4A 10 5A 00 97 42 31 2C 33 32 00 52 10 5B 00 54 |J.Z..B1,32.R.[.T|
00000850: B2 34 00 65 10 5C 00 54 B2 54 AB 31 3A 8B 54 B3 |.4.e.\.T.T.1:.T.|
00000860: B1 30 A7 39 32 00 6E 10 5D 00 82 20 4E 31 00 74 |.0.92.n.].. N1.t|
00000870: 10 5E 00 3A 00 7D 10 5F 00 54 B2 31 38 00 90 10 |.^.:.}._.T.18...|
00000880: 60 00 54 B2 54 AB 31 3A 8B 54 B3 B1 30 A7 39 36 |`.T.T.1:.T..0.96|
00000890: 00 9E 10 61 00 56 58 B2 56 58 AA 31 3A 8E 00 A4 |...a.VX.VX.1:...|
000008A0: 10 62 00 80 00 F3 10 63 00 99 22 13 20 20 20 20 |.b.....c..". |
000008B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008D0: 20 20 20 20 22 3A 99 22 13 11 57 41 49 54 49 4E | ":."..WAITIN|
000008E0: 47 20 46 4F 52 20 43 41 52 52 49 45 52 3A 20 22 |G FOR CARRIER: "|
000008F0: 3B 44 3B 00 01 11 64 00 81 43 48 B2 31 A4 35 30 |;D;...d..CH.1.50|
00000900: 30 00 1A 11 65 00 8B C2 28 35 36 35 37 37 29 B2 |0...e...(56577).|
00000910: 34 37 A7 31 30 38 3A 47 B2 30 00 22 11 66 00 82 |47.108:G.0.".f..|
00000920: 43 48 00 64 11 67 00 41 54 B2 41 54 AA 31 3A 99 |CH.d.g.AT.AT.1:.|
00000930: 22 13 42 41 44 20 54 52 59 2E 2E 2E 28 43 48 45 |".BAD TRY...(CHE|
00000940: 43 4B 20 53 57 49 54 43 48 20 4F 4E 20 4D 4F 44 |CK SWITCH ON MOD|
00000950: 45 4D 29 22 3A 81 47 B2 31 A4 31 35 30 3A 82 47 |EM)":.G.1.150:.G|
00000960: 3A 89 33 37 00 6A 11 68 00 3A 00 70 11 69 00 3A |:.37.j.h.:.p.i.:|
00000970: 00 76 11 6A 00 3A 00 7C 11 6B 00 8E 00 92 11 6C |.v.j.:.|.k.....l|
00000980: 00 8B C2 28 35 36 35 37 37 29 B3 B1 34 36 A7 31 |...(56577)..46.1|
00000990: 31 32 00 CC 11 6D 00 99 22 13 20 20 20 20 20 20 |12...m..". |
000009A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000009B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 22 3A | *":|
000009C0: 42 52 B2 42 52 AA 31 3A 4E 54 B2 30 00 E3 11 6E |BR.BR.1:NT.0...n|
000009D0: 00 8B 59 42 B2 31 A7 4E 42 B2 4E 42 AA 31 3A 59 |..YB.1.NB.NB.1:Y|
000009E0: 42 B2 30 00 EC 11 6F 00 89 31 31 33 00 2B 12 70 |B.0...o..113.+.p|
000009F0: 00 42 52 B2 30 3A 59 42 B2 31 3A 4E 54 B2 4E 54 |.BR.0:YB.1:NT.NT|
00000A00: AA 31 3A 99 22 13 20 20 20 20 20 20 20 20 20 20 |.1:.". |
00000A10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A20: 20 20 20 20 20 20 20 20 20 20 22 00 44 12 71 00 | ".D.q.|
00000A30: 8B C2 28 35 36 35 37 37 29 B2 34 37 A7 59 43 B2 |..(56577).47.YC.|
00000A40: 59 43 AA 31 00 53 12 72 00 8B 59 43 B1 33 35 A7 |YC.1.S.r..YC.35.|
00000A50: 31 31 39 00 8E 12 73 00 8B 4E 42 B1 34 A7 99 22 |119...s..NB.4.."|
00000A60: 13 42 55 53 59 2E 2E 2E 20 20 20 20 20 20 20 20 |.BUSY... |
00000A70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A80: 20 20 20 20 20 20 20 20 20 22 3A 89 33 37 00 D6 | ":.37..|
00000A90: 12 74 00 8B 42 52 B1 31 30 A7 99 22 13 12 11 11 |.t..BR.10.."....|
00000AA0: 11 11 20 20 20 20 20 20 20 52 49 4E 47 49 4E 47 |.. RINGING|
00000AB0: 21 20 52 49 4E 47 49 4E 47 21 20 52 49 4E 47 49 |! RINGING! RINGI|
00000AC0: 4E 47 21 20 20 20 20 20 20 20 92 22 3A 89 31 31 |NG! .":.11|
00000AD0: 39 3A 49 58 B2 31 00 E6 12 75 00 8B 4E 54 B3 31 |9:IX.1...u..NT.1|
00000AE0: 35 30 A7 31 30 38 00 04 13 76 00 99 22 13 54 48 |50.108...v..".TH|
00000AF0: 41 54 53 20 53 54 52 41 4E 47 45 2E 2E 2E 2E 22 |ATS STRANGE...."|
00000B00: 3A 89 33 37 00 16 13 77 00 8B C2 28 37 30 30 29 |:.37...w...(700)|
00000B10: B2 31 A7 31 33 32 00 24 13 78 00 8B 49 58 B2 31 |.1.132.$.x..IX.1|
00000B20: A7 31 32 32 00 69 13 79 00 99 22 12 90 20 20 20 |.122.i.y..".. |
00000B30: 20 20 20 43 41 52 52 49 45 52 20 43 41 52 52 49 | CARRIER CARRI|
00000B40: 45 52 20 43 41 52 52 49 45 52 20 43 41 52 52 49 |ER CARRIER CARRI|
00000B50: 45 52 21 92 22 3A 81 4C B2 35 34 32 37 32 A4 35 |ER!.":.L.54272.5|
00000B60: 34 32 39 36 3A 97 4C 2C 30 00 7F 13 7A 00 97 35 |4296:.L,0...z..5|
00000B70: 33 32 38 30 2C 39 3A 97 35 33 32 38 31 2C 32 00 |3280,9:.53281,2.|
00000B80: 8D 13 7B 00 97 35 34 32 39 36 2C 31 35 00 9A 13 |..{..54296,15...|
00000B90: 7C 00 97 35 34 32 37 37 2C 31 00 A8 13 7D 00 97 ||..54277,1...}..|
00000BA0: 35 34 32 37 38 2C 38 39 00 C0 13 7E 00 97 35 34 |54278,89...~..54|
00000BB0: 32 37 33 2C 37 35 3A 97 35 34 37 32 2C 31 35 30 |273,75:.5472,150|
00000BC0: 00 C6 13 7F 00 3A 00 CC 13 80 00 3A 00 E5 13 81 |.....:.....:....|
00000BD0: 00 97 35 34 32 37 36 2C 31 37 3A 81 54 B2 31 A4 |..54276,17:.T.1.|
00000BE0: 32 30 30 3A 82 00 FD 13 82 00 97 35 34 32 37 36 |200:.......54276|
00000BF0: 2C 31 36 3A 81 54 B2 31 A4 35 30 3A 82 00 10 14 |,16:.T.1.50:....|
00000C00: 83 00 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 31 32 38 |...K$:.K$."".128|
00000C10: 00 34 14 84 00 99 22 93 05 12 4C 4F 41 44 49 4E |.4...."...LOADIN|
00000C20: 47 20 54 45 52 4D 49 4E 41 4C 21 92 22 3A 93 45 |G TERMINAL!.":.E|
00000C30: 51 24 2C 38 00 50 14 85 00 97 35 33 32 38 30 2C |Q$,8.P....53280,|
00000C40: 30 3A 97 35 33 32 38 31 2C 30 3A 99 22 93 05 22 |0:.53281,0:.".."|
00000C50: 00 80 14 86 00 99 22 20 2A 2A 2A 2A 2A 2A 2A 2A |......" ********|
00000C60: 2A 2A 20 41 4D 4F 45 42 41 20 44 49 41 4C 45 52 |** AMOEBA DIALER|
00000C70: 20 5D 5B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 22 | ][ ********** "|
00000C80: 00 A2 14 87 00 99 22 41 55 54 4F 20 54 45 52 4D |......"AUTO TERM|
00000C90: 49 4E 41 4C 20 4C 4F 41 44 20 28 59 2F 4E 29 20 |INAL LOAD (Y/N) |
00000CA0: 22 3B 00 B8 14 88 00 A1 20 41 4C 24 3A 8B 41 4C |";...... AL$:.AL|
00000CB0: 24 B2 22 22 A7 31 33 36 00 E3 14 89 00 8B 41 4C |$."".136......AL|
00000CC0: 24 B2 22 59 22 A7 99 22 59 45 53 21 22 3A 97 37 |$."Y".."YES!":.7|
00000CD0: 30 30 2C 31 3A 81 58 B2 31 A4 39 39 3A 82 3A 89 |00,1:.X.1.99:.:.|
00000CE0: 31 34 30 00 0D 15 8A 00 8B 41 4C 24 B2 22 4E 22 |140......AL$."N"|
00000CF0: A7 99 22 4E 4F 21 22 3A 97 37 30 30 2C 30 3A 81 |.."NO!":.700,0:.|
00000D00: 58 B2 31 A4 39 39 3A 82 3A 89 31 34 30 00 13 15 |X.1.99:.:.140...|
00000D10: 8B 00 3A 00 19 15 8C 00 3A 00 4B 15 8D 00 99 22 |..:.....:.K...."|
00000D20: 93 11 11 11 11 11 11 50 4C 45 41 53 45 20 50 55 |.......PLEASE PU|
00000D30: 54 20 53 57 49 54 43 48 20 54 4F 20 27 44 27 41 |T SWITCH TO 'D'A|
00000D40: 54 41 20 4E 4F 57 2E 2E 2E 2E 22 00 59 15 8E 00 |TA NOW....".Y...|
00000D50: 99 3A 99 3A 99 3A 99 3A 99 00 83 15 8F 00 99 22 |.:.:.:.:......."|
00000D60: 11 11 11 20 20 20 20 20 12 48 49 54 20 41 4E 59 |... .HIT ANY|
00000D70: 20 4B 45 59 20 57 48 45 4E 20 44 4F 4E 45 2E 2E | KEY WHEN DONE..|
00000D80: 2E 2E 22 00 96 15 90 00 A1 41 24 3A 8B 41 24 B2 |.."......A$:.A$.|
00000D90: 22 22 A7 31 34 34 00 A3 15 91 00 99 22 93 22 3A |"".144......".":|
00000DA0: 89 31 37 00 00 00 |.17... |
.......16.)...."GET NUMBERS FROM DISK? "
;.<.... A$:.A$."" .3.V.... A$."N" . ."NO
!":.32.F.... A$.."Y".3.R...."YES!"......
4,8,4,"AMOEBA NUMBERS,S,R"......#4,SN:.
.....".GETTING RECORDS".V...."TOTAL OF "
;SN;" RECORDS"......DD$(SN),DN(SN)......
X.1.SN:.4,DD$(X),DN(X).$...."....GETTIN
G RECORD"X:..+... 4.1.....H...IX.0:.650,
128:.133.Q...AT.0.\....5,2,3.N....36879,
8:.".".....B1.56577:B2.56579:.......5328
0,0:.53281,0......54273,17:.54272,37....
.:.....:.F...:.L.....R..........B2,32:.
SET UP PORT B FOR DIALING...... B1,0....
..SN..0 .35......2:.35.E. .."HOW MANY SY
STEMS IN THE LIST";SN.~.!..DN(SN),DD$(SN
):. X.1 . SN:. "NAME OF SYSTEM";DD$(X)..
.".."PHONE NUMBER";DN(X):....#.."."...$.
."TERMINAL FILENAME";EQ$...%.NT.0:YC.0:A
T.AT.1:NB.0:VX.22:.G.1.10:.A$:.A$." "..:
.G...&..Y.0.Y.1...'.U.U.1:. U..3 .41.6.(
.Y.Y.1:U.1:.Y.SN . Y.1.M.).D.DN(Y):SY$.D
D$(Y)...*.."..HANGING UP : ";D:.
"NUMBER OF ATTEMPTS : ";U:RC.0...+.."SYS
TEM NAME: ".R.,..".
SYSTEM NAME: ";SY$...-.."......AMOEBA DI
AL 3.0 BY DOCTOR AMOEBA ".$...."MODIFIED
BY --->THE RANGER.".B./.."SYSTEM",,"PHO
NE NUMBER".`.0.."......",,"............"
...1.. X.1.SN:.DD$(X),:. C(DD$(X))..9 .
. ,DN(X):....2..X.SN.52:. DN(X):....3..
DN(X):..A.4..B1,0.W.5..SW.1.400:.B1,0:..
..6..B1,32:."..PICKING UP :";...
7.T.100./.8.T.T.1:.T..0.56:. WAIT FOR DI
AL TONE.K.9.."..DIALING NUMBER : ";D
:."NUMBER OF ATTEMPTS : ";U...:.."SYSTEM
NAME: "...;.."
.SYSTEM NAME: ";SY$...<.."......AMOEBA D
IAL 3.0 BY DOCTOR AMOEBA "...=.."MODIFIE
D BY --->THE RANGER.".#.>.."SYSTEM",,"PH
ONE NUMBER".A.?.."......",,"............
".S.@.. X.1.SN:.DD$(X),:. C(DD$(X))..9 .
. ,DN(X):....A..X.SN.67:. DN(X):....B..
DN(X):....C.A$.D(D)...D.A$.I(A$,7)...E.
:.E.F.E.C(A$).S.G.. X.1 . E...H.N$.J(A$,
X,1)...I.:...J.N.E(N$):. CALL DIGIT...K.
.N.0.N.10...L..84. .M..X.&.N.:.Z.O.:
.B.P..99.H.Q.:...R.. SUB.. TO PULSE LI
NE N TIMES...S.:.T.T..N.10..".":."DIALIN
G NUMBER : ";D;:.".":..VX)".";N$;"."
:.86...U..".":."DIALING NUMBER : ";D
;:.".":..VX)".";N$;"."...V..N1.1.N.$.W..
B1,0.,.X.T.3.?.Y.T.T.1:.T..0.89.J.Z..B1,
32.R.[.T.4.E.\.T.T.1:.T..0.92.N.].. N1.T
.^.:.}._.T.18...`.T.T.1:.T..0.96...A.VX.
VX.1:....B.....C..".
":."..WAITING FOR CA
RRIER: ";D;...D..CH.1.500...E..B(56577).
47.108:G.0.".F..CH.D.G.AT.AT.1:.".BAD TR
Y...(CHECK SWITCH ON MODEM)":.G.1.150:.G
:.37.J.H.:.P.I.:.V.J.:.|.K.....L..B(5657
7)..46.112.L.M..".
*":BR.BR.1:NT.0...N..YB.1.N
B.NB.1:YB.0...O..113.+.P.BR.0:YB.1:NT.NT
.1:.".
".D.Q..B(56577).47.YC.YC.1.S.R..YC.35.
119...S..NB.4..".BUSY...
":.37.V.T..BR.10.."....
.. RINGING! RINGING! RINGING!
.":.119:IX.1...U..NT.150.108...V..".TH
ATS STRANGE....":.37...W..B(700).1.132.$
.X..IX.1.122.I.Y..".. CARRIER CARRI
ER CARRIER CARRIER!.":.L.54272.54296:.L,
0..Z..53280,9:.53281,2...{..54296,15...
|..54277,1...}..54278,89...~..54273,75:.
5472,150.F..:.L...:......54276,17:.T.1.
200:.......54276,16:.T.1.50:.......K$:.K
$."".128.4...."...LOADING TERMINAL!.":.E
Q$,8.P....53280,0:.53281,0:.".."......"
********** AMOEBA DIALER ][ ********** "
......"AUTO TERMINAL LOAD (Y/N) ";......
AL$:.AL$."".136......AL$."Y".."YES!":.7
00,1:.X.1.99:.:.140......AL$."N".."NO!":
.700,0:.X.1.99:.:.140.....:.....:.K...."
.......PLEASE PUT SWITCH TO 'D'ATA NOW..
..".Y....:.:.:.:......."... .HIT ANY
KEY WHEN DONE...."......A$:.A$."".144..
....".":.17...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL