_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL