TEXT.BU
FILE INFORMATION
FILENAME(S): TEXT.BU
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-12-01 19:06:34
APPEARS ON: 1 disk(s)
FILE HASH
b5ce933400b47226777c7f83d7234263fb1861a9dc0b21b89c6ba6868da5eba6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAMES | TEXT.BU | PRG | Icebreaker | 1 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 E3 5C 4E 88 85 5B 87 D5 4E 4C 54 44 D4 49 4D |..\N..[..NLTD.IM|
00000010: 45 86 2F 0D 5C 4E 88 85 5B 87 40 3A CA 28 C4 28 |E./.\N..[.@:.(.(|
00000020: 46 47 29 2C 32 29 3A 20 CD 49 4E 53 86 2F 0D 1F |FG),2): .INS./..|
00000030: 5B 9A 40 3A CA 28 C4 28 49 29 2C 32 29 3A 1F 5D |[.@:.(.(I),2):.]|
00000040: 20 9F 40 3A 4C 42 24 28 49 29 3A 88 0D 05 5B 40 | .@:LB$(I):...[@|
00000050: 3A CA 28 C4 28 49 29 2C 32 29 3A 5D 88 40 3A 4C |:.(.(I),2):].@:L|
00000060: 24 28 49 29 3A 88 0D 1F C3 9A 4F 9F 52 05 52 45 |$(I):.....O.R.RE|
00000070: 43 54 3F 20 5B D9 2F CE 5D 1F 3A 9A 0D 1E 1F C3 |CT? [./.].:.....|
00000080: 9C 48 9A 4F 9F 4F 05 99 53 9E 45 05 20 CF 4E 45 |.H.O.O..S.E. .NE|
00000090: 9C 3A 0D 88 1F AC C0 1F 9A 9C D0 9A 41 9F 52 99 |.:..........A.R.|
000000A0: 54 9E 49 05 43 4C 45 53 21 20 C4 45 56 2B C4 57 |T.I.CLES! .EV+.W|
000000B0: 49 20 C8 51 20 39 31 36 2B 37 35 35 9E 2B 99 32 |I .Q 916+755.+.2|
000000C0: 9F 37 9A 35 9C 38 1F C0 BB 88 1F BC C0 9C D4 9A |.7.5.8..........|
000000D0: 48 9F 41 99 4E 9E 4B 05 5A 20 C6 4F 52 20 C3 41 |H.A.N.K.Z .OR .A|
000000E0: 4C 4C 49 4E 47 2C 20 C1 4E 44 20 C3 41 4C 4C 20 |LLING, .ND .ALL |
000000F0: 9E C2 99 41 9A 9F 43 9A 4B 9C 21 1F C0 BE 22 FA |...A..C.K.!...".|
00000100: 70 AF 3F FF 32 F7 3F FC 8D 9E 88 90 58 FA 8F 9F |p.?.2.?.....X...|
00000110: E4 8E 1F 4F FF 1F 4F FF F8 90 58 70 F2 AD F2 DF |...O..O...Xp....|
00000120: E7 F3 FB 40 1F FF EA 2D FF FF F0 FB 3F 90 58 EC |...@...-....?.X.|
00000130: FF 8A 8F B0 1F 38 DF DA 45 D1 FF 79 9D FD 82 58 |.....8..E..y...X|
00000140: 90 5F FA 8F A0 1F 58 FF 1F 4F F5 F8 90 58 70 8F |._....X..O...Xp.|
00000150: FA 8F B9 D4 1E 86 40 1F 58 4F FF FF F0 FF FF FF |......@.XO......|
00000160: DF FD F2 FF F3 FF F8 0D 12 1F 20 C3 9A 4F 99 4E |.......... ..O.N|
00000170: BF EF F2 D3 FF DD 89 55 9A 45 1F 20 20 88 0D 99 |.......U.E. ...|
00000180: 40 3F CA 28 C4 28 4E 51 29 2C 2F 29 3A FC 54 30 |@?.(.(NQ),/):.T0|
00000190: 34 40 FA CA 28 C4 28 42 4B 29 2C 32 29 3A 5C 54 |4@..(.(BK),2):\T|
000001A0: 30 39 F0 3A 43 24 20 5C 54 31 34 40 3A 44 24 3A |09.:C$ \T14@:D$:|
000001B0: 0E 0D 5C 5F F3 31 40 3A 4D 54 24 3F 0E 0D 1F C8 |..\_.1@:MT$?....|
000001C0: 9A 49 9F 54 20 99 D2 9E 45 9B 54 55 F2 4E 0D 88 |.I.T ...E.TU.N..|
000001D0: 1F CC 9A 4F 9F 40 89 44 9E 4A FE DF D5 FD FD FF |...O.@.D.J......|
000001E0: 22 FA 35 3F FF FF EF DB FD FF 2E FA 3C FF 71 AF |".5?........<.q.|
000001F0: 3F F7 30 FF 32 2D 3F D2 FE DF FA FE 3A 8B 52 B3 |?.0.2-?.....:.R.|
00000200: 28 4E 55 25 AA 31 29 A7 38 30 30 30 00 FB 23 5E |(NU%.1).8000..#^|
00000210: 1F 8B 4E 55 25 B3 4D 55 25 AF 59 49 B2 30 A7 4E |..NU%.MU%.YI.0.N|
00000220: 55 25 B2 4E 55 25 AA 31 3A 59 49 B2 4E 55 25 00 |U%.NU%.1:YI.NU%.|
00000230: 20 24 68 1F 8D 32 3A 40 47 24 3A 8B 59 49 B2 30 | $h..2:@G$:.YI.0|
00000240: A7 97 39 39 37 2C 33 39 3A 9E 35 31 30 34 38 3A |..997,39:.51048:|
00000250: 89 32 30 35 00 44 24 72 1F 5A 5A B2 30 3A 81 49 |.205.D$r.ZZ.0:.I|
00000260: B2 31 A4 4E 53 25 3A 59 24 28 49 29 B2 C7 28 30 |.1.NS%:Y$(I)..(0|
00000270: 29 AA C7 28 30 29 3A 82 00 88 24 7C 1F 81 49 B2 |)..(0):...$|..I.|
00000280: 32 A4 31 37 3A 55 24 28 49 29 B2 22 2D 22 3A 82 |2.17:U$(I)."-":.|
00000290: 3A 55 24 28 32 29 B2 22 31 22 3A 55 24 28 30 29 |:U$(2)."1":U$(0)|
000002A0: B2 41 52 24 28 31 AA 4C 53 25 29 3A 55 24 28 38 |.AR$(1.LS%):U$(8|
000002B0: 29 B2 41 52 24 28 35 AA 4C 53 25 29 00 A4 24 7D |).AR$(5.LS%)..$}|
000002C0: 1F 55 24 28 32 30 29 B2 22 20 30 22 3A 55 24 28 |.U$(20)." 0":U$(|
000002D0: 32 31 29 B2 22 20 30 22 00 F3 24 7E 1F 55 24 28 |21)." 0"..$~.U$(|
000002E0: 31 29 B2 41 52 24 28 34 AA 4C 53 25 29 3A 55 24 |1).AR$(4.LS%):U$|
000002F0: 28 33 29 B2 41 52 24 28 4C 53 25 AA 32 29 3A 55 |(3).AR$(LS%.2):U|
00000300: 24 28 34 29 B2 41 52 24 28 4C 53 25 AA 33 29 3A |$(4).AR$(LS%.3):|
00000310: 55 24 28 31 38 29 B2 22 20 30 22 3A 55 24 28 31 |U$(18)." 0":U$(1|
00000320: 39 29 B2 22 20 30 22 00 05 25 7F 1F 55 24 28 31 |9)." 0"..%..U$(1|
00000330: 32 29 B2 C4 28 43 4C 25 29 00 40 25 81 1F 55 24 |2)..(CL%).@%..U$|
00000340: 28 35 29 B2 41 52 24 28 4C 53 25 AA 36 29 3A 55 |(5).AR$(LS%.6):U|
00000350: 24 28 36 29 B2 41 52 24 28 4C 53 25 AA 37 29 3A |$(6).AR$(LS%.7):|
00000360: 8B 28 C2 28 38 33 30 29 AF 32 29 B1 30 A7 8D 31 |.(.(830).2).0..1|
00000370: 30 30 30 30 00 5A 25 82 1F 52 B2 59 49 AA 31 3A |0000.Z%..R.YI.1:|
00000380: 8D 39 30 31 30 3A 8D 32 36 37 30 3A 8D 32 00 71 |.9010:.2670:.2.q|
00000390: 25 86 1F 4F 24 B2 22 43 41 54 22 3A 8D 37 31 3A |%..O$."CAT":.71:|
000003A0: 98 38 2C 59 49 00 7F 25 90 1F 81 41 41 B2 31 A4 |.8,YI..%...AA.1.|
000003B0: 4C 53 25 00 A0 25 95 1F 8B 41 41 B3 B1 35 A7 98 |LS%..%...AA..5..|
000003C0: 38 2C 41 52 24 28 41 41 29 41 52 24 28 4C 53 25 |8,AR$(AA)AR$(LS%|
000003D0: AA 41 41 29 00 A9 25 96 1F 82 3A A0 38 00 C5 25 |.AA)..%...:.8..%|
000003E0: 9A 1F 40 22 D7 52 49 54 45 20 D5 C9 C4 23 3A 22 |..@".RITE ...#:"|
000003F0: AA C4 28 59 49 29 AA 47 24 00 FD 25 A4 1F 4F 24 |..(YI).G$..%..O$|
00000400: B2 22 4E 41 4D 45 4C 4F 47 22 3A 8D 37 31 3A 49 |."NAMELOG":.71:I|
00000410: 24 B2 55 24 28 30 29 3A 8D 33 39 33 30 3A 98 38 |$.U$(0):.3930:.8|
00000420: 2C 49 24 AA 22 20 20 22 AA C4 28 59 49 29 3A A0 |,I$." "..(YI):.|
00000430: 38 00 14 26 AE 1F 97 38 34 35 2C C2 28 38 34 35 |8..&...845,.(845|
00000440: 29 AA 31 3A 89 32 30 35 00 34 26 28 23 42 B2 32 |).1:.205.4&(#B.2|
00000450: 3A 4F 24 B2 22 55 53 45 52 4C 4F 47 22 3A 89 34 |:O$."USERLOG":.4|
00000460: 39 3A 8F 20 32 36 34 30 00 45 26 32 23 8D 39 30 |9:. 2640.E&2#.90|
00000470: 30 30 3A 8F 20 32 36 35 30 00 6A 26 3C 23 8D 31 |00:. 2650.j&<#.1|
00000480: 35 3A 98 31 35 2C 22 50 22 C7 28 39 38 29 C7 28 |5:.15,"P".(98).(|
00000490: 52 4C 29 C7 28 52 48 29 C7 28 32 29 3A 8E 00 A1 |RL).(RH).(2):...|
000004A0: 26 46 23 81 41 41 B2 31 A4 4C 53 25 3A 52 24 B2 |&F#.AA.1.LS%:R$.|
000004B0: 41 52 24 28 41 41 29 3A 52 5A B2 32 3A 8D 35 3A |AR$(AA):RZ.2:.5:|
000004C0: 8B C3 28 49 24 29 B3 32 A7 49 24 B2 22 2D 22 3A |..(I$).2.I$."-":|
000004D0: 8F 33 38 31 30 00 BE 26 50 23 8D 39 30 39 30 3A |.3810..&P#.9090:|
000004E0: 41 52 24 28 41 41 AA 4C 53 25 29 B2 49 24 3A 82 |AR$(AA.LS%).I$:.|
000004F0: 3A 8E 00 F0 26 5A 23 40 22 22 3A 81 41 41 B2 31 |:...&Z#@"":.AA.1|
00000500: A4 4C 53 25 3A 40 41 52 24 28 41 41 29 AA 41 52 |.LS%:@AR$(AA).AR|
00000510: 24 28 41 41 AA 4C 53 25 29 3A 82 3A 8E 3A 8F 20 |$(AA.LS%):.:.:. |
00000520: 33 38 33 30 00 04 27 64 23 8B 49 24 B2 22 22 A7 |3830..'d#.I$."".|
00000530: 8E 3A 8F 20 33 39 33 30 00 48 27 6E 23 53 43 24 |.:. 3930.H'n#SC$|
00000540: B2 22 22 3A 81 4B B2 31 A4 C3 28 49 24 29 3A 41 |."":.K.1..(I$):A|
00000550: B2 C6 28 CA 28 49 24 2C 4B 2C 31 29 29 3A 41 B2 |..(.(I$,K,1)):A.|
00000560: 41 AF 39 35 3A 8B 41 B1 36 34 AF 41 B3 39 31 A7 |A.95:.A.64.A.91.|
00000570: 53 43 24 B2 53 43 24 AA C7 28 41 29 00 57 27 78 |SC$.SC$..(A).W'x|
00000580: 23 82 3A 49 24 B2 53 43 24 3A 8E 00 9D 27 82 23 |#.:I$.SC$:...'.#|
00000590: 53 43 24 B2 22 22 3A 81 5A B2 31 A4 C3 28 49 24 |SC$."":.Z.1..(I$|
000005A0: 29 3A 41 24 B2 CA 28 49 24 2C 5A 2C 31 29 3A 8B |):A$..(I$,Z,1):.|
000005B0: 41 24 B2 22 2C 22 B0 41 24 B2 22 3A 22 B0 41 24 |A$.",".A$.":".A$|
000005C0: B2 22 3B 22 A7 41 24 B2 22 2D 22 3A 8F 20 32 36 |.";".A$."-":. 26|
000005D0: 30 00 B7 27 83 23 53 43 24 B2 53 43 24 AA 41 24 |0..'.#SC$.SC$.A$|
000005E0: 3A 82 3A 49 24 B2 53 43 24 3A 8E 00 DC 27 10 27 |:.:I$.SC$:...'.'|
000005F0: 8F 20 2A 2A 2A 2A 20 43 41 4C 4C 20 42 41 43 4B |. **** CALL BACK|
00000600: 20 56 41 4C 49 44 41 54 49 4F 4E 20 2A 2A 2A 2A | VALIDATION ****|
00000610: 00 09 28 1A 27 50 4E 24 B2 55 24 28 34 29 3A 53 |..(.'PN$.U$(4):S|
00000620: 4C 25 B2 C5 28 55 24 28 32 29 29 3A 49 24 B2 22 |L%..(U$(2)):I$."|
00000630: 22 3A 81 49 B2 31 A4 C3 28 50 4E 24 29 00 30 28 |":.I.1..(PN$).0(|
00000640: 1C 27 41 24 B2 CA 28 50 4E 24 2C 49 2C 31 29 3A |.'A$..(PN$,I,1):|
00000650: 8B 41 24 B3 22 30 22 B0 41 24 B1 22 39 22 A7 41 |.A$."0".A$."9".A|
00000660: 24 B2 22 22 00 3F 28 1E 27 49 24 B2 49 24 AA 41 |$."".?(.'I$.I$.A|
00000670: 24 3A 82 00 4A 28 20 27 50 4E 24 B2 49 24 00 6C |$:..J( 'PN$.I$.l|
00000680: 28 23 27 8B C3 28 50 4E 24 29 B2 37 A7 45 58 24 |(#'..(PN$).7.EX$|
00000690: B2 C8 28 50 4E 24 2C 33 29 3A 41 43 24 B2 22 22 |..(PN$,3):AC$.""|
000006A0: 00 97 28 24 27 8B C3 28 50 4E 24 29 B2 31 30 A7 |..($'..(PN$).10.|
000006B0: 45 58 24 B2 CA 28 50 4E 24 2C 34 2C 33 29 3A 41 |EX$..(PN$,4,3):A|
000006C0: 43 24 B2 C8 28 50 4E 24 2C 33 29 00 CF 28 2E 27 |C$..(PN$,3)..(.'|
000006D0: 42 B2 31 3A 4F 24 B2 22 43 41 4C 4C 42 41 43 4B |B.1:O$."CALLBACK|
000006E0: 22 3A 8D 35 30 3A 84 38 2C 56 44 24 3A 84 38 2C |":.50:.8,VD$:.8,|
000006F0: 41 31 24 3A 8B C3 28 41 31 24 29 B1 33 A7 56 41 |A1$:..(A1$).3.VA|
00000700: 25 B2 31 00 EE 28 38 27 56 44 25 B2 30 3A 8B 41 |%.1..(8'VD%.0:.A|
00000710: 43 24 B2 C8 28 41 31 24 2C 33 29 A7 41 43 24 B2 |C$..(A1$,3).AC$.|
00000720: 22 22 00 00 29 39 27 8B 41 43 24 B2 22 22 A7 31 |""..)9'.AC$."".1|
00000730: 30 30 34 39 00 08 29 3A 27 49 B2 31 00 1D 29 3B |0049..):'I.1..);|
00000740: 27 41 24 B2 C8 28 CA 28 41 31 24 2C 49 29 2C 33 |'A$..(.(A1$,I),3|
00000750: 29 00 2F 29 3C 27 8B 41 43 24 B2 41 24 A7 31 30 |)./)<'.AC$.A$.10|
00000760: 30 34 39 00 42 29 3D 27 8B 41 24 B2 22 22 A7 56 |049.B)='.A$."".V|
00000770: 44 25 B2 30 3A 8E 00 53 29 3E 27 49 B2 49 AA 33 |D%.0:..S)>'I.I.3|
00000780: 3A 89 31 30 30 34 33 00 59 29 41 27 99 00 77 29 |:.10043.Y)A'..w)|
00000790: 42 27 84 38 2C 49 24 3A 99 22 9A C3 48 45 43 4B |B'.8,I$:."..HECK|
000007A0: 49 4E 47 05 2E 2E 2E 22 AA 49 24 00 B4 29 47 27 |ING....".I$..)G'|
000007B0: 41 B2 C5 28 49 24 29 3A 8B 41 B2 C5 28 28 41 43 |A..(I$):.A..((AC|
000007C0: 24 AA 45 58 24 29 29 A7 56 44 25 B2 31 3A 99 22 |$.EX$)).VD%.1:."|
000007D0: 9A 11 CD 41 54 43 48 20 C6 4F 55 4E 44 05 21 11 |...ATCH .OUND.!.|
000007E0: 22 3A 89 31 30 30 37 30 00 DA 29 4C 27 8B 20 41 |":.10070..)L'. A|
000007F0: B3 B1 30 20 AF 20 28 53 54 20 B2 20 30 20 B0 20 |..0 . (ST . 0 . |
00000800: 53 54 20 B2 20 32 29 20 A7 31 30 30 35 30 00 EE |ST . 2) .10050..|
00000810: 29 56 27 A0 38 3A A0 31 35 3A 8B 56 44 25 B2 30 |)V'.8:.15:.VD%.0|
00000820: A7 8E 00 2A 2A 60 27 40 C7 28 31 33 29 AA 22 9E |...**`'@.(13).".|
00000830: 0E D9 4F 55 52 20 4E 55 4D 42 45 52 20 49 53 20 |..OUR NUMBER IS |
00000840: 41 20 56 41 4C 49 44 20 45 58 43 48 41 4E 47 45 |A VALID EXCHANGE|
00000850: 21 22 AA C7 28 31 33 29 AA C7 28 31 33 29 00 53 |!"..(13)..(13).S|
00000860: 2A 6A 27 40 22 C9 46 20 59 4F 55 20 57 49 53 48 |*j'@".F YOU WISH|
00000870: 2C 20 59 4F 55 20 4D 41 59 20 42 45 20 56 41 4C |, YOU MAY BE VAL|
00000880: 49 44 41 54 45 44 22 00 7B 2A 74 27 40 22 C9 4D |IDATED".{*t'@".M|
00000890: 4D 45 44 49 41 54 45 4C 59 20 42 59 20 48 41 56 |MEDIATELY BY HAV|
000008A0: 49 4E 47 20 54 48 45 20 53 59 53 54 45 4D 22 00 |ING THE SYSTEM".|
000008B0: A4 2A 7E 27 40 22 43 41 4C 4C 20 59 4F 55 20 42 |.*~'@"CALL YOU B|
000008C0: 41 43 4B 2E 20 20 C4 4F 20 59 4F 55 20 57 49 53 |ACK. .O YOU WIS|
000008D0: 48 20 54 4F 20 44 4F 22 00 C9 2A 88 27 5F 22 54 |H TO DO"..*.'_"T|
000008E0: 48 49 53 3F 20 05 28 D9 2F CE 29 3A 22 3A 8D 32 |HIS? .(./.):":.2|
000008F0: 32 31 3A 8B 49 24 B3 B1 22 59 22 A7 8E 00 D1 2A |21:.I$.."Y"....*|
00000900: 92 27 40 22 22 00 F4 2A 9C 27 40 22 9A D0 4C 45 |.'@""..*.'@"..LE|
00000910: 41 53 45 20 48 41 4E 47 20 55 50 20 4E 4F 57 2C |ASE HANG UP NOW,|
00000920: 20 41 4E 44 20 42 45 22 00 1E 2B A6 27 40 22 50 | AND BE"..+.'@"P|
00000930: 52 45 50 41 52 45 44 20 54 4F 20 48 41 56 45 20 |REPARED TO HAVE |
00000940: 59 4F 55 52 20 4D 4F 44 45 4D 20 41 4E 53 57 45 |YOUR MODEM ANSWE|
00000950: 52 22 00 31 2B B0 27 40 22 54 48 45 20 50 48 4F |R".1+.'@"THE PHO|
00000960: 4E 45 21 21 22 00 51 2B D8 27 8F 20 2A 2A 2A 20 |NE!!".Q+.'. *** |
00000970: 48 41 4E 47 20 55 50 20 54 48 45 20 4C 49 4E 45 |HANG UP THE LINE|
00000980: 20 2A 2A 2A 2A 00 83 2B E2 27 9E 35 32 32 33 30 | ****..+.'.52230|
00000990: 3A 97 35 36 35 37 39 2C 33 38 3A 42 B2 31 36 30 |:.56579,38:B.160|
000009A0: 3A 8D 32 30 30 30 30 3A 9E 35 32 32 33 33 3A 97 |:.20000:.52233:.|
000009B0: 35 36 35 37 39 2C 30 00 BF 2B EC 27 98 35 2C 22 |56579,0..+.'.5,"|
000009C0: 01 01 01 22 3B 3A 8D 32 30 30 30 30 3A 98 35 2C |...";:.20000:.5,|
000009D0: 22 41 54 48 22 3A 8D 32 30 30 30 30 3A 9E 35 32 |"ATH":.20000:.52|
000009E0: 32 32 37 3A 8B C2 28 32 35 31 29 B2 30 A7 31 30 |227:..(251).0.10|
000009F0: 32 31 30 00 DF 2B 3C 28 8F 20 2A 2A 2A 20 43 41 |210..+<(. *** CA|
00000A00: 4C 4C 20 42 41 43 4B 20 46 49 4E 41 4C 4C 59 2A |LL BACK FINALLY*|
00000A10: 2A 2A 2A 00 0B 2C 41 28 99 22 11 9A C4 49 41 4C |***..,A(."...IAL|
00000A20: 49 4E 47 05 2E 2E 2E 22 AA 41 43 24 AA 45 58 24 |ING....".AC$.EX$|
00000A30: AA C9 28 50 4E 24 2C 34 29 AA C7 28 31 33 29 00 |..(PN$,4)..(13).|
00000A40: 2A 2C 46 28 98 35 2C 22 41 54 44 54 22 AA 41 43 |*,F(.5,"ATDT".AC|
00000A50: 24 AA 45 58 24 AA C9 28 50 4E 24 2C 34 29 00 51 |$.EX$..(PN$,4).Q|
00000A60: 2C 50 28 41 B2 54 49 3A 20 8F 20 57 41 49 54 20 |,P(A.TI: . WAIT |
00000A70: 31 30 20 53 45 43 4F 4E 44 53 20 54 4F 20 43 4F |10 SECONDS TO CO|
00000A80: 4E 4E 45 43 54 00 68 2C 5A 28 8B 28 54 49 AB 41 |NNECT.h,Z(.(TI.A|
00000A90: 29 B3 38 30 30 A7 20 31 30 33 33 30 00 96 2C 64 |).800. 10330..,d|
00000AA0: 28 41 B2 54 49 3A 20 8F 20 57 41 49 54 20 32 30 |(A.TI: . WAIT 20|
00000AB0: 20 53 45 43 4F 4E 44 53 20 54 4F 20 44 45 54 45 | SECONDS TO DETE|
00000AC0: 43 54 20 43 41 52 52 49 45 52 00 C1 2C 6E 28 9E |CT CARRIER..,n(.|
00000AD0: 35 32 32 32 37 3A 8B 28 54 49 AB 41 29 B3 31 35 |52227:.(TI.A).15|
00000AE0: 30 30 20 AF C2 28 32 35 31 29 20 B3 B1 20 30 A7 |00 ..(251) .. 0.|
00000AF0: 31 30 33 35 30 00 DC 2C 78 28 9E 35 32 32 32 37 |10350..,x(.52227|
00000B00: 3A 8B C2 28 32 35 31 29 B2 30 A7 31 30 34 30 30 |:..(251).0.10400|
00000B10: 00 FD 2C 82 28 54 54 25 B2 54 54 25 AA 31 3A 8B |..,.(TT%.TT%.1:.|
00000B20: 54 54 25 B1 33 A7 97 39 30 36 2C 30 3A 89 32 30 |TT%.3..906,0:.20|
00000B30: 35 00 08 2D 8C 28 89 31 30 33 30 30 00 29 2D A0 |5..-.(.10300.)-.|
00000B40: 28 8F 20 2A 2A 2A 20 50 45 52 46 4F 52 4D 20 56 |(. *** PERFORM V|
00000B50: 41 4C 49 44 41 54 49 4F 4E 2A 2A 2A 2A 00 4D 2D |ALIDATION****.M-|
00000B60: A5 28 42 B2 37 30 3A 8D 32 30 30 30 30 3A 40 22 |.(B.70:.20000:@"|
00000B70: 9B 22 3A 81 49 B2 31 A4 32 35 3A 40 22 2E 22 3A |.":.I.1.25:@".":|
00000B80: 82 00 59 2D AA 28 40 22 22 3A 47 B2 30 00 80 2D |..Y-.(@"":G.0..-|
00000B90: B4 28 40 22 99 D0 4C 45 41 53 45 20 45 4E 54 45 |.(@"..LEASE ENTE|
00000BA0: 52 20 54 48 45 20 4C 41 53 54 20 34 20 44 49 47 |R THE LAST 4 DIG|
00000BB0: 49 54 53 22 00 AA 2D BE 28 5F 22 CF 46 20 59 4F |ITS"..-.(_".F YO|
00000BC0: 55 52 20 50 48 4F 4E 45 20 4E 55 4D 42 45 52 20 |UR PHONE NUMBER |
00000BD0: 4E 4F 57 20 20 20 20 20 20 3A 22 3A 8D 35 00 E7 |NOW :":.5..|
00000BE0: 2D C8 28 8B 49 24 B3 B1 C9 28 50 4E 24 2C 34 29 |-.(.I$...(PN$,4)|
00000BF0: AF 47 B3 34 A7 47 B2 47 AA 31 3A 40 C7 28 31 33 |.G.4.G.G.1:@.(13|
00000C00: 29 AA 22 C9 4E 43 4F 52 52 45 43 54 21 22 AA C7 |).".NCORRECT!"..|
00000C10: 28 31 33 29 3A 89 31 30 34 32 30 00 13 2E D2 28 |(13):.10420....(|
00000C20: 8B 49 24 B3 B1 C9 28 50 4E 24 2C 34 29 A7 40 22 |.I$...(PN$,4).@"|
00000C30: C6 4F 52 47 45 54 20 49 54 21 22 3A 97 39 30 36 |.ORGET IT!":.906|
00000C40: 2C 30 3A 89 32 30 35 00 37 2E DC 28 40 C7 28 31 |,0:.205.7..(@.(1|
00000C50: 33 29 AA 22 D4 48 41 4E 4B 20 59 4F 55 21 22 3A |3).".HANK YOU!":|
00000C60: 55 24 28 32 29 B2 56 44 24 3A 8E 00 58 2E 20 4E |U$(2).VD$:..X. N|
00000C70: 41 B2 54 49 3A 8F 20 57 41 49 54 20 46 4F 52 20 |A.TI:. WAIT FOR |
00000C80: 44 52 4F 50 20 43 41 52 52 49 45 52 00 6F 2E 2A |DROP CARRIER.o.*|
00000C90: 4E 8B 20 28 54 49 AB 41 29 20 B3 20 42 A7 32 30 |N. (TI.A) . B.20|
00000CA0: 30 31 30 00 75 2E 34 4E 8E 00 00 00 |010.u.4N.... |
..\N..[.UNLTDTIME./.\N..[.@:J(D(FG),2):
MINS./..[.@:J(D(I),2):.] .@:LB$(I):...[@
:J(D(I),2):].@:L$(I):...C.O.R.RECT? [Y/N
].:....C.H.O.O..S.E. ONE.:........P.A.R.
T.I.CLES! DEV+DWI HQ 916+755.+.2.7.5.8..
......T.H.A.N.K.Z FOR CALLING, AND CALL
.B.A..C.K.!...".P.?.2.?.....X......O..O.
..XP.......@...-....?.X......8.ZEQ.Y...X
._.. .X..O...XP....T..@.XO..............
.. C.O.N...S...U.E. ...@?J(D(NQ),/):.T0
4@.J(D(BK),2):\T09.:C$ \T14@:D$:..\_.1@:
MT$?...H.I.T .R.E.TU.N...L.O.@.D.J..U...
".5?........<.Q.?.0.2-?R....:.R.(NU%.1).
8000..#^..NU%.MU%.YI.0.NU%.NU%.1:YI.NU%.
$H..2:@G$:.YI.0..997,39:.51048:.205.D$R
.ZZ.0:.I.1.NS%:Y$(I).G(0).G(0):...$|..I.
2.17:U$(I)."-":.:U$(2)."1":U$(0).AR$(1.L
S%):U$(8).AR$(5.LS%)..$}.U$(20)." 0":U$(
21)." 0"..$~.U$(1).AR$(4.LS%):U$(3).AR$(
LS%.2):U$(4).AR$(LS%.3):U$(18)." 0":U$(1
9)." 0"..%.U$(12).D(CL%).@%..U$(5).AR$(
LS%.6):U$(6).AR$(LS%.7):.(B(830).2).0..1
0000.Z%..R.YI.1:.9010:.2670:.2.Q%..O$."C
AT":.71:.8,YI.%...AA.1.LS%. %...AA..5..
8,AR$(AA)AR$(LS%.AA)..%...: 8.E%..@"WRIT
E UID#:".D(YI).G$..%..O$."NAMELOG":.71:I
$.U$(0):.3930:.8,I$." ".D(YI): 8..&...8
45,B(845).1:.205.4&(#B.2:O$."USERLOG":.4
9:. 2640.E&2#.9000:. 2650.J&<#.15:.15,"P
"G(98)G(RL)G(RH)G(2):...&F#.AA.1.LS%:R$.
AR$(AA):RZ.2:.5:.C(I$).2.I$."-":.3810..&
P#.9090:AR$(AA.LS%).I$:.:...&Z#@"":.AA.1
.LS%:@AR$(AA).AR$(AA.LS%):.:.:. 3830..'D
#.I$.""..:. 3930.H'N#SC$."":.K.1.C(I$):A
.F(J(I$,K,1)):A.A.95:.A.64.A.91.SC$.SC$.
G(A).W'X#.:I$.SC$:...'.#SC$."":.Z.1.C(I$
):A$.J(I$,Z,1):.A$.",".A$.":".A$.";".A$.
"-":. 260..'.#SC$.SC$.A$:.:I$.SC$:...'.'
. **** CALL BACK VALIDATION ****..(.'PN$
.U$(4):SL%.E(U$(2)):I$."":.I.1.C(PN$).0(
.'A$.J(PN$,I,1):.A$."0".A$."9".A$."".?(.
'I$.I$.A$:..J( 'PN$.I$.L(#'.C(PN$).7.EX$
.H(PN$,3):AC$.""..($'.C(PN$).10.EX$.J(PN
$,4,3):AC$.H(PN$,3).O(.'B.1:O$."CALLBACK
":.50:.8,VD$:.8,A1$:.C(A1$).3.VA%.1..(8'
VD%.0:.AC$.H(A1$,3).AC$.""..)9'.AC$."".1
0049..):'I.1..);'A$.H(J(A1$,I),3)./)<'.A
C$.A$.10049.B)='.A$."".VD%.0:..S)>'I.I.3
:.10043.Y)A'..W)B'.8,I$:.".CHECKING...."
.I$..)G'A.E(I$):.A.E((AC$.EX$)).VD%.1:."
..MATCH FOUND.!.":.10070.Z)L'. A..0 . (S
T . 0 . ST . 2) .10050..)V' 8: 15:.VD%.0
...**`'@G(13)."..YOUR NUMBER IS A VALID
EXCHANGE!".G(13).G(13).S*J'@"IF YOU WISH
, YOU MAY BE VALIDATED".{*T'@"IMMEDIATEL
Y BY HAVING THE SYSTEM"..*~'@"CALL YOU B
ACK. DO YOU WISH TO DO".I*.'_"THIS? .(Y
/N):":.221:.I$.."Y"...Q*.'@""..*.'@".PLE
ASE HANG UP NOW, AND BE"..+.'@"PREPARED
TO HAVE YOUR MODEM ANSWER".1+.'@"THE PHO
NE!!".Q+X'. *** HANG UP THE LINE ****..+
.'.52230:.56579,38:B.160:.20000:.52233:.
56579,0..+.'.5,"...";:.20000:.5,"ATH":.2
0000:.52227:.B(251).0.10210..+<(. *** CA
LL BACK FINALLY****..,A(."..DIALING...."
.AC$.EX$.I(PN$,4).G(13).*,F(.5,"ATDT".AC
$.EX$.I(PN$,4).Q,P(A.TI: . WAIT 10 SECON
DS TO CONNECT.H,Z(.(TI.A).800. 10330..,D
(A.TI: . WAIT 20 SECONDS TO DETECT CARRI
ER.A,N(.52227:.(TI.A).1500 .B(251) .. 0.
10350..,X(.52227:.B(251).0.10400..,.(TT%
.TT%.1:.TT%.3..906,0:.205..-.(.10300.)-
(. *** PERFORM VALIDATION****.M-.(B.70:.
20000:@".":.I.1.25:@".":..Y-.(@"":G.0..-
.(@".PLEASE ENTER THE LAST 4 DIGITS"..-.
(_"OF YOUR PHONE NUMBER NOW :":.5..
-H(.I$..I(PN$,4).G.4.G.G.1:@G(13)."INCOR
RECT!".G(13):.10420...R(.I$..I(PN$,4).@"
FORGET IT!":.906,0:.205.7..(@G(13)."THAN
K YOU!":U$(2).VD$:..X. NA.TI:. WAIT FOR
DROP CARRIER.O.*N. (TI.A) . B.20010.U.4N
....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL