XMOBUF BAS
FILE INFORMATION
FILENAME(S): XMOBUF BAS
FILE TYPE(S): PRG
FILE SIZE: 26.9K
FIRST SEEN: 2025-12-02 00:01:57
APPEARS ON: 1 disk(s)
FILE HASH
3bd7916030d6ec4ed6f2a3c55e6c3aad2b4edd7534bf62ac7cff55fd77b466ef
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | XMOBUF BAS | PRG | earthshaker | 27 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 0A 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |..(.... --------|
00000010: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000020: 2D 2D 2D 2D 2D 2D 2D 2D 00 2E 08 14 00 8F 00 53 |--------.......S|
00000030: 08 1E 00 8F 20 20 58 4D 4F 42 55 46 20 56 45 52 |.... XMOBUF VER|
00000040: 20 37 2E 34 2E 32 41 20 53 4F 55 52 43 45 20 43 | 7.4.2A SOURCE C|
00000050: 4F 44 45 00 73 08 28 00 8F 20 20 20 20 20 28 43 |ODE.s.(.. (C|
00000060: 29 20 31 39 63 FF FF FF FF FF D2 FF FF D6 FF D2 |) 19c...........|
00000070: FF FF FF FF 2E FF FF FF 31 FF FF FF D0 D6 FF FF |........1.......|
00000080: FF FF D1 FF FF D0 FF FF FF D0 FF FF D4 D2 FF FF |................|
00000090: FF FF FF FF FF FF 62 FF FF FF 31 FF FF FF FF EE |......b...1.....|
000000A0: ED FF FF D0 ED FF FF D1 FF FF FF FF FF FF FF D0 |................|
000000B0: FF FF FF FF D0 FF D2 FF FF FF FF FF FF 30 FF FF |.............0..|
000000C0: FF FF FF 31 FF FF FF FF FF FF FF FF FF FF FF FF |...1............|
000000D0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000000E0: FF FF FF FF FF FF FF FF FF 33 FF FF FF FF 31 FF |.........3....1.|
000000F0: FF FF ED FF EE FF FF 6A F3 FF FF 31 FF FF 2D 2D |.......j...1..--|
00000100: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000110: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 37 09 6E |------------.7.n|
00000120: 00 8F 20 20 20 4D 41 49 4E 20 54 45 52 4D 49 4E |.. MAIN TERMIN|
00000130: 41 4C 20 4C 4F 4F 50 00 5D 09 78 00 8F 20 2D 2D |AL LOOP.].x.. --|
00000140: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000150: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 73 09 |-------------.s.|
00000160: 82 00 A1 23 35 2C 52 24 3A 8B 52 24 B2 22 22 A7 |...#5,R$:.R$."".|
00000170: 32 37 30 00 9A 09 8C 00 52 B2 46 25 28 C6 28 52 |270.....R.F%(.(R|
00000180: 24 29 29 3A 99 4C 24 C7 28 52 29 3B 3A B4 FF FF |$)):.L$.(R);:...|
00000190: FF FF 37 FF FF FF F5 FF FF FF FF 72 F3 FF FF 34 |..7........r...4|
000001A0: FF EF FF FF FF FF FF FF EF FF FF EF FF FF FF 36 |...............6|
000001B0: FF EF 66 FF FF F5 FF FF FF FF AE F3 FF FF 36 E2 |..f...........6.|
000001C0: D1 F5 FF FF FF FF BA F3 FF FF FF DF FF FF FF FF |................|
000001D0: FF FF FF FF FF D7 FF FF FF FF FF FF FF FF 06 F3 |................|
000001E0: FF FF 36 FF DF 66 FF D7 F4 FF DB FF FF DF F6 FF |..6..f..........|
000001F0: D6 FF FF FF FF FF 36 FF D7 66 FF DF A7 42 4D B2 |......6..f...BM.|
00000200: B6 28 42 4B AB 28 42 4A AA 32 35 35 29 29 00 29 |.(BK.(BJ.255)).)|
00000210: 0A C8 00 8B 42 4D B1 31 38 30 A7 98 35 2C C7 28 |....BM.180..5,.(|
00000220: 58 46 29 3B 3A 58 4F B2 57 00 39 0A D2 00 8B C2 |XF);:XO.W.9.....|
00000230: 28 31 39 38 29 A7 32 38 30 00 42 0A DC 00 89 31 |(198).280.B....1|
00000240: 33 30 00 75 0A E6 00 99 4A 24 4A 24 22 5B 20 C2 |30.u....J$J$"[ .|
00000250: 55 46 46 45 52 20 C6 55 4C 4C 20 26 20 C3 4C 4F |UFFER .ULL & .LO|
00000260: 53 45 44 20 5D 22 3A 42 44 B2 30 3A 98 35 2C C7 |SED ]":BD.0:.5,.|
00000270: 28 58 46 29 3B 00 93 0A F0 00 99 4A 24 22 5B 20 |(XF);......J$"[ |
00000280: C3 D4 D2 CC 2D D1 20 C3 4F 4E 54 49 4E 55 45 53 |....-. .ONTINUES|
00000290: 20 5D 22 00 9C 0A FA 00 89 31 33 30 00 A5 0A 04 | ]"......130....|
000002A0: 01 99 4F 24 3B 00 C1 0A 0E 01 8B 58 4F A7 98 35 |..O$;......XO..5|
000002B0: 2C C7 28 58 4E 29 3B 3A 42 4D B2 2E 3A 58 4F B2 |,.(XN);:BM..:XO.|
000002C0: 2E 00 FC 0A 18 01 A1 41 24 3A 97 36 34 36 2C 44 |.......A$:.646,D|
000002D0: 31 3A 8B 41 24 B2 C7 28 31 38 39 29 A7 32 32 39 |1:.A$..(189).229|
000002E0: 30 3A 46 58 B2 31 3A 8F 20 43 4F 4D 4D 4F 44 4F |0:FX.1:. COMMODO|
000002F0: 52 45 2D 58 20 46 4F 52 20 58 4D 4F 00 24 0B 22 |RE-X FOR XMO.$."|
00000300: 01 8B 41 24 B2 22 22 A7 99 C7 28 31 36 34 29 C7 |..A$.""...(164).|
00000310: 28 31 35 37 29 3B 3A 89 31 33 30 3A 8F 20 43 55 |(157);:.130:. CU|
00000320: 52 53 4F 52 00 35 0B 2C 01 58 B2 30 3A 8B A8 42 |RSOR.5.,.X.0:..B|
00000330: 52 A7 33 37 30 00 45 0B 36 01 8B 42 52 A7 58 B2 |R.370.E.6..BR.X.|
00000340: C6 28 41 24 29 00 54 0B 40 01 8B 58 B2 31 33 A7 |.(A$).T.@..X.13.|
00000350: 99 4C 24 3B 00 64 0B 4A 01 8B 58 B2 31 34 35 A7 |.L$;.d.J..X.145.|
00000360: 99 4C 24 3B 00 74 0B 54 01 8B 58 B2 31 35 37 A7 |.L$;.t.T..X.157.|
00000370: 99 4C 24 3B 00 83 0B 5E 01 8B 58 B2 31 37 A7 99 |.L$;...^..X.17..|
00000380: 4C 24 3B 00 92 0B 68 01 8B 58 B2 31 39 A7 99 4C |L$;...h..X.19..L|
00000390: 24 3B 00 9B 0B 72 01 97 55 2C 30 00 C6 0B 7C 01 |$;...r..U,0...|.|
000003A0: 8B 41 24 B2 47 24 A7 99 4C 24 4A 24 3A 89 32 35 |.A$.G$..L$J$:.25|
000003B0: 37 30 3A 8F 20 3C 46 31 3E 20 54 4F 20 4D 41 49 |70:. <F1> TO MAI|
000003C0: 4E 20 4D 45 4E 55 00 F0 0B 86 01 8B 41 24 B2 C7 |N MENU......A$..|
000003D0: 28 31 33 34 29 A7 34 34 30 30 3A 8F 20 3C 46 33 |(134).4400:. <F3|
000003E0: 3E 20 54 4F 20 42 55 46 46 45 52 20 4D 45 4E 55 |> TO BUFFER MENU|
000003F0: 00 17 0C 90 01 8B 41 24 B2 C7 28 31 33 35 29 A7 |......A$..(135).|
00000400: 34 36 35 30 3A 8F 20 3C 46 35 3E 20 4F 50 45 4E |4650:. <F5> OPEN|
00000410: 20 42 55 46 46 45 52 00 3F 0C 9A 01 8B 41 24 B2 | BUFFER.?....A$.|
00000420: C7 28 31 33 36 29 A7 34 37 30 30 3A 8F 20 3C 46 |.(136).4700:. <F|
00000430: 37 3E 20 43 4C 4F 53 45 20 42 55 46 46 45 52 00 |7> CLOSE BUFFER.|
00000440: 66 0C A4 01 8B 41 24 B2 C7 28 31 34 30 29 A7 36 |f....A$..(140).6|
00000450: 30 34 30 3A 8F 20 3C 46 38 3E 20 5A 45 52 4F 20 |040:. <F8> ZERO |
00000460: 42 55 46 46 45 52 00 9E 0C AE 01 8B 41 24 B2 C7 |BUFFER......A$..|
00000470: 28 31 38 30 29 A7 8D 38 35 36 30 3A 8F 20 43 4F |(180)..8560:. CO|
00000480: 4D 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 48 20 54 |MMODORE LOGO H T|
00000490: 4F 20 48 41 4E 47 20 55 50 20 31 36 36 30 00 AB |O HANG UP 1660..|
000004A0: 0C B8 01 8B 42 52 A7 99 41 24 3B 00 C0 0C C2 01 |....BR..A$;.....|
000004B0: 98 35 2C C7 28 54 25 28 C6 28 41 24 29 29 29 3B |.5,.(T%(.(A$)));|
000004C0: 00 C9 0C CC 01 89 31 33 30 00 EE 0C D6 01 8F 20 |......130...... |
000004D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000004E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 13 |--------------..|
000004F0: 0D E0 01 8F 20 20 53 45 54 20 55 50 20 41 4E 44 |.... SET UP AND|
00000500: 20 49 4E 49 54 49 41 4C 49 5A 45 20 52 4F 55 54 | INITIALIZE ROUT|
00000510: 49 4E 45 00 38 0D EA 01 8F 20 2D 2D 2D 2D 2D 2D |INE.8.... ------|
00000520: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000530: 2D 2D 2D 2D 2D 2D 2D 2D 00 5C 0D F4 01 44 31 B2 |--------.\...D1.|
00000540: 31 3A 44 32 B2 39 3A 44 33 B2 30 3A 8F 20 44 45 |1:D2.9:D3.0:. DE|
00000550: 46 41 55 4C 54 20 43 4F 4C 4F 52 53 00 7C 0D FE |FAULT COLORS.|..|
00000560: 01 97 36 34 36 2C 44 31 3A 97 35 33 32 38 30 2C |..646,D1:.53280,|
00000570: 44 32 3A 97 35 33 32 38 31 2C 44 33 00 94 0D 08 |D2:.53281,D3....|
00000580: 02 45 24 B2 C7 28 31 34 37 29 3A 8F 20 43 4C 52 |.E$..(147):. CLR|
00000590: 48 4F 4D 45 00 A9 0D 12 02 8B C2 28 34 39 31 35 |HOME.......(4915|
000005A0: 32 29 B2 37 36 A7 35 35 30 00 D6 0D 1C 02 99 45 |2).76.550......E|
000005B0: 24 3A 99 22 50 4F 4B 49 4E 47 20 49 4E 20 4D 41 |$:."POKING IN MA|
000005C0: 43 48 49 4E 45 20 4C 41 4E 47 55 41 47 45 20 22 |CHINE LANGUAGE "|
000005D0: 3A 8D 38 35 39 30 00 E3 0D 26 02 4A 24 B2 C7 28 |:.8590...&.J$..(|
000005E0: 31 33 29 00 EE 0D 30 02 99 C7 28 31 34 29 00 0A |13)...0...(14)..|
000005F0: 0E 3A 02 89 33 33 32 30 3A 8F 20 47 45 54 20 55 |.:..3320:. GET U|
00000600: 53 45 52 20 43 4F 4C 4F 52 53 00 45 0E 44 02 9F |SER COLORS.E.D..|
00000610: 35 2C 32 2C 30 2C C7 28 30 29 AA C7 28 30 29 AA |5,2,0,.(0)..(0).|
00000620: C7 28 36 31 29 AA C7 28 31 29 3A 8F 20 44 45 45 |.(61)..(1):. DEE|
00000630: 50 41 4B 53 20 31 32 30 30 20 42 41 55 44 20 4F |PAKS 1200 BAUD O|
00000640: 50 45 4E 45 52 00 73 0E 4E 02 8F 20 54 48 41 4E |PENER.s.N.. THAN|
00000650: 4B 53 20 46 4F 52 20 54 48 41 54 20 4F 50 45 4E |KS FOR THAT OPEN|
00000660: 20 53 54 41 54 45 4D 45 4E 54 2C 20 44 45 45 50 | STATEMENT, DEEP|
00000670: 41 4B 21 00 7C 0E 58 02 89 36 32 30 00 B5 0E 62 |AK!.|.X..620...b|
00000680: 02 9F 35 2C 32 2C 30 2C C7 28 36 29 AA C7 28 30 |..5,2,0,.(6)..(0|
00000690: 29 AA C7 28 30 29 AA C7 28 30 29 3A 8F 20 56 41 |)..(0)..(0):. VA|
000006A0: 4E 49 4C 4C 41 20 33 30 30 20 42 41 55 44 20 4F |NILLA 300 BAUD O|
000006B0: 50 45 4E 45 52 00 DB 0E 6C 02 44 31 B2 C2 28 36 |PENER...l.D1..(6|
000006C0: 34 36 29 3A 44 32 B2 C2 28 35 33 32 38 30 29 3A |46):D2..(53280):|
000006D0: 44 33 B2 C2 28 35 33 32 38 31 29 00 1F 0F 76 02 |D3..(53281)...v.|
000006E0: 97 35 36 2C 39 31 3A 97 35 32 2C 39 31 3A 8F 20 |.56,91:.52,91:. |
000006F0: 44 45 43 2E 20 46 4F 52 20 42 49 47 47 45 52 20 |DEC. FOR BIGGER |
00000700: 42 55 46 46 45 52 2D 43 48 45 43 4B 20 46 52 45 |BUFFER-CHECK FRE|
00000710: 30 20 41 46 54 45 52 20 52 55 4E 20 31 53 54 00 |0 AFTER RUN 1ST.|
00000720: 28 0F 80 02 4B 53 B2 31 00 4E 0F 8A 02 52 24 B2 |(...KS.1.N...R$.|
00000730: 22 22 3A 8F 20 49 4E 53 54 45 41 44 20 4F 46 20 |"":. INSTEAD OF |
00000740: 41 24 20 46 4F 52 20 52 58 20 53 49 44 45 00 64 |A$ FOR RX SIDE.d|
00000750: 0F 94 02 86 54 25 28 32 35 35 29 3A 86 46 25 28 |....T%(255):.F%(|
00000760: 32 35 35 29 00 8F 0F 9E 02 4C 24 B2 C7 28 33 32 |255).....L$..(32|
00000770: 29 AA C7 28 31 35 37 29 3A 8F 20 53 50 41 43 45 |)..(157):. SPACE|
00000780: 20 50 4C 55 53 20 4C 45 46 54 20 43 52 53 52 00 | PLUS LEFT CRSR.|
00000790: A0 0F A8 02 A0 31 35 3A 9F 31 35 2C 38 2C 31 35 |.....15:.15,8,15|
000007A0: 00 BF 0F B2 02 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |...... ---------|
000007B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
000007C0: DC 0F BC 02 8F 20 44 45 46 49 4E 45 20 42 55 46 |..... DEFINE BUF|
000007D0: 46 45 52 20 50 4F 49 4E 54 45 52 53 00 FB 0F C6 |FER POINTERS....|
000007E0: 02 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
000007F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 26 10 D0 02 |-----------.&...|
00000800: 42 41 B2 C2 28 35 35 29 AA 28 32 35 36 AC C2 28 |BA..(55).(256..(|
00000810: 35 36 29 29 3A 8F 20 53 54 41 52 54 20 4F 46 20 |56)):. START OF |
00000820: 42 55 46 46 45 52 00 66 10 DA 02 42 42 B2 34 30 |BUFFER.f...BB.40|
00000830: 34 34 38 3A 8F 20 54 4F 50 20 4F 46 20 42 41 53 |448:. TOP OF BAS|
00000840: 49 43 20 42 55 46 46 45 52 3A 52 45 4D 20 4A 52 |IC BUFFER:REM JR|
00000850: 20 4F 4E 44 41 20 46 49 58 2D 54 48 41 4E 58 20 | ONDA FIX-THANX |
00000860: 52 4F 42 45 52 54 00 80 10 E4 02 42 43 B2 30 3A |ROBERT.....BC.0:|
00000870: 8F 20 42 55 46 46 45 52 20 43 4F 55 4E 54 45 52 |. BUFFER COUNTER|
00000880: 00 A6 10 EE 02 42 50 B2 42 41 AA 31 3A 8F 20 42 |.....BP.BA.1:. B|
00000890: 55 46 46 45 52 20 4E 45 58 54 43 48 41 52 20 50 |UFFER NEXTCHAR P|
000008A0: 4F 49 4E 54 45 52 00 C9 10 F8 02 42 44 B2 30 3A |OINTER.....BD.0:|
000008B0: 8F 20 42 55 46 46 45 52 20 46 4C 41 47 20 53 45 |. BUFFER FLAG SE|
000008C0: 54 20 49 46 20 4F 50 45 4E 00 E8 10 02 03 42 45 |T IF OPEN.....BE|
000008D0: B2 42 41 AA 31 3A 8F 20 42 4F 54 54 4F 4D 20 4F |.BA.1:. BOTTOM O|
000008E0: 46 20 42 55 46 46 45 52 00 08 11 0C 03 42 47 B2 |F BUFFER.....BG.|
000008F0: 30 3A 8F 20 42 55 46 46 45 52 20 46 4F 52 4E 45 |0:. BUFFER FORNE|
00000900: 58 54 20 49 4E 44 45 58 00 25 11 16 03 42 4A B2 |XT INDEX.%...BJ.|
00000910: 30 3A 8F 20 52 53 32 33 32 20 53 54 52 54 20 52 |0:. RS232 STRT R|
00000920: 58 20 42 46 52 00 41 11 20 03 42 4B B2 30 3A 8F |X BFR.A. .BK.0:.|
00000930: 20 52 53 32 33 32 20 45 4E 44 20 52 58 20 42 46 | RS232 END RX BF|
00000940: 52 00 5D 11 2A 03 42 4D B2 30 3A 8F 20 52 53 32 |R.].*.BM.0:. RS2|
00000950: 33 32 20 43 48 41 52 20 43 4F 55 4E 54 00 7A 11 |32 CHAR COUNT.z.|
00000960: 34 03 42 49 B2 30 3A 8F 20 42 55 46 46 45 52 20 |4.BI.0:. BUFFER |
00000970: 42 4C 4F 43 4B 20 53 49 5A 45 00 94 11 3E 03 42 |BLOCK SIZE...>.B|
00000980: 52 B2 42 52 3A 8F 20 36 34 20 54 4F 20 36 34 20 |R.BR:. 64 TO 64 |
00000990: 46 4C 41 47 00 B3 11 48 03 8F 20 2D 2D 2D 2D 2D |FLAG...H.. -----|
000009A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000009B0: 2D 2D 2D 00 CF 11 52 03 8F 20 53 45 54 20 55 50 |---...R.. SET UP|
000009C0: 20 46 4F 52 4D 41 54 54 49 4E 47 20 41 4E 44 00 | FORMATTING AND.|
000009D0: ED 11 5C 03 8F 20 4D 49 53 43 45 4C 4C 41 4E 45 |..\.. MISCELLANE|
000009E0: 4F 55 53 20 56 41 52 49 41 42 4C 45 53 00 0C 12 |OUS VARIABLES...|
000009F0: 66 03 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |f.. ------------|
00000A00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 16 12 70 |------------...p|
00000A10: 03 58 4E B2 31 37 00 20 12 7A 03 58 46 B2 31 39 |.XN.17. .z.XF.19|
00000A20: 00 2A 12 84 03 55 B2 32 31 32 00 45 12 8E 03 97 |.*...U.212.E....|
00000A30: 35 36 33 32 38 2C 30 3A 8F 20 53 54 41 52 54 20 |56328,0:. START |
00000A40: 43 4C 4F 43 4B 00 52 12 98 03 42 31 B2 35 36 35 |CLOCK.R...B1.565|
00000A50: 37 37 00 5F 12 A2 03 42 32 B2 35 36 35 37 39 00 |77._...B2.56579.|
00000A60: 74 12 AC 03 4F 48 B2 42 31 3A 8F 20 46 4F 52 20 |t...OH.B1:. FOR |
00000A70: 31 36 36 30 00 89 12 B6 03 48 49 B2 33 32 3A 8F |1660.....HI.32:.|
00000A80: 20 46 4F 52 20 31 36 36 30 00 A2 12 C0 03 4C 4F | FOR 1660.....LO|
00000A90: B2 32 35 35 AB 48 49 3A 8F 20 46 4F 52 20 31 36 |.255.HI:. FOR 16|
00000AA0: 36 30 00 C5 12 CA 03 4D 33 B2 30 3A 8F 20 4D 4F |60.....M3.0:. MO|
00000AB0: 44 45 4D 20 33 30 30 20 46 4C 41 47 20 46 4F 52 |DEM 300 FLAG FOR|
00000AC0: 20 31 36 36 30 00 DA 12 D4 03 42 33 B2 35 36 33 | 1660.....B3.563|
00000AD0: 32 39 3A 8F 20 43 4C 4F 43 4B 00 E4 12 DE 03 44 |29:. CLOCK.....D|
00000AE0: B2 32 35 36 00 EC 12 E8 03 57 B2 31 00 22 13 F2 |.256.....W.1."..|
00000AF0: 03 50 44 B2 34 3A 50 53 B2 37 3A 8F 20 50 52 49 |.PD.4:PS.7:. PRI|
00000B00: 4E 54 45 52 20 44 45 56 49 43 45 20 41 4E 44 20 |NTER DEVICE AND |
00000B10: 53 45 43 4F 4E 44 41 52 59 20 44 45 46 41 55 4C |SECONDARY DEFAUL|
00000B20: 54 53 00 3A 13 FC 03 45 24 B2 C7 28 31 34 37 29 |TS.:...E$..(147)|
00000B30: 3A 8F 20 43 4C 52 48 4F 4D 45 00 59 13 06 04 4A |:. CLRHOME.Y...J|
00000B40: 24 B2 C7 28 31 33 29 3A 8F 20 43 41 52 52 49 41 |$..(13):. CARRIA|
00000B50: 47 45 20 52 45 54 55 52 4E 00 66 13 10 04 50 24 |GE RETURN.f...P$|
00000B60: B2 C7 28 31 39 29 00 7F 13 1A 04 46 24 B2 C7 28 |..(19).....F$..(|
00000B70: 31 37 29 3A 8F 20 43 52 53 52 20 44 4F 57 4E 00 |17):. CRSR DOWN.|
00000B80: 95 13 24 04 53 50 24 B2 C7 28 33 32 29 3A 8F 20 |..$.SP$..(32):. |
00000B90: 53 50 41 43 45 00 D1 13 2E 04 53 51 24 B2 53 50 |SPACE.....SQ$.SP|
00000BA0: 24 AA 53 50 24 AA 53 50 24 AA 53 50 24 AA 53 50 |$.SP$.SP$.SP$.SP|
00000BB0: 24 AA 53 50 24 AA 53 50 24 AA 53 50 24 AA 53 50 |$.SP$.SP$.SP$.SP|
00000BC0: 24 AA 53 50 24 3A 8F 20 31 30 20 53 50 41 43 45 |$.SP$:. 10 SPACE|
00000BD0: 53 00 ED 13 38 04 53 55 24 B2 53 51 24 AA 53 51 |S...8.SU$.SQ$.SQ|
00000BE0: 24 3A 8F 20 32 30 20 53 50 41 43 45 53 00 20 14 |$:. 20 SPACES. .|
00000BF0: 42 04 53 53 24 B2 53 50 24 AA 53 50 24 AA 53 50 |B.SS$.SP$.SP$.SP|
00000C00: 24 AA 53 50 24 AA 53 50 24 AA 53 50 24 AA 53 50 |$.SP$.SP$.SP$.SP|
00000C10: 24 AA 53 50 24 3A 8F 20 38 20 53 50 41 43 45 53 |$.SP$:. 8 SPACES|
00000C20: 00 43 14 4C 04 53 4F 24 B2 53 50 24 AA 53 50 24 |.C.L.SO$.SP$.SP$|
00000C30: AA 53 50 24 AA 53 50 24 3A 8F 20 34 20 53 50 41 |.SP$.SP$:. 4 SPA|
00000C40: 43 45 53 00 52 14 56 04 43 4C 24 B2 C7 28 31 35 |CES.R.V.CL$..(15|
00000C50: 37 29 00 79 14 60 04 43 4C 24 B2 43 4C 24 AA 43 |7).y.`.CL$.CL$.C|
00000C60: 4C 24 AA 43 4C 24 AA 43 4C 24 3A 8F 20 34 20 43 |L$.CL$.CL$:. 4 C|
00000C70: 52 53 52 20 4C 45 46 54 53 00 B3 14 6A 04 43 4D |RSR LEFTS...j.CM|
00000C80: 24 B2 53 4F 24 AA 43 4C 24 3A 8F 20 43 4C 45 41 |$.SO$.CL$:. CLEA|
00000C90: 52 20 34 20 53 50 41 43 45 53 20 54 48 45 4E 20 |R 4 SPACES THEN |
00000CA0: 42 41 43 4B 53 50 41 43 45 20 4F 56 45 52 20 54 |BACKSPACE OVER T|
00000CB0: 48 45 4D 00 C7 14 74 04 53 52 24 B2 4A 24 AA C9 |HEM...t.SR$.J$..|
00000CC0: 28 53 51 24 2C 35 29 00 E0 14 7E 04 43 55 24 B2 |(SQ$,5)...~.CU$.|
00000CD0: C7 28 31 34 35 29 3A 8F 20 43 52 53 52 20 55 50 |.(145):. CRSR UP|
00000CE0: 00 E8 14 88 04 4F B2 38 00 0D 15 92 04 47 24 B2 |.....O.8.....G$.|
00000CF0: 46 24 AA 46 24 AA 46 24 AA 46 24 AA 46 24 3A 8F |F$.F$.F$.F$.F$:.|
00000D00: 20 35 20 43 52 53 52 20 44 4F 57 4E 53 00 1B 15 | 5 CRSR DOWNS...|
00000D10: 9C 04 42 4C 24 B2 50 24 AA 47 24 00 4A 15 A6 04 |..BL$.P$.G$.J...|
00000D20: 45 52 24 B2 42 4C 24 AA 46 24 AA 46 24 AA 46 24 |ER$.BL$.F$.F$.F$|
00000D30: AA 53 51 24 AA 53 51 24 AA 53 51 24 AA 53 51 24 |.SQ$.SQ$.SQ$.SQ$|
00000D40: AA 43 55 24 AA C7 28 31 33 29 00 7C 15 B0 04 41 |.CU$..(13).|...A|
00000D50: 4B 24 B2 42 4C 24 AA 46 24 AA 46 24 AA 46 24 AA |K$.BL$.F$.F$.F$.|
00000D60: 46 24 AA 53 51 24 AA 53 51 24 AA 53 51 24 AA 53 |F$.SQ$.SQ$.SQ$.S|
00000D70: 51 24 AA 43 55 24 AA C7 28 31 33 29 00 B3 15 BA |Q$.CU$..(13)....|
00000D80: 04 4C 49 24 B2 C7 28 31 36 34 29 3A 81 49 B2 31 |.LI$..(164):.I.1|
00000D90: A4 36 3A 4C 49 24 B2 4C 49 24 AA 4C 49 24 3A 82 |.6:LI$.LI$.LI$:.|
00000DA0: 49 3A 4C 49 24 B2 53 50 24 AA C9 28 4C 49 24 2C |I:LI$.SP$..(LI$,|
00000DB0: 33 38 29 00 BB 15 C4 04 45 B2 30 00 C9 15 CE 04 |38).....E.0.....|
00000DC0: 43 52 24 B2 C7 28 32 39 29 00 DD 15 D8 04 45 49 |CR$..(29).....EI|
00000DD0: 24 B2 43 52 24 AA 43 52 24 AA 43 52 24 00 F1 15 |$.CR$.CR$.CR$...|
00000DE0: E2 04 45 4A 24 B2 45 49 24 AA 45 49 24 AA 45 49 |..EJ$.EI$.EI$.EI|
00000DF0: 24 00 12 16 EC 04 45 4A 24 B2 45 4A 24 AA 45 4A |$.....EJ$.EJ$.EJ|
00000E00: 24 3A 8F 20 31 38 20 43 52 53 52 20 52 49 47 48 |$:. 18 CRSR RIGH|
00000E10: 54 53 00 2F 16 F6 04 45 53 24 B2 50 24 AA 45 49 |TS./...ES$.P$.EI|
00000E20: 24 AA 46 24 AA 22 D3 54 41 54 55 53 2D 3E 22 00 |$.F$.".TATUS->".|
00000E30: 44 16 00 05 55 51 24 B2 42 4C 24 AA 47 24 AA 47 |D...UQ$.BL$.G$.G|
00000E40: 24 AA 46 24 00 73 16 0A 05 46 43 24 B2 C7 28 33 |$.F$.s...FC$..(3|
00000E50: 32 29 AA C7 28 33 32 29 AA C7 28 33 32 29 AA C7 |2)..(32)..(32)..|
00000E60: 28 31 35 37 29 AA C7 28 31 35 37 29 AA C7 28 31 |(157)..(157)..(1|
00000E70: 35 37 29 00 7D 16 14 05 41 43 4B B2 36 00 88 16 |57).}...ACK.6...|
00000E80: 1E 05 4E 41 4B B2 32 31 00 92 16 28 05 45 4F 54 |..NAK.21...(.EOT|
00000E90: B2 34 00 9D 16 32 05 43 41 4E B2 32 34 00 A7 16 |.4...2.CAN.24...|
00000EA0: 3C 05 5A B2 31 33 31 00 B1 16 46 05 56 B2 31 33 |<.Z.131...F.V.13|
00000EB0: 32 00 BB 16 50 05 46 B2 32 35 35 00 DF 16 5A 05 |2...P.F.255...Z.|
00000EC0: 54 52 B2 30 3A 8F 20 44 53 4B 20 45 52 52 4F 52 |TR.0:. DSK ERROR|
00000ED0: 20 54 52 41 43 4B 20 56 41 52 49 41 42 4C 45 00 | TRACK VARIABLE.|
00000EE0: 04 17 64 05 53 45 B2 30 3A 8F 20 44 53 4B 20 45 |..d.SE.0:. DSK E|
00000EF0: 52 52 4F 52 20 53 45 43 54 4F 52 20 56 41 52 49 |RROR SECTOR VARI|
00000F00: 41 42 4C 45 00 0E 17 6E 05 4D B2 32 38 38 00 16 |ABLE...n.M.288..|
00000F10: 17 78 05 50 B2 31 00 22 17 82 05 43 24 B2 C7 28 |.x.P.1."...C$..(|
00000F20: 30 29 00 43 17 8C 05 4F 24 B2 C7 28 31 38 29 AA |0).C...O$..(18).|
00000F30: C7 28 33 32 29 AA C7 28 31 35 37 29 AA C7 28 31 |.(32)..(157)..(1|
00000F40: 34 36 29 00 51 17 96 05 47 24 B2 C7 28 31 33 33 |46).Q...G$..(133|
00000F50: 29 00 77 17 A0 05 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |).w.... --------|
00000F60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000F70: 2D 2D 2D 2D 2D 2D 2D 00 9D 17 AA 05 8F 20 50 52 |-------...... PR|
00000F80: 49 4E 54 20 46 49 52 53 54 20 55 53 45 52 20 53 |INT FIRST USER S|
00000F90: 43 52 45 45 4E 20 41 4E 44 20 47 45 54 00 BD 17 |CREEN AND GET...|
00000FA0: B4 05 8F 20 44 55 50 4C 45 58 20 53 45 54 54 49 |... DUPLEX SETTI|
00000FB0: 4E 47 53 20 46 52 4F 4D 20 55 53 45 52 00 E3 17 |NGS FROM USER...|
00000FC0: BE 05 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |... ------------|
00000FD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000FE0: 2D 2D 2D 00 EE 17 C8 05 99 45 24 4C 49 24 00 16 |---......E$LI$..|
00000FF0: 18 D2 05 99 53 53 24 22 D8 4D 4F 44 45 4D 20 D0 |....SS$".MODEM .|
00001000: 52 4F 54 4F 43 4F 4C 20 D4 45 52 4D 49 4E 41 4C |ROTOCOL .ERMINAL|
00001010: 22 4A 24 4C 49 24 00 3E 18 DC 05 99 45 52 24 AA |"J$LI$.>....ER$.|
00001020: 53 51 24 AA 43 55 24 43 55 24 22 D8 CD CF C2 D5 |SQ$.CU$CU$".....|
00001030: C6 20 2D 20 D6 37 2E 34 2E 32 C1 22 4A 24 00 63 |. - .7.4.2."J$.c|
00001040: 18 E6 05 99 53 51 24 22 28 C3 29 20 31 39 38 35 |....SQ$"(.) 1985|
00001050: 20 C3 48 52 49 53 20 CB 41 49 53 45 52 22 AA 4A | .HRIS .AISER".J|
00001060: 24 4A 24 00 91 18 F0 05 99 46 24 46 24 22 3C 31 |$J$......F$F$"<1|
00001070: 3E 20 C4 45 4C 50 48 49 2F C2 C2 D3 2F C3 C9 D3 |> .ELPHI/.../...|
00001080: 20 20 2D 20 20 C6 55 4C 4C 2D C4 55 50 4C 45 58 | - .ULL-.UPLEX|
00001090: 22 00 BB 18 FA 05 99 46 24 22 3C 32 3E 20 C7 C5 |"......F$"<2> ..|
000010A0: 4E 49 45 2F 36 34 20 54 4F 20 36 34 20 2D 20 C8 |NIE/64 TO 64 - .|
000010B0: 41 4C 46 2D C4 55 50 4C 45 58 22 00 E7 18 04 06 |ALF-.UPLEX".....|
000010C0: 99 46 24 22 3C 33 3E 20 C3 48 41 4E 47 45 20 D0 |.F$"<3> .HANGE .|
000010D0: 52 49 4E 54 45 52 20 C4 45 56 49 43 45 20 44 45 |RINTER .EVICE DE|
000010E0: 46 41 55 4C 54 53 22 00 05 19 0E 06 99 46 24 46 |FAULTS"......F$F|
000010F0: 24 22 C5 4E 54 45 52 20 43 48 4F 49 43 45 20 3C |$".NTER CHOICE <|
00001100: 31 2D 33 3E 22 00 0F 19 18 06 8D 32 39 38 30 00 |1-3>"......2980.|
00001110: 26 19 22 06 8B 41 24 B2 22 31 22 A7 42 52 B2 30 |&."..A$."1".BR.0|
00001120: 3A 89 31 36 34 30 00 3E 19 2C 06 8B 41 24 B2 22 |:.1640.>.,..A$."|
00001130: 32 22 A7 42 52 B2 AB 31 3A 89 31 36 34 30 00 50 |2".BR..1:.1640.P|
00001140: 19 36 06 8B 41 24 B2 22 33 22 A7 8D 38 35 30 30 |.6..A$."3"..8500|
00001150: 00 5A 19 40 06 89 31 34 38 30 00 80 19 4A 06 8F |.Z.@..1480...J..|
00001160: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00001170: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001180: 00 A3 19 54 06 8F 20 20 20 20 53 45 54 20 55 50 |...T.. SET UP|
00001190: 20 54 52 41 4E 53 4C 41 54 49 4F 4E 20 54 41 42 | TRANSLATION TAB|
000011A0: 4C 45 53 00 C9 19 5E 06 8F 20 2D 2D 2D 2D 2D 2D |LES...^.. ------|
000011B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000011C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 F7 19 68 06 99 45 |---------...h..E|
000011D0: 24 47 24 53 4F 24 22 5B 20 C3 52 45 41 54 49 4E |$G$SO$"[ .REATIN|
000011E0: 47 20 D4 52 41 4E 53 4C 41 54 49 4F 4E 20 D4 41 |G .RANSLATION .A|
000011F0: 42 4C 45 53 20 5D 22 00 1C 1A 72 06 8F 20 2D 2D |BLES ]"...r.. --|
00001200: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001210: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 40 1A 7C |------------.@.||
00001220: 06 8F 20 54 52 41 4E 53 4C 41 54 49 4F 4E 20 54 |.. TRANSLATION T|
00001230: 41 42 4C 45 53 20 55 50 44 41 54 45 44 20 4F 4E |ABLES UPDATED ON|
00001240: 00 65 1A 86 06 8F 20 31 30 2F 31 34 2F 38 35 20 |.e.... 10/14/85 |
00001250: 54 4F 20 4D 4F 52 45 20 43 4C 4F 53 45 4C 59 20 |TO MORE CLOSELY |
00001260: 4D 41 54 43 48 00 88 1A 90 06 8F 20 54 52 55 45 |MATCH...... TRUE|
00001270: 20 41 53 43 49 49 20 2D 20 50 45 54 20 43 4F 4E | ASCII - PET CON|
00001280: 56 45 52 53 49 4F 4E 2E 00 AD 1A 9A 06 8F 20 2D |VERSION....... -|
00001290: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000012A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 F3 1A |-------------...|
000012B0: A4 06 81 4A B2 31 A4 36 34 3A 8F 20 50 41 53 53 |...J.1.64:. PASS|
000012C0: 45 53 20 41 4C 4C 20 43 54 52 4C 20 43 4F 44 45 |ES ALL CTRL CODE|
000012D0: 53 20 50 55 4E 43 54 55 41 54 49 4F 4E 20 41 4E |S PUNCTUATION AN|
000012E0: 44 20 4E 55 4D 42 45 52 53 20 43 4F 52 52 45 43 |D NUMBERS CORREC|
000012F0: 54 4C 59 00 FF 1A AE 06 54 25 28 4A 29 B2 4A 00 |TLY.....T%(J).J.|
00001300: 06 1B B8 06 82 4A 00 27 1B C2 06 54 25 28 32 30 |.....J.'...T%(20|
00001310: 29 B2 38 3A 8F 20 49 4E 53 54 20 44 45 4C 20 3D |).8:. INST DEL =|
00001320: 20 43 54 52 4C 2D 48 00 40 1B CC 06 81 4A B2 36 | CTRL-H.@....J.6|
00001330: 35 A4 39 30 3A 8F 20 4C 4F 57 45 52 43 41 53 45 |5.90:. LOWERCASE|
00001340: 00 4F 1B D6 06 54 25 28 4A 29 B2 4A AA 33 32 00 |.O...T%(J).J.32.|
00001350: 56 1B E0 06 82 4A 00 63 1B EA 06 81 4A B2 39 31 |V....J.c....J.91|
00001360: A4 39 35 00 6F 1B F4 06 54 25 28 4A 29 B2 4A 00 |.95.o...T%(J).J.|
00001370: 76 1B FE 06 82 4A 00 95 1B 08 07 81 4A B2 31 39 |v....J......J.19|
00001380: 33 A4 32 31 38 3A 8F 20 50 45 54 20 55 50 50 45 |3.218:. PET UPPE|
00001390: 52 43 41 53 45 00 A5 1B 12 07 54 25 28 4A 29 B2 |RCASE.....T%(J).|
000013A0: 4A AB 31 32 38 00 AC 1B 1C 07 82 4A 00 D9 1B 26 |J.128......J...&|
000013B0: 07 54 25 28 31 34 36 29 B2 2E 3A 8F 20 52 45 56 |.T%(146)..:. REV|
000013C0: 45 52 53 45 20 56 49 44 45 4F 20 49 53 20 41 20 |ERSE VIDEO IS A |
000013D0: 4E 55 4C 4C 20 20 2D 43 4B 00 00 1C 30 07 54 25 |NULL -CK...0.T%|
000013E0: 28 31 34 37 29 B2 31 32 3A 8F 20 43 4C 52 48 4F |(147).12:. CLRHO|
000013F0: 4D 20 3D 20 46 4F 52 4D 46 45 45 44 20 2D 43 4B |M = FORMFEED -CK|
00001400: 00 48 1C 3A 07 54 25 28 32 32 31 29 B2 31 32 36 |.H.:.T%(221).126|
00001410: 3A 8F 20 53 48 49 46 54 45 44 20 4D 49 4E 55 53 |:. SHIFTED MINUS|
00001420: 20 45 51 55 41 4C 53 20 54 49 4C 44 45 20 46 4F | EQUALS TILDE FO|
00001430: 52 20 44 45 43 4D 41 54 45 20 45 41 53 59 43 4F |R DECMATE EASYCO|
00001440: 4D 20 41 43 43 45 53 53 00 53 1C 44 07 81 4A B2 |M ACCESS.S.D..J.|
00001450: 30 A4 46 00 5F 1C 4E 07 4B B2 54 25 28 4A 29 00 |0.F._.N.K.T%(J).|
00001460: 7D 1C 58 07 8B 4B B3 B1 30 A7 46 25 28 4B 29 B2 |}.X..K..0.F%(K).|
00001470: 4A 3A 46 25 28 4B AA 31 32 38 29 B2 4A 00 84 1C |J:F%(K.128).J...|
00001480: 62 07 82 4A 00 9B 1C 6C 07 46 25 28 31 39 29 B2 |b..J...l.F%(19).|
00001490: 30 3A 46 25 28 31 34 37 29 B2 30 00 CA 1C 76 07 |0:F%(147).0...v.|
000014A0: 46 25 28 31 32 29 B2 31 34 37 3A 8F 20 46 4F 52 |F%(12).147:. FOR|
000014B0: 4D 46 45 45 44 20 57 49 4C 4C 20 43 4C 45 41 52 |MFEED WILL CLEAR|
000014C0: 53 43 52 45 45 4E 20 2D 43 4B 00 D7 1C 80 07 46 |SCREEN -CK.....F|
000014D0: 25 28 31 30 29 B2 30 00 21 1D 8A 07 46 25 28 38 |%(10).0.!...F%(8|
000014E0: 29 B2 32 30 3A 8F 20 43 54 52 4C 20 48 20 3D 20 |).20:. CTRL H = |
000014F0: 44 45 4C 45 54 45 20 4F 4E 20 52 45 43 45 49 56 |DELETE ON RECEIV|
00001500: 45 20 53 49 44 45 20 54 4F 4F 2E 20 4C 45 53 53 |E SIDE TOO. LESS|
00001510: 20 47 41 46 46 45 20 2D 43 4B 20 38 35 31 30 30 | GAFFE -CK 85100|
00001520: 36 00 54 1D 94 07 46 25 28 31 32 37 29 B2 32 30 |6.T...F%(127).20|
00001530: 3A 8F 20 52 45 43 45 49 56 45 44 20 44 45 4C 45 |:. RECEIVED DELE|
00001540: 54 45 20 50 52 49 4E 54 53 20 50 45 54 20 44 45 |TE PRINTS PET DE|
00001550: 4C 45 54 45 00 A1 1D 9E 07 46 25 28 39 35 29 B2 |LETE.....F%(95).|
00001560: 31 36 34 3A 8F 20 55 4E 44 45 52 53 43 4F 52 45 |164:. UNDERSCORE|
00001570: 20 49 4E 53 54 45 41 44 20 4F 46 20 42 41 43 4B | INSTEAD OF BACK|
00001580: 41 52 52 4F 57 2E 20 42 41 43 4B 41 52 52 4F 57 |ARROW. BACKARROW|
00001590: 20 49 53 20 39 35 20 2D 43 4B 20 38 35 31 30 31 | IS 95 -CK 85101|
000015A0: 34 00 C6 1D A8 07 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |4...... --------|
000015B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000015C0: 2D 2D 2D 2D 2D 2D 00 EA 1D B2 07 8F 20 20 44 49 |------...... DI|
000015D0: 53 50 4C 41 59 20 4D 41 49 4E 20 54 45 52 4D 49 |SPLAY MAIN TERMI|
000015E0: 4E 41 4C 20 53 43 52 45 45 4E 00 0F 1E BC 07 8F |NAL SCREEN......|
000015F0: 20 20 57 49 54 48 20 55 53 45 52 20 52 45 4D 49 | WITH USER REMI|
00001600: 4E 44 45 52 53 20 46 4F 52 20 46 20 4B 45 59 00 |NDERS FOR F KEY.|
00001610: 2A 1E C6 07 8F 20 20 20 20 20 20 20 20 20 20 44 |*.... D|
00001620: 45 46 49 4E 49 54 49 4F 4E 53 00 4F 1E D0 07 8F |EFINITIONS.O....|
00001630: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00001640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00001650: 7B 1E DA 07 99 45 24 3B C7 28 31 34 29 3A 8F 20 |{....E$;.(14):. |
00001660: 43 4C 45 41 52 20 53 43 52 45 45 4E 20 41 4E 44 |CLEAR SCREEN AND|
00001670: 20 53 45 54 20 4C 4F 43 41 53 45 00 88 1E E4 07 | SET LOCASE.....|
00001680: 42 43 B2 42 42 AB 42 50 00 93 1E EE 07 99 4C 49 |BC.BB.BP......LI|
00001690: 24 4A 24 00 BB 1E F8 07 8B 42 52 A7 99 53 51 24 |$J$......BR..SQ$|
000016A0: 22 20 20 C7 C5 4E 49 45 2F C8 41 4C 46 2D C4 55 |" ..NIE/.ALF-.U|
000016B0: 50 4C 45 58 22 3A 89 32 30 36 30 00 E2 1E 02 08 |PLEX":.2060.....|
000016C0: 99 53 4F 24 22 20 20 C4 45 4C 50 48 49 2F C2 C2 |.SO$" .ELPHI/..|
000016D0: D3 2F C3 C9 D3 20 C6 55 4C 4C 2D C4 55 50 4C 45 |./... .ULL-.UPLE|
000016E0: 58 22 00 1D 1F 0C 08 8B C2 28 36 35 39 29 A7 99 |X".......(659)..|
000016F0: 53 51 24 22 33 30 30 20 C2 41 55 44 20 D4 45 52 |SQ$"300 .AUD .ER|
00001700: 4D 49 4E 41 4C 22 3A 89 32 30 38 30 3A 8F 20 46 |MINAL":.2080:. F|
00001710: 49 58 54 20 31 30 2F 31 34 20 2D 43 4B 00 51 1F |IXT 10/14 -CK.Q.|
00001720: 16 08 99 22 20 20 C8 C9 C7 C8 20 D3 D0 C5 C5 C4 |..." .... .....|
00001730: 20 D4 45 52 4D 49 4E 41 4C 20 CD 4F 44 45 20 2D | .ERMINAL .ODE -|
00001740: 20 31 32 30 30 20 C2 41 55 44 22 3A 89 32 30 38 | 1200 .AUD":.208|
00001750: 30 00 6E 1F 20 08 99 53 51 24 22 3C 46 31 3E 20 |0.n. ..SQ$"<F1> |
00001760: 3D 20 CD 41 49 4E 20 20 20 CD 45 4E 55 22 00 8B |= .AIN .ENU"..|
00001770: 1F 2A 08 99 53 51 24 22 3C 46 33 3E 20 3D 20 C2 |.*..SQ$"<F3> = .|
00001780: 55 46 46 45 52 20 CD 45 4E 55 22 00 BB 1F 34 08 |UFFER .ENU"...4.|
00001790: 99 46 24 22 20 20 C2 55 46 46 45 52 20 3D 20 3C |.F$" .UFFER = <|
000017A0: 46 35 3E CF 50 45 4E 20 3C 46 37 3E C3 4C 4F 53 |F5>.PEN <F7>.LOS|
000017B0: 45 20 3C 46 38 3E DA 45 52 4F 22 00 C4 1F 3E 08 |E <F8>.ERO"...>.|
000017C0: 99 4C 49 24 00 CD 1F 48 08 89 31 33 30 00 F1 1F |.LI$...H..130...|
000017D0: 52 08 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |R.. ------------|
000017E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000017F0: 2D 00 14 20 5C 08 8F 20 20 20 58 4D 4F 44 45 4D |-.. \.. XMODEM|
00001800: 20 50 52 4F 54 4F 43 4F 4C 20 49 4E 56 4F 43 41 | PROTOCOL INVOCA|
00001810: 54 49 4F 4E 00 1A 20 66 08 8F 00 3D 20 70 08 8F |TION.. f...= p..|
00001820: 20 52 4F 55 54 49 4E 45 20 44 45 54 45 52 4D 49 | ROUTINE DETERMI|
00001830: 4E 45 53 20 53 45 4E 44 2F 52 45 43 56 00 62 20 |NES SEND/RECV.b |
00001840: 7A 08 8F 20 53 54 41 54 55 53 20 46 52 4F 4D 20 |z.. STATUS FROM |
00001850: 55 53 45 52 20 54 48 45 4E 20 50 4F 4B 45 53 20 |USER THEN POKES |
00001860: 49 4E 00 84 20 84 08 8F 20 46 49 4C 45 4C 45 4E |IN.. ... FILELEN|
00001870: 47 54 48 20 54 4F 20 34 39 31 36 31 20 28 24 43 |GTH TO 49161 ($C|
00001880: 30 30 39 29 00 A4 20 8E 08 8F 20 46 49 4C 45 4E |009).. ... FILEN|
00001890: 41 4D 45 20 54 4F 20 34 39 31 38 37 20 28 24 43 |AME TO 49187 ($C|
000018A0: 30 32 33 29 00 C5 20 98 08 8F 20 54 48 45 4E 20 |023).. ... THEN |
000018B0: 53 59 53 20 54 4F 20 34 39 34 31 31 20 28 24 43 |SYS TO 49411 ($C|
000018C0: 31 30 33 29 2E 00 E6 20 A2 08 8F 20 42 49 47 20 |103)... ... BIG |
000018D0: 54 48 41 4E 58 20 54 4F 20 4A 4F 45 20 4F 27 48 |THANX TO JOE O'H|
000018E0: 41 52 41 20 4F 46 00 08 21 AC 08 8F 20 4D 49 43 |ARA OF..!... MIC|
000018F0: 52 4F 54 45 43 48 4E 49 43 20 53 4F 4C 55 54 49 |ROTECHNIC SOLUTI|
00001900: 4F 4E 53 20 49 4E 43 2E 00 2C 21 B6 08 8F 20 46 |ONS INC..,!... F|
00001910: 4F 52 20 54 48 49 53 20 46 41 53 54 20 4D 4C 20 |OR THIS FAST ML |
00001920: 52 4F 55 54 49 4E 45 20 54 48 41 54 00 50 21 C0 |ROUTINE THAT.P!.|
00001930: 08 8F 20 53 54 52 49 50 53 20 50 41 44 44 49 4E |.. STRIPS PADDIN|
00001940: 47 20 4F 4E 2D 54 48 45 2D 46 4C 59 20 41 4E 44 |G ON-THE-FLY AND|
00001950: 00 74 21 CA 08 8F 20 52 55 4E 53 20 46 41 53 54 |.t!... RUNS FAST|
00001960: 45 52 20 54 48 41 4E 20 41 4E 59 20 4F 54 48 45 |ER THAN ANY OTHE|
00001970: 52 20 50 44 00 94 21 D4 08 8F 20 58 4D 4F 44 45 |R PD..!... XMODE|
00001980: 4D 20 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E |M IMPLEMENTATION|
00001990: 20 2D 43 4B 00 B8 21 DE 08 8F 20 2D 2D 2D 2D 2D | -CK..!... -----|
000019A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000019B0: 2D 2D 2D 2D 2D 2D 2D 2D 00 C3 21 E8 08 99 45 24 |--------..!...E$|
000019C0: 3B 47 24 00 F9 21 F2 08 99 22 3C D3 3E 45 4E 44 |;G$..!..."<.>END|
000019D0: 20 4F 52 20 3C D2 3E 45 43 45 49 56 45 3F 20 28 | OR <.>ECEIVE? (|
000019E0: C1 4E 59 20 4F 54 48 45 52 20 4B 45 59 22 3A 99 |.NY OTHER KEY":.|
000019F0: 22 41 42 4F 52 54 53 29 22 00 0A 22 FC 08 8D 32 |"ABORTS)".."...2|
00001A00: 39 38 30 3A 57 41 24 B2 41 24 00 40 22 06 09 8B |980:WA$.A$.@"...|
00001A10: C6 28 57 41 24 29 B3 B1 38 32 A7 8B C6 28 57 41 |.(WA$)..82...(WA|
00001A20: 24 29 B3 B1 38 33 A7 99 22 5B 20 D4 45 52 4D 49 |$)..83.."[ .ERMI|
00001A30: 4E 41 4C 20 CD 4F 44 45 20 5D 22 3A 89 32 35 30 |NAL .ODE ]":.250|
00001A40: 00 6E 22 10 09 99 22 C6 49 4C 45 54 59 50 45 20 |.n"...".ILETYPE |
00001A50: 3C D3 3E C5 D1 20 4F 52 20 3C D0 3E D2 C7 3F 20 |<.>.. OR <.>..? |
00001A60: 20 3C D8 3E 20 54 4F 20 41 42 4F 52 54 22 00 85 | <.> TO ABORT"..|
00001A70: 22 1A 09 8D 32 39 38 30 3A 8B 41 24 B2 22 58 22 |"...2980:.A$."X"|
00001A80: A7 32 35 34 30 00 96 22 24 09 8B 41 24 B2 22 53 |.2540.."$..A$."S|
00001A90: 22 A7 32 33 37 30 00 A7 22 2E 09 8B 41 24 B2 22 |".2370.."...A$."|
00001AA0: 50 22 A7 32 33 37 30 00 E9 22 38 09 99 22 D0 52 |P".2370.."8..".R|
00001AB0: 45 53 53 20 D3 20 4F 52 20 D0 20 4F 52 20 D8 22 |ESS . OR . OR ."|
00001AC0: 3A 89 32 33 33 30 3A 8F 20 46 4C 55 4E 4B 45 44 |:.2330:. FLUNKED|
00001AD0: 20 54 48 45 20 54 45 53 54 20 3B 47 45 54 20 41 | THE TEST ;GET A|
00001AE0: 4E 4F 54 48 45 52 20 41 24 00 0A 23 42 09 99 22 |NOTHER A$..#B.."|
00001AF0: 20 20 20 20 20 20 20 20 20 20 56 2D 2D 2D 2D 2D | V-----|
00001B00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 56 00 1E 23 4C 09 85 |---------V..#L..|
00001B10: 22 C6 49 4C 45 4E 41 4D 45 22 3B 44 4C 24 00 48 |".ILENAME";DL$.H|
00001B20: 23 56 09 8B C3 28 44 4C 24 29 B1 31 36 A7 99 22 |#V...(DL$).16.."|
00001B30: C6 49 4C 45 4E 41 4D 45 20 54 4F 4F 20 4C 4F 4E |.ILENAME TOO LON|
00001B40: 47 22 3A 89 32 33 37 30 00 70 23 60 09 8B 57 41 |G":.2370.p#`..WA|
00001B50: 24 B2 22 52 22 A7 57 41 24 B2 22 57 22 3A 8F 20 |$."R".WA$."W":. |
00001B60: 57 52 49 54 45 20 4F 4E 20 52 45 43 45 49 56 45 |WRITE ON RECEIVE|
00001B70: 00 94 23 6A 09 8B 57 41 24 B2 22 53 22 A7 57 41 |..#j..WA$."S".WA|
00001B80: 24 B2 22 52 22 3A 8F 20 52 45 41 44 20 4F 4E 20 |$."R":. READ ON |
00001B90: 53 45 4E 44 00 B3 23 74 09 46 49 24 B2 44 4C 24 |SEND..#t.FI$.DL$|
00001BA0: AA C7 28 34 34 29 AA 41 24 AA C7 28 34 34 29 AA |..(44).A$..(44).|
00001BB0: 57 41 24 00 C4 23 7E 09 8B 41 24 B2 22 50 22 A7 |WA$..#~..A$."P".|
00001BC0: 32 34 37 30 00 EF 23 88 09 8B 41 24 B2 22 53 22 |2470..#...A$."S"|
00001BD0: A7 99 22 D4 52 41 4E 53 4C 41 54 45 20 54 45 58 |..".RANSLATE TEX|
00001BE0: 54 20 46 49 4C 45 3F 20 3C D9 3E 2F 3C CE 3E 00 |T FILE? <.>/<.>.|
00001BF0: 16 24 92 09 99 22 3C D2 C5 D4 D5 D2 CE 3E 20 44 |.$..."<......> D|
00001C00: 45 46 41 55 4C 54 53 20 54 4F 20 54 52 41 4E 53 |EFAULTS TO TRANS|
00001C10: 4C 41 54 45 2E 22 00 52 24 9C 09 8D 32 39 38 30 |LATE.".R$...2980|
00001C20: 3A 8B 41 24 B3 B1 22 4E 22 A7 46 49 24 B2 46 49 |:.A$.."N".FI$.FI|
00001C30: 24 AA C7 28 34 34 29 AA 22 54 22 3A 8F 20 54 52 |$..(44)."T":. TR|
00001C40: 41 4E 53 4C 41 54 45 20 42 59 20 44 45 46 41 55 |ANSLATE BY DEFAU|
00001C50: 4C 54 00 95 24 A6 09 4D 4C B2 34 39 31 36 31 3A |LT..$..ML.49161:|
00001C60: 46 49 B2 C3 28 46 49 24 29 3A 97 4D 4C 2C 46 49 |FI..(FI$):.ML,FI|
00001C70: 3A 8F 20 4C 45 4E 47 54 48 20 4F 46 20 46 49 4C |:. LENGTH OF FIL|
00001C80: 45 4E 41 4D 45 20 54 4F 20 54 48 49 53 20 41 44 |ENAME TO THIS AD|
00001C90: 44 52 45 53 53 00 C7 24 B0 09 4D 4C B2 34 39 31 |DRESS..$..ML.491|
00001CA0: 38 36 3A 8F 20 50 4F 4B 45 20 49 4E 20 46 49 4C |86:. POKE IN FIL|
00001CB0: 45 4E 41 4D 45 20 53 54 41 52 54 49 4E 47 20 41 |ENAME STARTING A|
00001CC0: 54 20 34 39 31 38 37 00 EA 24 BA 09 81 49 B2 31 |T 49187..$...I.1|
00001CD0: A4 46 49 3A 97 4D 4C AA 49 2C C6 28 CA 28 46 49 |.FI:.ML.I,.(.(FI|
00001CE0: 24 2C 49 2C 31 29 29 3A 82 49 00 05 25 C4 09 99 |$,I,1)):.I..%...|
00001CF0: C7 28 31 38 29 3B 22 30 3A 22 3B 46 49 24 3B 22 |.(18);"0:";FI$;"|
00001D00: 20 3A 20 22 3B 00 46 25 CE 09 9E 34 39 34 31 31 | : ";.F%...49411|
00001D10: 3A 8F 20 42 59 50 41 53 53 45 53 20 4D 54 53 20 |:. BYPASSES MTS |
00001D20: 43 55 45 49 4E 47 20 53 45 51 55 45 4E 43 45 20 |CUEING SEQUENCE |
00001D30: 57 49 54 48 20 46 49 4C 45 4E 41 4D 45 20 49 4E |WITH FILENAME IN|
00001D40: 20 50 4C 41 43 45 00 4D 25 D8 09 A0 38 00 8F 25 | PLACE.M%...8..%|
00001D50: E2 09 8B 46 58 B2 31 A7 46 58 B2 30 3A 99 22 5B |...FX.1.FX.0:."[|
00001D60: 20 D4 45 52 4D 49 4E 41 4C 20 CD 4F 44 45 20 5D | .ERMINAL .ODE ]|
00001D70: 22 3A 89 31 33 30 3A 8F 20 43 3D 58 20 52 45 54 |":.130:. C=X RET|
00001D80: 55 52 4E 53 20 54 4F 20 54 52 4D 20 2D 43 4B 00 |URNS TO TRM -CK.|
00001D90: B4 25 EC 09 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.%... ----------|
00001DA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001DB0: 2D 2D 2D 2D 00 CC 25 F6 09 8F 20 4D 41 49 4E 20 |----..%... MAIN |
00001DC0: 4D 45 4E 55 20 44 49 53 50 4C 41 59 00 F1 25 00 |MENU DISPLAY..%.|
00001DD0: 0A 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00001DE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001DF0: 2D 00 FF 25 0A 0A 99 C7 28 31 34 29 AA 45 24 00 |-..%....(14).E$.|
00001E00: 0C 26 14 0A 99 45 24 4C 49 24 4A 24 00 42 26 1E |.&...E$LI$J$.B&.|
00001E10: 0A 99 22 20 D8 CD CF C2 D5 C6 20 36 34 2D D6 37 |.." ...... 64-.7|
00001E20: 2E 34 2E 32 C1 20 31 30 2F 32 32 2F 38 35 20 2D |.4.2. 10/22/85 -|
00001E30: 20 CD C1 C9 CE 20 CD C5 CE D5 22 4A 24 4C 49 24 | .... ...."J$LI$|
00001E40: 4A 24 00 5C 26 28 0A 99 22 20 20 20 20 20 3C 31 |J$.\&(.." <1|
00001E50: 3E 20 20 D4 C5 D2 CD 49 4E 41 4C 22 00 86 26 32 |> ....INAL"..&2|
00001E60: 0A 99 53 52 24 22 3C 32 3E 20 20 CD D4 D3 C9 CE |..SR$"<2> .....|
00001E70: C3 20 D8 CD CF C4 C5 CD 20 46 49 4C 45 20 54 52 |. ...... FILE TR|
00001E80: 41 4E 53 46 45 52 00 A3 26 3C 0A 99 53 52 24 22 |ANSFER..&<..SR$"|
00001E90: 3C 33 3E 20 20 C2 55 46 46 45 52 20 C3 4F 4E 54 |<3> .UFFER .ONT|
00001EA0: 52 4F 4C 00 C1 26 46 0A 99 53 52 24 22 3C 34 3E |ROL..&F..SR$"<4>|
00001EB0: 20 20 C4 49 53 4B 20 C4 49 52 45 43 54 4F 52 59 | .ISK .IRECTORY|
00001EC0: 22 00 E6 26 50 0A 99 53 52 24 22 3C 35 3E 20 20 |"..&P..SR$"<5> |
00001ED0: 31 36 35 30 2F 36 34 32 30 20 20 20 C1 55 54 4F |1650/6420 .UTO|
00001EE0: 2D C4 49 41 4C 22 00 0B 27 5A 0A 99 53 52 24 22 |-.IAL"..'Z..SR$"|
00001EF0: 3C 36 3E 20 20 CD 49 54 45 59 2F C8 C5 D3 C9 C9 |<6> .ITEY/.....|
00001F00: 20 C1 55 54 4F 2D C4 49 41 4C 22 00 28 27 64 0A | .UTO-.IAL".('d.|
00001F10: 99 A6 31 35 29 22 41 4E 44 20 C3 C2 CD 20 31 36 |..15)"AND ... 16|
00001F20: 36 30 20 C4 49 41 4C 22 00 4A 27 6E 0A 99 A6 35 |60 .IAL".J'n...5|
00001F30: 29 22 3C 37 3E 20 20 D8 CD CF C2 D5 C6 20 C1 55 |)"<7> ...... .U|
00001F40: 54 4F 2D C1 4E 53 57 45 52 22 00 73 27 78 0A 99 |TO-.NSWER".s'x..|
00001F50: 53 52 24 22 3C 38 3E 20 20 C8 41 59 45 53 2F D3 |SR$"<8> .AYES/.|
00001F60: 49 47 4E 41 4C 4D 41 4E 20 C1 55 54 4F 2D C4 49 |IGNALMAN .UTO-.I|
00001F70: 41 4C 22 00 91 27 82 0A 99 53 52 24 22 3C 39 3E |AL"..'...SR$"<9>|
00001F80: 20 20 D1 55 49 54 20 D0 52 4F 47 52 41 4D 22 46 | .UIT .ROGRAM"F|
00001F90: 24 00 BE 27 8C 0A 99 22 20 20 C3 3D D8 20 46 4F |$..'..." .=. FO|
00001FA0: 52 20 D8 4D 4F 44 45 4D 20 3A 20 C3 3D C8 20 54 |R .MODEM : .=. T|
00001FB0: 4F 20 48 41 4E 47 55 50 20 31 36 36 30 22 00 C8 |O HANGUP 1660"..|
00001FC0: 27 96 0A 99 4C 49 24 3B 00 E3 27 A0 0A 8D 32 39 |'...LI$;..'...29|
00001FD0: 38 30 3A 8F 20 47 45 54 20 55 53 45 52 20 49 4E |80:. GET USER IN|
00001FE0: 50 55 54 00 F7 27 AA 0A 8B 41 24 B2 C7 28 31 33 |PUT..'...A$..(13|
00001FF0: 34 29 A7 34 34 30 30 00 23 28 B4 0A 8B 41 24 B2 |4).4400.#(...A$.|
00002000: C7 28 31 38 39 29 A7 32 32 38 30 3A 8F 20 54 4F |.(189).2280:. TO|
00002010: 20 58 4D 4F 20 52 4F 55 54 49 4E 45 20 4F 4E 20 | XMO ROUTINE ON |
00002020: 43 3D 58 00 47 28 BE 0A 8B 41 24 B2 C7 28 31 38 |C=X.G(...A$..(18|
00002030: 30 29 A7 8D 38 35 36 30 3A 8F 20 48 41 4E 47 20 |0)..8560:. HANG |
00002040: 55 50 20 31 36 36 30 00 7F 28 C8 0A 91 C5 28 41 |UP 1660..(....(A|
00002050: 24 29 89 32 30 31 30 2C 32 32 38 30 2C 34 34 30 |$).2010,2280,440|
00002060: 30 2C 32 37 38 30 2C 36 35 33 30 2C 37 39 31 30 |0,2780,6530,7910|
00002070: 2C 37 35 33 30 2C 33 34 38 30 2C 33 30 31 30 00 |,7530,3480,3010.|
00002080: 89 28 D2 0A 89 32 35 37 30 00 C4 28 DC 0A 8D 32 |.(...2570..(...2|
00002090: 38 33 30 3A 8F 20 47 45 54 53 20 44 49 52 20 41 |830:. GETS DIR A|
000020A0: 53 20 53 55 42 52 4F 55 54 49 4E 45 20 46 52 4F |S SUBROUTINE FRO|
000020B0: 4D 20 47 4F 54 4F 20 32 20 4C 49 4E 45 53 20 41 |M GOTO 2 LINES A|
000020C0: 42 4F 56 45 00 CE 28 E6 0A 89 32 35 37 30 00 F2 |BOVE..(...2570..|
000020D0: 28 F0 0A 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |(... -----------|
000020E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000020F0: 2D 2D 00 0C 29 FA 0A 8F 20 20 20 20 20 20 44 49 |--..)... DI|
00002100: 53 4B 20 44 49 52 45 43 54 4F 52 59 00 30 29 04 |SK DIRECTORY.0).|
00002110: 0B 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00002120: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002130: 00 38 29 0E 0B 99 45 24 00 3F 29 18 0B A0 31 00 |.8)...E$.?)...1.|
00002140: 4F 29 22 0B 9F 31 2C 38 2C 30 2C 22 24 30 22 00 |O)"..1,8,0,"$0".|
00002150: 5D 29 2C 0B A1 23 31 2C 41 24 2C 41 24 00 6B 29 |]),..#1,A$,A$.k)|
00002160: 36 0B A1 23 31 2C 41 24 2C 41 24 00 7B 29 40 0B |6..#1,A$,A$.{)@.|
00002170: 8B 41 24 B2 22 22 A7 32 39 34 30 00 89 29 4A 0B |.A$."".2940..)J.|
00002180: A1 23 31 2C 41 24 2C 42 24 00 A3 29 54 0B 99 C6 |.#1,A$,B$..)T...|
00002190: 28 41 24 AA 43 24 29 AA C6 28 42 24 AA 43 24 29 |(A$.C$)..(B$.C$)|
000021A0: AC 44 3B 00 BD 29 5E 0B A1 23 31 2C 41 24 3A 8B |.D;..)^..#1,A$:.|
000021B0: 41 24 B2 22 22 A7 99 3A 89 32 38 37 30 00 C6 29 |A$.""..:.2870..)|
000021C0: 68 0B 99 41 24 3B 00 D0 29 72 0B 89 32 39 31 30 |h..A$;..)r..2910|
000021D0: 00 D7 29 7C 0B A0 31 00 F7 29 86 0B 99 4A 24 4A |..)|..1..)...J$J|
000021E0: 24 22 20 5B 20 C1 4E 59 20 CB 45 59 20 D2 45 54 |$" [ .NY .EY .ET|
000021F0: 55 52 4E 53 20 5D 22 00 01 2A 90 0B 8D 32 39 38 |URNS ]"..*...298|
00002200: 30 00 07 2A 9A 0B 8E 00 0F 2A A4 0B A1 41 24 00 |0..*.....*...A$.|
00002210: 1F 2A AE 0B 8B 41 24 B2 22 22 A7 32 39 38 30 00 |.*...A$."".2980.|
00002220: 25 2A B8 0B 8E 00 4B 2A C2 0B 8B 4D 33 A7 97 42 |%*....K*...M3..B|
00002230: 31 2C 28 C2 28 42 31 29 B0 48 49 29 3A 8F 20 48 |1,(.(B1).HI):. H|
00002240: 41 4E 47 20 55 50 20 31 36 36 30 00 91 2A CC 0B |ANG UP 1660..*..|
00002250: 99 45 24 46 24 46 24 22 20 20 5B 20 D4 59 50 45 |.E$F$F$" [ .YPE|
00002260: 20 27 D2 D5 CE 27 20 54 4F 20 52 45 53 54 41 52 | '...' TO RESTAR|
00002270: 54 21 20 5D 22 3A 99 22 20 20 5B 20 20 4F 52 20 |T! ]":." [ OR |
00002280: C3 CF CE D4 20 54 4F 20 D2 45 53 55 4D 45 20 20 |.... TO .ESUME |
00002290: 5D 00 97 2A D6 0B 90 00 A1 2A E0 0B 89 32 30 31 |]..*.....*...201|
000022A0: 30 00 AC 2A EA 0B A1 23 35 2C 41 24 00 BC 2A F4 |0..*...#5,A$..*.|
000022B0: 0B 8B 41 24 B2 22 22 A7 33 30 35 30 00 C2 2A FE |..A$."".3050..*.|
000022C0: 0B 8E 00 F2 2A 08 0C 99 45 24 45 52 24 47 24 22 |....*...E$ER$G$"|
000022D0: 5B 20 CF CE CC C9 CE C5 20 2D 20 C1 4E 59 20 CB |[ ...... - .NY .|
000022E0: 45 59 20 46 4F 52 20 D4 C5 D2 CD 49 4E 41 4C 20 |EY FOR ....INAL |
000022F0: 5D 22 00 0A 2B 12 0C 8B 4C 43 B2 31 A7 99 22 C6 |]"..+...LC.1..".|
00002300: 49 52 53 54 20 54 52 59 21 22 00 20 2B 1C 0C 8B |IRST TRY!". +...|
00002310: 4C 43 B1 31 A7 99 4C 43 3B 22 54 52 49 45 53 22 |LC.1..LC;"TRIES"|
00002320: 00 28 2B 26 0C 51 B2 30 00 4C 2B 30 0C 8F 20 2D |.(+&.Q.0.L+0.. -|
00002330: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002340: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 65 2B 3A |------------.e+:|
00002350: 0C 8F 20 20 20 20 20 20 53 4F 55 4E 44 20 52 4F |.. SOUND RO|
00002360: 55 54 49 4E 45 00 89 2B 44 0C 8F 20 2D 2D 2D 2D |UTINE..+D.. ----|
00002370: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002380: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 9B 2B 4E 0C 53 4F |---------..+N.SO|
00002390: B2 35 34 32 37 32 3A 43 4F B2 30 00 A9 2B 58 0C |.54272:CO.0..+X.|
000023A0: 97 53 4F AA 31 2C 32 35 30 00 B6 2B 62 0C 97 53 |.SO.1,250..+b..S|
000023B0: 4F AA 35 2C 31 30 00 C5 2B 6C 0C 97 53 4F AA 31 |O.5,10..+l..SO.1|
000023C0: 35 2C 32 30 30 00 D3 2B 76 0C 97 53 4F AA 32 34 |5,200..+v..SO.24|
000023D0: 2C 31 35 00 F8 2B 80 0C 81 43 4C B2 31 A4 39 36 |,15..+...CL.1.96|
000023E0: 3A 8F 20 43 48 41 4E 47 45 44 20 46 52 4F 4D 20 |:. CHANGED FROM |
000023F0: 31 32 20 54 4F 20 39 36 00 05 2C 8A 0C 97 53 4F |12 TO 96..,...SO|
00002400: AA 34 2C 32 31 00 0D 2C 94 0C 82 43 4C 00 1A 2C |.4,21..,...CL..,|
00002410: 9E 0C 97 53 4F AA 34 2C 32 30 00 36 2C A8 0C A1 |...SO.4,20.6,...|
00002420: 42 24 3A 43 4F B2 43 4F AA 31 3A 8B 43 4F B2 31 |B$:CO.CO.1:.CO.1|
00002430: 30 A7 33 32 36 30 00 46 2C B2 0C 8B 42 24 B2 22 |0.3260.F,...B$."|
00002440: 22 A7 33 31 36 30 00 53 2C BC 0C 8B 4C 43 A7 4C |".3160.S,...LC.L|
00002450: 43 B2 30 00 60 2C C6 0C 53 4F B2 35 34 32 37 32 |C.0.`,..SO.54272|
00002460: 00 87 2C D0 0C 81 43 4C B2 30 A4 31 34 34 3A 8F |..,...CL.0.144:.|
00002470: 20 43 48 41 4E 47 45 44 20 46 52 4F 4D 20 32 34 | CHANGED FROM 24|
00002480: 20 54 4F 20 31 34 34 00 94 2C DA 0C 97 53 4F AA | TO 144..,...SO.|
00002490: 43 4C 2C 30 00 9C 2C E4 0C 82 43 4C 00 B4 2C EE |CL,0..,...CL..,.|
000024A0: 0C 89 32 30 31 30 3A 8F 20 54 4F 20 54 45 52 4D |..2010:. TO TERM|
000024B0: 49 4E 41 4C 00 BC 2C F8 0C 99 45 24 00 EB 2C 02 |INAL..,...E$..,.|
000024C0: 0D 99 4A 24 22 20 20 C1 43 43 45 50 54 20 50 52 |..J$" .CCEPT PR|
000024D0: 45 53 45 4E 54 20 43 4F 4C 4F 52 20 53 45 54 54 |ESENT COLOR SETT|
000024E0: 49 4E 47 3F 20 28 59 2F 4E 29 22 00 F3 2C 0C 0D |ING? (Y/N)"..,..|
000024F0: 99 46 24 00 FD 2C 16 0D 8D 32 39 38 30 00 0F 2D |.F$..,...2980..-|
00002500: 20 0D 8B 41 24 B2 22 4E 22 A7 8D 37 33 39 30 00 | ..A$."N"..7390.|
00002510: 17 2D 2A 0D 99 45 24 00 42 2D 34 0D 99 3A 99 3A |.-*..E$.B-4..:.:|
00002520: 99 3A 99 22 20 20 20 20 20 D3 45 4C 45 43 54 20 |.:." .ELECT |
00002530: C4 45 53 49 52 45 44 20 C2 41 55 44 20 D2 41 54 |.ESIRED .AUD .AT|
00002540: 45 22 00 62 2D 3E 0D 99 3A 99 22 20 20 20 20 20 |E".b->..:." |
00002550: 20 20 20 20 3C 33 3E 20 20 46 4F 52 20 20 33 30 | <3> FOR 30|
00002560: 30 22 00 82 2D 48 0D 99 3A 99 22 20 20 20 20 20 |0"..-H..:." |
00002570: 20 20 20 20 3C 31 3E 20 20 46 4F 52 20 31 32 30 | <1> FOR 120|
00002580: 30 22 00 8C 2D 52 0D 8D 32 39 38 30 00 9C 2D 5C |0"..-R..2980..-\|
00002590: 0D 8B 41 24 B2 22 31 22 A7 35 38 30 00 AC 2D 66 |..A$."1".580..-f|
000025A0: 0D 8B 41 24 B2 22 33 22 A7 36 31 30 00 B6 2D 70 |..A$."3".610..-p|
000025B0: 0D 89 33 34 31 30 00 DA 2D 7A 0D 8F 20 2D 2D 2D |..3410..-z.. ---|
000025C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000025D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 FC 2D 84 0D 8F |----------..-...|
000025E0: 20 20 20 20 48 41 59 45 53 2F 53 49 47 4E 41 4C | HAYES/SIGNAL|
000025F0: 4D 41 4E 20 52 45 44 49 41 4C 45 52 00 20 2E 8E |MAN REDIALER. ..|
00002600: 0D 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00002610: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002620: 00 2B 2E 98 0D 99 C7 28 31 34 29 00 33 2E A2 0D |.+.....(14).3...|
00002630: 99 45 24 00 62 2E AC 0D 99 A6 35 29 22 C8 41 59 |.E$.b.....5)".AY|
00002640: 45 53 2F D3 49 47 4E 41 4C 4D 41 4E 20 C1 D5 D4 |ES/.IGNALMAN ...|
00002650: CF 2D C4 C9 C1 CC A0 CD CF C4 C5 22 4A 24 4A 24 |.-........."J$J$|
00002660: 4A 24 00 99 2E B6 0D 98 35 2C 22 C1 D4 DA 22 3A |J$......5,"...":|
00002670: 44 59 B2 31 3A 8D 34 32 39 30 3A 98 35 2C 22 C1 |DY.1:.4290:.5,".|
00002680: D4 D1 30 22 3A 44 59 B2 31 3A 8D 34 32 39 30 3A |..0":DY.1:.4290:|
00002690: 98 35 2C 22 C1 D4 D6 31 22 00 B2 2E C0 0D 44 59 |.5,"...1".....DY|
000026A0: B2 31 3A 8D 34 32 39 30 3A 98 35 2C 22 C1 D4 C5 |.1:.4290:.5,"...|
000026B0: 31 22 00 BC 2E CA 0D 44 44 B2 31 35 00 C5 2E D4 |1".....DD.15....|
000026C0: 0D 4C 43 B2 30 00 EB 2E DE 0D 85 22 C5 4E 54 45 |.LC.0......".NTE|
000026D0: 52 20 44 45 53 49 52 45 44 20 44 45 4C 41 59 20 |R DESIRED DELAY |
000026E0: 3C 43 52 3E 3D 31 35 22 3B 44 44 00 FC 2E E8 0D |<CR>=15";DD.....|
000026F0: 8B 44 44 B1 33 30 A7 44 44 B2 33 30 00 26 2F F2 |.DD.30.DD.30.&/.|
00002700: 0D 98 35 2C 22 C1 D4 22 3A 8F 20 54 52 59 20 54 |..5,"..":. TRY T|
00002710: 4F 20 47 45 54 20 4D 4F 44 45 4D 53 20 41 54 54 |O GET MODEMS ATT|
00002720: 45 4E 54 49 4F 4E 00 66 2F FC 0D A1 23 35 2C 49 |ENTION.f/...#5,I|
00002730: 54 24 3A 8B 49 54 24 B2 22 22 A7 44 59 B2 33 3A |T$:.IT$."".DY.3:|
00002740: 8D 34 32 39 30 3A 89 33 35 37 30 3A 8F 20 51 55 |.4290:.3570:. QU|
00002750: 49 54 20 20 2D 43 4B 20 54 4F 20 52 45 53 50 4F |IT -CK TO RESPO|
00002760: 4E 44 2D 20 48 46 00 A1 2F 06 0E 49 54 B2 28 C2 |ND- HF../..IT.(.|
00002770: 28 42 31 29 AF 31 36 29 3A 8F 20 54 45 53 54 20 |(B1).16):. TEST |
00002780: 43 41 52 52 49 45 52 20 42 49 54 20 2D 20 49 4E |CARRIER BIT - IN|
00002790: 54 45 52 46 41 43 45 20 49 53 20 3F 20 2D 20 48 |TERFACE IS ? - H|
000027A0: 46 00 A7 2F 10 0E 99 00 D2 2F 1A 0E 99 4A 24 22 |F../...../...J$"|
000027B0: 20 20 20 20 C5 4E 54 45 52 20 4E 55 4D 42 45 52 | .NTER NUMBER|
000027C0: 20 59 4F 55 20 57 49 53 48 20 54 4F 20 44 49 41 | YOU WISH TO DIA|
000027D0: 4C 22 00 00 30 24 0E 99 22 28 CE 55 4D 42 45 52 |L"..0$.."(.UMBER|
000027E0: 20 50 52 45 43 45 44 45 44 20 42 59 20 D0 20 49 | PRECEDED BY . I|
000027F0: 53 20 50 55 4C 53 45 20 44 49 41 4C 45 44 29 22 |S PULSE DIALED)"|
00002800: 00 25 30 2E 0E 99 46 24 AA 22 20 20 20 20 3C 46 |.%0...F$." <F|
00002810: 37 3E 20 C1 42 4F 52 54 53 20 C1 55 54 4F 44 49 |7> .BORTS .UTODI|
00002820: 41 4C 22 4A 24 00 3D 30 38 0E 85 4E 55 24 3A 41 |AL"J$.=08..NU$:A|
00002830: B2 C3 28 4E 55 24 29 3A 42 B2 41 AB 31 00 6C 30 |..(NU$):B.A.1.l0|
00002840: 42 0E 8B C8 28 4E 55 24 2C 31 29 B2 22 50 22 A7 |B...(NU$,1)."P".|
00002850: 4E 56 24 B2 4A 24 AA 22 C1 D4 C4 D0 22 AA C9 28 |NV$.J$."...."..(|
00002860: 4E 55 24 2C 42 29 3A 89 33 36 37 30 00 82 30 4C |NU$,B):.3670..0L|
00002870: 0E 4E 56 24 B2 4A 24 AA 22 C1 D4 C4 D4 22 AA 4E |.NV$.J$."....".N|
00002880: 55 24 00 8A 30 56 0E 99 45 24 00 AF 30 60 0E 99 |U$..0V..E$..0`..|
00002890: 22 C4 49 41 4C 49 4E 47 20 22 3B 4E 55 24 3B 22 |".IALING ";NU$;"|
000028A0: 20 3C 46 37 3E 20 D4 4F 20 C1 42 4F 52 54 22 00 | <F7> .O .BORT".|
000028B0: BC 30 6A 0E 81 49 B2 31 A4 32 35 35 00 C7 30 74 |.0j..I.1.255..0t|
000028C0: 0E A1 23 35 2C 41 24 00 CE 30 7E 0E 82 49 00 ED |..#5,A$..0~..I..|
000028D0: 30 88 0E 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |0... -----------|
000028E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 09 31 |-------------..1|
000028F0: 92 0E 8F 20 20 20 44 49 41 4C 20 54 48 45 20 53 |... DIAL THE S|
00002900: 4D 41 52 54 4D 4F 44 45 4D 00 28 31 9C 0E 8F 20 |MARTMODEM.(1... |
00002910: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002920: 2D 2D 2D 2D 2D 2D 2D 2D 00 33 31 A6 0E 98 35 2C |--------.31...5,|
00002930: 4E 56 24 00 3C 31 B0 0E 99 4E 56 24 00 5B 31 BA |NV$.<1...NV$.[1.|
00002940: 0E 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00002950: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 74 31 C4 0E |-----------.t1..|
00002960: 8F 20 20 20 20 20 43 48 45 43 4B 20 46 4F 52 20 |. CHECK FOR |
00002970: 45 43 48 4F 00 93 31 CE 0E 8F 20 2D 2D 2D 2D 2D |ECHO..1... -----|
00002980: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002990: 2D 2D 2D 00 9B 31 D8 0E 49 B2 30 00 A5 31 E2 0E |---..1..I.0..1..|
000029A0: 49 B2 49 AA 31 00 B0 31 EC 0E A1 23 35 2C 52 24 |I.I.1..1...#5,R$|
000029B0: 00 B8 31 F6 0E A1 41 24 00 CC 31 00 0F 8B 41 24 |..1...A$..1...A$|
000029C0: B2 C7 28 31 33 36 29 A7 32 30 31 30 00 DD 31 0A |..(136).2010..1.|
000029D0: 0F 8B 52 24 B2 22 D4 22 A7 33 39 38 30 00 ED 31 |..R$.".".3980..1|
000029E0: 14 0F 8B 49 B3 31 35 30 A7 33 38 31 30 00 FF 31 |...I.150.3810..1|
000029F0: 1E 0F 99 4A 24 AA 22 CE 4F 20 C5 43 48 4F 22 00 |...J$.".O .CHO".|
00002A00: 0B 32 28 0F 98 35 2C 22 41 54 22 00 13 32 32 0F |.2(..5,"AT"..22.|
00002A10: 49 B2 30 00 1D 32 3C 0F 49 B2 49 AA 31 00 28 32 |I.0..2<.I.I.1.(2|
00002A20: 46 0F A1 23 35 2C 52 24 00 39 32 50 0F 8B 52 24 |F..#5,R$.92P..R$|
00002A30: B2 22 CB 22 A7 33 36 37 30 00 49 32 5A 0F 8B 49 |.".".3670.I2Z..I|
00002A40: B3 31 30 30 A7 33 39 30 30 00 53 32 64 0F 89 33 |.100.3900.S2d..3|
00002A50: 36 37 30 00 72 32 6E 0F 8F 20 2D 2D 2D 2D 2D 2D |670.r2n.. ------|
00002A60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002A70: 2D 2D 00 8C 32 78 0F 8F 20 20 47 45 54 20 4D 4F |--..2x.. GET MO|
00002A80: 44 45 4D 20 52 45 53 50 4F 4E 53 45 00 AB 32 82 |DEM RESPONSE..2.|
00002A90: 0F 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00002AA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 B3 32 8C 0F |-----------..2..|
00002AB0: A1 41 24 00 C7 32 96 0F 8B 41 24 B2 C7 28 31 33 |.A$..2...A$..(13|
00002AC0: 36 29 A7 32 30 31 30 00 D0 32 A0 0F 53 43 B2 30 |6).2010..2..SC.0|
00002AD0: 00 DD 32 AA 0F 54 43 24 B2 C7 28 30 29 00 E9 32 |..2..TC$..(0)..2|
00002AE0: B4 0F 4C 43 B2 4C 43 AA 31 00 05 33 BE 0F 99 42 |..LC.LC.1..3...B|
00002AF0: 4C 24 22 C1 54 54 45 4D 50 54 20 CE 55 4D 42 45 |L$".TTEMPT .UMBE|
00002B00: 52 22 3B 4C 43 00 1F 33 C8 0F 41 B2 C2 28 42 33 |R";LC..3..A..(B3|
00002B10: 29 3A 8F 20 43 48 45 43 4B 20 43 4C 4F 43 4B 00 |):. CHECK CLOCK.|
00002B20: 2C 33 D2 0F 50 42 B2 C2 28 42 31 29 00 55 33 DC |,3..PB..(B1).U3.|
00002B30: 0F 8B 28 50 42 AF 31 36 29 B3 B1 49 54 A7 33 30 |..(PB.16)..IT.30|
00002B40: 38 30 3A 8F 20 49 53 20 43 41 52 52 49 45 52 3F |80:. IS CARRIER?|
00002B50: 20 2D 20 48 46 00 61 33 E6 0F 42 B2 C2 28 42 33 | - HF.a3..B..(B3|
00002B60: 29 00 70 33 F0 0F A1 41 24 3A A1 23 35 2C 52 24 |).p3...A$:.#5,R$|
00002B70: 00 84 33 FA 0F 8B 41 24 B2 C7 28 31 33 36 29 A7 |..3...A$..(136).|
00002B80: 32 30 31 30 00 AC 33 04 10 8B 41 B2 42 A7 34 30 |2010..3...A.B.40|
00002B90: 37 30 3A 8F 20 47 45 54 20 55 50 44 41 54 45 20 |70:. GET UPDATE |
00002BA0: 49 46 20 4E 4F 20 43 48 41 4E 47 45 00 B8 33 0E |IF NO CHANGE..3.|
00002BB0: 10 53 43 B2 53 43 AA 31 00 DA 33 18 10 99 42 4C |.SC.SC.1..3...BL|
00002BC0: 24 AA 46 24 AA 46 24 AA 22 C4 45 4C 41 59 20 C3 |$.F$.F$.".ELAY .|
00002BD0: 4F 55 4E 54 20 3D 22 3B 53 43 00 E7 33 22 10 50 |OUNT =";SC..3".P|
00002BE0: 42 B2 C2 28 42 31 29 00 10 34 2C 10 8B 28 50 42 |B..(B1)..4,..(PB|
00002BF0: AF 31 36 29 B3 B1 49 54 A7 33 30 38 30 3A 8F 20 |.16)..IT.3080:. |
00002C00: 49 53 20 43 41 52 52 49 45 52 3F 20 2D 20 48 46 |IS CARRIER? - HF|
00002C10: 00 20 34 36 10 8B 53 43 B3 44 44 A7 34 30 34 30 |. 46..SC.DD.4040|
00002C20: 00 2B 34 40 10 98 35 2C 22 41 22 00 33 34 4A 10 |.+4@..5,"A".34J.|
00002C30: 49 B2 30 00 40 34 54 10 54 43 24 B2 C7 28 30 29 |I.0.@4T.TC$..(0)|
00002C40: 00 4A 34 5E 10 49 B2 49 AA 31 00 8E 34 68 10 8F |.J4^.I.I.1..4h..|
00002C50: 20 45 56 45 4E 20 49 46 20 4E 4F 20 43 41 52 52 | EVEN IF NO CARR|
00002C60: 49 45 52 20 44 45 54 45 43 54 20 50 52 4F 56 49 |IER DETECT PROVI|
00002C70: 44 45 44 20 2D 20 43 48 45 43 4B 20 52 45 53 55 |DED - CHECK RESU|
00002C80: 4C 54 53 20 46 52 4F 4D 20 4D 4F 44 45 4D 00 99 |LTS FROM MODEM..|
00002C90: 34 72 10 A1 23 35 2C 52 24 00 B4 34 7C 10 8B 52 |4r..#5,R$..4|..R|
00002CA0: 24 B2 22 C3 22 A7 33 30 38 30 3A 8F 20 43 4F 4E |$.".".3080:. CON|
00002CB0: 4E 45 43 54 00 D7 34 86 10 8B 52 24 B2 22 CE 22 |NECT..4...R$."."|
00002CC0: A7 33 36 37 30 3A 8F 20 4E 4F 20 43 41 52 52 49 |.3670:. NO CARRI|
00002CD0: 45 52 20 2D 20 48 46 00 E7 34 90 10 8B 49 B3 32 |ER - HF..4...I.2|
00002CE0: 35 35 A7 34 31 39 30 00 F1 34 9A 10 89 33 36 37 |55.4190..4...367|
00002CF0: 30 00 16 35 A4 10 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |0..5... --------|
00002D00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002D10: 2D 2D 2D 2D 2D 2D 00 3B 35 AE 10 8F 20 57 48 4F |------.;5... WHO|
00002D20: 4C 45 20 53 45 43 4F 4E 44 53 20 44 45 4C 41 59 |LE SECONDS DELAY|
00002D30: 20 53 55 42 52 4F 55 54 49 4E 45 00 60 35 B8 10 | SUBROUTINE.`5..|
00002D40: 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |. --------------|
00002D50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002D60: 00 69 35 C2 10 53 43 B2 30 00 83 35 CC 10 41 B2 |.i5..SC.0..5..A.|
00002D70: C2 28 42 33 29 3A 8F 20 43 48 45 43 4B 20 43 4C |.(B3):. CHECK CL|
00002D80: 4F 43 4B 00 8F 35 D6 10 42 B2 C2 28 42 33 29 00 |OCK..5..B..(B3).|
00002D90: A4 35 E0 10 A1 42 24 3A 8B 42 24 B2 C7 28 31 33 |.5...B$:.B$..(13|
00002DA0: 36 29 A7 8E 00 CC 35 EA 10 8B 41 B2 42 A7 34 33 |6)....5...A.B.43|
00002DB0: 31 30 3A 8F 20 47 45 54 20 55 50 44 41 54 45 20 |10:. GET UPDATE |
00002DC0: 49 46 20 4E 4F 20 43 48 41 4E 47 45 00 D8 35 F4 |IF NO CHANGE..5.|
00002DD0: 10 53 43 B2 53 43 AA 31 00 E8 35 FE 10 8B 53 43 |.SC.SC.1..5...SC|
00002DE0: B3 44 59 A7 34 33 30 30 00 EE 35 08 11 8E 00 13 |.DY.4300..5.....|
00002DF0: 36 12 11 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |6... -----------|
00002E00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002E10: 2D 2D 2D 00 35 36 1C 11 8F 20 42 55 46 46 45 52 |---.56... BUFFER|
00002E20: 2F 50 52 49 4E 54 45 52 20 43 4F 4E 54 52 4F 4C |/PRINTER CONTROL|
00002E30: 20 4D 45 4E 55 00 5A 36 26 11 8F 20 2D 2D 2D 2D | MENU.Z6&.. ----|
00002E40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002E50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 67 36 30 11 99 |----------.g60..|
00002E60: 45 24 4C 49 24 4A 24 00 8B 36 3A 11 99 22 20 20 |E$LI$J$..6:.." |
00002E70: 20 20 20 20 20 20 20 C2 D5 C6 C6 C5 D2 A0 C3 CF | .........|
00002E80: CE D4 D2 CF CC A0 CD C5 CE D5 22 00 BC 36 44 11 |.........."..6D.|
00002E90: 42 49 B2 28 42 50 AB 42 45 29 AD 32 35 35 3A 43 |BI.(BP.BE).255:C|
00002EA0: 49 B2 B5 28 42 49 29 3A 44 49 B2 42 49 AB 43 49 |I..(BI):DI.BI.CI|
00002EB0: 3A 8B 44 49 A7 43 49 B2 43 49 AA 31 00 D2 36 4E |:.DI.CI.CI.1..6N|
00002EC0: 11 42 43 B2 42 42 AB 42 50 3A 45 33 B2 42 50 AB |.BC.BB.BP:E3.BP.|
00002ED0: 42 45 00 FD 36 58 11 99 42 43 3B 22 C2 59 54 45 |BE..6X..BC;".YTE|
00002EE0: 53 20 C1 56 41 49 4C 41 42 4C 45 2C 22 3B 45 33 |S .VAILABLE,";E3|
00002EF0: 3B 22 C2 59 54 45 53 20 D5 53 45 44 22 00 1B 37 |;".YTES .SED"..7|
00002F00: 62 11 99 53 51 24 3B 43 49 3B 22 C3 C2 CD 20 C4 |b..SQ$;CI;"... .|
00002F10: 49 53 4B 20 C2 4C 4F 43 4B 53 22 00 24 37 6C 11 |ISK .LOCKS".$7l.|
00002F20: 99 4C 49 24 00 3C 37 76 11 99 53 52 24 22 3C 31 |.LI$.<7v..SR$"<1|
00002F30: 3E 20 20 D4 C5 D2 CD 49 4E 41 4C 22 00 67 37 80 |> ....INAL".g7.|
00002F40: 11 99 53 52 24 22 3C 32 3E 20 20 D3 41 56 45 20 |..SR$"<2> .AVE |
00002F50: C2 55 46 46 45 52 20 54 4F 20 C4 49 53 4B 2F D0 |.UFFER TO .ISK/.|
00002F60: 52 49 4E 54 45 52 22 00 8C 37 8A 11 99 53 52 24 |RINTER"..7...SR$|
00002F70: 22 3C 33 3E 20 20 CC 4F 41 44 20 C2 55 46 46 45 |"<3> .OAD .UFFE|
00002F80: 52 20 46 52 4F 4D 20 C4 49 53 4B 22 00 B0 37 94 |R FROM .ISK"..7.|
00002F90: 11 99 53 52 24 22 3C 34 3E 20 20 D3 45 4E 44 20 |..SR$"<4> .END |
00002FA0: C2 55 46 46 45 52 20 54 4F 20 CD 4F 44 45 4D 22 |.UFFER TO .ODEM"|
00002FB0: 00 DC 37 9E 11 99 53 52 24 22 3C 35 3E 20 20 D3 |..7...SR$"<5> .|
00002FC0: 45 4E 44 20 C4 49 53 4B 20 D3 C5 D1 2E 20 C6 49 |END .ISK .... .I|
00002FD0: 4C 45 20 54 4F 20 CD 4F 44 45 4D 22 00 04 38 A8 |LE TO .ODEM"..8.|
00002FE0: 11 99 53 52 24 22 3C 36 3E 20 20 C4 49 53 50 4C |..SR$"<6> .ISPL|
00002FF0: 41 59 20 C2 55 46 46 45 52 20 54 4F 20 D3 43 52 |AY .UFFER TO .CR|
00003000: 45 45 4E 22 00 2C 38 B2 11 99 53 52 24 22 3C 37 |EEN".,8...SR$"<7|
00003010: 3E 20 20 D3 C5 D1 2E 20 C6 49 4C 45 20 D2 45 41 |> .... .ILE .EA|
00003020: 44 45 52 2F D0 52 49 4E 54 45 52 22 00 4A 38 BC |DER/.RINTER".J8.|
00003030: 11 99 53 52 24 22 3C 38 3E 20 20 C4 49 53 4B 20 |..SR$"<8> .ISK |
00003040: C4 49 52 45 43 54 4F 52 59 22 00 66 38 C6 11 99 |.IRECTORY".f8...|
00003050: 53 52 24 22 3C 39 3E 20 20 D1 55 49 54 20 D0 52 |SR$"<9> .UIT .R|
00003060: 4F 47 52 41 4D 22 00 76 38 D0 11 99 4C 49 24 3B |OGRAM".v8...LI$;|
00003070: 3A 8D 32 39 38 30 00 8A 38 DA 11 8B 41 24 B2 C7 |:.2980..8...A$..|
00003080: 28 31 33 33 29 A7 32 35 37 30 00 C2 38 E4 11 91 |(133).2570..8...|
00003090: C5 28 41 24 29 89 34 36 30 30 2C 34 37 37 30 2C |.(A$).4600,4770,|
000030A0: 35 34 36 30 2C 35 37 32 30 2C 35 38 36 30 2C 35 |5460,5720,5860,5|
000030B0: 33 31 30 2C 36 31 30 30 2C 34 36 31 30 2C 33 30 |310,6100,4610,30|
000030C0: 31 30 00 CC 38 EE 11 89 34 34 30 30 00 D6 38 F8 |10..8...4400..8.|
000030D0: 11 89 32 30 31 30 00 E0 38 02 12 8D 32 38 33 30 |..2010..8...2830|
000030E0: 00 FF 38 0C 12 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |..8... ---------|
000030F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00003100: 1B 39 16 12 8F 20 20 20 4F 50 45 4E 20 42 55 46 |.9... OPEN BUF|
00003110: 46 45 52 20 52 4F 55 54 49 4E 45 00 3A 39 20 12 |FER ROUTINE.:9 .|
00003120: 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |. --------------|
00003130: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 81 39 2A 12 42 |----------..9*.B|
00003140: 43 B2 42 42 AB 42 50 3A 42 44 B2 AB 31 3A 99 4A |C.BB.BP:BD..1:.J|
00003150: 24 4A 24 22 5B 20 C2 55 46 46 45 52 20 4F 50 45 |$J$"[ .UFFER OPE|
00003160: 4E 20 5D 20 2D 22 3B 42 43 3B 22 C2 59 54 45 53 |N ] -";BC;".YTES|
00003170: 20 C1 56 41 49 4C 2E 22 3A 8F 20 4A 52 20 46 49 | .VAIL.":. JR FI|
00003180: 58 00 8A 39 34 12 89 31 33 30 00 A9 39 3E 12 8F |X..94..130..9>..|
00003190: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
000031A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 C5 39 48 12 8F 20 |---------..9H.. |
000031B0: 20 43 4C 4F 53 45 20 42 55 46 46 45 52 20 52 4F | CLOSE BUFFER RO|
000031C0: 55 54 49 4E 45 00 E4 39 52 12 8F 20 2D 2D 2D 2D |UTINE..9R.. ----|
000031D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000031E0: 2D 2D 2D 2D 00 ED 39 5C 12 42 44 B2 30 00 FD 39 |----..9\.BD.0..9|
000031F0: 66 12 81 58 B2 31 A4 35 30 30 3A 82 58 00 1A 3A |f..X.1.500:.X..:|
00003200: 70 12 99 4A 24 4A 24 22 5B 20 C2 55 46 46 45 52 |p..J$J$"[ .UFFER|
00003210: 20 43 4C 4F 53 45 44 20 5D 22 00 23 3A 7A 12 89 | CLOSED ]".#:z..|
00003220: 31 33 30 00 42 3A 84 12 8F 20 2D 2D 2D 2D 2D 2D |130.B:... ------|
00003230: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003240: 2D 2D 00 64 3A 8E 12 8F 20 53 41 56 45 20 42 55 |--.d:... SAVE BU|
00003250: 46 46 45 52 20 54 4F 20 44 49 53 4B 2F 50 52 49 |FFER TO DISK/PRI|
00003260: 4E 54 45 52 00 83 3A 98 12 8F 20 2D 2D 2D 2D 2D |NTER..:... -----|
00003270: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003280: 2D 2D 2D 00 8B 3A A2 12 99 45 24 00 B8 3A AC 12 |---..:...E$..:..|
00003290: 99 22 20 20 D3 41 56 45 20 54 4F 20 2D 20 3C 31 |." .AVE TO - <1|
000032A0: 3E 20 C4 49 53 4B 20 2D 4F 52 2D 20 3C 32 3E 20 |> .ISK -OR- <2> |
000032B0: D0 52 49 4E 54 45 52 22 00 E3 3A B6 12 99 53 4F |.RINTER"..:...SO|
000032C0: 24 22 3C 46 37 3E 20 41 42 4F 52 54 53 20 54 4F |$"<F7> ABORTS TO|
000032D0: 20 C2 55 46 46 45 52 20 CD 45 4E 55 22 3A 8D 32 | .UFFER .ENU":.2|
000032E0: 39 38 30 00 F4 3A C0 12 8B 41 24 B2 22 31 22 A7 |980..:...A$."1".|
000032F0: 34 38 37 30 00 05 3B CA 12 8B 41 24 B2 22 32 22 |4870..;...A$."2"|
00003300: A7 35 31 31 30 00 19 3B D4 12 8B 41 24 B2 C7 28 |.5110..;...A$..(|
00003310: 31 33 36 29 A7 34 34 30 30 00 23 3B DE 12 89 34 |136).4400.#;...4|
00003320: 37 38 30 00 42 3B E8 12 8F 20 2D 2D 2D 2D 2D 2D |780.B;... ------|
00003330: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003340: 2D 2D 00 5C 3B F2 12 8F 20 53 41 56 45 20 42 55 |--.\;... SAVE BU|
00003350: 46 46 45 52 20 54 4F 20 44 49 53 4B 00 7B 3B FC |FFER TO DISK.{;.|
00003360: 12 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00003370: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 87 3B 06 13 |-----------..;..|
00003380: 52 57 24 B2 22 57 22 00 8F 3B 10 13 99 45 24 00 |RW$."W"..;...E$.|
00003390: AF 3B 1A 13 99 A6 38 29 22 D3 C1 D6 C5 A0 C2 D5 |.;....8)".......|
000033A0: C6 C6 C5 D2 20 D4 CF A0 C4 C9 D3 CB 22 4A 24 00 |.... ......."J$.|
000033B0: B8 3B 24 13 4B 53 B2 30 00 D1 3B 2E 13 99 4A 24 |.;$.KS.0..;...J$|
000033C0: 3A 85 22 20 C6 49 4C 45 4E 41 4D 45 22 3B 46 49 |:." .ILENAME";FI|
000033D0: 24 00 0E 3C 38 13 A0 31 35 3A 9F 31 35 2C 38 2C |$..<8..15:.15,8,|
000033E0: 31 35 2C 22 49 30 3A 22 3A A0 31 35 3A 9F 31 35 |15,"I0:":.15:.15|
000033F0: 2C 38 2C 31 35 3A 8F 20 49 4E 49 54 20 54 48 45 |,8,15:. INIT THE|
00003400: 20 46 4C 49 50 50 49 4E 20 44 52 49 56 45 00 2F | FLIPPIN DRIVE./|
00003410: 3C 42 13 99 3A 99 22 20 20 D3 41 56 49 4E 47 22 |<B..:." .AVING"|
00003420: 3B 42 50 AB 42 45 3B 22 20 C2 59 54 45 53 22 00 |;BP.BE;" .YTES".|
00003430: 60 3C 4C 13 42 49 B2 28 42 50 AB 42 45 29 AD 32 |`<L.BI.(BP.BE).2|
00003440: 35 35 3A 43 49 B2 B5 28 42 49 29 3A 44 49 B2 42 |55:CI..(BI):DI.B|
00003450: 49 AB 43 49 3A 8B 44 49 A7 43 49 B2 43 49 AA 31 |I.CI:.DI.CI.CI.1|
00003460: 00 80 3C 56 13 99 4A 24 22 20 22 3B 43 49 3B 22 |..<V..J$" ";CI;"|
00003470: C3 C2 CD 20 C4 49 53 4B 20 C2 4C 4F 43 4B 53 22 |... .ISK .LOCKS"|
00003480: 00 C7 3C 60 13 48 31 B2 B5 28 42 50 AD 32 35 36 |..<`.H1..(BP.256|
00003490: 29 3A 47 31 B2 B5 28 42 45 AD 32 35 36 29 3A 8F |):G1..(BE.256):.|
000034A0: 20 48 49 20 42 59 54 45 53 20 46 4F 52 20 45 4E | HI BYTES FOR EN|
000034B0: 44 20 50 4F 49 4E 54 45 52 20 41 4E 44 20 42 45 |D POINTER AND BE|
000034C0: 47 49 4E 4E 49 4E 47 00 10 3D 6A 13 48 32 B2 42 |GINNING..=j.H2.B|
000034D0: 50 AB 28 32 35 36 AC 48 31 29 3A 47 32 B2 42 45 |P.(256.H1):G2.BE|
000034E0: AB 28 32 35 36 AC 47 31 29 3A 8F 20 4C 4F 42 59 |.(256.G1):. LOBY|
000034F0: 54 45 53 20 46 4F 52 20 45 4E 44 50 4F 49 4E 54 |TES FOR ENDPOINT|
00003500: 45 52 20 41 4E 44 20 42 45 47 49 4E 4E 49 4E 47 |ER AND BEGINNING|
00003510: 00 24 3D 74 13 9F 38 2C 38 2C 38 2C 46 49 24 AA |.$=t..8,8,8,FI$.|
00003520: 22 2C 53 22 00 5D 3D 7E 13 97 20 32 35 31 2C 47 |",S".]=~.. 251,G|
00003530: 32 3A 97 20 32 35 32 2C 47 31 3A 8F 20 53 54 55 |2:. 252,G1:. STU|
00003540: 46 46 20 42 55 46 20 53 54 41 52 54 20 49 4E 20 |FF BUF START IN |
00003550: 5A 45 52 4F 20 50 41 47 45 20 24 46 42 00 9A 3D |ZERO PAGE $FB..=|
00003560: 88 13 97 37 38 30 2C 32 35 31 3A 97 37 38 31 2C |...780,251:.781,|
00003570: 48 32 3A 97 37 38 32 2C 48 31 3A 8F 20 53 54 55 |H2:.782,H1:. STU|
00003580: 46 46 20 42 55 46 46 20 45 4E 44 20 50 4F 49 4E |FF BUFF END POIN|
00003590: 54 52 20 58 2B 59 20 52 45 47 00 BC 3D 92 13 9E |TR X+Y REG..=...|
000035A0: 20 36 35 34 39 36 3A 8F 20 4B 45 52 4E 41 4C 20 | 65496:. KERNAL |
000035B0: 42 55 46 46 45 52 20 53 41 56 45 21 00 D2 3D 9C |BUFFER SAVE!..=.|
000035C0: 13 A0 38 3A A0 31 35 3A 4B 53 B2 31 3A 8D 37 33 |..8:.15:KS.1:.73|
000035D0: 33 30 00 07 3E A6 13 99 46 24 AA 46 24 22 20 20 |30..>...F$.F$" |
000035E0: D3 C1 D6 C5 20 C3 CF CD D0 CC C5 D4 C5 20 2D 20 |.... ........ - |
000035F0: DA 45 52 4F 20 54 48 45 20 C2 55 46 46 45 52 3F |.ERO THE .UFFER?|
00003600: 20 28 D9 2F CE 29 22 00 11 3E B0 13 8D 32 39 38 | (./.)"..>...298|
00003610: 30 00 23 3E BA 13 8B 41 24 B2 22 59 22 A7 42 50 |0.#>...A$."Y".BP|
00003620: B2 42 45 00 35 3E C4 13 8B 41 24 B2 22 D9 22 A7 |.BE.5>...A$.".".|
00003630: 42 50 B2 42 45 00 3F 3E CE 13 89 34 34 30 30 00 |BP.BE.?>...4400.|
00003640: 5E 3E D8 13 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |^>... ----------|
00003650: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 7B |--------------.{|
00003660: 3E E2 13 8F 20 53 41 56 45 20 42 55 46 46 45 52 |>... SAVE BUFFER|
00003670: 20 54 4F 20 50 52 49 4E 54 45 52 00 9A 3E EC 13 | TO PRINTER..>..|
00003680: 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |. --------------|
00003690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 A2 3E F6 13 99 |----------..>...|
000036A0: 45 24 00 BF 3E 00 14 99 A6 31 32 29 22 D0 D2 C9 |E$..>....12)"...|
000036B0: CE D4 A0 C2 D5 C6 C6 C5 D2 20 CD CF C4 C5 22 00 |......... ....".|
000036C0: EC 3E 0A 14 99 22 20 20 20 3C D3 50 41 43 45 42 |.>..." <.PACEB|
000036D0: 41 52 3E 20 54 4F 20 D3 54 41 52 54 2F D0 41 55 |AR> TO .TART/.AU|
000036E0: 53 45 20 50 52 49 4E 54 49 4E 47 22 00 0C 3F 14 |SE PRINTING"..?.|
000036F0: 14 99 A6 31 34 29 22 3C 46 37 3E 20 C1 42 4F 52 |...14)"<F7> .BOR|
00003700: 54 53 21 22 4A 24 3A 8D 32 39 38 30 00 2B 3F 1E |TS!"J$:.2980.+?.|
00003710: 14 9F 34 2C 50 44 2C 50 53 3A 4C B2 31 3A 51 46 |..4,PD,PS:L.1:QF|
00003720: B2 30 3A 81 52 4F B2 30 A4 38 30 00 39 3F 28 14 |.0:.RO.0.80.9?(.|
00003730: 81 42 47 B2 42 45 A4 42 50 00 66 3F 32 14 41 24 |.BG.BE.BP.f?2.A$|
00003740: B2 C7 28 C2 28 42 47 AA 52 4F 29 29 3A 8B 41 24 |..(.(BG.RO)):.A$|
00003750: B2 C7 28 31 30 29 A7 41 24 B2 C7 28 32 39 29 AA |..(10).A$..(29).|
00003760: C7 28 31 35 37 29 00 8C 3F 3C 14 98 34 2C C7 28 |.(157)..?<..4,.(|
00003770: 31 37 29 41 24 3B 3A 8B 41 24 B2 C7 28 31 33 29 |17)A$;:.A$..(13)|
00003780: A7 4C B2 4C AA 31 3A 8D 35 32 36 30 00 95 3F 46 |.L.L.1:.5260..?F|
00003790: 14 99 41 24 3B 00 BC 3F 50 14 A1 41 24 3A 8B 41 |..A$;..?P..A$:.A|
000037A0: 24 B2 C7 28 31 33 36 29 A7 42 47 B2 42 50 3A A0 |$..(136).BG.BP:.|
000037B0: 34 3A 42 44 B2 30 3A 89 34 34 30 30 00 D0 3F 5A |4:BD.0:.4400..?Z|
000037C0: 14 8B 41 24 B2 C7 28 33 32 29 A7 8D 32 39 38 30 |..A$..(32)..2980|
000037D0: 00 D8 3F 64 14 82 42 47 00 0C 40 6E 14 42 44 B2 |..?d..BG..@n.BD.|
000037E0: 30 3A 8F 20 43 4C 4F 53 45 20 42 55 46 46 45 52 |0:. CLOSE BUFFER|
000037F0: 20 54 4F 20 41 56 4F 49 44 20 47 41 52 42 41 47 | TO AVOID GARBAG|
00003800: 45 20 41 54 20 54 48 45 20 45 4E 44 00 13 40 78 |E AT THE END..@x|
00003810: 14 A0 34 00 1D 40 82 14 89 34 34 30 30 00 38 40 |..4..@...4400.8@|
00003820: 8C 14 8B 4C B2 36 30 A7 4C B2 31 3A 81 58 B2 31 |...L.60.L.1:.X.1|
00003830: A4 37 3A 98 34 3A 82 58 00 3E 40 96 14 8E 00 5D |.7:.4:.X.>@....]|
00003840: 40 A0 14 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |@... -----------|
00003850: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 7C 40 |-------------.|@|
00003860: AA 14 8F 20 44 49 53 50 4C 41 59 20 42 55 46 46 |... DISPLAY BUFF|
00003870: 45 52 20 54 4F 20 53 43 52 45 45 4E 00 9B 40 B4 |ER TO SCREEN..@.|
00003880: 14 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00003890: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 A3 40 BE 14 |-----------..@..|
000038A0: 99 45 24 00 BD 40 C8 14 99 A6 31 32 29 22 C2 55 |.E$..@....12)".U|
000038B0: 46 46 45 52 20 C4 49 53 50 4C 41 59 22 00 E9 40 |FFER .ISPLAY"..@|
000038C0: D2 14 99 22 20 20 20 3C D3 50 41 43 45 42 41 52 |..." <.PACEBAR|
000038D0: 3E 20 54 4F 20 D3 54 41 52 54 2F D0 41 55 53 45 |> TO .TART/.AUSE|
000038E0: 20 44 49 53 50 4C 41 59 22 00 09 41 DC 14 99 A6 | DISPLAY"..A....|
000038F0: 31 33 29 22 3C 46 37 3E 20 C1 42 4F 52 54 53 21 |13)"<F7> .BORTS!|
00003900: 22 4A 24 3A 8D 32 39 38 30 00 17 41 E6 14 81 42 |"J$:.2980..A...B|
00003910: 47 B2 42 45 A4 42 50 00 26 41 F0 14 99 C7 28 C2 |G.BE.BP.&A....(.|
00003920: 28 42 47 29 29 3B 00 4A 41 FA 14 A1 41 24 3A 8B |(BG));.JA...A$:.|
00003930: 41 24 B2 C7 28 31 33 36 29 A7 42 47 B2 42 50 3A |A$..(136).BG.BP:|
00003940: 42 44 B2 30 3A 89 34 34 30 30 00 5F 41 04 15 8B |BD.0:.4400._A...|
00003950: 41 24 B2 C7 28 33 32 29 A7 8D 20 32 39 38 30 00 |A$..(32).. 2980.|
00003960: 67 41 0E 15 82 42 47 00 9B 41 18 15 42 44 B2 30 |gA...BG..A..BD.0|
00003970: 3A 8F 20 43 4C 4F 53 45 20 42 55 46 46 45 52 20 |:. CLOSE BUFFER |
00003980: 54 4F 20 41 56 4F 49 44 20 47 41 52 42 41 47 45 |TO AVOID GARBAGE|
00003990: 20 41 54 20 54 48 45 20 45 4E 44 00 D6 41 22 15 | AT THE END..A".|
000039A0: 99 4A 24 AA 46 24 46 24 22 5B 20 C5 4E 44 20 4F |.J$.F$F$"[ .ND O|
000039B0: 46 20 C2 55 46 46 45 52 20 D2 45 41 44 20 2D 20 |F .UFFER .EAD - |
000039C0: D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 5D 22 |.RESS ANY KEY ]"|
000039D0: 3A 8D 32 39 38 30 00 E0 41 2C 15 89 34 34 30 30 |:.2980..A,..4400|
000039E0: 00 FF 41 36 15 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |..A6.. ---------|
000039F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00003A00: 1B 42 40 15 8F 20 4C 4F 41 44 20 42 55 46 46 45 |.B@.. LOAD BUFFE|
00003A10: 52 20 46 52 4F 4D 20 44 49 53 4B 00 3A 42 4A 15 |R FROM DISK.:BJ.|
00003A20: 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |. --------------|
00003A30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 52 42 54 15 42 |----------.RBT.B|
00003A40: 50 B2 42 45 3A 8F 20 5A 45 52 4F 20 42 55 46 46 |P.BE:. ZERO BUFF|
00003A50: 45 52 00 5E 42 5E 15 52 57 24 B2 22 52 22 00 66 |ER.^B^.RW$."R".f|
00003A60: 42 68 15 99 45 24 00 90 42 72 15 99 22 20 20 20 |Bh..E$..Br.." |
00003A70: CC CF C1 C4 20 C6 C9 CC C5 A0 D4 CF 20 C2 D5 C6 |.... ....... ...|
00003A80: C6 C5 D2 A0 C6 D2 CF CD A0 C4 C9 D3 CB 22 4A 24 |............."J$|
00003A90: 00 B9 42 7C 15 8D 37 32 38 30 3A 8F 20 47 45 54 |..B|..7280:. GET|
00003AA0: 20 46 49 4C 45 4E 41 4D 45 20 26 20 45 52 52 4F | FILENAME & ERRO|
00003AB0: 52 20 52 4F 55 54 49 4E 45 00 DF 42 86 15 8B 41 |R ROUTINE..B...A|
00003AC0: 24 B2 22 41 22 A7 99 22 5B 20 D4 45 52 4D 49 4E |$."A".."[ .ERMIN|
00003AD0: 41 4C 20 CD 4F 44 45 20 5D 22 3A 89 31 33 30 00 |AL .ODE ]":.130.|
00003AE0: ED 42 90 15 8B 41 B2 30 A7 35 35 36 30 00 F4 42 |.B...A.0.5560..B|
00003AF0: 9A 15 A0 38 00 FE 42 A4 15 8D 37 34 38 30 00 08 |...8..B...7480..|
00003B00: 43 AE 15 89 34 34 30 30 00 29 43 B8 15 99 46 24 |C...4400.)C...F$|
00003B10: 22 20 20 20 20 20 20 20 20 20 20 20 3C 46 37 3E |" <F7>|
00003B20: 20 C1 42 4F 52 54 53 21 22 00 3F 43 C2 15 A1 23 | .BORTS!".?C...#|
00003B30: 38 2C 41 24 3A 41 24 B2 41 24 AA C7 28 30 29 00 |8,A$:A$.A$..(0).|
00003B40: 47 43 CC 15 A1 42 24 00 5F 43 D6 15 8B 42 24 B2 |GC...B$._C...B$.|
00003B50: C7 28 31 33 36 29 A7 A0 38 3A 89 34 34 30 30 00 |.(136)..8:.4400.|
00003B60: 6C 43 E0 15 45 B2 C2 28 31 34 34 29 00 79 43 EA |lC..E..(144).yC.|
00003B70: 15 8B 45 A7 20 35 36 37 30 00 87 43 F4 15 97 42 |..E. 5670..C...B|
00003B80: 50 2C C6 28 41 24 29 00 93 43 FE 15 42 50 B2 42 |P,.(A$)..C..BP.B|
00003B90: 50 AA 31 00 A4 43 08 16 8B 42 50 B3 42 42 A7 20 |P.1..C...BP.BB. |
00003BA0: 35 35 37 30 00 D5 43 12 16 99 46 24 46 24 22 20 |5570..C...F$F$" |
00003BB0: 20 5B 20 C2 55 46 46 45 52 20 C6 55 4C 4C 20 5D | [ .UFFER .ULL ]|
00003BC0: 22 3A 42 44 B2 30 3A A0 38 3A 8D 37 34 38 30 3A |":BD.0:.8:.7480:|
00003BD0: 89 34 34 30 30 00 DE 43 1C 16 42 44 B2 30 00 E5 |.4400..C..BD.0..|
00003BE0: 43 26 16 A0 38 00 EF 43 30 16 89 34 34 30 30 00 |C&..8..C0..4400.|
00003BF0: 14 44 3A 16 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.D:.. ----------|
00003C00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003C10: 2D 2D 2D 2D 00 38 44 44 16 8F 20 20 20 53 45 4E |----.8DD.. SEN|
00003C20: 44 20 42 55 46 46 45 52 20 44 49 52 45 43 54 20 |D BUFFER DIRECT |
00003C30: 54 4F 20 4D 4F 44 45 4D 00 5D 44 4E 16 8F 20 2D |TO MODEM.]DN.. -|
00003C40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003C50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 7F 44 |-------------..D|
00003C60: 58 16 99 45 24 46 24 22 D3 45 4E 44 20 C2 55 46 |X..E$F$".END .UF|
00003C70: 46 45 52 20 54 4F 20 CD 4F 44 45 4D 22 4A 24 00 |FER TO .ODEM"J$.|
00003C80: A8 44 62 16 99 22 C2 59 54 45 53 3A 22 3B 42 50 |.Db..".YTES:";BP|
00003C90: AB 42 45 3B 22 20 3C 46 37 3E 20 C1 42 4F 52 54 |.BE;" <F7> .BORT|
00003CA0: 53 21 22 4A 24 AA 46 24 00 B6 44 6C 16 81 42 47 |S!"J$.F$..Dl..BG|
00003CB0: B2 42 45 A4 42 50 00 C6 44 76 16 41 24 B2 C7 28 |.BE.BP..Dv.A$..(|
00003CC0: C2 28 42 47 29 29 00 DB 44 80 16 98 35 2C C7 28 |.(BG))..D...5,.(|
00003CD0: 54 25 28 C6 28 41 24 29 29 29 3B 00 E4 44 8A 16 |T%(.(A$)));..D..|
00003CE0: 99 41 24 3B 00 08 45 94 16 A1 42 24 3A 8B 42 24 |.A$;..E...B$:.B$|
00003CF0: B2 C7 28 31 33 36 29 A7 42 47 B2 42 50 3A 42 44 |..(136).BG.BP:BD|
00003D00: B2 30 3A 89 34 34 30 30 00 23 45 9E 16 A1 23 35 |.0:.4400.#E...#5|
00003D10: 2C 52 24 3A 8B 52 24 B2 C7 28 58 46 29 A7 8D 38 |,R$:.R$..(XF)..8|
00003D20: 34 37 30 00 2B 45 A8 16 82 42 47 00 43 45 B2 16 |470.+E...BG.CE..|
00003D30: 42 44 B2 30 3A 8F 20 43 4C 4F 53 45 20 42 55 46 |BD.0:. CLOSE BUF|
00003D40: 46 45 52 00 4D 45 BC 16 89 33 30 38 30 00 71 45 |FER.ME...3080.qE|
00003D50: C6 16 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |... ------------|
00003D60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003D70: 2D 00 95 45 D0 16 8F 20 53 45 4E 44 20 53 45 51 |-..E... SEND SEQ|
00003D80: 20 46 49 4C 45 20 44 49 52 45 43 54 20 54 4F 20 | FILE DIRECT TO |
00003D90: 4D 4F 44 45 4D 00 B9 45 DA 16 8F 20 2D 2D 2D 2D |MODEM..E... ----|
00003DA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003DB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 C5 45 E4 16 52 57 |---------..E..RW|
00003DC0: 24 B2 22 52 22 00 FA 45 EE 16 99 45 24 46 24 22 |$."R"..E...E$F$"|
00003DD0: D3 45 4E 44 20 C4 49 53 4B 20 D3 C5 D1 20 C6 49 |.END .ISK ... .I|
00003DE0: 4C 45 20 54 4F 20 CD 4F 44 45 4D 20 3C 46 37 3E |LE TO .ODEM <F7>|
00003DF0: 20 C1 42 4F 52 54 53 22 4A 24 00 11 46 F8 16 8D | .BORTS"J$..F...|
00003E00: 37 32 38 30 3A 8B 41 24 B2 22 41 22 A7 32 30 31 |7280:.A$."A".201|
00003E10: 30 00 27 46 02 17 8B 41 A7 A0 38 3A 8D 37 34 38 |0.'F...A..8:.748|
00003E20: 30 3A 89 34 34 30 30 00 32 46 0C 17 A1 23 38 2C |0:.4400.2F...#8,|
00003E30: 41 24 00 3F 46 16 17 45 B2 C2 28 31 34 34 29 00 |A$.?F..E..(144).|
00003E40: 4F 46 20 17 8B 45 A7 A0 38 3A 89 33 30 38 30 00 |OF ..E..8:.3080.|
00003E50: 5F 46 2A 17 8B 41 24 B2 22 22 A7 35 39 30 30 00 |_F*..A$."".5900.|
00003E60: 74 46 34 17 98 35 2C C7 28 54 25 28 C6 28 41 24 |tF4..5,.(T%(.(A$|
00003E70: 29 29 29 3B 00 8B 46 3E 17 A1 23 35 2C 52 24 3A |)));..F>..#5,R$:|
00003E80: 8B 52 24 B2 22 22 A7 35 39 38 30 00 9F 46 48 17 |.R$."".5980..FH.|
00003E90: 8B 52 24 B2 C7 28 58 46 29 A7 8D 38 34 37 30 00 |.R$..(XF)..8470.|
00003EA0: B2 46 52 17 99 C7 28 46 25 28 C6 28 52 24 29 29 |.FR...(F%(.(R$))|
00003EB0: 29 3B 00 BA 46 5C 17 A1 42 24 00 D2 46 66 17 8B |);..F\..B$..Ff..|
00003EC0: 42 24 B2 C7 28 31 33 36 29 A7 A0 38 3A 89 34 34 |B$..(136)..8:.44|
00003ED0: 30 30 00 DC 46 70 17 89 35 39 30 30 00 FB 46 7A |00..Fp..5900..Fz|
00003EE0: 17 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00003EF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 18 47 84 17 |-----------..G..|
00003F00: 8F 20 20 5A 45 52 4F 20 41 4E 44 20 43 4C 4F 53 |. ZERO AND CLOS|
00003F10: 45 20 42 55 46 46 45 52 00 37 47 8E 17 8F 20 2D |E BUFFER.7G... -|
00003F20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003F30: 2D 2D 2D 2D 2D 2D 2D 00 63 47 98 17 42 50 B2 42 |-------.cG..BP.B|
00003F40: 45 3A 99 4A 24 4A 24 22 5B 20 C2 55 46 46 45 52 |E:.J$J$"[ .UFFER|
00003F50: 20 DA 45 52 4F 45 44 20 26 20 C3 4C 4F 53 45 44 | .EROED & .LOSED|
00003F60: 20 5D 22 00 6C 47 A2 17 42 44 B2 30 00 75 47 AC | ]".lG..BD.0.uG.|
00003F70: 17 89 31 33 30 00 9A 47 B6 17 8F 20 2D 2D 2D 2D |..130..G... ----|
00003F80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003F90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 BC 47 C0 17 8F |----------..G...|
00003FA0: 20 20 20 20 42 4F 42 53 20 53 45 51 2E 20 52 45 | BOBS SEQ. RE|
00003FB0: 41 44 45 52 2F 50 52 49 4E 54 45 52 00 E1 47 CA |ADER/PRINTER..G.|
00003FC0: 17 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00003FD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003FE0: 2D 00 E9 47 D4 17 A0 31 35 00 01 48 DE 17 A0 31 |-..G...15..H...1|
00003FF0: 3A 9F 31 2C 50 44 2C 50 53 3A 4C B2 31 3A 50 B2 |:.1,PD,PS:L.1:P.|
00004000: 30 00 09 48 E8 17 99 45 24 00 2E 48 F2 17 99 53 |0..H...E$..H...S|
00004010: 4F 24 22 D3 C5 D1 2E 20 C6 C9 CC C5 20 D2 C5 C1 |O$".... .... ...|
00004020: C4 C5 D2 2F D0 D2 C9 CE D4 C5 D2 22 4A 24 00 48 |.../......."J$.H|
00004030: 48 FC 17 46 49 24 B2 22 22 3A 8F 20 43 4C 45 41 |H..FI$."":. CLEA|
00004040: 4E 20 53 54 52 49 4E 47 00 68 48 06 18 99 46 24 |N STRING.hH...F$|
00004050: 22 C6 49 4C 45 4E 41 4D 45 20 45 3C D8 3E 49 54 |".ILENAME E<.>IT|
00004060: 21 22 3B 3A 85 46 49 24 00 7E 48 10 18 8B 46 49 |!";:.FI$.~H...FI|
00004070: 24 B2 22 58 22 A7 A0 31 3A 89 34 34 30 30 00 94 |$."X"..1:.4400..|
00004080: 48 1A 18 8B 46 49 24 B2 22 D8 22 A7 A0 31 3A 89 |H...FI$."."..1:.|
00004090: 34 34 30 30 00 B3 48 24 18 A0 38 3A 9F 38 2C 38 |4400..H$..8:.8,8|
000040A0: 2C 38 2C 46 49 24 AA 22 2C 53 2C 52 22 3A 8D 36 |,8,FI$.",S,R":.6|
000040B0: 34 34 30 00 EA 48 2E 18 99 45 24 AA 46 24 AA 46 |440..H...E$.F$.F|
000040C0: 24 22 C3 48 4F 49 43 45 20 3C 46 31 3E D0 52 49 |$".HOICE <F1>.RI|
000040D0: 4E 54 45 52 20 3C 46 33 3E D3 43 52 45 45 4E 20 |NTER <F3>.CREEN |
000040E0: 3C 46 35 3E C1 42 4F 52 54 22 00 17 49 38 18 99 |<F5>.BORT"..I8..|
000040F0: 46 24 53 53 24 22 3C 46 37 3E 20 D4 CF C7 C7 CC |F$SS$"<F7> .....|
00004100: C5 D3 20 D0 41 55 53 45 2F C3 4F 4E 54 49 4E 55 |.. .AUSE/.ONTINU|
00004110: 45 22 4A 24 4C 49 24 00 39 49 42 18 A1 41 24 3A |E"J$LI$.9IB..A$:|
00004120: 8B 41 24 B3 C7 28 31 33 33 29 B0 41 24 B1 C7 28 |.A$..(133).A$..(|
00004130: 31 33 35 29 A7 36 32 31 30 00 61 49 4C 18 8B 41 |135).6210.aIL..A|
00004140: 24 B2 C7 28 31 33 33 29 A7 50 B2 31 3A 89 36 32 |$..(133).P.1:.62|
00004150: 35 30 3A 8F 20 3C 46 31 3E 20 50 52 49 4E 54 45 |50:. <F1> PRINTE|
00004160: 52 00 89 49 56 18 8B 41 24 B2 C7 28 31 33 35 29 |R..IV..A$..(135)|
00004170: A7 A0 31 3A A0 38 3A 89 34 34 30 30 3A 8F 20 3C |..1:.8:.4400:. <|
00004180: 46 35 3E 20 41 42 4F 52 54 00 AB 49 60 18 8B 41 |F5> ABORT..I`..A|
00004190: 24 B2 C7 28 31 33 34 29 A7 36 32 35 30 3A 8F 20 |$..(134).6250:. |
000041A0: 3C 46 33 3E 20 53 43 52 45 45 4E 00 D8 49 6A 18 |<F3> SCREEN..Ij.|
000041B0: 8B 50 B2 31 A7 98 31 2C C7 28 31 34 35 29 C7 28 |.P.1..1,.(145).(|
000041C0: 31 34 29 46 49 24 C7 28 31 37 29 C7 28 31 35 29 |14)FI$.(17).(15)|
000041D0: 3A 98 31 3A 4C B2 34 3A 00 0F 4A 74 18 A1 23 38 |:.1:L.4:..Jt..#8|
000041E0: 2C 41 24 3A 8B 41 24 B2 C7 28 31 30 29 A7 41 24 |,A$:.A$..(10).A$|
000041F0: B2 C7 28 32 39 29 AA C7 28 31 35 37 29 3A 97 32 |..(29)..(157):.2|
00004200: 31 32 2C 30 3A 8B 53 54 B2 30 A7 36 32 38 30 00 |12,0:.ST.0.6280.|
00004210: 1F 4A 7E 18 8B 53 54 B2 36 34 A7 36 33 38 30 00 |.J~..ST.64.6380.|
00004220: 28 4A 88 18 99 41 24 3B 00 52 4A 92 18 8B 50 B2 |(J...A$;.RJ...P.|
00004230: 31 A7 98 31 2C 41 24 3B 3A 4C B2 31 3A 8B 41 24 |1..1,A$;:L.1:.A$|
00004240: B2 C7 28 31 33 29 A7 4C B2 4C AA 31 3A 8D 36 34 |..(13).L.L.1:.64|
00004250: 38 30 00 66 4A 9C 18 A1 41 24 3A 8B 41 24 B2 22 |80.fJ...A$:.A$."|
00004260: 22 A7 36 32 36 30 00 9A 4A A6 18 99 3A 99 46 24 |".6260..J...:.F$|
00004270: 22 D0 C1 D5 D3 C5 3A 3C 46 31 3E D0 52 49 4E 54 |".....:<F1>.RINT|
00004280: 45 52 20 3C 46 33 3E D3 43 52 45 45 4E 20 3C 46 |ER <F3>.CREEN <F|
00004290: 35 3E C1 42 4F 52 54 22 46 24 00 BC 4A B0 18 A1 |5>.BORT"F$..J...|
000042A0: 41 24 3A 8B 41 24 B3 C7 28 31 33 33 29 B0 41 24 |A$:.A$..(133).A$|
000042B0: B1 C7 28 31 33 36 29 A7 36 33 32 30 00 E5 4A BA |..(136).6320..J.|
000042C0: 18 8B 41 24 B2 C7 28 31 33 33 29 A7 50 B2 31 3A |..A$..(133).P.1:|
000042D0: 98 31 2C C7 28 31 37 29 3A 98 31 3A 4C B2 31 3A |.1,.(17):.1:L.1:|
000042E0: 89 36 33 36 30 00 FE 4A C4 18 8B 41 24 B2 C7 28 |.6360..J...A$..(|
000042F0: 31 33 34 29 A7 50 B2 30 3A 89 36 33 36 30 00 12 |134).P.0:.6360..|
00004300: 4B CE 18 8B 41 24 B2 C7 28 31 33 35 29 A7 36 33 |K...A$..(135).63|
00004310: 37 30 00 1C 4B D8 18 89 36 32 36 30 00 44 4B E2 |70..K...6260.DK.|
00004320: 18 99 46 24 AA 46 24 22 5B 20 CF 50 45 52 41 54 |..F$.F$"[ .PERAT|
00004330: 49 4F 4E 20 41 42 4F 52 54 45 44 20 5D 22 3A 8D |ION ABORTED ]":.|
00004340: 37 34 38 30 00 69 4B EC 18 8B 50 B2 31 A7 98 31 |7480.iK...P.1..1|
00004350: 3A 81 58 B2 4C AA 31 A4 33 3A 98 31 3A 82 58 3A |:.X.L.1.3:.1:.X:|
00004360: 98 31 2C C7 28 31 34 35 29 00 9E 4B F6 18 A0 31 |.1,.(145)..K...1|
00004370: 3A A0 38 3A 99 46 24 46 24 46 24 22 3D 3E 20 D2 |:.8:.F$F$F$"=> .|
00004380: C5 C1 C4 2F D0 D2 C9 CE D4 A0 C1 CE CF D4 C8 C5 |.../............|
00004390: D2 A0 C6 C9 CC C5 3F 20 28 D9 2F CE 29 22 00 B2 |......? (./.)"..|
000043A0: 4B 00 19 A1 41 24 3A 8B 41 24 B2 22 22 A7 36 34 |K...A$:.A$."".64|
000043B0: 30 30 00 C8 4B 0A 19 8B 41 24 B2 22 59 22 A7 A0 |00..K...A$."Y"..|
000043C0: 31 35 3A 89 36 31 31 30 00 DA 4B 14 19 8B 41 24 |15:.6110..K...A$|
000043D0: B3 B1 22 4E 22 A7 36 34 30 30 00 E8 4B 1E 19 99 |.."N".6400..K...|
000043E0: 45 24 3A 89 34 34 30 30 00 08 4C 28 19 A0 31 35 |E$:.4400..L(..15|
000043F0: 3A 9F 31 35 2C 38 2C 31 35 3A 84 31 35 2C 4E 2C |:.15,8,15:.15,N,|
00004400: 4E 24 2C 54 52 2C 53 45 00 38 4C 32 19 8B 4E B1 |N$,TR,SE.8L2..N.|
00004410: 31 A7 99 46 24 46 24 22 C4 C9 D3 CB 20 C5 D2 D2 |1..F$F$".... ...|
00004420: CF D2 3A 22 4E 3B 4E 24 3B 54 52 3B 53 45 3A A0 |..:"N;N$;TR;SE:.|
00004430: 31 35 3A 89 36 34 36 30 00 65 4C 3C 19 8B 4E B1 |15:.6460.eL<..N.|
00004440: 31 A7 99 46 24 46 24 22 5B 20 CC 4F 41 44 20 C1 |1..F$F$"[ .OAD .|
00004450: 42 4F 52 54 45 44 20 5D 22 3A 8D 37 34 38 30 3A |BORTED ]":.7480:|
00004460: 8D 36 33 39 30 00 6B 4C 46 19 8E 00 86 4C 50 19 |.6390.kLF....LP.|
00004470: 8B 4C B2 36 30 A7 4C B2 31 3A 81 58 B2 31 A4 37 |.L.60.L.1:.X.1.7|
00004480: 3A 98 31 3A 82 58 00 8C 4C 5A 19 8E 00 B0 4C 64 |:.1:.X..LZ....Ld|
00004490: 19 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
000044A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000044B0: 00 CF 4C 6E 19 8F 20 20 20 20 20 20 20 31 36 35 |..Ln.. 165|
000044C0: 30 2F 36 34 32 30 20 41 55 54 4F 44 49 41 4C 00 |0/6420 AUTODIAL.|
000044D0: F3 4C 78 19 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.Lx.. ----------|
000044E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000044F0: 2D 2D 2D 00 17 4D 82 19 99 45 24 AA 46 24 AA 46 |---..M...E$.F$.F|
00004500: 24 53 51 24 22 5B 20 D3 45 54 54 49 4E 47 20 CD |$SQ$"[ .ETTING .|
00004510: 4F 44 45 4D 20 5D 22 00 2C 4D 8C 19 97 42 32 2C |ODEM ]".,M...B2,|
00004520: 33 32 3A 8F 20 53 45 54 20 43 49 41 00 46 4D 96 |32:. SET CIA.FM.|
00004530: 19 97 42 31 2C 30 3A 8F 20 48 41 4E 47 20 55 50 |..B1,0:. HANG UP|
00004540: 20 50 48 4F 4E 45 00 4F 4D A0 19 44 59 B2 31 00 | PHONE.OM..DY.1.|
00004550: 59 4D AA 19 8D 34 32 39 30 00 61 4D B4 19 99 45 |YM...4290.aM...E|
00004560: 24 00 86 4D BE 19 99 53 53 24 22 31 36 35 30 2F |$..M...SS$"1650/|
00004570: 36 34 32 30 20 C1 D5 D4 CF 2D C4 C9 C1 CC 20 CD |6420 ....-.... .|
00004580: CF C4 C5 22 4A 24 00 A1 4D C8 19 99 22 D3 45 54 |..."J$..M...".ET|
00004590: 20 D4 2D C4 20 D3 57 49 54 43 48 20 54 4F 20 C4 | .-. .WITCH TO .|
000045A0: 22 00 BB 4D D2 19 99 53 4F 24 22 CF 2D C1 20 D3 |"..M...SO$".-. .|
000045B0: 57 49 54 43 48 20 54 4F 20 CF 22 00 D5 4D DC 19 |WITCH TO ."..M..|
000045C0: 99 53 4F 24 22 C8 2D C6 20 D3 57 49 54 43 48 20 |.SO$".-. .WITCH |
000045D0: 54 4F 20 C6 22 00 DD 4D E6 19 99 4A 24 00 0B 4E |TO ."..M...J$..N|
000045E0: F0 19 99 46 24 AA 22 C5 4E 54 45 52 20 D2 45 44 |...F$.".NTER .ED|
000045F0: 49 41 4C 20 C4 45 4C 41 59 2E 20 3C 43 52 3E 3D |IAL .ELAY. <CR>=|
00004600: 31 35 20 D3 45 43 4F 4E 44 53 22 00 15 4E FA 19 |15 .ECONDS"..N..|
00004610: 43 4B B2 31 35 00 1D 4E 04 1A 85 43 4B 00 52 4E |CK.15..N...CK.RN|
00004620: 0E 1A 99 46 24 AA 46 24 AA 22 C5 4E 54 45 52 20 |...F$.F$.".NTER |
00004630: CE 55 4D 42 45 52 20 54 4F 20 C4 49 41 4C 20 41 |.UMBER TO .IAL A|
00004640: 4E 44 20 D0 52 45 53 53 20 3C D2 C5 D4 D5 D2 CE |ND .RESS <......|
00004650: 3E 22 00 5B 4E 18 1A 85 4E 55 24 00 7A 4E 22 1A |>".[N...NU$.zN".|
00004660: 97 42 31 2C 33 32 3A 8F 20 50 49 43 4B 20 55 50 |.B1,32:. PICK UP|
00004670: 20 54 48 45 20 50 48 4F 4E 45 00 83 4E 2C 1A 43 | THE PHONE..N,.C|
00004680: 4A B2 30 00 8C 4E 36 1A 44 59 B2 32 00 A7 4E 40 |J.0..N6.DY.2..N@|
00004690: 1A 8D 34 32 39 30 3A 8F 20 57 41 49 54 20 32 20 |..4290:. WAIT 2 |
000046A0: 53 45 43 4F 4E 44 53 00 B4 4E 4A 1A 44 B2 C3 28 |SECONDS..NJ.D..(|
000046B0: 4E 55 24 29 00 D3 4E 54 1A 99 45 24 46 24 22 C4 |NU$)..NT..E$F$".|
000046C0: 49 41 4C 49 4E 47 3A 20 22 3B 4E 55 24 3B 4A 24 |IALING: ";NU$;J$|
000046D0: 3B 4A 24 00 DE 4E 5E 1A 81 58 B2 31 A4 44 00 F0 |;J$..N^..X.1.D..|
000046E0: 4E 68 1A 4E 24 B2 CA 28 4E 55 24 2C 58 2C 31 29 |Nh.N$..(NU$,X,1)|
000046F0: 00 F9 4E 72 1A 99 4E 24 3B 00 05 4F 7C 1A 4E B2 |..Nr..N$;..O|.N.|
00004700: C5 28 4E 24 29 00 13 4F 86 1A 8B 4E B2 30 A7 4E |.(N$)..O...N.0.N|
00004710: B2 31 30 00 1E 4F 90 1A 8D 20 36 38 36 30 00 25 |.10..O... 6860.%|
00004720: 4F 9A 1A 82 58 00 30 4F A4 1A 89 20 37 30 32 30 |O...X.0O... 7020|
00004730: 00 51 4F AE 1A 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |.QO... ---------|
00004740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00004750: 2D 00 74 4F B8 1A 8F 20 53 55 42 52 4F 55 54 49 |-.tO... SUBROUTI|
00004760: 4E 45 20 54 4F 20 50 55 4C 53 45 20 54 48 45 20 |NE TO PULSE THE |
00004770: 4C 49 4E 45 00 95 4F C2 1A 8F 20 2D 2D 2D 2D 2D |LINE..O... -----|
00004780: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00004790: 2D 2D 2D 2D 2D 00 A1 4F CC 1A 81 4E 31 B2 31 A4 |-----..O...N1.1.|
000047A0: 4E 00 C0 4F D6 1A 97 42 31 2C 30 3A 8F 20 48 41 |N..O...B1,0:. HA|
000047B0: 4E 47 20 49 54 20 55 50 20 42 52 49 45 46 4C 59 |NG IT UP BRIEFLY|
000047C0: 00 D6 4F E0 1A 97 42 31 2C 30 3A 8F 20 4D 41 4B |..O...B1,0:. MAK|
000047D0: 45 20 53 55 52 45 00 E0 4F EA 1A 44 59 B2 31 33 |E SURE..O..DY.13|
000047E0: 00 EB 4F F4 1A 8D 20 37 31 38 30 00 0B 50 FE 1A |..O... 7180..P..|
000047F0: 97 42 31 2C 33 32 3A 8F 20 50 49 43 4B 20 49 54 |.B1,32:. PICK IT|
00004800: 20 55 50 20 42 52 49 45 46 4C 59 00 4D 50 08 1B | UP BRIEFLY.MP..|
00004810: 97 42 31 2C 33 32 3A 8F 20 53 45 43 4F 4E 44 20 |.B1,32:. SECOND |
00004820: 50 4F 4B 45 20 53 45 45 4D 53 20 54 4F 20 45 4E |POKE SEEMS TO EN|
00004830: 48 41 4E 43 45 20 41 43 43 55 52 41 43 59 20 4F |HANCE ACCURACY O|
00004840: 46 20 4F 4C 44 45 52 20 31 36 35 30 53 00 57 50 |F OLDER 1650S.WP|
00004850: 12 1B 44 59 B2 32 30 00 62 50 1C 1B 8D 20 37 31 |..DY.20.bP... 71|
00004860: 38 30 00 6A 50 26 1B 82 4E 31 00 74 50 30 1B 44 |80.jP&..N1.tP0.D|
00004870: 59 B2 36 30 00 7F 50 3A 1B 8D 20 37 31 38 30 00 |Y.60..P:.. 7180.|
00004880: 85 50 44 1B 8E 00 A6 50 4E 1B 8F 20 2D 2D 2D 2D |.PD....PN.. ----|
00004890: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000048A0: 2D 2D 2D 2D 2D 2D 00 C2 50 58 1B 8F 20 20 20 20 |------..PX.. |
000048B0: 20 43 48 45 43 4B 20 46 4F 52 20 43 41 52 52 49 | CHECK FOR CARRI|
000048C0: 45 52 00 E3 50 62 1B 8F 20 2D 2D 2D 2D 2D 2D 2D |ER..Pb.. -------|
000048D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000048E0: 2D 2D 2D 00 04 51 6C 1B 99 42 4C 24 AA 47 24 AA |---..Ql..BL$.G$.|
000048F0: 45 4A 24 AA 22 3C 46 37 3E 20 54 4F 20 C1 42 4F |EJ$."<F7> TO .BO|
00004900: 52 54 21 22 00 34 51 76 1B 8B C2 28 42 31 29 B3 |RT!".4Qv...(B1).|
00004910: 39 39 A7 33 30 38 30 3A 8F 20 43 41 52 52 49 45 |99.3080:. CARRIE|
00004920: 52 20 44 45 54 45 43 54 45 44 20 54 4F 20 4F 4E |R DETECTED TO ON|
00004930: 4C 49 4E 45 00 3C 51 80 1B A1 42 24 00 50 51 8A |LINE.<Q...B$.PQ.|
00004940: 1B 8B 42 24 B2 C7 28 31 33 36 29 A7 32 35 37 30 |..B$..(136).2570|
00004950: 00 7E 51 94 1B 44 59 B2 35 3A 8F 20 55 50 20 32 |.~Q..DY.5:. UP 2|
00004960: 20 54 4F 20 35 20 44 45 4C 41 59 20 54 4F 20 50 | TO 5 DELAY TO P|
00004970: 49 43 4B 20 55 50 20 43 41 52 52 49 45 52 00 88 |ICK UP CARRIER..|
00004980: 51 9E 1B 8D 34 32 39 30 00 9C 51 A8 1B 8B 42 24 |Q...4290..Q...B$|
00004990: B2 C7 28 31 33 36 29 A7 32 35 37 30 00 A8 51 B2 |..(136).2570..Q.|
000049A0: 1B 43 4A B2 43 4A AA 31 00 BB 51 BC 1B 8B 35 AC |.CJ.CJ.1..Q...5.|
000049B0: 43 4A B1 43 4B A7 97 42 31 2C 30 00 CD 51 C6 1B |CJ.CK..B1,0..Q..|
000049C0: 8B 35 AC 43 4A B1 43 4B A7 44 59 B2 35 00 E0 51 |.5.CJ.CK.DY.5..Q|
000049D0: D0 1B 8B 35 AC 43 4A B1 43 4B A7 8D 34 32 39 30 |...5.CJ.CK..4290|
000049E0: 00 F3 51 DA 1B 8B 35 AC 43 4A B1 43 4B A7 20 36 |..Q...5.CJ.CK. 6|
000049F0: 36 39 30 00 FE 51 E4 1B 89 20 37 30 32 30 00 1F |690..Q... 7020..|
00004A00: 52 EE 1B 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |R... -----------|
00004A10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00004A20: 3C 52 F8 1B 8F 20 53 48 4F 52 54 20 44 45 4C 41 |<R... SHORT DELA|
00004A30: 59 20 53 55 42 52 4F 55 54 49 4E 45 00 5D 52 02 |Y SUBROUTINE.]R.|
00004A40: 1C 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00004A50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 66 52 |-------------.fR|
00004A60: 0C 1C 53 43 B2 30 00 85 52 16 1C 41 B2 C2 28 35 |..SC.0..R..A..(5|
00004A70: 36 33 32 35 29 3A 8F 20 43 48 45 43 4B 20 54 49 |6325):. CHECK TI|
00004A80: 4D 45 52 20 41 00 94 52 20 1C 42 B2 C2 28 35 36 |MER A..R .B..(56|
00004A90: 33 32 35 29 00 BD 52 2A 1C 8B 41 B2 42 A7 20 37 |325)..R*..A.B. 7|
00004AA0: 32 30 30 3A 8F 20 47 45 54 20 55 50 44 41 54 45 |200:. GET UPDATE|
00004AB0: 20 49 46 20 4E 4F 20 43 48 41 4E 47 45 00 C9 52 | IF NO CHANGE..R|
00004AC0: 34 1C 53 43 B2 53 43 AA 31 00 DA 52 3E 1C 8B 53 |4.SC.SC.1..R>..S|
00004AD0: 43 B3 44 59 A7 20 37 31 39 30 00 E0 52 48 1C 8E |C.DY. 7190..RH..|
00004AE0: 00 01 53 52 1C 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |..SR.. ---------|
00004AF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00004B00: 2D 00 22 53 5C 1C 8F 20 4C 4F 41 44 2F 53 41 56 |-."S\.. LOAD/SAV|
00004B10: 45 20 46 49 4C 45 4E 41 4D 45 20 52 4F 55 54 49 |E FILENAME ROUTI|
00004B20: 4E 45 00 43 53 66 1C 8F 20 2D 2D 2D 2D 2D 2D 2D |NE.CSf.. -------|
00004B30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00004B40: 2D 2D 2D 00 53 53 70 1C A0 31 35 3A 99 AA 4A 24 |---.SSp..15:..J$|
00004B50: AA 4A 24 00 72 53 7A 1C 85 22 20 20 C6 49 4C 45 |.J$.rSz.." .ILE|
00004B60: 4E 41 4D 45 20 45 3C D8 3E 49 54 21 20 22 3B 46 |NAME E<.>IT! ";F|
00004B70: 49 24 00 84 53 84 1C 8B 46 49 24 B2 22 58 22 A7 |I$..S...FI$."X".|
00004B80: 34 34 30 30 00 96 53 8E 1C 8B 46 49 24 B2 22 D8 |4400..S...FI$.".|
00004B90: 22 A7 34 34 30 30 00 B7 53 98 1C A0 38 3A 9F 38 |".4400..S...8:.8|
00004BA0: 2C 38 2C 38 2C 22 30 3A 22 AA 46 49 24 AA 22 2C |,8,8,"0:".FI$.",|
00004BB0: 53 2C 22 AA 52 57 24 00 D7 53 A2 1C 8B 4B 53 A7 |S,".RW$..S...KS.|
00004BC0: 9F 31 35 2C 38 2C 31 35 3A 84 31 35 2C 41 2C 42 |.15,8,15:.15,A,B|
00004BD0: 24 2C 54 52 2C 53 45 00 00 54 AC 1C 8B 4B 53 A7 |$,TR,SE..T...KS.|
00004BE0: 99 3A 99 46 24 22 C4 C9 D3 CB 20 D3 54 41 54 55 |.:.F$".... .TATU|
00004BF0: 53 3A 20 22 41 3B 42 24 3B 54 52 3B 53 45 3A 8E |S: "A;B$;TR;SE:.|
00004C00: 00 06 54 B6 1C 8E 00 2B 54 C0 1C 8F 20 2D 2D 2D |..T....+T... ---|
00004C10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00004C20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 4A 54 CA 1C |-----------.JT..|
00004C30: 8F 20 20 20 20 20 55 53 45 52 20 43 4F 4C 4F 52 |. USER COLOR|
00004C40: 20 53 45 4C 45 43 54 49 4F 4E 00 6F 54 D4 1C 8F | SELECTION.oT...|
00004C50: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00004C60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00004C70: 9C 54 DE 1C 99 4A 24 22 20 20 C9 4E 50 55 54 20 |.T...J$" .NPUT |
00004C80: 44 45 53 49 52 45 44 20 C3 C2 CD 20 43 4F 4C 4F |DESIRED ... COLO|
00004C90: 52 20 43 4F 44 45 53 20 46 4F 52 22 00 C8 54 E8 |R CODES FOR"..T.|
00004CA0: 1C 99 22 20 20 43 48 41 52 41 43 54 45 52 2C 20 |.." CHARACTER, |
00004CB0: 42 4F 52 44 45 52 2C 20 41 4E 44 20 42 41 43 4B |BORDER, AND BACK|
00004CC0: 47 52 4F 55 4E 44 2E 22 00 F3 54 F2 1C 99 22 20 |GROUND."..T..." |
00004CD0: 20 D8 D8 2C D8 D8 2C D8 D8 20 2D 20 28 53 45 50 | ..,..,.. - (SEP|
00004CE0: 41 52 41 54 45 44 20 42 59 20 43 4F 4D 4D 41 53 |ARATED BY COMMAS|
00004CF0: 29 2E 22 00 01 55 FC 1C 85 44 31 2C 44 32 2C 44 |)."..U...D1,D2,D|
00004D00: 33 00 21 55 06 1D 97 36 34 36 2C 44 31 3A 97 35 |3.!U...646,D1:.5|
00004D10: 33 32 38 30 2C 44 32 3A 97 35 33 32 38 31 2C 44 |3280,D2:.53281,D|
00004D20: 33 00 27 55 10 1D 8E 00 4C 55 1A 1D 8F 20 2D 2D |3.'U....LU... --|
00004D30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00004D40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 6A 55 24 |------------.jU$|
00004D50: 1D 8F 20 20 20 20 20 20 54 49 4D 45 20 44 45 4C |.. TIME DEL|
00004D60: 41 59 20 52 4F 55 54 49 4E 45 00 8F 55 2E 1D 8F |AY ROUTINE..U...|
00004D70: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00004D80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00004D90: A0 55 38 1D 81 58 B2 31 A4 33 30 30 30 3A 82 58 |.U8..X.1.3000:.X|
00004DA0: 00 A6 55 42 1D 8E 00 CB 55 4C 1D 8F 20 2D 2D 2D |..UB....UL.. ---|
00004DB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00004DC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 EA 55 56 1D |-----------..UV.|
00004DD0: 8F 20 20 20 20 20 20 20 58 4D 4F 42 55 46 20 41 |. XMOBUF A|
00004DE0: 55 54 4F 2D 41 4E 53 57 45 52 00 0F 56 60 1D 8F |UTO-ANSWER..V`..|
00004DF0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00004E00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00004E10: 17 56 6A 1D 99 45 24 00 34 56 74 1D 99 53 53 24 |.Vj..E$.4Vt..SS$|
00004E20: 22 D8 CD CF C2 D5 C6 20 C1 55 54 4F 2D C1 4E 53 |"...... .UTO-.NS|
00004E30: 57 45 52 22 00 5E 56 7E 1D 99 46 24 22 D3 45 54 |WER".^V~..F$".ET|
00004E40: 20 41 50 50 4C 49 43 41 42 4C 45 20 4D 4F 44 45 | APPLICABLE MODE|
00004E50: 4D 20 53 57 49 54 43 48 45 53 2E 2E 2E 22 00 7A |M SWITCHES...".z|
00004E60: 56 88 1D 99 46 24 53 4F 24 22 D4 2D C4 20 53 57 |V...F$SO$".-. SW|
00004E70: 49 54 43 48 20 54 4F 20 C4 22 00 94 56 92 1D 99 |ITCH TO ."..V...|
00004E80: 53 4F 24 22 D6 2D C4 20 53 57 49 54 43 48 20 54 |SO$".-. SWITCH T|
00004E90: 4F 20 C4 22 00 AE 56 9C 1D 99 53 4F 24 22 CF 2D |O ."..V...SO$".-|
00004EA0: C1 20 53 57 49 54 43 48 20 54 4F 20 C1 22 00 C8 |. SWITCH TO ."..|
00004EB0: 56 A6 1D 99 53 4F 24 22 C8 2D C6 20 53 57 49 54 |V...SO$".-. SWIT|
00004EC0: 43 48 20 54 4F 20 C6 22 00 02 57 B0 1D 99 46 24 |CH TO ."..W...F$|
00004ED0: 46 24 46 24 22 41 4E 44 2E 2E 2E 20 5B 20 C8 49 |F$F$"AND... [ .I|
00004EE0: 54 20 C1 4E 59 20 CB 45 59 20 54 4F 20 D3 45 4C |T .NY .EY TO .EL|
00004EF0: 45 43 54 20 CD 4F 44 45 4D 20 5D 22 3A 8D 32 39 |ECT .ODEM ]":.29|
00004F00: 38 30 00 15 57 BA 1D 99 43 55 24 43 55 24 22 CD |80..W...CU$CU$".|
00004F10: 4F 44 45 4D 22 00 45 57 C4 1D 99 22 54 59 50 45 |ODEM".EW..."TYPE|
00004F20: 20 3A 20 3C 31 3E 20 20 31 36 35 30 2F 36 34 32 | : <1> 1650/642|
00004F30: 30 20 20 3C 32 3E 20 20 CD 49 54 45 59 2F C8 C5 |0 <2> .ITEY/..|
00004F40: D3 C9 C9 20 22 00 4F 57 CE 1D 8D 32 39 38 30 00 |... ".OW...2980.|
00004F50: 82 57 D8 1D 8B 41 24 B2 22 31 22 A7 97 42 32 2C |.W...A$."1"..B2,|
00004F60: 33 32 3A 97 42 31 2C 2E 3A 89 37 36 37 30 3A 8F |32:.B1,.:.7670:.|
00004F70: 20 48 41 4E 47 20 55 50 20 31 36 35 30 2F 36 34 | HANG UP 1650/64|
00004F80: 32 30 00 B5 57 E2 1D 8B 41 24 B2 22 32 22 A7 97 |20..W...A$."2"..|
00004F90: 42 31 2C 33 32 3A 97 42 32 2C 2E 3A 89 37 36 37 |B1,32:.B2,.:.767|
00004FA0: 30 3A 8F 20 48 41 4E 47 20 55 50 20 4D 49 54 45 |0:. HANG UP MITE|
00004FB0: 59 2F 48 45 53 00 BF 57 EC 1D 89 37 36 33 30 00 |Y/HES..W...7630.|
00004FC0: EA 57 F6 1D 8B 41 24 B2 22 31 22 A7 99 43 55 24 |.W...A$."1"..CU$|
00004FD0: 43 55 24 A6 32 33 29 22 20 20 20 20 20 20 20 20 |CU$.23)" |
00004FE0: 20 20 20 20 20 20 20 20 20 22 00 12 58 00 1E 8B | "..X...|
00004FF0: 41 24 B2 22 32 22 A7 99 43 55 24 43 55 24 A6 37 |A$."2"..CU$CU$.7|
00005000: 29 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |)" |
00005010: 20 22 00 44 58 0A 1E 99 46 24 46 24 22 D2 C5 C1 | ".DX...F$F$"...|
00005020: C4 D9 2C 20 D7 C1 C9 D4 C9 CE C7 A0 C6 CF D2 A0 |.., ............|
00005030: C3 C1 CC CC 20 2D 20 3C 46 37 3E 20 C1 42 4F 52 |.... - <F7> .BOR|
00005040: 54 53 21 22 00 6C 58 14 1E A1 41 24 3A 8B 41 24 |TS!".lX...A$:.A$|
00005050: B2 C7 28 31 33 36 29 A7 32 35 37 30 3A 8F 20 41 |..(136).2570:. A|
00005060: 42 4F 52 54 20 54 4F 20 4D 45 4E 55 00 7F 58 1E |BORT TO MENU..X.|
00005070: 1E 4D 4D B2 31 3A 8F 20 43 4F 55 4E 54 45 52 00 |.MM.1:. COUNTER.|
00005080: A6 58 28 1E 8B 28 C2 28 42 31 29 AF 38 29 B3 B1 |.X(..(.(B1).8)..|
00005090: 30 A7 37 37 30 30 3A 8F 20 57 41 49 54 20 46 4F |0.7700:. WAIT FO|
000050A0: 52 20 52 49 4E 47 00 C8 58 32 1E 8F 20 2D 2D 2D |R RING..X2.. ---|
000050B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000050C0: 2D 2D 2D 2D 2D 2D 2D 2D 00 E4 58 3C 1E 8F 20 20 |--------..X<.. |
000050D0: 20 20 20 20 20 20 43 41 52 52 49 45 52 20 44 45 | CARRIER DE|
000050E0: 54 45 43 54 00 06 59 46 1E 8F 20 2D 2D 2D 2D 2D |TECT..YF.. -----|
000050F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00005100: 2D 2D 2D 2D 2D 2D 00 2C 59 50 1E 97 42 32 2C 33 |------.,YP..B2,3|
00005110: 38 3A 97 42 31 2C 30 3A 8F 20 53 54 41 52 54 20 |8:.B1,0:. START |
00005120: 43 41 52 52 49 45 52 20 48 49 47 48 00 3C 59 5A |CARRIER HIGH.<YZ|
00005130: 1E 81 58 B2 31 A4 31 30 30 3A 82 58 00 6D 59 64 |..X.1.100:.X.mYd|
00005140: 1E 8B C2 28 42 31 29 B2 32 30 31 A7 33 30 38 30 |...(B1).201.3080|
00005150: 3A 8F 20 43 41 52 52 49 45 52 20 44 45 54 45 43 |:. CARRIER DETEC|
00005160: 54 45 44 20 54 4F 20 4F 4E 4C 49 4E 45 00 9B 59 |TED TO ONLINE..Y|
00005170: 6E 1E 8B C2 28 42 31 29 B2 32 31 37 A7 97 42 31 |n...(B1).217..B1|
00005180: 2C 32 3A 8F 20 49 46 20 32 20 48 49 47 48 53 20 |,2:. IF 2 HIGHS |
00005190: 54 48 45 4E 20 47 4F 20 4C 4F 57 00 AB 59 78 1E |THEN GO LOW..Yx.|
000051A0: 8F 20 47 4F 53 55 42 35 31 37 35 00 DC 59 82 1E |. GOSUB5175..Y..|
000051B0: 8B C2 28 42 31 29 B2 32 30 33 A7 33 30 38 30 3A |..(B1).203.3080:|
000051C0: 8F 20 43 41 52 52 49 45 52 20 44 45 54 45 43 54 |. CARRIER DETECT|
000051D0: 45 44 20 54 4F 20 4F 4E 4C 49 4E 45 00 08 5A 8C |ED TO ONLINE..Z.|
000051E0: 1E 8B C2 28 42 31 29 B2 32 31 39 A7 97 42 31 2C |...(B1).219..B1,|
000051F0: 30 3A 8F 20 49 46 20 32 20 4C 4F 57 53 20 54 48 |0:. IF 2 LOWS TH|
00005200: 45 4E 20 47 4F 20 48 49 00 20 5A 96 1E 4D 4D B2 |EN GO HI. Z..MM.|
00005210: 4D 4D AA 31 3A 8B 4D 4D B3 31 30 A7 37 37 37 30 |MM.1:.MM.10.7770|
00005220: 00 53 5A A0 1E 97 42 32 2C 33 38 3A 97 42 31 2C |.SZ...B2,38:.B1,|
00005230: 33 32 3A 89 33 30 38 30 3A 8F 20 43 41 52 52 49 |32:.3080:. CARRI|
00005240: 45 52 20 44 45 54 45 43 54 20 54 4F 20 4F 4E 4C |ER DETECT TO ONL|
00005250: 49 4E 45 00 78 5A AA 1E 97 42 31 2C 33 32 3A 97 |INE.xZ...B1,32:.|
00005260: 42 32 2C 30 3A 8F 20 48 41 4E 47 20 55 50 20 4D |B2,0:. HANG UP M|
00005270: 49 54 45 59 2F 48 45 53 00 AC 5A B4 1E 99 46 24 |ITEY/HES..Z...F$|
00005280: 46 24 22 20 20 CE CF A0 C3 C1 D2 D2 C9 C5 D2 A0 |F$" ...........|
00005290: C4 C5 D4 C5 C3 D4 C5 C4 20 2D 20 C8 C1 CE C7 49 |........ - ....I|
000052A0: 4E 47 20 D5 D0 22 3A 8D 38 34 35 30 00 B6 5A BE |NG ..":.8450..Z.|
000052B0: 1E 89 37 35 33 30 00 DB 5A C8 1E 8F 20 2D 2D 2D |..7530..Z... ---|
000052C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000052D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 FC 5A D2 1E |-----------..Z..|
000052E0: 8F 20 20 20 31 36 36 30 2F 4D 49 54 45 59 2F 48 |. 1660/MITEY/H|
000052F0: 45 53 20 41 55 54 4F 2D 44 49 41 4C 00 21 5B DC |ES AUTO-DIAL.![.|
00005300: 1E 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00005310: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00005320: 2D 00 29 5B E6 1E 99 45 24 00 4F 5B F0 1E 8B 4D |-.)[...E$.O[...M|
00005330: 33 A7 97 42 31 2C 28 C2 28 42 31 29 B0 48 49 29 |3..B1,(.(B1).HI)|
00005340: 3A 8F 20 48 41 4E 47 20 55 50 20 31 36 36 30 00 |:. HANG UP 1660.|
00005350: 7C 5B FA 1E 99 22 20 20 31 36 36 30 2F CD 49 54 ||[..." 1660/.IT|
00005360: 45 59 CD 4F 2F C8 C5 D3 C9 C9 20 C1 D5 D4 CF 2D |EY.O/..... ....-|
00005370: C4 C9 C1 CC A0 CD CF C4 C5 22 4A 24 00 97 5B 04 |........."J$..[.|
00005380: 1F 97 42 31 2C 33 32 3A 97 42 32 2C 30 3A 8F 20 |..B1,32:.B2,0:. |
00005390: 48 41 4E 47 20 55 50 00 C9 5B 0E 1F 99 46 24 22 |HANG UP..[...F$"|
000053A0: D3 45 54 20 D6 2D C4 20 53 57 49 54 43 48 20 54 |.ET .-. SWITCH T|
000053B0: 4F 20 C4 20 20 20 20 2D 20 20 20 20 3C 46 37 3E |O . - <F7>|
000053C0: 20 C1 42 4F 52 54 53 21 22 00 EF 5B 18 1F 99 4A | .BORTS!"..[...J|
000053D0: 24 22 C8 59 50 48 45 4E 20 49 4E 53 45 52 54 53 |$".YPHEN INSERTS|
000053E0: 20 41 20 32 20 53 45 43 20 44 45 4C 41 59 22 00 | A 2 SEC DELAY".|
000053F0: 1E 5C 22 1F 99 46 24 46 24 22 C5 4E 54 45 52 20 |.\"..F$F$".NTER |
00005400: CE 55 4D 42 45 52 20 54 4F 20 C4 49 41 4C 3A 22 |.UMBER TO .IAL:"|
00005410: 3B 3A 4E 44 24 B2 22 22 3A 99 22 20 22 3B 00 27 |;:ND$."":." ";.'|
00005420: 5C 2C 1F 85 4E 4E 24 00 33 5C 36 1F 4E 44 24 B2 |\,..NN$.3\6.ND$.|
00005430: 4E 4E 24 00 4A 5C 40 1F 8F 20 2D 2D 2D 2D 20 44 |NN$.J\@.. ---- D|
00005440: 49 41 4C 45 52 20 2D 2D 2D 2D 00 8B 5C 4A 1F 99 |IALER ----..\J..|
00005450: 46 24 4A 24 22 CE 55 4D 42 45 52 20 4F 46 20 D4 |F$J$".UMBER OF .|
00005460: 52 49 45 53 3F A0 2D 20 3C 43 52 3E 3D 35 22 3A |RIES?.- <CR>=5":|
00005470: 58 54 24 B2 22 35 22 3A 85 58 54 24 3A 58 54 B2 |XT$."5":.XT$:XT.|
00005480: C5 28 58 54 24 29 3A 54 58 B2 30 00 AD 5C 54 1F |.(XT$):TX.0..\T.|
00005490: A1 42 24 3A 8B 42 24 B2 C7 28 31 33 36 29 A7 38 |.B$:.B$..(136).8|
000054A0: 34 39 30 3A 8F 20 54 4F 20 4D 45 4E 55 00 EB 5C |490:. TO MENU..\|
000054B0: 5E 1F 8F 20 50 52 49 4E 54 46 24 2B 46 24 2B 46 |^.. PRINTF$+F$+F|
000054C0: 24 22 20 20 D7 C1 C9 D4 C9 CE C7 20 C6 CF D2 20 |$" ....... ... |
000054D0: C4 C9 C1 CC 20 D4 CF CE C5 2E 2E 2E 2E 20 3C 46 |.... ........ <F|
000054E0: 37 3E 20 C1 42 4F 52 54 53 21 22 00 07 5D 68 1F |7> .BORTS!"..]h.|
000054F0: 97 42 32 2C 33 38 3A 97 42 31 2C 33 32 3A 8F 20 |.B2,38:.B1,32:. |
00005500: 48 41 4E 47 20 55 50 00 34 5D 72 1F 44 59 B2 32 |HANG UP.4]r.DY.2|
00005510: 3A 8D 34 32 39 30 3A 8B 42 24 B2 C7 28 31 33 36 |:.4290:.B$..(136|
00005520: 29 A7 38 34 39 30 3A 8F 20 57 41 49 54 20 32 20 |).8490:. WAIT 2 |
00005530: 53 45 43 53 00 4E 5D 7C 1F 97 42 31 2C 34 3A 8F |SECS.N]|..B1,4:.|
00005540: 20 50 49 43 4B 20 55 50 20 50 48 4F 4E 45 00 6D | PICK UP PHONE.m|
00005550: 5D 86 1F 44 59 B2 33 3A 8D 34 32 39 30 3A 8B 42 |]..DY.3:.4290:.B|
00005560: 24 B2 C7 28 31 33 36 29 A7 38 34 39 30 00 77 5D |$..(136).8490.w]|
00005570: 90 1F 99 45 24 46 24 00 96 5D 9A 1F 99 22 20 20 |...E$F$..]..." |
00005580: 20 20 20 20 20 20 20 3C 46 37 3E 20 C1 42 4F 52 | <F7> .BOR|
00005590: 54 53 21 22 46 24 00 B0 5D A4 1F 54 58 B2 54 58 |TS!"F$..]..TX.TX|
000055A0: AA 31 3A 99 A6 33 30 29 22 D4 52 59 3A 22 54 58 |.1:..30)".RY:"TX|
000055B0: 00 D3 5D AE 1F 4C 4E B2 C3 28 4E 44 24 29 3A 4D |..]..LN..(ND$):M|
000055C0: 4D B2 31 3A 99 43 55 24 22 C4 49 41 4C 49 4E 47 |M.1:.CU$".IALING|
000055D0: 3A 22 3B 00 E7 5D B8 1F 56 56 24 B2 CA 28 4E 44 |:";..]..VV$..(ND|
000055E0: 24 2C 4D 4D 2C 31 29 00 0F 5E C2 1F 8B 56 56 24 |$,MM,1)..^...VV$|
000055F0: B2 22 2D 22 A7 44 59 B2 32 3A 8D 34 32 39 30 3A |."-".DY.2:.4290:|
00005600: 8B 42 24 B2 C7 28 31 33 36 29 A7 38 34 39 30 00 |.B$..(136).8490.|
00005610: 29 5E CC 1F 56 56 B2 C5 28 56 56 24 29 3A 8B 56 |)^..VV..(VV$):.V|
00005620: 56 B2 30 A7 56 56 B2 31 30 00 36 5E D6 1F 81 4D |V.0.VV.10.6^...M|
00005630: 56 B2 31 A4 56 56 00 55 5E E0 1F 97 42 31 2C 33 |V.1.VV.U^...B1,3|
00005640: 32 3A 97 42 31 2C 33 32 3A 8F 20 48 41 4E 47 20 |2:.B1,32:. HANG |
00005650: 49 54 20 55 50 00 70 5E EA 1F 81 51 51 B2 31 A4 |IT UP.p^...QQ.1.|
00005660: 33 30 3A 8F 20 44 49 41 4C 20 54 49 4D 49 4E 47 |30:. DIAL TIMING|
00005670: 00 78 5E F4 1F 82 51 51 00 95 5E FE 1F 97 42 31 |.x^...QQ..^...B1|
00005680: 2C 34 3A 97 42 31 2C 34 3A 8F 20 50 49 43 4B 20 |,4:.B1,4:. PICK |
00005690: 49 54 20 55 50 00 B0 5E 08 20 81 51 51 B2 31 A4 |IT UP..^. .QQ.1.|
000056A0: 35 30 3A 8F 20 44 49 41 4C 20 54 49 4D 49 4E 47 |50:. DIAL TIMING|
000056B0: 00 B8 5E 12 20 82 51 51 00 D0 5E 1C 20 A1 42 24 |..^. .QQ..^. .B$|
000056C0: 3A 8B 42 24 B2 C7 28 31 33 36 29 A7 38 34 39 30 |:.B$..(136).8490|
000056D0: 00 EA 5E 26 20 82 4D 56 3A 8F 20 53 45 4E 44 20 |..^& .MV:. SEND |
000056E0: 4E 45 58 54 20 50 55 4C 53 45 00 F4 5E 30 20 8D |NEXT PULSE..^0 .|
000056F0: 38 34 35 30 00 0D 5F 3A 20 4D 4D B2 4D 4D AA 31 |8450.._: MM.MM.1|
00005700: 3A 8B 4D 4D B3 B2 4C 4E A7 38 31 32 30 00 23 5F |:.MM..LN.8120.#_|
00005710: 44 20 8F 20 53 45 4E 44 20 4E 45 58 54 20 44 49 |D . SEND NEXT DI|
00005720: 47 49 54 00 42 5F 4E 20 8F 20 2D 2D 2D 2D 2D 2D |GIT.B_N . ------|
00005730: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00005740: 2D 2D 00 5C 5F 58 20 8F 20 20 20 20 20 20 43 41 |--.\_X . CA|
00005750: 52 52 49 45 52 20 44 45 54 45 43 54 00 7B 5F 62 |RRIER DETECT.{_b|
00005760: 20 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | . -------------|
00005770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 84 5F 6C 20 |-----------.._l |
00005780: 4D 4D B2 30 00 BC 5F 76 20 97 42 32 2C 33 38 3A |MM.0.._v .B2,38:|
00005790: 97 42 31 2C 30 32 3A 8F 20 50 49 43 4B 20 55 50 |.B1,02:. PICK UP|
000057A0: 20 50 48 4F 4E 45 20 41 4E 44 20 53 54 41 52 54 | PHONE AND START|
000057B0: 20 43 41 52 52 49 45 52 20 4C 4F 57 00 D4 5F 80 | CARRIER LOW.._.|
000057C0: 20 8D 38 34 35 30 3A 8F 20 48 49 2F 4C 4F 20 44 | .8450:. HI/LO D|
000057D0: 45 4C 41 59 00 05 60 8A 20 8B C2 28 42 31 29 B2 |ELAY..`. ..(B1).|
000057E0: 32 30 33 A7 33 30 38 30 3A 8F 20 43 41 52 52 49 |203.3080:. CARRI|
000057F0: 45 52 20 44 45 54 45 43 54 45 44 20 54 4F 20 4F |ER DETECTED TO O|
00005800: 4E 4C 49 4E 45 00 22 60 94 20 8B C2 28 42 31 29 |NLINE."`. ..(B1)|
00005810: B2 39 31 A7 8B C2 28 42 32 29 B2 33 38 A7 4D 33 |.91...(B2).38.M3|
00005820: B2 31 00 2F 60 9E 20 8B 4D 33 A7 33 30 38 30 00 |.1./`. .M3.3080.|
00005830: 5C 60 A8 20 8B C2 28 42 31 29 B2 32 31 39 A7 97 |\`. ..(B1).219..|
00005840: 42 31 2C 30 3A 8F 20 49 46 20 32 20 4C 4F 57 27 |B1,0:. IF 2 LOW'|
00005850: 53 20 54 48 45 4E 20 47 4F 20 48 49 00 8D 60 B2 |S THEN GO HI..`.|
00005860: 20 8B C2 28 42 31 29 B2 32 30 31 A7 33 30 38 30 | ..(B1).201.3080|
00005870: 3A 8F 20 43 41 52 52 49 45 52 20 44 45 54 45 43 |:. CARRIER DETEC|
00005880: 54 45 44 20 54 4F 20 4F 4E 4C 49 4E 45 00 BB 60 |TED TO ONLINE..`|
00005890: BC 20 8B C2 28 42 31 29 B2 32 31 37 A7 97 42 31 |. ..(B1).217..B1|
000058A0: 2C 32 20 3A 8F 20 49 46 20 32 20 48 49 27 53 20 |,2 :. IF 2 HI'S |
000058B0: 54 48 45 4E 20 47 4F 20 4C 4F 57 00 D3 60 C6 20 |THEN GO LOW..`. |
000058C0: 4D 4D B2 4D 4D AA 31 3A 8B 4D 4D B3 31 30 A7 38 |MM.MM.1:.MM.10.8|
000058D0: 33 32 30 00 E0 60 D0 20 8B 4D 33 A7 33 30 38 30 |320..`. .M3.3080|
000058E0: 00 1A 61 DA 20 99 4A 24 46 24 46 24 22 20 20 CE |..a. .J$F$F$" .|
000058F0: CF 20 C3 C1 D2 D2 C9 C5 D2 20 C4 C5 D4 C5 C3 D4 |. ....... ......|
00005900: C5 C4 22 3A 97 42 31 2C 33 32 3A 97 42 32 2C 30 |..":.B1,32:.B2,0|
00005910: 3A 8F 20 48 41 4E 47 20 55 50 00 2C 61 E4 20 8B |:. HANG UP.,a. .|
00005920: 54 58 B3 B1 58 54 A7 89 38 30 32 30 00 5D 61 EE |TX..XT..8020.]a.|
00005930: 20 99 46 24 46 24 46 24 22 20 20 5B 20 C8 C1 CE | .F$F$F$" [ ...|
00005940: C7 49 4E 47 20 D5 D0 20 D0 48 4F 4E 45 20 5D 22 |.ING .. .HONE ]"|
00005950: 3A 97 42 31 2C 33 32 3A 97 42 32 2C 30 00 89 61 |:.B1,32:.B2,0..a|
00005960: F8 20 44 59 B2 33 3A 8D 34 32 39 30 3A 89 32 35 |. DY.3:.4290:.25|
00005970: 37 30 3A 8F 20 54 4F 20 4D 45 4E 55 20 41 46 54 |70:. TO MENU AFT|
00005980: 45 52 20 33 20 53 45 43 53 00 98 61 02 21 44 59 |ER 3 SECS..a.!DY|
00005990: B2 32 3A 8D 34 32 39 30 00 9E 61 0C 21 8E 00 B9 |.2:.4290..a.!...|
000059A0: 61 16 21 A1 23 35 2C 52 24 3A 8B 52 24 B3 B1 C7 |a.!.#5,R$:.R$...|
000059B0: 28 58 4E 29 A7 38 34 37 30 00 BF 61 20 21 8E 00 |(XN).8470..a !..|
000059C0: FF 61 2A 21 97 42 31 2C 33 32 3A 97 42 32 2C 30 |.a*!.B1,32:.B2,0|
000059D0: 3A 89 32 35 37 30 3A 8F 20 48 41 4E 47 20 55 50 |:.2570:. HANG UP|
000059E0: 20 48 45 53 2F 4D 49 54 45 59 2F 31 36 36 30 20 | HES/MITEY/1660 |
000059F0: 54 48 45 4E 20 47 4F 54 4F 20 4D 45 4E 55 2E 00 |THEN GOTO MENU..|
00005A00: 36 62 34 21 99 4A 24 22 C5 4E 54 45 52 20 D0 52 |6b4!.J$".NTER .R|
00005A10: 49 4E 54 45 52 20 C4 45 56 49 43 45 20 4E 55 4D |INTER .EVICE NUM|
00005A20: 42 45 52 22 3B 4A 24 22 3C C3 D2 3E 20 3D 20 34 |BER";J$"<..> = 4|
00005A30: 22 3B 3A 85 50 44 00 68 62 3E 21 99 4A 24 22 C5 |";:.PD.hb>!.J$".|
00005A40: 4E 54 45 52 20 D3 45 43 4F 4E 44 41 52 59 20 C1 |NTER .ECONDARY .|
00005A50: 44 44 52 45 53 53 22 4A 24 22 3C C3 D2 3E 20 3D |DDRESS"J$"<..> =|
00005A60: 20 37 22 3B 3A 85 50 53 00 6E 62 48 21 8E 00 92 | 7";:.PS.nbH!...|
00005A70: 62 52 21 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |bR!. -----------|
00005A80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00005A90: 2D 2D 00 A7 62 5C 21 8F 20 44 41 54 41 46 49 45 |--..b\!. DATAFIE|
00005AA0: 52 20 4C 49 4E 45 53 00 CB 62 66 21 8F 20 2D 2D |R LINES..bf!. --|
00005AB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00005AC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 EF 62 70 21 |-----------..bp!|
00005AD0: 97 42 31 2C 28 C2 28 42 31 29 B0 48 49 29 3A 8E |.B1,(.(B1).HI):.|
00005AE0: 3A 8F 20 48 41 4E 47 20 55 50 20 31 36 36 30 00 |:. HANG UP 1660.|
00005AF0: F5 62 7A 21 80 00 FB 62 84 21 3A 00 0D 63 8E 21 |.bz!...b.!:..c.!|
00005B00: 81 20 49 B2 33 31 39 20 A4 20 33 38 34 00 1F 63 |. I.319 . 384..c|
00005B10: 98 21 87 20 41 3A 20 97 20 49 2C 41 3A 20 82 00 |.!. A: . I,A: ..|
00005B20: 2C 63 A2 21 97 20 32 35 31 2C 20 30 00 3B 63 AC |,c.!. 251, 0.;c.|
00005B30: 21 97 20 32 35 32 2C 20 31 39 32 00 50 63 B6 21 |!. 252, 192.Pc.!|
00005B40: 81 20 49 B2 30 20 A4 20 34 39 3A 20 87 20 41 24 |. I.0 . 49: . A$|
00005B50: 00 63 63 C0 21 9E 20 33 31 39 2C 41 24 3A 20 82 |.cc.!. 319,A$: .|
00005B60: 3A 20 8E 00 69 63 CA 21 3A 00 84 63 D4 21 83 33 |: ..ic.!:..c.!.3|
00005B70: 32 2C 32 35 33 2C 31 37 34 2C 33 32 2C 31 35 38 |2,253,174,32,158|
00005B80: 2C 31 37 33 00 9F 63 DE 21 83 33 32 2C 31 36 33 |,173..c.!.32,163|
00005B90: 2C 31 38 32 2C 31 33 33 2C 33 36 2C 31 36 32 00 |,182,133,36,162.|
00005BA0: B7 63 E8 21 83 30 2C 31 36 30 2C 32 35 35 2C 33 |.c.!.0,160,255,3|
00005BB0: 32 2C 31 30 32 2C 31 00 CF 63 F2 21 83 31 30 2C |2,102,1..c.!.10,|
00005BC0: 31 30 2C 31 30 2C 31 30 2C 67 FF FF FF FF FF FF |10,10,10,g......|
00005BD0: DC FF 0B FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00005BE0: FF FF FF FF FF FF FF FF FF FC FF FF FF FF FF FF |................|
00005BF0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00005C00: FF FF FF FF 71 FF 6F FF FF FF FF FF FF FF FF FF |....q.o.........|
00005C10: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00005C20: FF FF 7F FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00005C30: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00005C40: FF FF FF FF FF FF 32 30 31 2C 36 35 2C 31 34 34 |......201,65,144|
00005C50: 2C 39 00 68 64 2E 22 83 32 33 33 2C 31 2C 34 31 |,9.hd.".233,1,41|
00005C60: 2C 31 35 2C 31 36 2C 32 00 81 64 38 22 83 31 30 |,15,16,2..d8".10|
00005C70: 34 2C 31 30 34 2C 39 36 2C 37 36 2C 38 2C 31 37 |4,104,96,76,8,17|
00005C80: 35 00 87 64 42 22 3A 00 D3 64 4C 22 83 45 4D 4D |5..dB":..dL".EMM|
00005C90: 44 4D 41 41 49 44 41 41 41 41 41 41 41 41 41 41 |DMAAIDAAAAAAAAAA|
00005CA0: 41 41 41 49 41 41 41 41 41 41 41 41 41 41 41 41 |AAAIAAAAAAAAAAAA|
00005CB0: 41 41 45 41 41 45 44 45 44 44 44 41 41 49 41 41 |AAEAAEDEDDDAAIAA|
00005CC0: 41 41 41 43 41 41 41 41 41 41 41 41 41 41 41 41 |AAACAAAAAAAAAAAA|
00005CD0: 41 41 41 00 1F 65 56 22 83 41 41 41 41 41 41 41 |AAA..eV".AAAAAAA|
00005CE0: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005CF0: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005D00: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005D10: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 00 |AAAAAAAAAAAAAAA.|
00005D20: 6B 65 60 22 83 41 41 41 41 41 41 41 41 41 41 41 |ke`".AAAAAAAAAAA|
00005D30: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005D40: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005D50: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005D60: 41 41 41 41 41 41 41 41 41 41 41 00 B7 65 6A 22 |AAAAAAAAAAA..ej"|
00005D70: 83 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |.AAAAAAAAAAAAAAA|
00005D80: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005D90: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005DA0: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005DB0: 41 41 41 41 41 41 41 00 03 66 74 22 83 41 41 41 |AAAAAAA..ft".AAA|
00005DC0: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005DD0: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005DE0: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005DF0: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005E00: 41 41 41 00 4F 66 7E 22 83 41 41 41 41 41 41 41 |AAA.Of~".AAAAAAA|
00005E10: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005E20: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00005E30: 41 4B 4E 41 45 4D 41 41 4A 44 41 49 4E 43 44 4D |AKNAEMAAJDAINCDM|
00005E40: 41 4B 4A 44 4B 49 4E 43 45 4D 41 4B 4A 41 41 00 |AKJDKINCEMAKJAA.|
00005E50: 9B 66 88 22 83 43 41 42 4E 4D 46 4B 4A 41 43 49 |.f.".CABNMFKJACI|
00005E60: 4E 41 4A 4D 41 43 41 4B 49 4D 47 4D 4A 41 4E 50 |NAJMACAKIMGMJANP|
00005E70: 41 42 50 4D 4A 42 45 4E 41 41 4D 4B 4F 41 4A 4D |ABPMJBENAAMKOAJM|
00005E80: 41 4F 41 41 43 50 41 4F 4F 4D 4F 41 4A 4D 41 4E |AOAACPAOOMOAJMAN|
00005E90: 41 41 4A 4B 4F 41 4A 4D 41 4A 4E 00 E7 66 92 22 |AAJKOAJMAJN..f."|
00005EA0: 83 43 44 4D 41 4F 4F 41 4A 4D 41 43 41 4C 48 4D |.CDMAOOAJMACALHM|
00005EB0: 46 45 4D 4E 4B 4D 41 43 41 4C 48 4D 46 4B 4F 41 |FEMNKMACALHMFKOA|
00005EC0: 4A 4D 41 4D 4B 4B 4A 41 41 49 4E 42 49 4D 41 4C |JMAMKKJAAINBIMAL|
00005ED0: 4E 43 44 4D 41 49 4E 42 4D 4D 41 4D 4A 46 45 4E |NCDMAINBMMAMJFEN|
00005EE0: 41 41 46 4D 4B 4D 4B 00 33 67 9C 22 83 4C 4E 43 |AAFMKMK.3g.".LNC|
00005EF0: 44 4D 41 49 4E 42 4C 4D 41 4D 4A 46 43 50 41 41 |DMAINBLMAMJFCPAA|
00005F00: 45 4D 4A 46 48 4E 41 41 49 4D 4B 4B 4A 43 4D 4E |EMJFHNAAIMKKJCMN|
00005F10: 4E 43 44 4D 41 50 41 41 4C 4B 4A 41 47 43 41 42 |NCDMAPAALKJAGCAB|
00005F20: 4E 4D 46 43 41 4B 41 4D 47 43 41 50 4B 4D 43 4D |NMFCAKAMGCAPKMCM|
00005F30: 4B 45 49 00 7F 67 A6 22 83 4C 4E 43 44 4D 41 4D |KEI..g.".LNCDMAM|
00005F40: 4A 46 46 50 41 42 49 4D 4A 46 41 50 41 42 45 4D |JFFPABIMJFAPABEM|
00005F50: 4A 46 44 50 41 41 45 47 49 45 4D 43 4F 4D 42 4B |JFDPAAEGIEMCOMBK|
00005F60: 4A 46 45 4D 4E 42 4D 4D 41 4E 41 41 46 4B 4A 49 |JFEMNBMMANAAFKJI|
00005F70: 41 49 4E 42 49 4D 41 47 49 4D 4B 4E 4E 43 44 00 |AINBIMAGIMKNNCD.|
00005F80: CB 67 B0 22 83 4D 41 4E 41 4D 4E 4B 4E 41 4A 4D |.g.".MANAMNKNAJM|
00005F90: 41 4B 43 43 44 4B 41 4D 41 43 41 4C 4E 50 50 4B |AKCCDKAMACALNPPK|
00005FA0: 4A 41 49 43 41 4E 49 4D 46 43 41 45 43 4D 46 50 |JAICANIMFCAECMFP|
00005FB0: 41 41 44 43 41 50 46 4D 43 4B 4A 41 43 43 41 42 |AADCAPFMCKJACCAB|
00005FC0: 4E 4D 46 4B 4E 42 4C 4D 41 4D 4A 00 17 68 BA 22 |NMFKNBLMAMJ..h."|
00005FD0: 83 46 43 4E 41 41 44 45 4D 42 45 4D 44 4B 4A 41 |.FCNAADEMBEMDKJA|
00005FE0: 41 49 4E 41 4B 4D 41 49 4E 41 4D 4D 41 49 4E 42 |AINAKMAINAMMAINB|
00005FF0: 4A 4D 41 49 4E 42 4B 4D 41 49 4E 41 50 4D 41 43 |JMAINBKMAINAPMAC|
00006000: 41 4F 45 4D 43 4B 4A 49 41 49 4E 41 4C 4D 41 4B |AOEMCKJIAINALMAK|
00006010: 4A 41 41 49 4E 41 4F 00 63 68 C4 22 83 4D 41 49 |JAAINAO.ch.".MAI|
00006020: 4E 42 41 4D 41 49 4E 42 42 4D 41 43 41 4C 4D 4D |NBAMAINBBMACALMM|
00006030: 43 4B 4E 42 41 4D 41 4E 41 42 42 4B 4E 41 46 4D |CKNBAMANABBKNAFM|
00006040: 41 4D 4A 41 45 4E 41 41 44 45 4D 48 46 4D 43 4D |AMJAENAADEMHFMCM|
00006050: 4A 42 49 4E 41 41 44 43 41 50 4B 4D 43 43 41 48 |JBINAADCAPKMCCAH|
00006060: 42 4D 45 00 AF 68 CE 22 83 4D 4A 49 45 4E 41 4F |BME..h.".MJIENAO|
00006070: 41 4B 4E 41 42 4D 49 42 49 47 4E 41 43 4D 49 42 |AKNABMIBIGNACMIB|
00006080: 49 4D 4A 50 50 50 41 41 47 43 41 4E 4B 4D 43 45 |IMJPPPAAGCANKMCE|
00006090: 4D 4B 41 4D 42 4B 4E 42 42 4D 41 44 49 4F 4E 49 |MKAMBKNBBMADIONI|
000060A0: 44 4D 49 42 49 4D 4E 49 44 4D 49 4E 41 4F 4E 00 |DMIBIMNIDMINAON.|
000060B0: FB 68 D8 22 83 4F 4F 41 50 4D 41 4B 43 41 42 4C |.h.".OOAPMAKCABL|
000060C0: 4E 41 41 4D 49 4D 4E 41 50 4D 41 50 41 41 47 4D |NAAMIMNAPMAPAAGM|
000060D0: 4F 41 50 4D 41 45 4D 45 45 4D 43 4B 4E 41 4B 4D |OAPMAEMEEMCKNAKM|
000060E0: 41 50 41 45 43 4B 41 41 41 4B 43 41 45 4C 4E 41 |APAECKAAAKCAELNA|
000060F0: 41 4D 48 4E 4E 42 43 4D 41 4E 41 00 47 69 E2 22 |AMHNNBCMANA.Gi."|
00006100: 83 41 46 4D 4B 42 41 50 46 4B 41 41 47 49 4D 41 |.AFMKBAPFKAAGIMA|
00006110: 4A 4D 41 4B 43 41 49 43 41 4D 4A 50 50 4B 4F 41 |JMAKCAICAMJPPKOA|
00006120: 4A 4D 41 4C 4E 41 41 4D 48 43 4D 42 49 4D 41 42 |JMALNAAMHCMBIMAB|
00006130: 41 41 44 43 41 4B 43 4D 43 43 41 4E 43 50 50 43 |AADCAKCMCCANCPPC|
00006140: 41 4C 48 50 50 4E 41 00 93 69 EC 22 83 43 50 4F |ALHPPNA..i.".CPO|
00006150: 4F 41 4A 4D 41 4B 4E 41 4C 4D 41 4D 4E 41 4A 4D |OAJMAKNALMAMNAJM|
00006160: 41 4E 41 4E 50 43 4D 41 4D 4D 41 42 41 41 44 45 |ANANPCMAMMABAADE|
00006170: 4D 41 46 4D 44 43 41 48 44 4D 47 4B 43 41 41 4C |MAFMDCAHDMGKCAAL|
00006180: 4E 41 44 4D 49 4A 4E 41 41 4D 48 4F 49 42 41 50 |NADMIJNAAMHOIBAP|
00006190: 48 49 4F 00 DF 69 F6 22 83 41 4B 4D 41 4B 4A 41 |HIO..i.".AKMAKJA|
000061A0: 47 43 41 46 50 4D 45 43 41 4D 4D 50 50 45 4D 4B |GCAFPMECAMMPPEMK|
000061B0: 41 4D 42 43 41 45 43 4D 46 4B 4A 41 42 43 41 42 |AMBCAECMFKJABCAB|
000061C0: 4E 4D 46 4B 4A 41 48 43 41 42 4E 4D 46 4B 4A 41 |NMFKJAHCABNMFKJA|
000061D0: 4E 43 41 4C 48 4D 46 43 41 50 46 4D 43 4B 4A 00 |NCALHMFCAPFMCKJ.|
000061E0: 2B 6A 00 23 83 49 41 49 4E 41 4D 4D 41 4B 43 48 |+j.#.IAINAMMAKCH|
000061F0: 50 4C 4E 41 41 4D 48 49 4E 41 4E 4D 41 4D 4A 42 |PLNAAMHINANMAMJB|
00006200: 4B 50 41 41 48 4D 4A 41 41 50 41 41 44 45 4D 4A |KPAAHMJAAPAADEMJ|
00006210: 4C 4D 43 4C 4E 41 41 4D 48 4D 4E 41 4E 4D 41 4E |LMCLNAAMHMNANMAN|
00006220: 41 41 47 4D 4B 42 41 50 46 45 4D 00 77 6A 0A 23 |AAGMKBAPFEM.wj.#|
00006230: 83 41 46 4D 44 4F 49 49 4F 41 4C 4D 41 45 4D 41 |.AFMDOIIOALMAEMA|
00006240: 43 4D 43 43 4A 48 50 4D 4A 45 42 4A 41 42 44 4D |CMCCJHPMJEBJABDM|
00006250: 4A 46 4C 4C 41 41 46 41 4A 43 41 45 4D 4C 4C 4D |JFLLAAFAJCAEMLLM|
00006260: 43 4D 4A 47 42 4A 41 41 47 4D 4A 48 4C 4C 41 41 |CMJGBJAAGMJHLLAA|
00006270: 43 43 4A 4E 50 47 41 00 C3 6A 14 23 83 43 41 46 |CCJNPGA..j.#.CAF|
00006280: 49 4D 45 43 41 4F 42 50 50 50 41 42 44 43 41 45 |IMECAOBPPPABDCAE|
00006290: 45 4D 45 4E 41 41 42 47 41 43 41 46 44 4D 45 4A |EMENAABGACAFDMEJ|
000062A0: 41 50 41 43 41 4F 45 4D 43 47 49 47 49 45 4D 4B |APACAOEMCGIGIEMK|
000062B0: 41 4D 42 45 4D 50 46 4D 43 4F 4F 41 4F 4D 41 4B |AMBEMPFMCOOAOMAK|
000062C0: 4A 41 4B 00 0F 6B 1E 23 83 4D 4E 41 4F 4D 41 50 |JAK..k.#.MNAOMAP|
000062D0: 41 42 42 4B 4A 45 4F 49 4E 4E 42 4D 45 4B 4A 42 |ABBKJEOINNBMEKJB|
000062E0: 46 43 41 46 50 4D 45 47 41 4B 4A 41 45 43 41 46 |FCAFPMEGAKJAECAF|
000062F0: 50 4D 45 47 41 4B 4A 42 49 43 41 46 50 4D 45 4B |PMEGAKJBICAFPMEK|
00006300: 4A 41 4A 43 41 41 4D 4D 44 43 41 4B 41 4D 47 00 |JAJCAAMMDCAKAMG.|
00006310: 5B 6B 28 23 83 47 49 47 49 47 41 4B 4A 41 47 43 |[k(#.GIGIGAKJAGC|
00006320: 41 46 50 4D 45 4B 4A 41 44 43 41 42 4E 4D 46 4B |AFPMEKJADCABNMFK|
00006330: 4A 41 49 45 4D 4D 44 50 50 43 41 4F 42 50 50 4E |JAIEMMDPPCAOBPPN|
00006340: 41 41 44 43 41 50 4B 4D 43 43 41 45 45 4D 45 43 |AADCAPKMCCAEEMEC|
00006350: 4A 41 49 50 41 50 42 4B 4A 41 41 00 A7 6B 32 23 |JAIPAPBKJAA..k2#|
00006360: 83 49 4E 42 4A 4D 41 49 4E 42 4B 4D 41 4B 4A 41 |.INBJMAINBKMAKJA|
00006370: 42 49 4E 41 41 4D 49 49 4E 41 42 4D 49 45 4A 50 |BINAAMIINABMIEJP|
00006380: 50 49 4E 41 43 4D 49 43 41 4F 42 50 50 4E 41 41 |PINACMICAOBPPNAA|
00006390: 47 43 41 4F 50 4D 43 43 41 50 4B 4D 43 43 41 45 |GCAOPMCCAPKMCCAE|
000063A0: 45 4D 45 4E 41 50 41 00 F3 6B 3C 23 83 4B 4E 41 |EMENAPA..k<#.KNA|
000063B0: 46 4D 41 4D 4A 42 49 4E 41 41 44 43 41 50 4B 4D |FMAMJBINAADCAPKM|
000063C0: 43 4D 4A 42 46 4E 41 4F 43 4B 4A 41 44 49 4E 42 |CMJBFNAOCKJADINB|
000063D0: 41 4D 41 4B 43 41 41 49 4F 42 42 4D 41 49 4F 41 |AMAKCAAIOBBMAIOA|
000063E0: 49 4D 41 43 41 4F 42 50 50 4E 41 41 44 45 4D 41 |IMACAOBPPNAADEMA|
000063F0: 4F 4D 45 00 3F 6C 46 23 83 4B 43 41 49 43 41 4D |OME.?lF#.KCAICAM|
00006400: 47 50 50 43 41 4F 45 50 50 43 4D 42 49 4D 41 42 |GPPCAOEPPCMBIMAB|
00006410: 41 41 44 43 41 4B 43 4D 43 49 4E 41 46 4D 41 43 |AADCAKCMCINAFMAC|
00006420: 41 4C 48 50 50 43 4A 4D 44 49 4E 41 49 4D 41 4B |ALHPPCJMDINAIMAK|
00006430: 4A 41 41 43 41 4C 48 4D 46 4B 4E 41 49 4D 41 00 |JAACALHMFKNAIMA.|
00006440: 8B 6C 50 23 83 4E 41 41 4D 4B 4E 41 46 4D 41 43 |.lP#.NAAMKNAFMAC|
00006450: 41 48 42 4D 45 4D 4A 49 44 4E 41 4D 4A 50 41 43 |AHBMEMJIDNAMJPAC|
00006460: 49 4B 4E 41 46 4D 41 43 41 48 42 4D 45 4D 4A 49 |IKNAFMACAHBMEMJI|
00006470: 44 50 41 42 4F 4B 4A 42 4B 49 4E 41 4E 4D 41 4B |DPABOKJBKINANMAK|
00006480: 4E 41 46 4D 41 4D 4A 42 4B 4E 41 00 D7 6C 5A 23 |NAFMAMJBKNA..lZ#|
00006490: 83 41 46 4B 4A 41 41 49 4E 41 4E 4D 41 4B 4E 41 |.AFKJAAINANMAKNA|
000064A0: 4E 4D 41 49 4E 41 46 4D 41 43 41 48 42 4D 45 4D |NMAINAFMACAHBMEM|
000064B0: 4A 49 44 4E 41 50 4A 4B 4E 42 42 4D 41 49 4E 49 |JIDNAPJKNBBMAINI|
000064C0: 44 4D 49 4B 4A 41 41 49 4E 41 4A 4D 41 43 41 4F |DMIKJAAINAJMACAO|
000064D0: 42 50 50 50 41 44 4B 00 23 6D 64 23 83 4B 4F 41 |BPPPADK.#md#.KOA|
000064E0: 4A 4D 41 4C 4E 41 41 4D 49 43 41 46 50 4D 45 4F |JMALNAAMICAFPMEO|
000064F0: 4F 41 4A 4D 41 4B 4A 49 45 4D 4E 41 4A 4D 41 4E |OAJMAKJIEMNAJMAN|
00006500: 41 4F 49 43 41 46 49 4D 45 43 41 45 45 4D 45 50 |AOICAFIMECAEEMEP|
00006510: 41 41 4D 43 41 4F 42 50 50 50 41 42 4B 43 41 46 |AAMCAOBPPPABKCAF|
00006520: 44 4D 45 00 6F 6D 6E 23 83 4A 41 50 42 4C 41 4D |DME.omn#.JAPBLAM|
00006530: 4A 4B 4E 41 46 4D 41 4D 4A 42 46 4E 41 41 49 4B |JKNAFMAMJBFNAAIK|
00006540: 4A 45 4F 49 4E 4E 42 4D 45 45 4D 4D 45 4D 44 4D |JEOINNBMEEMMEMDM|
00006550: 4A 42 49 4E 41 41 44 43 41 50 4B 4D 43 4D 4A 41 |JBINAADCAPKMCMJA|
00006560: 47 4E 41 4E 46 4B 4E 41 49 4D 41 50 41 42 4A 00 |GNANFKNAIMAPABJ.|
00006570: BB 6D 78 23 83 43 41 4F 50 4D 43 43 41 46 49 4D |.mx#.CAOPMCCAFIM|
00006580: 45 4B 46 4B 42 44 41 41 46 43 41 45 45 4D 45 4E |EKFKBDAAFCAEEMEN|
00006590: 41 50 48 4B 4E 41 49 4D 41 43 4A 45 41 50 41 4E |APHKNAIMACJEAPAN|
000065A0: 4F 45 4D 41 4B 4D 44 4F 4F 41 42 4D 49 4B 4A 50 |OEMAKMDOOABMIKJP|
000065B0: 50 45 4E 41 42 4D 49 49 4E 41 43 00 07 6E 82 23 |PENABMIINAC..n.#|
000065C0: 83 4D 49 43 41 48 44 4D 47 45 4D 46 47 4D 44 4B |.MICAHDMGEMFGMDK|
000065D0: 43 41 46 43 41 4D 47 50 50 43 41 4F 45 50 50 49 |CAFCAMGPPCAOEPPI|
000065E0: 4E 41 46 4D 41 43 41 4C 48 50 50 47 41 4B 46 4B |NAFMACALHPPGAKFK|
000065F0: 42 4D 4A 41 43 47 41 4B 4A 41 41 49 46 4B 42 49 |BMJACGAKJAAIFKBI|
00006600: 46 4B 43 47 41 45 49 00 53 6E 8C 23 83 4B 43 41 |FKCGAEI.Sn.#.KCA|
00006610: 46 43 41 4D 4A 50 50 4B 4E 4B 42 41 43 43 4A 41 |FCAMJPPKNKBACCJA|
00006620: 44 4E 41 50 4A 47 49 43 41 4E 43 50 50 47 41 4B |DNAPJGICANCPPGAK|
00006630: 4E 41 46 4D 41 4B 4F 42 41 4D 41 4A 4E 41 41 4D |NAFMAKOBAMAJNAAM|
00006640: 49 42 49 47 4E 42 42 4D 41 49 4E 42 42 4D 41 4F |IBIGNBBMAINBBMAO|
00006650: 4F 42 41 00 9F 6E 96 23 83 4D 41 4F 49 49 4B 47 |OBA..n.#.MAOIIKG|
00006660: 41 4A 48 4D 45 4C 42 4D 45 4C 50 4D 45 4E 46 4D |AJHMELBMELPMENFM|
00006670: 45 4F 49 4D 45 50 4B 4D 45 41 4C 4D 46 48 44 4D |EOIMEPKMEALMFHDM|
00006680: 41 41 4E 47 47 45 4A 45 4D 45 46 45 4F 45 42 45 |AANGGEJEMEFEOEBE|
00006690: 4E 45 46 43 41 45 47 45 50 46 43 43 41 46 4A 00 |NEFCAEGEPFCCAFJ.|
000066A0: EB 6E A0 23 83 45 50 46 46 46 43 43 41 45 45 45 |.n.#.EPFFFCCAEEE|
000066B0: 4A 46 44 45 4C 44 4B 43 41 41 41 41 4E 47 45 47 |JFDELDKCAAAANGEG|
000066C0: 4A 48 44 47 4C 43 41 47 46 48 43 48 43 47 50 48 |JHDGLCAGFHCHCGPH|
000066D0: 43 44 4B 43 41 41 41 48 45 47 50 48 45 43 41 47 |CDKCAAAHEGPHECAG|
000066E0: 43 47 4D 47 4C 43 41 44 41 44 41 00 37 6F AA 23 |CGMGLCADADA.7o.#|
000066F0: 83 44 41 44 41 43 41 43 41 47 44 47 49 47 4C 44 |.DADACACAGDGIGLD|
00006700: 4E 43 41 41 4E 4A 42 41 41 48 45 48 43 47 42 47 |NCAANJBAAHEHCGBG|
00006710: 4F 48 44 47 47 47 46 48 43 43 41 47 44 47 50 47 |OHDGGGFHCCAGDGPG|
00006720: 4E 48 41 47 4D 47 46 48 45 47 46 41 4E 41 41 48 |NHAGMGFHEGFANAAH|
00006730: 45 48 43 47 42 47 4F 00 83 6F B4 23 83 48 44 47 |EHCGBGO..o.#.HDG|
00006740: 47 47 46 48 43 43 41 47 42 47 43 47 50 48 43 48 |GGFHCCAGBGCGPHCH|
00006750: 45 47 46 47 45 41 4E 41 41 48 49 47 4E 47 50 47 |EGFGEANAAHIGNGPG|
00006760: 45 47 46 47 4E 43 41 48 41 48 43 47 50 48 45 47 |EGFGNCAHAHCGPHEG|
00006770: 50 47 44 47 50 47 4D 41 4E 41 41 47 4A 47 4F 48 |PGDGPGMANAAGJGOH|
00006780: 47 47 42 00 CF 6F BE 23 83 47 4D 47 4A 47 45 43 |GGB..o.#.GMGJGEC|
00006790: 41 47 47 47 4A 47 4D 47 46 47 4F 47 42 47 4E 47 |AGGGJGMGFGOGBGNG|
000067A0: 46 41 4E 41 41 45 49 4B 43 41 44 43 41 4D 4A 50 |FANAAEIKCADCAMJP|
000067B0: 50 47 49 41 4B 4B 4B 4C 4E 49 48 4D 45 49 46 4D |PGIAKKKLNIHMEIFM|
000067C0: 44 4F 49 4C 4E 49 48 4D 45 49 46 4D 45 4B 41 00 |DOILNIHMEIFMEKA.|
000067D0: 1B 70 C8 23 83 41 41 4C 42 4D 44 4D 4A 41 41 50 |.p.#.AALBMDMJAAP|
000067E0: 41 41 49 43 41 4E 43 50 50 4D 49 4D 41 41 41 4E |AAICANCPPMIMAAAN|
000067F0: 41 50 43 47 41 4B 4A 41 41 49 4E 48 44 4D 41 49 |APCGAKJAAINHDMAI|
00006800: 4E 42 48 4D 41 4B 43 41 50 43 41 4D 47 50 50 43 |NBHMAKCAPCAMGPPC|
00006810: 41 4F 45 50 50 49 4E 41 46 4D 41 00 67 70 D2 23 |AOEPPINAFMA.gp.#|
00006820: 83 43 41 4C 48 50 50 4E 41 41 4F 4B 4E 41 46 4D |.CALHPPNAAOKNAFM|
00006830: 41 4B 4F 42 48 4D 41 4A 4E 48 44 4D 41 4F 4F 42 |AKOBHMAJNHDMAOOB|
00006840: 48 4D 41 4E 41 4F 48 4B 4F 42 48 4D 41 4B 4A 41 |HMANAOHKOBHMAKJA|
00006850: 41 4A 4E 48 44 4D 41 4B 4A 41 48 43 41 42 4E 4D |AJNHDMAKJAHCABNM|
00006860: 46 43 41 4B 41 4D 47 00 B3 70 DC 23 83 4B 4E 48 |FCAKAMG..p.#.KNH|
00006870: 44 4D 41 41 4E 48 45 4D 41 43 4A 41 50 47 41 4B |DMAANHEMACJAPGAK|
00006880: 4A 41 44 43 41 42 4E 4D 46 4B 43 41 41 49 4F 41 |JADCABNMFKCAAIOA|
00006890: 4A 4D 41 43 41 4B 49 4D 47 4D 4A 42 45 50 41 42 |JMACAKIMGMJBEPAB|
000068A0: 48 4B 4F 41 4A 4D 41 4A 4E 43 44 4D 41 43 41 4C |HKOAJMAJNCDMACAL|
000068B0: 48 4D 46 00 FF 70 E6 23 83 4B 4F 41 4A 4D 41 4C |HMF..p.#.KOAJMAL|
000068C0: 4E 43 44 4D 41 4F 4F 41 4A 4D 41 4D 4A 41 4E 4E |NCDMAOOAJMAMJANN|
000068D0: 41 4F 44 47 41 4B 4F 41 4A 4D 41 50 41 4E 4E 4D |AODGAKOAJMAPANNM|
000068E0: 4F 41 4A 4D 41 43 41 4C 48 4D 46 45 4D 49 4C 4D |OAJMACALHMFEMILM|
000068F0: 46 45 49 4B 43 41 44 43 41 4D 4A 50 50 47 49 00 |FEIKCADCAMJPPGI.|
00006900: 4B 71 F0 23 83 43 41 4E 43 50 50 47 41 42 41 43 |Kq.#.CANCPPGABAC|
00006910: 48 50 43 41 44 47 45 41 41 41 4B 41 41 41 42 41 |HPCADGEAAAKAAABA|
00006920: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 43 |AAAAAAAAAAAAAAAC|
00006930: 41 43 41 41 41 41 41 41 41 4B 49 4B 4F 41 44 4D |ACAAAAAAAKIKOADM|
00006940: 41 43 41 4F 4C 4D 46 47 41 4B 4A 00 97 71 FA 23 |ACAOLMFGAKJ..q.#|
00006950: 83 41 41 43 41 4C 4E 50 50 4B 4A 41 50 4B 4F 41 |.AACALNPPKJAPKOA|
00006960: 44 4D 41 4B 49 43 41 4C 4B 50 50 43 41 4D 41 50 |DMAKICALKPPCAMAP|
00006970: 50 47 41 4B 43 41 45 4B 4A 44 41 4A 4E 4D 4F 4D |PGAKCAEKJDAJNMOM|
00006980: 46 4D 4B 42 41 50 4B 4F 49 4B 4E 4D 4D 4D 46 44 |FMKBAPKOIKNMMMFD|
00006990: 49 50 4E 4D 43 4D 46 00 E3 71 04 24 83 49 4E 4E |IPNMCMF..q.$.INN|
000069A0: 47 4D 46 4B 4E 4D 4E 4D 46 50 4E 4D 44 4D 46 49 |GMFKNMNMFPNMDMFI|
000069B0: 4E 4E 48 4D 46 4A 41 42 4C 49 4F 41 4A 4D 41 49 |NNHMFJABLIOAJMAI|
000069C0: 4B 45 4B 4B 4B 50 4F 4D 4F 4D 46 4B 4F 41 4A 4D |KEKKKPOMOMFKOAJM|
000069D0: 41 4B 4E 4E 47 4D 46 49 4E 4D 4D 4D 46 4B 4E 4E |AKNNGMFINMMMFKNN|
000069E0: 48 4D 46 00 2F 72 0E 24 83 49 4E 4D 4E 4D 46 45 |HMF./r.$.INMNMFE|
000069F0: 4D 50 4E 4D 46 4F 49 4F 49 4F 41 41 4B 4E 41 4D |MPNMFOIOIOAAKNAM|
00006A00: 4B 4B 43 41 45 47 41 4B 4A 41 41 49 4E 42 4E 4D |KKCAEGAKJAAINBNM|
00006A10: 41 4C 4E 42 4F 4D 41 43 41 4C 44 4D 47 50 41 41 |ALNBOMACALDMGPAA|
00006A20: 50 43 41 46 44 4D 47 4C 4E 42 50 4D 41 43 41 00 |PCAFDMGLNBPMACA.|
00006A30: 7B 72 18 24 83 4C 44 4D 47 50 41 41 45 43 41 46 |{r.$.LDMGPAAECAF|
00006A40: 44 4D 47 4F 49 47 41 45 49 41 4F 42 4E 4D 41 4B |DMGOIGAEIAOBNMAK|
00006A50: 4E 42 4E 4D 41 41 4F 42 4E 4D 41 41 4F 42 4E 4D |NBNMAAOBNMAAOBNM|
00006A60: 41 42 49 47 4E 42 4E 4D 41 49 4E 42 4E 4D 41 47 |ABIGNBNMAINBNMAG|
00006A70: 49 44 49 4F 4A 44 41 42 49 47 4E 00 C7 72 22 24 |IDIOJDABIGN..r"$|
00006A80: 83 42 4E 4D 41 49 4E 42 4E 4D 41 47 41 4B 4A 45 |.BNMAINBNMAGAKJE|
00006A90: 42 49 4E 4E 42 4D 45 4F 4F 42 4A 4D 41 4E 41 41 |BINNBMEOOBJMANAA|
00006AA0: 44 4F 4F 42 4B 4D 41 4B 4E 42 4A 4D 41 49 4E 4D |DOOBKMAKNBJMAINM|
00006AB0: 4D 4D 46 4B 4E 42 4B 4D 41 49 4E 4D 4E 4D 46 43 |MMFKNBKMAINMNMFC|
00006AC0: 41 50 43 4D 46 4B 43 00 13 73 2C 24 83 41 45 4C |APCMFKC..s,$.AEL|
00006AD0: 4E 4D 4F 4D 46 4A 4E 4D 47 4D 45 4D 4B 4E 41 50 |NMOMFJNMGMEMKNAP|
00006AE0: 48 4B 4A 41 43 43 41 42 4E 4D 46 47 41 43 41 46 |HKJACCABNMFGACAF|
00006AF0: 49 4D 45 43 45 4B 43 42 41 50 4D 47 41 4B 43 41 |IMECEKCBAPMGAKCA|
00006B00: 41 43 41 4D 47 50 50 43 41 4F 45 50 50 50 41 50 |ACAMGPPCAOEPPPAP|
00006B10: 47 47 41 00 2F 73 36 24 83 4D 4A 44 41 4A 41 41 |GGA./s6$.MJDAJAA|
00006B20: 45 4D 4A 44 4B 4A 41 41 43 4B 4A 41 41 47 41 00 |EMJDKJAACKJAAGA.|
00006B30: 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
00006B40: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
00006B50: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
00006B60: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
00006B70: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
00006B80: FF |. |
..(.... --------------------------------
.......S.... XMOBUF VER 7.4.2A SOURCE C
ODE.S.(.. (C) 19C.....R..V.R........
1...PV....Q..P...P..TR........B...1.....
...P...Q.......P....P.R......0.....1....
.................................3....1.
.......J...1..--------------------------
----.7.N.. MAIN TERMINAL LOOP.].X.. --
-----------------------------.S....#5,R$
:.R$."".270.....R.F%(F(R$)):.L$G(R);:...
..7........R...4...............6..F.....
......6.Q....................W..........
..6..F.W........V.....6.WF...BM..(BK.(BJ
.255)).).H..BM.180..5,G(XF);:XO.W.9.R..B
(198).280.B....130.U....J$J$"[ BUFFER FU
LL & CLOSED ]":BD.0:.5,G(XF);......J$"[
CTRL-Q CONTINUES ]"......130......O$;.A.
...XO..5,G(XN);:BM..:XO........A$:.646,D
1:.A$.G(189).2290:FX.1:. COMMODORE-X FOR
XMO.$."..A$.""..G(164)G(157);:.130:. CU
RSOR.5.,.X.0:..BR.370.E.6..BR.X.F(A$).T.
@..X.13..L$;.D.J..X.145..L$;.T.T..X.157.
.L$;...^..X.17..L$;...H..X.19..L$;...R..
U,0.F.|..A$.G$..L$J$:.2570:. <F1> TO MAI
N MENU......A$.G(134).4400:. <F3> TO BUF
FER MENU......A$.G(135).4650:. <F5> OPEN
BUFFER.?....A$.G(136).4700:. <F7> CLOSE
BUFFER.F....A$.G(140).6040:. <F8> ZERO
BUFFER......A$.G(180)..8560:. COMMODORE
LOGO H TO HANG UP 1660......BR..A$;...B.
.5,G(T%(F(A$)));.I.L..130...V.. --------
----------------------...... SET UP AND
INITIALIZE ROUTINE.8.... --------------
----------------.\...D1.1:D2.9:D3.0:. DE
FAULT COLORS.|....646,D1:.53280,D2:.5328
1,D3.....E$.G(147):. CLRHOME......B(4915
2).76.550.V....E$:."POKING IN MACHINE LA
NGUAGE ":.8590...&.J$.G(13)...0..G(14)..
.:..3320:. GET USER COLORS.E.D..5,2,0,G(
0).G(0).G(61).G(1):. DEEPAKS 1200 BAUD O
PENER.S.N.. THANKS FOR THAT OPEN STATEME
NT, DEEPAK!.|.X..620...B..5,2,0,G(6).G(0
).G(0).G(0):. VANILLA 300 BAUD OPENER...
L.D1.B(646):D2.B(53280):D3.B(53281)...V.
.56,91:.52,91:. DEC. FOR BIGGER BUFFER-C
HECK FRE0 AFTER RUN 1ST.(...KS.1.N...R$.
"":. INSTEAD OF A$ FOR RX SIDE.D....T%(2
55):.F%(255).....L$.G(32).G(157):. SPACE
PLUS LEFT CRSR. ... 15:.15,8,15...... -
-----------------------...... DEFINE BUF
FER POINTERS...F.. ---------------------
---.&.P.BA.B(55).(256.B(56)):. START OF
BUFFER.F.Z.BB.40448:. TOP OF BASIC BUFFE
R:REM JR ONDA FIX-THANX ROBERT.....BC.0:
. BUFFER COUNTER.....BP.BA.1:. BUFFER NE
XTCHAR POINTER.I...BD.0:. BUFFER FLAG SE
T IF OPEN.....BE.BA.1:. BOTTOM OF BUFFER
.....BG.0:. BUFFER FORNEXT INDEX.%...BJ.
0:. RS232 STRT RX BFR.A. .BK.0:. RS232 E
ND RX BFR.].*.BM.0:. RS232 CHAR COUNT.Z.
4.BI.0:. BUFFER BLOCK SIZE...>.BR.BR:. 6
4 TO 64 FLAG...H.. ---------------------
---.O.R.. SET UP FORMATTING AND...\.. MI
SCELLANEOUS VARIABLES...F.. ------------
------------...P.XN.17. .Z.XF.19.*...U.2
12.E....56328,0:. START CLOCK.R...B1.565
77._...B2.56579.T...OH.B1:. FOR 1660....
.HI.32:. FOR 1660.....LO.255.HI:. FOR 16
60.E.J.M3.0:. MODEM 300 FLAG FOR 1660.Z.
T.B3.56329:. CLOCK.....D.256.....W.1."..
.PD.4:PS.7:. PRINTER DEVICE AND SECONDAR
Y DEFAULTS.:...E$.G(147):. CLRHOME.Y...J
$.G(13):. CARRIAGE RETURN.F...P$.G(19).
...F$.G(17):. CRSR DOWN...$.SP$.G(32):.
SPACE.Q...SQ$.SP$.SP$.SP$.SP$.SP$.SP$.SP
$.SP$.SP$.SP$:. 10 SPACES...8.SU$.SQ$.SQ
$:. 20 SPACES. .B.SS$.SP$.SP$.SP$.SP$.SP
$.SP$.SP$.SP$:. 8 SPACES.C.L.SO$.SP$.SP$
.SP$.SP$:. 4 SPACES.R.V.CL$.G(157).Y.`.C
L$.CL$.CL$.CL$.CL$:. 4 CRSR LEFTS...J.CM
$.SO$.CL$:. CLEAR 4 SPACES THEN BACKSPAC
E OVER THEM.G.T.SR$.J$.I(SQ$,5)...~.CU$.
G(145):. CRSR UP.....O.8.....G$.F$.F$.F$
.F$.F$:. 5 CRSR DOWNS.....BL$.P$.G$.J...
ER$.BL$.F$.F$.F$.SQ$.SQ$.SQ$.SQ$.CU$.G(1
3).|...AK$.BL$.F$.F$.F$.F$.SQ$.SQ$.SQ$.S
Q$.CU$.G(13).....LI$.G(164):.I.1.6:LI$.L
I$.LI$:.I:LI$.SP$.I(LI$,38)...D.E.0.I.N.
CR$.G(29)...X.EI$.CR$.CR$.CR$.....EJ$.EI
$.EI$.EI$.....EJ$.EJ$.EJ$:. 18 CRSR RIGH
TS./...ES$.P$.EI$.F$."STATUS->".D...UQ$.
BL$.G$.G$.F$.S...FC$.G(32).G(32).G(32).G
(157).G(157).G(157).}...ACK.6.....NAK.21
...(.EOT.4...2.CAN.24...<.Z.131...F.V.13
2...P.F.255...Z.TR.0:. DSK ERROR TRACK V
ARIABLE...D.SE.0:. DSK ERROR SECTOR VARI
ABLE...N.M.288...X.P.1."...C$.G(0).C...O
$.G(18).G(32).G(157).G(146).Q...G$.G(133
).W. .. -------------------------------.
..... PRINT FIRST USER SCREEN AND GET...
... DUPLEX SETTINGS FROM USER...... ----
---------------------------...H..E$LI$..
.R..SS$"XMODEM PROTOCOL TERMINAL"J$LI$.>
....ER$.SQ$.CU$CU$"XMOBUF - V7.4.2A"J$.C
....SQ$"(C) 1985 CHRIS KAISER".J$J$.....
.F$F$"<1> DELPHI/BBS/CIS - FULL-DUPLEX
"......F$"<2> GENIE/64 TO 64 - HALF-DUPL
EX"......F$"<3> CHANGE PRINTER DEVICE DE
FAULTS"......F$F$"ENTER CHOICE <1-3>"...
...2980.&."..A$."1".BR.0:.1640.>.,..A$."
2".BR..1:.1640.P.6..A$."3"..8500.Z.@..14
80...J.. -------------------------------
...T.. SET UP TRANSLATION TABLES.I.^.
. -------------------------------...H..E
$G$SO$"[ CREATING TRANSLATION TABLES ]".
..R.. ------------------------------.@.|
.. TRANSLATION TABLES UPDATED ON.E.... 1
0/14/85 TO MORE CLOSELY MATCH...... TRUE
ASCII - PET CONVERSION....... ---------
---------------------......J.1.64:. PASS
ES ALL CTRL CODES PUNCTUATION AND NUMBER
S CORRECTLY.....T%(J).J......J.'.B.T%(20
).8:. INST DEL = CTRL-H.@.L..J.65.90:. L
OWERCASE.O.V.T%(J).J.32.V....J.C....J.91
.95.O...T%(J).J.V....J......J.193.218:.
PET UPPERCASE.....T%(J).J.128......J.Y.&
.T%(146)..:. REVERSE VIDEO IS A NULL -C
K...0.T%(147).12:. CLRHOM = FORMFEED -CK
.H.:.T%(221).126:. SHIFTED MINUS EQUALS
TILDE FOR DECMATE EASYCOM ACCESS.S.D..J.
0.F._.N.K.T%(J).}.X..K..0.F%(K).J:F%(K.1
28).J...B..J...L.F%(19).0:F%(147).0.J.V.
F%(12).147:. FORMFEED WILL CLEARSCREEN -
CK.W...F%(10).0.!...F%(8).20:. CTRL H =
DELETE ON RECEIVE SIDE TOO. LESS GAFFE -
CK 851006.T...F%(127).20:. RECEIVED DELE
TE PRINTS PET DELETE.....F%(95).164:. UN
DERSCORE INSTEAD OF BACKARROW. BACKARROW
IS 95 -CK 851014.F.... ----------------
--------------...... DISPLAY MAIN TERMI
NAL SCREEN...... WITH USER REMINDERS FO
R F KEY.*.F.. DEFINITIONS.O.P..
------------------------------.{.Z..E$;
G(14):. CLEAR SCREEN AND SET LOCASE.....
BC.BB.BP......LI$J$......BR..SQ$" GENIE
/HALF-DUPLEX":.2060......SO$" DELPHI/BB
S/CIS FULL-DUPLEX"......B(659)..SQ$"300
BAUD TERMINAL":.2080:. FIXT 10/14 -CK.Q.
..." HIGH SPEED TERMINAL MODE - 1200 BA
UD":.2080.N. ..SQ$"<F1> = MAIN MENU"..
.*..SQ$"<F3> = BUFFER MENU"...4..F$" BU
FFER = <F5>OPEN <F7>CLOSE <F8>ZERO".D.>.
.LI$.M.H..130...R.. --------------------
---------.. \.. XMODEM PROTOCOL INVOCA
TION.. F...= P.. ROUTINE DETERMINES SEND
/RECV.B Z.. STATUS FROM USER THEN POKES
IN.. ... FILELENGTH TO 49161 ($C009).. .
.. FILENAME TO 49187 ($C023).E ... THEN
SYS TO 49411 ($C103)... ... BIG THANX TO
JOE O'HARA OF..!... MICROTECHNIC SOLUTI
ONS INC..,!... FOR THIS FAST ML ROUTINE
THAT.P!... STRIPS PADDING ON-THE-FLY AND
.T!J.. RUNS FASTER THAN ANY OTHER PD..!T
.. XMODEM IMPLEMENTATION -CK..!... -----
------------------------.C!...E$;G$..!..
."<S>END OR <R>ECEIVE? (ANY OTHER KEY":.
"ABORTS)".."...2980:WA$.A$.@"...F(WA$)..
82..F(WA$)..83.."[ TERMINAL MODE ]":.250
.N"..."FILETYPE <S>EQ OR <P>RG? <X> TO
ABORT".."...2980:.A$."X".2540.."$..A$."S
".2370.."...A$."P".2370.."8.."PRESS S OR
P OR X":.2330:. FLUNKED THE TEST ;GET A
NOTHER A$..#B.." V-------------
-V..#L.."FILENAME";DL$.H#V..C(DL$).16.."
FILENAME TOO LONG":.2370.P#`..WA$."R".WA
$."W":. WRITE ON RECEIVE..#J..WA$."S".WA
$."R":. READ ON SEND..#T.FI$.DL$.G(44).A
$.G(44).WA$.D#~..A$."P".2470..#...A$."S"
.."TRANSLATE TEXT FILE? <Y>/<N>..$..."<R
ETURN> DEFAULTS TO TRANSLATE.".R$...2980
:.A$.."N".FI$.FI$.G(44)."T":. TRANSLATE
BY DEFAULT..$..ML.49161:FI.C(FI$):.ML,FI
:. LENGTH OF FILENAME TO THIS ADDRESS.G$
..ML.49186:. POKE IN FILENAME STARTING A
T 49187..$...I.1.FI:.ML.I,F(J(FI$,I,1)):
.I..%D..G(18);"0:";FI$;" : ";.F%N..49411
:. BYPASSES MTS CUEING SEQUENCE WITH FIL
ENAME IN PLACE.M%X. 8..%...FX.1.FX.0:."[
TERMINAL MODE ]":.130:. C=X RETURNS TO
TRM -CK..%... --------------------------
----.L%... MAIN MENU DISPLAY..%... -----
-------------------------..%...G(14).E$.
.&...E$LI$J$.B&..." XMOBUF 64-V7.4.2A 10
/22/85 - MAIN MENU"J$LI$J$.\&(.." <1
> TERMINAL"..&2..SR$"<2> MTSINC XMODEM
FILE TRANSFER..&<..SR$"<3> BUFFER CONT
ROL.A&F..SR$"<4> DISK DIRECTORY"..&P..S
R$"<5> 1650/6420 AUTO-DIAL"..'Z..SR$"
<6> MITEY/HESII AUTO-DIAL".('D...15)"AN
D CBM 1660 DIAL".J'N...5)"<7> XMOBUF AU
TO-ANSWER".S'X..SR$"<8> HAYES/SIGNALMAN
AUTO-DIAL"..'...SR$"<9> QUIT PROGRAM"F
$..'..." C=X FOR XMODEM : C=H TO HANGUP
1660".H'...LI$;..' ..2980:. GET USER IN
PUT..'...A$.G(134).4400.#(...A$.G(189).2
280:. TO XMO ROUTINE ON C=X.G(...A$.G(18
0)..8560:. HANG UP 1660.(H..E(A$).2010,
2280,4400,2780,6530,7910,7530,3480,3010.
.(R..2570.D(...2830:. GETS DIR AS SUBROU
TINE FROM GOTO 2 LINES ABOVE.N(...2570..
(... -----------------------------..)...
DISK DIRECTORY.0)... -------------
----------------.8)...E$.?).. 1.O)"..1,8
,0,"$0".]),..#1,A$,A$.K)6..#1,A$,A$.{)@.
.A$."".2940..)J..#1,A$,B$..)T..F(A$.C$).
F(B$.C$).D;..)^..#1,A$:.A$.""..:.2870.F)
H..A$;.P)R..2910.W)|. 1..)...J$J$" [ ANY
KEY RETURNS ]"..*...2980..*.....*...A$.
.*...A$."".2980.%*....K*B..M3..B1,(B(B1)
.HI):. HANG UP 1660..*L..E$F$F$" [ TYPE
'RUN' TO RESTART! ]":." [ OR CONT TO
RESUME ]..*V....*...2010..*...#5,A$..*.
..A$."".3050.B*.....*...E$ER$G$"[ ONLINE
- ANY KEY FOR TERMINAL ]"..+...LC.1.."F
IRST TRY!". +...LC.1..LC;"TRIES".(+&.Q.0
.L+0.. -----------------------------.E+:
.. SOUND ROUTINE..+D.. ------------
-----------------..+N.SO.54272:CO.0..+X.
.SO.1,250..+B..SO.5,10.E+L..SO.15,200.S+
V..SO.24,15..+...CL.1.96:. CHANGED FROM
12 TO 96..,...SO.4,21..,...CL..,...SO.4,
20.6,...B$:CO.CO.1:.CO.10.3260.F,...B$."
".3160.S,...LC.LC.0.`,F.SO.54272..,P..CL
.0.144:. CHANGED FROM 24 TO 144..,Z..SO.
CL,0..,...CL..,...2010:. TO TERMINAL..,.
..E$..,...J$" ACCEPT PRESENT COLOR SETT
ING? (Y/N)"..,...F$..,...2980..- ..A$."N
"..7390..-*..E$.B-4..:.:.:." SELECT
DESIRED BAUD RATE".B->..:." <3>
FOR 300"..-H..:." <1> FOR 120
0"..-R..2980..-\..A$."1".580..-F..A$."3"
.610..-P..3410.Z-Z.. -------------------
----------..-... HAYES/SIGNALMAN REDI
ALER. .... -----------------------------
.+....G(14).3....E$.B.....5)"HAYES/SIGNA
LMAN AUTO-DIAL MODE"J$J$J$......5,"ATZ":
DY.1:.4290:.5,"ATQ0":DY.1:.4290:.5,"ATV1
".....DY.1:.4290:.5,"ATE1"...J.DD.15.E.T
.LC.0......"ENTER DESIRED DELAY <CR>=15"
;DD......DD.30.DD.30.&/...5,"AT":. TRY T
O GET MODEMS ATTENTION.F/...#5,IT$:.IT$.
"".DY.3:.4290:.3570:. QUIT -CK TO RESPO
ND- HF../..IT.(B(B1).16):. TEST CARRIER
BIT - INTERFACE IS ? - HF../....R/...J$"
ENTER NUMBER YOU WISH TO DIAL"..0$..
"(NUMBER PRECEDED BY P IS PULSE DIALED)"
.%0...F$." <F7> ABORTS AUTODIAL"J$.=0
8..NU$:A.C(NU$):B.A.1.L0B..H(NU$,1)."P".
NV$.J$."ATDP".I(NU$,B):.3670..0L.NV$.J$.
"ATDT".NU$..0V..E$..0`.."DIALING ";NU$;"
<F7> TO ABORT"..0J..I.1.255.G0T..#5,A$.
N0~..I..0... ------------------------..1
... DIAL THE SMARTMODEM.(1... --------
----------------.31...5,NV$.<1...NV$.[1.
.. ------------------------.T1D.. CH
ECK FOR ECHO..1N.. ---------------------
---..1X.I.0..1..I.I.1..1...#5,R$..1...A$
.L1...A$.G(136).2010..1...R$."T".3980..1
...I.150.3810..1...J$."NO ECHO"..2(..5,"
AT"..22.I.0..2<.I.I.1.(2F..#5,R$.92P..R$
."K".3670.I2Z..I.100.3900.S2D..3670.R2N.
. ------------------------..2X.. GET MO
DEM RESPONSE..2... ---------------------
---..2...A$.G2...A$.G(136).2010.P2 .SC.0
..2..TC$.G(0)..2..LC.LC.1..3...BL$"ATTEM
PT NUMBER";LC..3H.A.B(B3):. CHECK CLOCK.
,3R.PB.B(B1).U3...(PB.16)..IT.3080:. IS
CARRIER? - HF.A3..B.B(B3).P3...A$:.#5,R$
..3...A$.G(136).2010..3...A.B.4070:. GET
UPDATE IF NO CHANGE..3..SC.SC.1.Z3...BL
$.F$.F$."DELAY COUNT =";SC..3".PB.B(B1).
.4,..(PB.16)..IT.3080:. IS CARRIER? - HF
. 46..SC.DD.4040.+4@..5,"A".34J.I.0.@4T.
TC$.G(0).J4^.I.I.1..4H.. EVEN IF NO CARR
IER DETECT PROVIDED - CHECK RESULTS FROM
MODEM..4R..#5,R$..4|..R$."C".3080:. CON
NECT.W4...R$."N".3670:. NO CARRIER - HF.
.4...I.255.4190..4...3670..5... --------
----------------------.;5... WHOLE SECON
DS DELAY SUBROUTINE.`5... --------------
----------------.I5B.SC.0..5L.A.B(B3):.
CHECK CLOCK..5V.B.B(B3)..5...B$:.B$.G(13
6)...L5...A.B.4310:. GET UPDATE IF NO CH
ANGE.X5..SC.SC.1..5...SC.DY.4300..5.....
6... ------------------------------.56..
. BUFFER/PRINTER CONTROL MENU.Z6&.. ----
--------------------------.G60..E$LI$J$.
.6:.." BUFFER CONTROL MENU"..6D.
BI.(BP.BE).255:CI..(BI):DI.BI.CI:.DI.CI.
CI.1.R6N.BC.BB.BP:E3.BP.BE..6X..BC;"BYTE
S AVAILABLE,";E3;"BYTES USED"..7B..SQ$;C
I;"CBM DISK BLOCKS".$7L..LI$.<7V..SR$"<1
> TERMINAL".G7...SR$"<2> SAVE BUFFER T
O DISK/PRINTER"..7...SR$"<3> LOAD BUFFE
R FROM DISK"..7...SR$"<4> SEND BUFFER T
O MODEM"..7...SR$"<5> SEND DISK SEQ. FI
LE TO MODEM"..8...SR$"<6> DISPLAY BUFFE
R TO SCREEN".,8...SR$"<7> SEQ. FILE REA
DER/PRINTER".J8...SR$"<8> DISK DIRECTOR
Y".F8F..SR$"<9> QUIT PROGRAM".V8P..LI$;
:.2980..8Z..A$.G(133).2570.B8...E(A$).46
00,4770,5460,5720,5860,5310,6100,4610,30
10.L8...4400.V8...2010..8...2830..8... -
-----------------------..9... OPEN BUF
FER ROUTINE.:9 .. ----------------------
--..9*.BC.BB.BP:BD..1:.J$J$"[ BUFFER OPE
N ] -";BC;"BYTES AVAIL.":. JR FIX..94..1
30..9>.. ------------------------.E9H..
CLOSE BUFFER ROUTINE..9R.. ------------
------------..9\.BD.0..9F..X.1.500:.X..:
P..J$J$"[ BUFFER CLOSED ]".#:Z..130.B:..
. ------------------------.D:... SAVE BU
FFER TO DISK/PRINTER..:... -------------
-----------..:...E$..:..." SAVE TO - <1
> DISK -OR- <2> PRINTER"..:...SO$"<F7> A
BORTS TO BUFFER MENU":.2980..:...A$."1".
4870..;J..A$."2".5110..;T..A$.G(136).440
0.#;...4780.B;... ----------------------
--.\;... SAVE BUFFER TO DISK.{;... -----
-------------------..;..RW$."W"..;...E$.
.;....8)"SAVE BUFFER TO DISK"J$..;$.KS.0
.Q;...J$:." FILENAME";FI$..<8. 15:.15,8,
15,"I0:": 15:.15,8,15:. INIT THE FLIPPIN
DRIVE./<B..:." SAVING";BP.BE;" BYTES".
`<L.BI.(BP.BE).255:CI..(BI):DI.BI.CI:.DI
.CI.CI.1..<V..J$" ";CI;"CBM DISK BLOCKS"
.G<`.H1..(BP.256):G1..(BE.256):. HI BYTE
S FOR END POINTER AND BEGINNING..=J.H2.B
P.(256.H1):G2.BE.(256.G1):. LOBYTES FOR
ENDPOINTER AND BEGINNING.$=T..8,8,8,FI$.
",S".]=~.. 251,G2:. 252,G1:. STUFF BUF S
TART IN ZERO PAGE $FB..=...780,251:.781,
H2:.782,H1:. STUFF BUFF END POINTR X+Y R
EG..=... 65496:. KERNAL BUFFER SAVE!.R=.
. 8: 15:KS.1:.7330..>...F$.F$" SAVE COM
PLETE - ZERO THE BUFFER? (Y/N)"..>...298
0.#>...A$."Y".BP.BE.5>D..A$."Y".BP.BE.?>
N..4400.^>X.. ------------------------.{
>... SAVE BUFFER TO PRINTER..>... ------
------------------..>...E$..>....12)"PRI
NT BUFFER MODE"..>..." <SPACEBAR> TO S
TART/PAUSE PRINTING"..?....14)"<F7> ABOR
TS!"J$:.2980.+?...4,PD,PS:L.1:QF.0:.RO.0
.80.9?(..BG.BE.BP.F?2.A$.G(B(BG.RO)):.A$
.G(10).A$.G(29).G(157)..?<..4,G(17)A$;:.
A$.G(13).L.L.1:.5260..?F..A$;..?P..A$:.A
$.G(136).BG.BP: 4:BD.0:.4400.P?Z..A$.G(3
2)..2980.X?D..BG..@N.BD.0:. CLOSE BUFFER
TO AVOID GARBAGE AT THE END..@X. 4..@..
.4400.8@...L.60.L.1:.X.1.7:.4:.X.>@....]
@ .. ------------------------.|@... DISP
LAY BUFFER TO SCREEN..@... -------------
-----------..@...E$..@H...12)"BUFFER DIS
PLAY"..@R.." <SPACEBAR> TO START/PAUSE
DISPLAY"..A....13)"<F7> ABORTS!"J$:.298
0..A...BG.BE.BP.&A...G(B(BG));.JA...A$:.
A$.G(136).BG.BP:BD.0:.4400._A...A$.G(32)
.. 2980.GA...BG..A..BD.0:. CLOSE BUFFER
TO AVOID GARBAGE AT THE END.VA"..J$.F$F$
"[ END OF BUFFER READ - PRESS ANY KEY ]"
:.2980..A,..4400..A6.. -----------------
-------..B@.. LOAD BUFFER FROM DISK.:BJ.
. ------------------------.RBT.BP.BE:. Z
ERO BUFFER.^B^.RW$."R".FBH..E$..BR.."
LOAD FILE TO BUFFER FROM DISK"J$..B|..72
80:. GET FILENAME & ERROR ROUTINE..B...A
$."A".."[ TERMINAL MODE ]":.130..B...A.0
.5560..B.. 8..B...7480..C...4400.)C...F$
" <F7> ABORTS!".?CB..#8,A$:A$.
A$.G(0).GCL..B$._CV..B$.G(136). 8:.4400.
LC..E.B(144).YC...E. 5670..C...BP,F(A$).
.C..BP.BP.1..C...BP.BB. 5570.UC...F$F$"
[ BUFFER FULL ]":BD.0: 8:.7480:.4400..C
..BD.0..C&. 8..C0..4400..D:.. ----------
--------------------.8DD.. SEND BUFFER
DIRECT TO MODEM.]DN.. -----------------
-------------.DX..E$F$"SEND BUFFER TO M
ODEM"J$..DB.."BYTES:";BP.BE;" <F7> ABORT
S!"J$.F$..DL..BG.BE.BP.FDV.A$.G(B(BG))..
D...5,G(T%(F(A$)));..D...A$;..E...B$:.B$
.G(136).BG.BP:BD.0:.4400.#E...#5,R$:.R$.
G(XF)..8470.+E...BG.CE..BD.0:. CLOSE BUF
FER.ME...3080.QEF.. --------------------
---------..EP.. SEND SEQ FILE DIRECT TO
MODEM..EZ.. ----------------------------
-.EE..RW$."R"..E...E$F$"SEND DISK SEQ FI
LE TO MODEM <F7> ABORTS"J$..F...7280:.A$
."A".2010.'F...A. 8:.7480:.4400.2F...#8,
A$.?F..E.B(144).OF ..E. 8:.3080._F*..A$.
"".5900.TF4..5,G(T%(F(A$)));..F>..#5,R$:
.R$."".5980..FH..R$.G(XF)..8470..FR..G(F
%(F(R$)));..F\..B$.RFF..B$.G(136). 8:.44
00..FP..5900..FZ.. ---------------------
---..G... ZERO AND CLOSE BUFFER.7G... -
-----------------------.CG..BP.BE:.J$J$"
[ BUFFER ZEROED & CLOSED ]".LG..BD.0.UG.
..130..G... ----------------------------
--..G... BOBS SEQ. READER/PRINTER..GJ
.. ------------------------------..GT. 1
5..H.. 1:.1,PD,PS:L.1:P.0..H...E$..H...S
O$"SEQ. FILE READER/PRINTER"J$.HH..FI$."
":. CLEAN STRING.HH...F$"FILENAME E<X>IT
!";:.FI$.~H...FI$."X". 1:.4400..H...FI$.
"X". 1:.4400..H$. 8:.8,8,8,FI$.",S,R":.6
440..H...E$.F$.F$"CHOICE <F1>PRINTER <F3
>SCREEN <F5>ABORT"..I8..F$SS$"<F7> TOGGL
ES PAUSE/CONTINUE"J$LI$.9IB..A$:.A$.G(13
3).A$.G(135).6210.AIL..A$.G(133).P.1:.62
50:. <F1> PRINTER..IV..A$.G(135). 1: 8:.
4400:. <F5> ABORT..I`..A$.G(134).6250:.
<F3> SCREEN.XIJ..P.1..1,G(145)G(14)FI$G(
17)G(15):.1:L.4:..JT..#8,A$:.A$.G(10).A$
.G(29).G(157):.212,0:.ST.0.6280..J~..ST.
64.6380.(J...A$;.RJ...P.1..1,A$;:L.1:.A$
.G(13).L.L.1:.6480.FJ...A$:.A$."".6260..
J...:.F$"PAUSE:<F1>PRINTER <F3>SCREEN <F
5>ABORT"F$..J...A$:.A$.G(133).A$.G(136).
6320..J...A$.G(133).P.1:.1,G(17):.1:L.1:
.6360..JD..A$.G(134).P.0:.6360..KN..A$.G
(135).6370..KX..6260.DK...F$.F$"[ OPERAT
ION ABORTED ]":.7480.IK...P.1..1:.X.L.1.
3:.1:.X:.1,G(145)..K.. 1: 8:.F$F$F$"=> R
EAD/PRINT ANOTHER FILE? (Y/N)"..K...A$:.
A$."".6400.HK...A$."Y". 15:.6110.ZK...A$
.."N".6400..K...E$:.4400..L(. 15:.15,8,1
5:.15,N,N$,TR,SE.8L2..N.1..F$F$"DISK ERR
OR:"N;N$;TR;SE: 15:.6460.EL<..N.1..F$F$"
[ LOAD ABORTED ]":.7480:.6390.KLF....LP.
.L.60.L.1:.X.1.7:.1:.X..LZ....LD.. -----
------------------------.OLN.. 165
0/6420 AUTODIAL..LX.. ------------------
-----------..M...E$.F$.F$SQ$"[ SETTING M
ODEM ]".,M...B2,32:. SET CIA.FM...B1,0:.
HANG UP PHONE.OM .DY.1.YM...4290.AM...E
$..M...SS$"1650/6420 AUTO-DIAL MODE"J$..
MH.."SET T-D SWITCH TO D"..MR..SO$"O-A S
WITCH TO O".UM...SO$"H-F SWITCH TO F"..M
...J$..N...F$."ENTER REDIAL DELAY. <CR>=
15 SECONDS"..N..CK.15..N...CK.RN...F$.F$
."ENTER NUMBER TO DIAL AND PRESS <RETURN
>".[N...NU$.ZN"..B1,32:. PICK UP THE PHO
NE..N,.CJ.0..N6.DY.2..N@..4290:. WAIT 2
SECONDS..NJ.D.C(NU$).SNT..E$F$"DIALING:
";NU$;J$;J$..N^..X.1.D..NH.N$.J(NU$,X,1)
..NR..N$;..O|.N.E(N$)..O...N.0.N.10..O..
. 6860.%O...X.0O... 7020.QO... ---------
-----------------.TO... SUBROUTINE TO PU
LSE THE LINE..OB.. ---------------------
-----..OL..N1.1.N..OV..B1,0:. HANG IT UP
BRIEFLY.VO...B1,0:. MAKE SURE..O..DY.13
..O... 7180..P...B1,32:. PICK IT UP BRIE
FLY.MP...B1,32:. SECOND POKE SEEMS TO EN
HANCE ACCURACY OF OLDER 1650S.WP..DY.20.
BP... 7180.JP&..N1.TP0.DY.60.P:.. 7180.
.PD....PN.. --------------------------.B
PX.. CHECK FOR CARRIER..PB.. -------
-------------------..QL..BL$.G$.EJ$."<F7
> TO ABORT!".4QV..B(B1).99.3080:. CARRIE
R DETECTED TO ONLINE.<Q...B$.PQ...B$.G(1
36).2570.~Q..DY.5:. UP 2 TO 5 DELAY TO P
ICK UP CARRIER..Q...4290..Q...B$.G(136).
2570..Q..CJ.CJ.1..Q...5.CJ.CK..B1,0.MQF.
.5.CJ.CK.DY.5..QP..5.CJ.CK..4290..QZ..5.
CJ.CK. 6690..Q... 7020..R... -----------
---------------.<R... SHORT DELAY SUBROU
TINE.]R... --------------------------.FR
..SC.0..R..A.B(56325):. CHECK TIMER A..R
.B.B(56325)..R*..A.B. 7200:. GET UPDATE
IF NO CHANGE.IR4.SC.SC.1.ZR>..SC.DY. 71
90..RH....SR.. -------------------------
-."S\.. LOAD/SAVE FILENAME ROUTINE.CSF..
--------------------------.SSP. 15:..J$
.J$.RSZ.." FILENAME E<X>IT! ";FI$..S...
FI$."X".4400..S...FI$."X".4400..S.. 8:.8
,8,8,"0:".FI$.",S,".RW$.WS...KS..15,8,15
:.15,A,B$,TR,SE..T...KS..:.F$"DISK STATU
S: "A;B$;TR;SE:...T....+T... -----------
-------------------.JTJ.. USER COLOR
SELECTION.OTT.. -----------------------
-------..T...J$" INPUT DESIRED CBM COLO
R CODES FOR".HT..." CHARACTER, BORDER,
AND BACKGROUND."..T..." XX,XX,XX - (SEP
ARATED BY COMMAS)."..U...D1,D2,D3.!U...6
46,D1:.53280,D2:.53281,D3.'U....LU... --
----------------------------.JU$..
TIME DELAY ROUTINE..U... ---------------
---------------. U8..X.1.3000:.X..UB...K
UL.. ------------------------------..UV.
. XMOBUF AUTO-ANSWER..V`.. -------
-----------------------..VJ..E$.4VT..SS$
"XMOBUF AUTO-ANSWER".^V~..F$"SET APPLICA
BLE MODEM SWITCHES...".ZV...F$SO$"T-D SW
ITCH TO D"..V...SO$"V-D SWITCH TO D"..V.
..SO$"O-A SWITCH TO A".HV...SO$"H-F SWIT
CH TO F"..W...F$F$F$"AND... [ HIT ANY KE
Y TO SELECT MODEM ]":.2980..W...CU$CU$"M
ODEM".EWD.."TYPE : <1> 1650/6420 <2>
MITEY/HESII ".OWN..2980..WX..A$."1"..B2,
32:.B1,.:.7670:. HANG UP 1650/6420..W...
A$."2"..B1,32:.B2,.:.7670:. HANG UP MITE
Y/HES..W...7630..W...A$."1"..CU$CU$.23)"
"..X...A$."2"..CU$CU$.7
)" ".DX...F$F$"READY, WAIT
ING FOR CALL - <F7> ABORTS!".LX...A$:.A$
.G(136).2570:. ABORT TO MENU.X..MM.1:.
COUNTER..X(..(B(B1).8)..0.7700:. WAIT FO
R RING.HX2.. ---------------------------
..X<.. CARRIER DETECT..YF.. -----
----------------------.,YP..B2,38:.B1,0:
. START CARRIER HIGH.<YZ..X.1.100:.X.MYD
..B(B1).201.3080:. CARRIER DETECTED TO O
NLINE..YN..B(B1).217..B1,2:. IF 2 HIGHS
THEN GO LOW..YX.. GOSUB5175..Y...B(B1).2
03.3080:. CARRIER DETECTED TO ONLINE..Z.
..B(B1).219..B1,0:. IF 2 LOWS THEN GO HI
. Z..MM.MM.1:.MM.10.7770.SZ ..B2,38:.B1,
32:.3080:. CARRIER DETECT TO ONLINE.XZ..
.B1,32:.B2,0:. HANG UP MITEY/HES..Z...F$
F$" NO CARRIER DETECTED - HANGING UP":.
8450..Z...7530..ZH.. -------------------
-----------..ZR.. 1660/MITEY/HES AUTO-
DIAL.![... -----------------------------
-.)[...E$.O[...M3..B1,(B(B1).HI):. HANG
UP 1660.|[..." 1660/MITEYMO/HESII AUTO-
DIAL MODE"J$..[...B1,32:.B2,0:. HANG UP.
I[...F$"SET V-D SWITCH TO D - <F7>
ABORTS!"..[...J$"HYPHEN INSERTS A 2 SEC
DELAY"..\"..F$F$"ENTER NUMBER TO DIAL:"
;:ND$."":." ";.'\,..NN$.3\6.ND$.NN$.J\@.
. ---- DIALER ----..\J..F$J$"NUMBER OF T
RIES? - <CR>=5":XT$."5":.XT$:XT.E(XT$):T
X.0..\T..B$:.B$.G(136).8490:. TO MENU..\
^.. PRINTF$+F$+F$" WAITING FOR DIAL TON
E.... <F7> ABORTS!"..]H..B2,38:.B1,32:.
HANG UP.4]R.DY.2:.4290:.B$.G(136).8490:.
WAIT 2 SECS.N]|..B1,4:. PICK UP PHONE.M
]..DY.3:.4290:.B$.G(136).8490.W]...E$F$.
.]..." <F7> ABORTS!"F$..]..TX.TX
.1:..30)"TRY:"TX.S]..LN.C(ND$):MM.1:.CU$
"DIALING:";..]..VV$.J(ND$,MM,1)..^B..VV$
."-".DY.2:.4290:.B$.G(136).8490.)^L.VV.E
(VV$):.VV.0.VV.10.6^V..MV.1.VV.U^...B1,3
2:.B1,32:. HANG IT UP.P^...QQ.1.30:. DIA
L TIMING.X^...QQ..^...B1,4:.B1,4:. PICK
IT UP..^. .QQ.1.50:. DIAL TIMING..^. .QQ
.P^. .B$:.B$.G(136).8490..^& .MV:. SEND
NEXT PULSE..^0 .8450.._: MM.MM.1:.MM..LN
.8120.#_D . SEND NEXT DIGIT.B_N . ------
------------------.\_X . CARRIER DE
TECT.{_B . ------------------------.._L
MM.0.._V .B2,38:.B1,02:. PICK UP PHONE A
ND START CARRIER LOW.T_. .8450:. HI/LO D
ELAY..`. .B(B1).203.3080:. CARRIER DETEC
TED TO ONLINE."`. .B(B1).91..B(B2).38.M3
.1./`. .M3.3080.\`. .B(B1).219..B1,0:. I
F 2 LOW'S THEN GO HI..`. .B(B1).201.3080
:. CARRIER DETECTED TO ONLINE..`. .B(B1)
.217..B1,2 :. IF 2 HI'S THEN GO LOW.S`F
MM.MM.1:.MM.10.8320..`P .M3.3080..AZ .J$
F$F$" NO CARRIER DETECTED":.B1,32:.B2,0
:. HANG UP.,A. .TX..XT..8020.]A. .F$F$F$
" [ HANGING UP PHONE ]":.B1,32:.B2,0..A
. DY.3:.4290:.2570:. TO MENU AFTER 3 SEC
S..A.!DY.2:.4290..A.!...A.!.#5,R$:.R$..G
(XN).8470..A !...A*!.B1,32:.B2,0:.2570:.
HANG UP HES/MITEY/1660 THEN GOTO MENU..
6B4!.J$"ENTER PRINTER DEVICE NUMBER";J$"
<CR> = 4";:.PD.HB>!.J$"ENTER SECONDARY A
DDRESS"J$"<CR> = 7";:.PS.NBH!...BR!. ---
--------------------------..B\!. DATAFIE
R LINES.KBF!. --------------------------
---..BP!.B1,(B(B1).HI):.:. HANG UP 1660.
.BZ!...B.!:..C.!. I.319 . 384..C.!. A: .
I,A: ..,C.!. 251, 0.;C.!. 252, 192.PC.!
. I.0 . 49: . A$.CC.!. 319,A$: .: ..ICJ!
:..CT!.32,253,174,32,158,173..C.!.32,163
,182,133,36,162..C.!.0,160,255,32,102,1.
OC.!.10,10,10,10,G......................
....................................Q.O.
.......................................
......................201,65,144,9.HD.".
233,1,41,15,16,2..D8".104,104,96,76,8,17
5..DB":.SDL".EMMDMAAIDAAAAAAAAAAAAAIAAAA
AAAAAAAAAAEAAEDEDDDAAIAAAAACAAAAAAAAAAAA
AAA..EV".AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA.
KE`".AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA..EJ"
.AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA..FT".AAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAA.OF~".AAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKNAEMAA
JDAINCDMAKJDKINCEMAKJAA..F.".CABNMFKJACI
NAJMACAKIMGMJANPABPMJBENAAMKOAJMAOAACPAO
OMOAJMANAAJKOAJMAJN..F.".CDMAOOAJMACALHM
FEMNKMACALHMFKOAJMAMKKJAAINBIMALNCDMAINB
MMAMJFENAAFMKMK.3G.".LNCDMAINBLMAMJFCPAA
EMJFHNAAIMKKJCMNNCDMAPAALKJAGCABNMFCAKAM
GCAPKMCMKEI.G.".LNCDMAMJFFPABIMJFAPABEM
JFDPAAEGIEMCOMBKJFEMNBMMANAAFKJIAINBIMAG
IMKNNCD.KG.".MANAMNKNAJMAKCCDKAMACALNPPK
JAICANIMFCAECMFPAADCAPFMCKJACCABNMFKNBLM
AMJ..H.".FCNAADEMBEMDKJAAINAKMAINAMMAINB
JMAINBKMAINAPMACAOEMCKJIAINALMAKJAAINAO.
CHD".MAINBAMAINBBMACALMMCKNBAMANABBKNAFM
AMJAENAADEMHFMCMJBINAADCAPKMCCAHBME..HN"
.MJIENAOAKNABMIBIGNACMIBIMJPPPAAGCANKMCE
MKAMBKNBBMADIONIDMIBIMNIDMINAON..HX".OOA
PMAKCABLNAAMIMNAPMAPAAGMOAPMAEMEEMCKNAKM
APAECKAAAKCAELNAAMHNNBCMANA.GI.".AFMKBAP
FKAAGIMAJMAKCAICAMJPPKOAJMALNAAMHCMBIMAB
AADCAKCMCCANCPPCALHPPNA..I.".CPOOAJMAKNA
LMAMNAJMANANPCMAMMABAADEMAFMDCAHDMGKCAAL
NADMIJNAAMHOIBAPHIO..I.".AKMAKJAGCAFPMEC
AMMPPEMKAMBCAECMFKJABCABNMFKJAHCABNMFKJA
NCALHMFCAPFMCKJ.+J.#.IAINAMMAKCHPLNAAMHI
NANMAMJBKPAAHMJAAPAADEMJLMCLNAAMHMNANMAN
AAGMKBAPFEM.WJ.#.AFMDOIIOALMAEMACMCCJHPM
JEBJABDMJFLLAAFAJCAEMLLMCMJGBJAAGMJHLLAA
CCJNPGA.CJ.#.CAFIMECAOBPPPABDCAEEMENAABG
ACAFDMEJAPACAOEMCGIGIEMKAMBEMPFMCOOAOMAK
JAK..K.#.MNAOMAPABBKJEOINNBMEKJBFCAFPMEG
AKJAECAFPMEGAKJBICAFPMEKJAJCAAMMDCAKAMG.
[K(#.GIGIGAKJAGCAFPMEKJADCABNMFKJAIEMMDP
PCAOBPPNAADCAPKMCCAEEMECJAIPAPBKJAA..K2#
.INBJMAINBKMAKJABINAAMIINABMIEJPPINACMIC
AOBPPNAAGCAOPMCCAPKMCCAEEMENAPA..K<#.KNA
FMAMJBINAADCAPKMCMJBFNAOCKJADINBAMAKCAAI
OBBMAIOAIMACAOBPPNAADEMAOME.?LF#.KCAICAM
GPPCAOEPPCMBIMABAADCAKCMCINAFMACALHPPCJM
DINAIMAKJAACALHMFKNAIMA..LP#.NAAMKNAFMAC
AHBMEMJIDNAMJPACIKNAFMACAHBMEMJIDPABOKJB
KINANMAKNAFMAMJBKNA.WLZ#.AFKJAAINANMAKNA
NMAINAFMACAHBMEMJIDNAPJKNBBMAINIDMIKJAAI
NAJMACAOBPPPADK.#MD#.KOAJMALNAAMICAFPMEO
OAJMAKJIEMNAJMANAOICAFIMECAEEMEPAAMCAOBP
PPABKCAFDME.OMN#.JAPBLAMJKNAFMAMJBFNAAIK
JEOINNBMEEMMEMDMJBINAADCAPKMCMJAGNANFKNA
IMAPABJ..MX#.CAOPMCCAFIMEKFKBDAAFCAEEMEN
APHKNAIMACJEAPANOEMAKMDOOABMIKJPPENABMII
NAC..N.#.MICAHDMGEMFGMDKCAFCAMGPPCAOEPPI
NAFMACALHPPGAKFKBMJACGAKJAAIFKBIFKCGAEI.
SN.#.KCAFCAMJPPKNKBACCJADNAPJGICANCPPGAK
NAFMAKOBAMAJNAAMIBIGNBBMAINBBMAOOBA..N.#
.MAOIIKGAJHMELBMELPMENFMEOIMEPKMEALMFHDM
AANGGEJEMEFEOEBENEFCAEGEPFCCAFJ..N #.EPF
FFCCAEEEJFDELDKCAAAANGEGJHDGLCAGFHCHCGPH
CDKCAAAHEGPHECAGCGMGLCADADA.7O.#.DADACAC
AGDGIGLDNCAANJBAAHEHCGBGOHDGGGFHCCAGDGPG
NHAGMGFHEGFANAAHEHCGBGO..O.#.HDGGGFHCCAG
BGCGPHCHEGFGEANAAHIGNGPGEGFGNCAHAHCGPHEG
PGDGPGMANAAGJGOHGGB.OO.#.GMGJGECAGGGJGMG
FGOGBGNGFANAAEIKCADCAMJPPGIAKKKLNIHMEIFM
DOILNIHMEIFMEKA..PH#.AALBMDMJAAPAAICANCP
PMIMAAANAPCGAKJAAINHDMAINBHMAKCAPCAMGPPC
AOEPPINAFMA.GPR#.CALHPPNAAOKNAFMAKOBHMAJ
NHDMAOOBHMANAOHKOBHMAKJAAJNHDMAKJAHCABNM
FCAKAMG..P.#.KNHDMAANHEMACJAPGAKJADCABNM
FKCAAIOAJMACAKIMGMJBEPABHKOAJMAJNCDMACAL
HMF..P.#.KOAJMALNCDMAOOAJMAMJANNAODGAKOA
JMAPANNMOAJMACALHMFEMILMFEIKCADCAMJPPGI.
KQ.#.CANCPPGABACHPCADGEAAAKAAABAAAAAAAAA
AAAAAAACACAAAAAAAKIKOADMACAOLMFGAKJ..Q.#
.AACALNPPKJAPKOADMAKICALKPPCAMAPPGAKCAEK
JDAJNMOMFMKBAPKOIKNMMMFDIPNMCMF..Q.$.INN
GMFKNMNMFPNMDMFINNHMFJABLIOAJMAIKEKKKPOM
OMFKOAJMAKNNGMFINMMMFKNNHMF./R.$.INMNMFE
MPNMFOIOIOAAKNAMKKCAEGAKJAAINBNMALNBOMAC
ALDMGPAAPCAFDMGLNBPMACA.{R.$.LDMGPAAECAF
DMGOIGAEIAOBNMAKNBNMAAOBNMAAOBNMABIGNBNM
AINBNMAGIDIOJDABIGN.GR"$.BNMAINBNMAGAKJE
BINNBMEOOBJMANAADOOBKMAKNBJMAINMMMFKNBKM
AINMNMFCAPCMFKC..S,$.AELNMOMFJNMGMEMKNAP
HKJACCABNMFGACAFIMECEKCBAPMGAKCAACAMGPPC
AOEPPPAPGGA./S6$.MJDAJAAEMJDKJAACKJAAGA.
........................................
........................................
.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL