SOFT-WRITER
FILE INFORMATION
FILENAME(S): SOFT-WRITER
FILE TYPE(S): PRG
FILE SIZE: 11.2K
FIRST SEEN: 2025-11-30 18:15:01
APPEARS ON: 1 disk(s)
FILE HASH
90e1dfcb96db319511bed0d0f63398c88b81a8aab78e425fa692746d06e7c8ff
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NYTTOPRG C64 | SOFT-WRITER | PRG | Sailor, Lex | 13 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 53 08 01 00 8F 22 53 4F 46 54 2D 57 52 49 |..S...."SOFT-WRI|
00000010: 54 45 52 22 20 43 4F 50 59 52 49 47 48 54 20 31 |TER" COPYRIGHT 1|
00000020: 39 38 32 20 42 59 20 52 41 59 4D 41 43 20 53 4F |982 BY RAYMAC SO|
00000030: 46 54 57 41 52 45 20 34 39 35 20 42 41 4E 44 2C |FTWARE 495 BAND,|
00000040: 20 42 4F 55 4C 44 45 52 20 43 52 45 45 4B 2C 20 | BOULDER CREEK, |
00000050: 43 41 2E 00 72 08 02 00 99 22 93 11 22 3A 8F 41 |CA..r...."..":.A|
00000060: 4C 4C 20 52 49 47 48 54 53 20 52 45 53 45 52 56 |LL RIGHTS RESERV|
00000070: 45 44 00 B4 08 03 00 99 22 20 20 20 12 53 4F 46 |ED......" .SOF|
00000080: 54 2D 57 52 49 54 45 52 22 3A 99 22 12 42 59 20 |T-WRITER":.".BY |
00000090: 52 41 59 4D 41 43 20 53 4F 46 54 57 41 52 45 22 |RAYMAC SOFTWARE"|
000000A0: 3A 99 22 20 20 12 43 4F 50 59 52 49 47 48 54 20 |:." .COPYRIGHT |
000000B0: 31 39 38 32 00 E8 08 04 00 99 22 11 11 11 11 12 |1982......".....|
000000C0: 52 53 32 33 32 20 50 52 49 4E 54 45 52 20 28 59 |RS232 PRINTER (Y|
000000D0: 2F 4E 29 20 3F 22 3A 8D 35 34 3A 99 41 24 3A 8B |/N) ?":.54:.A$:.|
000000E0: 41 24 B2 22 4E 22 A7 37 00 23 09 05 00 8B 41 24 |A$."N".7.#....A$|
000000F0: B2 22 59 22 A7 9F 32 2C 32 2C 30 2C C7 28 36 29 |."Y"..2,2,0,.(6)|
00000100: 3A 99 3A 99 22 12 41 53 53 55 52 45 20 49 4E 54 |:.:.".ASSURE INT|
00000110: 45 52 46 41 43 45 20 49 53 20 52 45 41 44 59 22 |ERFACE IS READY"|
00000120: 3A 89 37 00 2E 09 06 00 8D 35 39 3A 89 34 00 4E |:.7......59:.4.N|
00000130: 09 07 00 8B C2 28 36 35 35 33 34 29 B2 37 32 A7 |.....(65534).72.|
00000140: 53 46 B2 35 33 32 37 32 3A 53 5A B2 31 37 00 6E |SF.53272:SZ.17.n|
00000150: 09 08 00 8B C2 28 36 35 35 33 34 29 B3 B1 37 32 |.....(65534)..72|
00000160: A7 53 46 B2 33 36 38 36 39 3A 53 5A B2 38 00 7C |.SF.36869:SZ.8.||
00000170: 09 09 00 49 56 25 B2 C2 28 53 46 29 00 B8 09 0A |...IV%..(SF)....|
00000180: 00 54 4C B2 B8 28 38 29 AD 33 37 3A 86 54 58 24 |.TL..(8).37:.TX$|
00000190: 28 54 4C 29 3A 81 41 B2 30 A4 54 4C 3A 54 58 24 |(TL):.A.0.TL:TX$|
000001A0: 28 41 29 B2 22 2A 22 3A 82 3A 54 58 24 28 31 29 |(A)."*":.:TX$(1)|
000001B0: B2 22 2A 37 37 37 37 22 00 04 0A 0B 00 42 52 24 |."*7777".....BR$|
000001C0: B2 22 20 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |." .............|
000001D0: A2 A2 A2 A2 A2 A2 A2 22 3A 8B 53 46 B2 35 33 32 |.......":.SF.532|
000001E0: 37 32 A7 42 52 24 B2 42 52 24 AA C9 28 42 52 24 |72.BR$.BR$..(BR$|
000001F0: 2C 31 36 29 3A 4C B2 37 30 3A 4D 4C B2 35 3A 99 |,16):L.70:ML.5:.|
00000200: C7 28 38 29 00 2F 0A 0C 00 4D 52 B2 35 3A 99 22 |.(8)./...MR.5:."|
00000210: 9C 93 22 3A 45 B2 30 3A 97 53 46 2C 49 56 25 3A |..":E.0:.SF,IV%:|
00000220: 8B 53 46 B2 35 33 32 37 32 A7 99 22 05 22 3B 00 |.SF.53272..".";.|
00000230: 65 0A 0D 00 99 A6 53 5A AB 33 29 22 12 53 4F 46 |e.....SZ.3)".SOF|
00000240: 54 2D 57 52 49 54 45 52 22 3A 99 A6 53 5A AB 36 |T-WRITER":..SZ.6|
00000250: 29 22 12 42 59 20 52 41 59 4D 41 43 20 53 4F 46 |)".BY RAYMAC SOF|
00000260: 54 57 41 52 45 00 86 0A 0E 00 99 A6 53 5A AB 36 |TWARE.......SZ.6|
00000270: 29 22 12 20 20 43 4F 50 59 52 49 47 48 54 20 31 |)". COPYRIGHT 1|
00000280: 39 38 32 20 20 22 00 B3 0A 0F 00 99 3A 99 42 52 |982 "......:.BR|
00000290: 24 3A 99 3A 99 A6 53 5A 29 3B 22 12 4E 45 57 20 |$:.:..SZ);".NEW |
000002A0: 20 22 3A 99 3A 99 A6 53 5A 29 3B 22 12 41 50 50 | ":.:..SZ);".APP|
000002B0: 4E 44 22 00 E9 0A 10 00 99 3A 99 A6 53 5A 29 3B |ND"......:..SZ);|
000002C0: 22 12 45 44 49 54 20 22 3A 99 3A 99 A6 53 5A 29 |".EDIT ":.:..SZ)|
000002D0: 3B 22 12 46 49 4C 45 20 22 3A 99 3A 99 A6 53 5A |;".FILE ":.:..SZ|
000002E0: 29 3B 22 12 50 52 49 4E 54 00 0C 0B 11 00 99 3A |);".PRINT......:|
000002F0: 99 42 52 24 3A 99 A6 53 5A AB 34 29 22 11 12 53 |.BR$:..SZ.4)"..S|
00000300: 45 4C 45 43 54 20 4F 50 54 49 4F 4E 00 2E 0B 12 |ELECT OPTION....|
00000310: 00 99 22 13 11 11 11 11 11 11 22 3A 99 A6 53 5A |..".......":..SZ|
00000320: AB 32 29 3B 22 12 3E 22 3B 3A 53 42 B2 31 00 40 |.2);".>";:SB.1.@|
00000330: 0B 13 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 39 |....A$:.A$."".19|
00000340: 00 52 0B 14 00 8B 41 24 B2 C7 28 31 34 34 29 A7 |.R....A$..(144).|
00000350: 31 32 00 64 0B 15 00 8B 41 24 B2 C7 28 31 34 31 |12.d....A$..(141|
00000360: 29 A7 32 35 00 76 0B 16 00 8B 41 24 B3 B1 C7 28 |).25.v....A$...(|
00000370: 31 37 29 A7 31 39 00 92 0B 17 00 99 22 92 9D 20 |17).19......".. |
00000380: 22 3A 53 42 B2 53 42 AA 31 3A 8B 53 42 B1 35 A7 |":SB.SB.1:.SB.5.|
00000390: 31 38 00 AA 0B 18 00 99 3A 99 A6 53 5A AB 32 29 |18......:..SZ.2)|
000003A0: 3B 22 12 3E 22 3B 3A 89 31 39 00 CC 0B 19 00 99 |;".>";:.19......|
000003B0: 22 93 22 3A 91 53 42 8D 32 36 2C 33 31 2C 37 36 |".":.SB.26,31,76|
000003C0: 2C 31 36 32 2C 31 38 39 3A 89 31 32 00 05 0C 1A |,162,189:.12....|
000003D0: 00 99 22 12 4E 45 57 20 52 45 43 4F 52 44 2D 52 |..".NEW RECORD-R|
000003E0: 45 54 55 52 4E 20 54 4F 20 43 4C 52 20 4D 45 4D |ETURN TO CLR MEM|
000003F0: 4F 52 59 20 27 43 54 52 4C 31 27 20 46 4F 52 20 |ORY 'CTRL1' FOR |
00000400: 4D 45 4E 55 2E 00 17 0C 1B 00 8D 35 34 3A 91 52 |MENU.......54:.R|
00000410: 25 89 33 36 2C 32 38 00 2E 0C 1C 00 8B 41 24 B3 |%.36,28......A$.|
00000420: B1 C7 28 31 33 29 A7 8D 35 39 3A 89 32 36 00 47 |..(13)..59:.26.G|
00000430: 0C 1D 00 81 4A B2 30 A4 54 4C 3A 54 58 24 28 4A |....J.0.TL:TX$(J|
00000440: 29 B2 22 2A 22 3A 82 00 63 0C 1E 00 99 22 93 22 |)."*":..c...."."|
00000450: 3A 97 53 46 2C 49 56 25 AA 32 3A 4C 4E B2 31 3A |:.SF,IV%.2:LN.1:|
00000460: 89 33 34 00 7F 0C 1F 00 99 22 93 22 3A 97 53 46 |.34......".":.SF|
00000470: 2C 49 56 25 AA 32 3A 81 4C 4E B2 30 A4 54 4C 00 |,IV%.2:.LN.0.TL.|
00000480: BE 0C 20 00 99 C9 28 54 58 24 28 4C 4E 29 2C C3 |.. ...(TX$(LN),.|
00000490: 28 54 58 24 28 4C 4E 29 29 AB 31 29 3B 3A 8D 33 |(TX$(LN)).1);:.3|
000004A0: 37 3A 97 32 31 32 2C 30 3A 8B 54 58 24 28 4C 4E |7:.212,0:.TX$(LN|
000004B0: AA 31 29 B3 B1 22 2A 37 37 37 37 22 A7 82 00 E6 |.1).."*7777"....|
000004C0: 0C 21 00 54 58 24 28 4C 4E AA 31 29 B2 22 3C 22 |.!.TX$(LN.1)."<"|
000004D0: 3A 4C 4E B2 4C 4E AA 31 3A 99 3A 99 22 12 41 44 |:LN.LN.1:.:.".AD|
000004E0: 44 20 54 45 58 54 00 08 0D 22 00 5A 5A B2 30 3A |D TEXT...".ZZ.0:|
000004F0: 81 4C 4E B2 4C 4E A4 54 4C 3A 8D 33 30 33 3A 91 |.LN.LN.TL:.303:.|
00000500: 52 25 89 33 36 2C 33 35 00 10 0D 23 00 82 4C 4E |R%.36,35...#..LN|
00000510: 00 16 0D 24 00 8E 00 33 0D 25 00 97 32 31 32 2C |...$...3.%..212,|
00000520: 30 3A 51 B2 C6 28 C9 28 54 58 24 28 4C 4E 29 2C |0:Q..(.(TX$(LN),|
00000530: 31 29 29 00 45 0D 26 00 8B 51 B2 31 38 A7 99 22 |1)).E.&..Q.18.."|
00000540: 12 52 92 22 3B 00 56 0D 27 00 8B 51 B2 36 A7 99 |.R.";.V.'..Q.6..|
00000550: 22 12 45 92 22 3B 00 65 0D 28 00 8B 51 B2 32 A7 |".E.";.e.(..Q.2.|
00000560: 99 22 2C 22 3B 00 74 0D 29 00 8B 51 B2 33 A7 99 |.",";.t.)..Q.3..|
00000570: 22 3B 22 3B 00 85 0D 2A 00 8B 51 B2 31 A7 99 C7 |";";...*..Q.1...|
00000580: 28 35 38 29 3B 00 98 0D 2B 00 8B 51 B2 31 34 36 |(58);...+..Q.146|
00000590: A7 99 22 12 D2 92 22 3B 00 A6 0D 2C 00 8B 51 B2 |.."...";...,..Q.|
000005A0: 37 A7 99 22 12 3C 00 BB 0D 2D 00 8B 51 B3 31 33 |7..".<...-..Q.13|
000005B0: 33 B0 51 B1 31 34 30 A7 33 37 30 00 DE 0D 2E 00 |3.Q.140.370.....|
000005C0: 91 51 AB 31 33 32 89 34 37 2C 34 38 2C 34 39 2C |.Q.132.47,48,49,|
000005D0: 35 30 2C 34 37 2C 35 31 2C 35 32 2C 35 33 00 EC |50,47,51,52,53..|
000005E0: 0D 2F 00 99 22 12 35 92 22 3B 3A 8E 00 FA 0D 30 |./..".5.";:....0|
000005F0: 00 99 22 12 57 92 22 3B 3A 8E 00 08 0E 31 00 99 |..".W.";:....1..|
00000600: 22 12 53 92 22 3B 3A 8E 00 20 0E 32 00 99 22 12 |".S.";:.. .2..".|
00000610: 4C 92 22 3B 3A 97 53 46 2C 49 56 25 AA 32 3A 8E |L.";:.SF,IV%.2:.|
00000620: 00 2E 0E 33 00 99 22 12 4E 92 22 3B 3A 8E 00 3C |...3..".N.";:..<|
00000630: 0E 34 00 99 22 12 42 92 22 3B 3A 8E 00 52 0E 35 |.4..".B.";:..R.5|
00000640: 00 99 22 12 47 92 22 3B 3A 97 53 46 2C 49 56 25 |..".G.";:.SF,IV%|
00000650: 3A 8E 00 5B 0E 36 00 52 25 B2 32 00 6D 0E 37 00 |:..[.6.R%.2.m.7.|
00000660: A1 41 24 3A 8B 41 24 B2 22 22 A7 35 35 00 85 0E |.A$:.A$."".55...|
00000670: 38 00 8B C3 28 41 24 29 B1 31 A7 41 24 B2 C8 28 |8...(A$).1.A$..(|
00000680: 41 24 2C 31 29 00 99 0E 39 00 8B 41 24 B2 C7 28 |A$,1)...9..A$..(|
00000690: 31 34 34 29 A7 52 25 B2 31 00 9F 0E 3A 00 8E 00 |144).R%.1...:...|
000006A0: AF 0E 3B 00 99 22 12 57 48 41 54 3F 22 3A 8E 00 |..;..".WHAT?":..|
000006B0: C2 0E 3C 00 81 58 B2 31 A4 31 32 30 30 30 3A 82 |..<..X.1.12000:.|
000006C0: 3A 8E 00 CD 0E 3D 00 41 4E 24 B2 22 22 00 EA 0E |:....=.AN$.""...|
000006D0: 3E 00 41 24 B2 22 22 3A 8D 35 34 3A 99 41 24 3B |>.A$."":.54:.A$;|
000006E0: 3A 91 52 25 89 36 36 2C 36 33 00 FB 0E 3F 00 8B |:.R%.66,63...?..|
000006F0: 41 24 B2 C7 28 31 33 29 A7 36 35 00 0E 0F 40 00 |A$..(13).65...@.|
00000700: 41 4E 24 B2 41 4E 24 AA 41 24 3A 89 36 32 00 33 |AN$.AN$.A$:.62.3|
00000710: 0F 41 00 41 4E B2 C5 28 41 4E 24 29 3A 8B 41 4E |.A.AN..(AN$):.AN|
00000720: B2 30 AF 41 4E 24 B3 B1 22 30 22 A7 8D 35 39 3A |.0.AN$.."0"..59:|
00000730: 89 36 31 00 39 0F 42 00 8E 00 67 0F 43 00 99 22 |.61.9.B...g.C.."|
00000740: 12 45 56 45 4E 20 4D 41 52 47 49 4E 53 20 4F 46 |.EVEN MARGINS OF|
00000750: 20 32 2D 32 30 20 20 4D 55 53 54 20 42 45 20 45 | 2-20 MUST BE E|
00000760: 4E 54 45 52 45 44 2E 00 9C 0F 44 00 99 22 12 4C |NTERED....D..".L|
00000770: 45 46 54 20 4D 41 52 47 49 4E 3A 92 22 3B 3A 8D |EFT MARGIN:.";:.|
00000780: 36 31 3A 4D 4C B2 41 4E 3A 8B 4D 4C B3 32 B0 4D |61:ML.AN:.ML.2.M|
00000790: 4C B1 32 30 A7 8D 35 39 3A 89 36 38 00 B7 0F 45 |L.20..59:.68...E|
000007A0: 00 8B B5 28 4D 4C AD 32 29 B3 B1 4D 4C AD 32 A7 |...(ML.2)..ML.2.|
000007B0: 8D 35 39 3A 89 36 37 00 ED 0F 46 00 99 22 12 52 |.59:.67...F..".R|
000007C0: 49 47 48 54 20 4D 41 52 47 49 4E 3A 92 22 3B 3A |IGHT MARGIN:.";:|
000007D0: 8D 36 31 3A 4D 52 B2 41 4E 3A 8B 4D 52 B3 32 B0 |.61:MR.AN:.MR.2.|
000007E0: 4D 52 B1 32 30 A7 8D 35 39 3A 89 37 30 00 08 10 |MR.20..59:.70...|
000007F0: 47 00 8B B5 28 4D 52 AD 32 29 B3 B1 4D 52 AD 32 |G...(MR.2)..MR.2|
00000800: A7 8D 35 39 3A 89 36 37 00 4B 10 48 00 99 22 12 |..59:.67.K.H..".|
00000810: 4C 45 46 54 20 4D 41 52 47 49 4E 3D 22 3B 4D 4C |LEFT MARGIN=";ML|
00000820: 3A 99 22 12 52 49 47 48 54 20 4D 41 52 47 49 4E |:.".RIGHT MARGIN|
00000830: 3D 22 3B 4D 52 3A 85 22 12 43 4F 52 52 45 43 54 |=";MR:.".CORRECT|
00000840: 20 28 59 2F 4E 29 92 22 3B 41 24 00 5A 10 49 00 | (Y/N).";A$.Z.I.|
00000850: 8B 41 24 B2 22 4E 22 A7 36 37 00 6F 10 4A 00 8B |.A$."N".67.o.J..|
00000860: 41 24 B3 B1 22 59 22 A7 8D 35 39 3A 89 36 37 00 |A$.."Y"..59:.67.|
00000870: 80 10 4B 00 4C B2 4E 39 AB 4D 4C AB 4D 52 3A 8E |..K.L.N9.ML.MR:.|
00000880: 00 BA 10 4C 00 4B B2 30 3A 45 B2 31 3A 99 22 93 |...L.K.0:E.1:.".|
00000890: 22 A6 53 5A 29 22 12 45 44 49 54 22 3A 99 22 12 |".SZ)".EDIT":.".|
000008A0: 43 54 52 4C 31 20 46 4F 52 22 3B 3A 5A 5A B2 30 |CTRL1 FOR";:ZZ.0|
000008B0: 3A 97 53 46 2C 49 56 25 AA 32 00 E5 10 4D 00 99 |:.SF,IV%.2...M..|
000008C0: 22 12 20 4D 45 4E 55 2C 20 43 54 52 4C 32 20 46 |". MENU, CTRL2 F|
000008D0: 4F 52 20 48 45 4C 50 2C 20 4F 52 20 43 52 53 52 |OR HELP, OR CRSR|
000008E0: 20 44 4F 57 4E 00 FF 10 4E 00 8D 35 34 3A 4D B2 | DOWN...N..54:M.|
000008F0: C6 28 41 24 29 3A 91 52 25 89 39 31 2C 37 39 00 |.(A$):.R%.91,79.|
00000900: 0B 11 4F 00 8B 4D B2 35 A7 39 37 00 26 11 50 00 |..O..M.5.97.&.P.|
00000910: 8B 4D B2 31 37 AF 4B B3 54 4C AB 32 A7 4B B2 4B |.M.17.K.TL.2.K.K|
00000920: AA 31 3A 89 39 32 00 35 11 51 00 8B 4D B2 31 35 |.1:.92.5.Q..M.15|
00000930: 39 A7 31 34 35 00 4F 11 52 00 8B 4D B2 31 34 35 |9.145.O.R..M.145|
00000940: AF 4B B3 B1 30 A7 4B B2 4B AB 31 3A 89 39 32 00 |.K..0.K.K.1:.92.|
00000950: 67 11 53 00 8B 4D B2 31 34 35 AF 4B B3 B2 31 A7 |g.S..M.145.K..1.|
00000960: 99 22 12 54 4F 50 22 00 75 11 54 00 8B 4D B2 33 |.".TOP".u.T..M.3|
00000970: 30 A7 31 31 30 00 B0 11 55 00 8B 4D B2 31 35 36 |0.110...U..M.156|
00000980: A7 81 4B B2 4B A4 31 39 AA 4B 3A 99 22 12 22 4B |..K.K.19.K:."."K|
00000990: 22 92 22 C9 28 54 58 24 28 4B 29 2C C3 28 54 58 |".".(TX$(K),.(TX|
000009A0: 24 28 4B 29 29 AB 31 29 3B 3A 97 32 31 32 2C 30 |$(K)).1);:.212,0|
000009B0: 00 E6 11 56 00 51 B2 C6 28 C9 28 54 58 24 28 4B |...V.Q..(.(TX$(K|
000009C0: 29 2C 31 29 29 3A 8B 4D B2 31 35 36 AF 28 54 58 |),1)):.M.156.(TX|
000009D0: 24 28 4B AA 31 29 29 B3 B1 22 2A 37 37 37 37 22 |$(K.1)).."*7777"|
000009E0: A7 8D 33 38 3A 82 00 0E 12 57 00 8B 4D B2 31 35 |..38:....W..M.15|
000009F0: 36 AF 28 54 58 24 28 4B AA 31 29 29 B2 22 2A 37 |6.(TX$(K.1))."*7|
00000A00: 37 37 37 22 A7 4B B2 4B AA 31 3A 89 39 33 00 1D |777".K.K.1:.93..|
00000A10: 12 58 00 8B 4D B2 31 35 38 A7 31 32 32 00 2B 12 |.X..M.158.122.+.|
00000A20: 59 00 8B 4D B2 33 31 A7 31 33 31 00 33 12 5A 00 |Y..M.31.131.3.Z.|
00000A30: 89 37 38 00 3D 12 5B 00 45 B2 30 3A 8E 00 5F 12 |.78.=.[.E.0:.._.|
00000A40: 5C 00 8B 4B B1 30 AF C3 28 54 58 24 28 4B 29 29 |\..K.0..(TX$(K))|
00000A50: B2 31 A7 99 22 12 4E 55 4C 4C 22 3A 89 37 38 00 |.1..".NULL":.78.|
00000A60: 85 12 5D 00 8B 54 58 24 28 4B 29 B2 22 2A 37 37 |..]..TX$(K)."*77|
00000A70: 37 37 22 A7 99 22 12 45 4E 44 22 3A 4B B2 4B AB |77"..".END":K.K.|
00000A80: 31 3A 89 37 38 00 BD 12 5E 00 51 B2 C6 28 C9 28 |1:.78...^.Q..(.(|
00000A90: 54 58 24 28 4B 29 2C 31 29 29 3A 99 22 12 22 4B |TX$(K),1)):."."K|
00000AA0: 22 92 22 C9 28 54 58 24 28 4B 29 2C C3 28 54 58 |".".(TX$(K),.(TX|
00000AB0: 24 28 4B 29 29 AB 31 29 3B 3A 8D 33 38 00 EC 12 |$(K)).1);:.38...|
00000AC0: 5F 00 97 32 31 32 2C 30 3A 8B 4B B1 30 A7 4C 4E |_..212,0:.K.0.LN|
00000AD0: B2 4B 3A 50 4C B2 C3 28 54 58 24 28 4B 29 29 3A |.K:PL..(TX$(K)):|
00000AE0: 8D 33 30 33 3A 4D B2 51 3A 89 37 39 00 F4 12 60 |.303:M.Q:.79...`|
00000AF0: 00 89 37 38 00 27 13 61 00 99 22 93 20 12 48 45 |..78.'.a..". .HE|
00000B00: 4C 50 20 4D 45 4E 55 22 3A 99 22 20 12 4B 45 59 |LP MENU":." .KEY|
00000B10: 53 3A 22 3A 99 22 20 12 43 54 52 4C 31 2D 4D 41 |S:":." .CTRL1-MA|
00000B20: 49 4E 20 4D 45 4E 55 00 55 13 62 00 99 22 20 12 |IN MENU.U.b.." .|
00000B30: 43 54 52 4C 32 2D 48 45 4C 50 20 4D 45 4E 55 22 |CTRL2-HELP MENU"|
00000B40: 3A 99 22 20 12 43 54 52 4C 33 2D 4D 45 4D 52 59 |:." .CTRL3-MEMRY|
00000B50: 20 4C 45 46 54 00 6D 13 63 00 99 22 20 12 43 54 | LEFT.m.c.." .CT|
00000B60: 52 4C 34 2D 4D 4F 56 45 20 54 45 58 54 00 8A 13 |RL4-MOVE TEXT...|
00000B70: 64 00 99 22 20 12 43 54 52 4C 35 2D 53 4B 49 50 |d.." .CTRL5-SKIP|
00000B80: 20 32 30 20 45 4C 45 4D 4E 54 00 BE 13 65 00 99 | 20 ELEMNT...e..|
00000B90: 22 20 12 43 54 52 4C 36 2D 52 45 50 4C 41 43 45 |" .CTRL6-REPLACE|
00000BA0: 20 45 4C 45 4D 4E 54 22 3A 99 22 20 12 43 54 52 | ELEMNT":." .CTR|
00000BB0: 4C 37 2D 49 4E 53 45 52 54 20 54 45 58 54 00 F4 |L7-INSERT TEXT..|
00000BC0: 13 66 00 99 22 20 12 43 54 52 4C 38 2D 52 45 50 |.f.." .CTRL8-REP|
00000BD0: 4C 41 43 45 20 45 4C 45 4D 4E 54 22 3A 99 22 20 |LACE ELEMNT":." |
00000BE0: 12 43 52 53 52 20 44 4F 57 4E 2D 4E 45 58 54 20 |.CRSR DOWN-NEXT |
00000BF0: 4C 49 4E 45 00 0E 14 67 00 99 22 20 12 43 52 53 |LINE...g.." .CRS|
00000C00: 52 20 55 50 2D 50 52 45 56 2E 4C 49 4E 45 00 49 |R UP-PREV.LINE.I|
00000C10: 14 68 00 99 22 20 12 53 59 4D 42 4F 4C 53 3A 22 |.h.." .SYMBOLS:"|
00000C20: 3A 99 22 20 12 35 92 2D 54 41 42 35 22 3A 99 22 |:." .5.-TAB5":."|
00000C30: 20 12 45 92 2D 45 4A 45 43 54 22 3A 99 22 20 12 | .E.-EJECT":." .|
00000C40: 4E 92 2D 49 4E 44 45 4E 54 00 72 14 69 00 99 22 |N.-INDENT.r.i.."|
00000C50: 20 12 57 92 2D 49 4E 44 45 4E 54 20 52 45 53 45 | .W.-INDENT RESE|
00000C60: 54 22 3A 99 22 20 12 42 92 2D 44 42 4C 57 49 44 |T":." .B.-DBLWID|
00000C70: 54 48 00 A7 14 6A 00 99 22 20 12 53 92 2D 44 42 |TH...j.." .S.-DB|
00000C80: 4C 57 49 44 54 48 20 52 45 53 45 54 22 3A 99 22 |LWIDTH RESET":."|
00000C90: 20 12 47 92 2D 55 50 45 52 20 43 41 53 45 2F 47 | .G.-UPER CASE/G|
00000CA0: 52 41 50 48 49 43 53 00 C3 14 6B 00 99 22 20 12 |RAPHICS...k.." .|
00000CB0: 4C 92 2D 55 50 50 45 52 2F 4C 4F 57 45 52 20 43 |L.-UPPER/LOWER C|
00000CC0: 41 53 45 00 E3 14 6C 00 99 22 20 12 3C 92 2D 52 |ASE...l.." .<.-R|
00000CD0: 45 54 55 52 4E 28 4E 58 54 20 50 52 47 52 50 48 |ETURN(NXT PRGRPH|
00000CE0: 29 22 3B 00 EB 14 6D 00 89 37 38 00 18 15 6E 00 |)";...m..78...n.|
00000CF0: 99 3A 99 22 12 45 4C 45 4D 45 4E 54 20 4E 55 4D |.:.".ELEMENT NUM|
00000D00: 42 45 52 20 54 4F 20 44 45 4C 45 54 45 3F 22 3A |BER TO DELETE?":|
00000D10: 41 4E B2 30 3A 8D 36 31 00 27 15 6F 00 91 52 25 |AN.0:.61.'.o..R%|
00000D20: 89 39 31 2C 31 31 32 00 44 15 70 00 8B 41 4E B2 |.91,112.D.p..AN.|
00000D30: 30 AF 41 4E 24 B3 B1 22 30 22 A7 8D 35 39 3A 89 |0.AN$.."0"..59:.|
00000D40: 37 34 31 30 00 63 15 71 00 8B C3 28 54 58 24 28 |7410.c.q...(TX$(|
00000D50: 41 4E 29 29 B2 31 A7 99 22 12 4E 55 4C 4C 22 3A |AN)).1..".NULL":|
00000D60: 89 37 38 00 A9 15 72 00 99 22 12 4C 49 4E 45 20 |.78...r..".LINE |
00000D70: 54 4F 20 44 45 4C 45 54 45 20 49 53 3A 22 3A 99 |TO DELETE IS:":.|
00000D80: 22 12 22 3B 41 4E 3B C9 28 54 58 24 28 41 4E 29 |".";AN;.(TX$(AN)|
00000D90: 2C C3 28 54 58 24 28 41 4E 29 29 AB 31 29 3B 3A |,.(TX$(AN)).1);:|
00000DA0: 4C 4E B2 41 4E 3A 8D 33 37 00 DB 15 73 00 99 3A |LN.AN:.37...s..:|
00000DB0: 99 22 12 27 43 54 52 4C 36 27 20 54 4F 20 44 45 |.".'CTRL6' TO DE|
00000DC0: 4C 45 54 45 2C 20 43 52 53 52 20 44 4F 57 4E 20 |LETE, CRSR DOWN |
00000DD0: 54 4F 20 43 4F 4E 54 49 4E 55 45 00 EE 15 74 00 |TO CONTINUE...t.|
00000DE0: 8D 35 34 3A 91 52 25 89 39 31 2C 31 31 37 00 05 |.54:.R%.91,117..|
00000DF0: 16 75 00 8B 41 24 B2 C7 28 31 37 29 A7 4D B2 31 |.u..A$..(17).M.1|
00000E00: 37 3A 89 38 30 00 18 16 76 00 8B 41 24 B3 B1 C7 |7:.80...v..A$...|
00000E10: 28 33 30 29 A7 31 31 36 00 51 16 77 00 81 58 B2 |(30).116.Q.w..X.|
00000E20: 41 4E A4 54 4C 3A 54 58 24 28 58 29 B2 54 58 24 |AN.TL:TX$(X).TX$|
00000E30: 28 58 AA 31 29 3A 8B 58 B3 54 4C AB 32 AF 28 54 |(X.1):.X.TL.2.(T|
00000E40: 58 24 28 58 29 29 B3 B1 22 2A 37 37 37 37 22 A7 |X$(X)).."*7777".|
00000E50: 82 00 5E 16 78 00 8B 4B B1 58 A7 4B B2 58 00 87 |..^.x..K.X.K.X..|
00000E60: 16 79 00 54 58 24 28 58 AA 31 29 B2 22 2A 22 3A |.y.TX$(X.1)."*":|
00000E70: 99 22 12 44 45 4C 45 54 45 20 43 4F 4D 50 4C 45 |.".DELETE COMPLE|
00000E80: 54 45 22 3A 89 37 38 00 B8 16 7A 00 99 3A 99 22 |TE":.78...z..:."|
00000E90: 12 57 48 41 54 20 49 53 20 45 4C 45 4D 45 4E 54 |.WHAT IS ELEMENT|
00000EA0: 20 4E 55 4D 42 45 52 20 54 4F 20 52 45 50 4C 41 | NUMBER TO REPLA|
00000EB0: 43 45 3F 22 3A 8D 36 31 00 C7 16 7B 00 91 52 25 |CE?":.61...{..R%|
00000EC0: 89 39 31 2C 31 32 34 00 E3 16 7C 00 8B 41 4E B2 |.91,124...|..AN.|
00000ED0: 30 AF 41 4E 24 B3 B1 22 30 22 A7 8D 36 31 3A 89 |0.AN$.."0"..61:.|
00000EE0: 31 32 32 00 2A 17 7D 00 99 22 12 4C 49 4E 45 20 |122.*.}..".LINE |
00000EF0: 54 4F 20 52 45 50 4C 41 43 45 20 49 53 3A 22 3A |TO REPLACE IS:":|
00000F00: 99 22 12 22 3B 41 4E 3B C9 28 54 58 24 28 41 4E |.".";AN;.(TX$(AN|
00000F10: 29 2C C3 28 54 58 24 28 41 4E 29 29 AB 31 29 3B |),.(TX$(AN)).1);|
00000F20: 3A 4C 4E B2 41 4E 3A 8D 33 37 00 5D 17 7E 00 99 |:LN.AN:.37.].~..|
00000F30: 3A 99 22 12 27 43 54 52 4C 38 27 20 54 4F 20 52 |:.".'CTRL8' TO R|
00000F40: 45 50 4C 41 43 45 2C 20 43 52 53 52 20 44 4F 57 |EPLACE, CRSR DOW|
00000F50: 4E 20 54 4F 20 43 4F 4E 54 49 4E 55 45 00 70 17 |N TO CONTINUE.p.|
00000F60: 7F 00 8D 35 34 3A 91 52 25 89 39 31 2C 31 32 38 |...54:.R%.91,128|
00000F70: 00 87 17 80 00 8B 41 24 B2 C7 28 31 37 29 A7 4D |......A$..(17).M|
00000F80: B2 31 37 3A 89 38 30 00 C2 17 81 00 8B 41 24 B2 |.17:.80......A$.|
00000F90: C7 28 31 35 38 29 A7 4C 4E B2 41 4E 3A 54 58 24 |.(158).LN.AN:TX$|
00000FA0: 28 4C 4E 29 B2 22 2A 22 3A 8D 33 30 33 3A 99 22 |(LN)."*":.303:."|
00000FB0: 12 45 4E 44 20 52 45 50 4C 41 43 45 2E 22 3A 89 |.END REPLACE.":.|
00000FC0: 37 38 00 CB 17 82 00 89 31 32 37 00 FA 17 83 00 |78......127.....|
00000FD0: 99 3A 99 22 12 4C 49 4E 45 20 54 4F 20 49 4E 53 |.:.".LINE TO INS|
00000FE0: 45 52 54 20 41 46 54 45 52 3A 22 3A 8D 36 31 3A |ERT AFTER:":.61:|
00000FF0: 41 58 B2 41 4E 3A 4B B2 41 4E 00 16 18 84 00 8B |AX.AN:K.AN......|
00001000: 41 4E B2 30 AF 41 4E 24 B3 B1 22 30 22 A7 8D 35 |AN.0.AN$.."0"..5|
00001010: 39 3A 89 31 33 31 00 2A 18 85 00 81 4A B2 54 4C |9:.131.*....J.TL|
00001020: A4 54 4C AB 32 30 30 A9 AB 31 00 3D 18 86 00 8B |.TL.200..1.=....|
00001030: C3 28 54 58 24 28 4A 29 29 B2 31 A7 82 00 65 18 |.(TX$(J)).1...e.|
00001040: 87 00 8B 4A B1 54 4C AB 31 30 A7 99 22 12 4E 4F |...J.TL.10..".NO|
00001050: 20 52 4F 4F 4D 20 46 4F 52 20 49 4E 53 45 52 54 | ROOM FOR INSERT|
00001060: 22 3A 89 37 38 00 82 18 88 00 81 4C 4E B2 4A A4 |":.78......LN.J.|
00001070: 54 4C 3A 8D 33 30 33 3A 91 52 25 89 39 31 2C 31 |TL:.303:.R%.91,1|
00001080: 33 37 00 93 18 89 00 8B 41 24 B3 B1 C7 28 33 31 |37......A$...(31|
00001090: 29 A7 82 00 A0 18 8A 00 4C 4E B2 B5 28 4C 4E 29 |).......LN..(LN)|
000010A0: 00 C1 18 8B 00 81 41 B2 41 58 A4 4A 3A 8B 28 54 |......A.AX.J:.(T|
000010B0: 58 24 28 41 29 29 B3 B1 22 2A 37 37 37 37 22 A7 |X$(A)).."*7777".|
000010C0: 82 00 DB 18 8C 00 81 58 B2 4A A4 4C 4E 3A 41 58 |.......X.J.LN:AX|
000010D0: B2 41 58 AA 31 3A 41 B2 41 AA 31 00 FC 18 8D 00 |.AX.1:A.A.1.....|
000010E0: 81 59 B2 41 A4 41 58 A9 AB 31 3A 54 58 24 28 59 |.Y.A.AX..1:TX$(Y|
000010F0: AA 31 29 B2 54 58 24 28 59 29 3A 82 00 2A 19 8E |.1).TX$(Y):..*..|
00001100: 00 54 58 24 28 41 58 29 B2 54 58 24 28 4A 29 3A |.TX$(AX).TX$(J):|
00001110: 54 58 24 28 4A 29 B2 22 2A 22 3A 4A B2 4A AA 31 |TX$(J)."*":J.J.1|
00001120: 3A 8B 4A B1 4C 4E A7 31 34 34 00 30 19 8F 00 82 |:.J.LN.144.0....|
00001130: 00 63 19 90 00 99 22 12 49 4E 53 45 52 54 20 43 |.c....".INSERT C|
00001140: 4F 4D 50 4C 45 54 45 2D 43 52 53 52 20 44 4F 57 |OMPLETE-CRSR DOW|
00001150: 4E 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 22 3A |N TO CONTINUE.":|
00001160: 89 37 38 00 96 19 91 00 99 22 12 46 49 52 53 54 |.78......".FIRST|
00001170: 20 45 4C 45 4D 45 4E 54 20 4F 46 20 42 4C 4B 3F | ELEMENT OF BLK?|
00001180: 22 3A 8D 36 31 3A 46 45 B2 41 4E 3A 91 52 25 89 |":.61:FE.AN:.R%.|
00001190: 39 31 2C 31 34 36 00 AA 19 92 00 8B 46 45 B1 54 |91,146......FE.T|
000011A0: 4C A7 8D 35 39 3A 89 31 34 35 00 DC 19 93 00 99 |L..59:.145......|
000011B0: 22 12 4C 41 53 54 20 45 4C 45 4D 45 4E 54 20 4F |".LAST ELEMENT O|
000011C0: 46 20 42 4C 4B 3F 22 3A 8D 36 31 3A 4C 45 B2 41 |F BLK?":.61:LE.A|
000011D0: 4E 3A 91 52 25 89 39 31 2C 31 34 38 00 F6 19 94 |N:.R%.91,148....|
000011E0: 00 8B 4C 45 B1 54 4C B0 4C 45 B3 46 45 A7 8D 35 |..LE.TL.LE.FE..5|
000011F0: 39 3A 89 31 34 37 00 2A 1A 95 00 99 22 12 45 4C |9:.147.*....".EL|
00001200: 45 4D 4E 54 20 54 4F 20 49 4E 53 52 54 20 41 46 |EMNT TO INSRT AF|
00001210: 54 45 52 3F 22 3A 8D 36 31 3A 4E 45 B2 41 4E 3A |TER?":.61:NE.AN:|
00001220: 91 52 25 89 39 31 2C 31 35 30 00 4C 1A 96 00 8B |.R%.91,150.L....|
00001230: 4E 45 B1 54 4C B0 28 4E 45 B1 46 45 AF 4E 45 B3 |NE.TL.(NE.FE.NE.|
00001240: 4C 45 29 A7 8D 35 39 3A 89 31 34 39 00 61 1A 97 |LE)..59:.149.a..|
00001250: 00 51 52 B2 30 3A 8B 4E 45 B1 46 45 A7 51 52 B2 |.QR.0:.NE.FE.QR.|
00001260: 31 00 84 1A 98 00 81 4A B2 54 4C A4 54 4C AB 32 |1......J.TL.TL.2|
00001270: 30 30 A9 AB 31 3A 8B C3 28 54 58 24 28 4A 29 29 |00..1:..(TX$(J))|
00001280: B2 31 A7 82 00 A4 1A 99 00 8B 28 54 4C AB 4A 29 |.1........(TL.J)|
00001290: B3 28 4C 45 AB 46 45 29 A7 4A B2 54 4C AB 35 3A |.(LE.FE).J.TL.5:|
000012A0: 89 31 33 35 00 E2 1A 9A 00 99 22 12 52 45 41 44 |.135......".READ|
000012B0: 59 20 54 4F 20 4D 4F 56 45 2E 20 27 43 54 52 4C |Y TO MOVE. 'CTRL|
000012C0: 34 27 20 54 4F 20 4D 4F 56 45 2C 20 43 52 53 52 |4' TO MOVE, CRSR|
000012D0: 20 44 4F 57 4E 20 54 4F 20 43 4F 4E 54 49 4E 55 | DOWN TO CONTINU|
000012E0: 45 2E 00 F5 1A 9B 00 8D 35 34 3A 91 52 25 89 39 |E.......54:.R%.9|
000012F0: 31 2C 31 35 36 00 0C 1B 9C 00 8B 41 24 B2 C7 28 |1,156......A$..(|
00001300: 31 37 29 A7 51 B2 31 37 3A 89 38 30 00 20 1B 9D |17).Q.17:.80. ..|
00001310: 00 8B 41 24 B3 B1 C7 28 31 35 39 29 A7 31 35 35 |..A$...(159).155|
00001320: 00 52 1B 9E 00 59 B2 30 3A 81 41 B2 46 45 A4 4C |.R...Y.0:.A.FE.L|
00001330: 45 3A 54 58 24 28 4A AA 59 29 B2 54 58 24 28 41 |E:TX$(J.Y).TX$(A|
00001340: 29 3A 59 B2 59 AA 31 3A 82 3A 4C 4E B2 4A AA 59 |):Y.Y.1:.:LN.J.Y|
00001350: AB 31 00 8E 1B 9F 00 59 B2 30 3A 81 41 B2 4C 45 |.1.....Y.0:.A.LE|
00001360: AA 31 A4 4A 3A 54 58 24 28 46 45 AA 59 29 B2 54 |.1.J:TX$(FE.Y).T|
00001370: 58 24 28 41 29 3A 59 B2 59 AA 31 3A 8B 54 58 24 |X$(A):Y.Y.1:.TX$|
00001380: 28 41 29 B3 B1 22 2A 37 37 37 37 22 A7 82 00 C5 |(A).."*7777"....|
00001390: 1B A0 00 81 41 B2 46 45 AA 59 A4 4A 3A 54 58 24 |....A.FE.Y.J:TX$|
000013A0: 28 42 29 B2 22 2A 22 3A 82 3A 41 58 B2 4E 45 3A |(B)."*":.:AX.NE:|
000013B0: 8B 51 52 B2 31 A7 41 58 B2 41 58 AB 28 4C 45 AB |.QR.1.AX.AX.(LE.|
000013C0: 46 45 29 AB 31 00 CE 1B A1 00 89 31 33 39 00 02 |FE).1......139..|
000013D0: 1C A2 00 45 42 24 B2 22 22 3A 56 24 B2 22 22 3A |...EB$."":V$."":|
000013E0: 99 22 12 46 49 4C 45 20 4E 41 4D 45 20 28 54 4F |.".FILE NAME (TO|
000013F0: 20 20 31 30 20 43 48 41 52 53 29 3F 22 3A 85 46 | 10 CHARS)?":.F|
00001400: 43 24 00 23 1C A3 00 8B C3 28 46 43 24 29 B1 31 |C$.#.....(FC$).1|
00001410: 30 B0 C3 28 46 43 24 29 B2 30 A7 8D 35 39 3A 89 |0..(FC$).0..59:.|
00001420: 31 36 32 00 5A 1C A4 00 99 22 12 4C 4F 41 44 2C |162.Z....".LOAD,|
00001430: 53 41 56 45 20 4F 52 20 44 45 4C 45 54 45 20 46 |SAVE OR DELETE F|
00001440: 49 4C 45 20 28 4C 2C 53 20 4F 52 20 44 29 3F 22 |ILE (L,S OR D)?"|
00001450: 3A 53 4C B2 30 3A 53 41 B2 30 00 77 1C A5 00 8D |:SL.0:SA.0.w....|
00001460: 35 34 3A 99 41 24 3A 8D 33 36 30 3A 91 52 25 89 |54:.A$:.360:.R%.|
00001470: 31 38 35 2C 31 36 36 00 92 1C A6 00 8B 41 24 B2 |185,166......A$.|
00001480: 22 53 22 A7 53 4C B2 31 3A 53 41 B2 31 3A 89 31 |"S".SL.1:SA.1:.1|
00001490: 36 38 00 B0 1C A7 00 8B 41 24 B3 B1 22 4C 22 AF |68......A$.."L".|
000014A0: 41 24 B3 B1 22 44 22 A7 8D 35 39 3A 89 31 36 34 |A$.."D"..59:.164|
000014B0: 00 DF 1C A8 00 99 22 12 57 48 41 54 20 49 53 20 |......".WHAT IS |
000014C0: 49 2F 4F 20 44 45 56 49 43 45 20 4E 42 52 28 31 |I/O DEVICE NBR(1|
000014D0: 2C 38 2C 39 2C 31 30 20 4F 52 20 31 31 29 3F 00 |,8,9,10 OR 11)?.|
000014E0: F3 1C A9 00 8D 36 31 3A 91 52 25 89 31 38 35 2C |.....61:.R%.185,|
000014F0: 31 37 30 00 0D 1D AA 00 44 56 B2 41 4E 3A 8B 44 |170.....DV.AN:.D|
00001500: 56 B1 31 31 A7 8D 35 39 3A 89 31 36 38 00 28 1D |V.11..59:.168.(.|
00001510: AB 00 8B 44 56 B2 31 B0 28 44 56 B1 37 AF 44 56 |...DV.1.(DV.7.DV|
00001520: B3 31 32 29 A7 31 37 33 00 35 1D AC 00 8D 35 39 |.12).173.5....59|
00001530: 3A 89 31 36 38 00 43 1D AD 00 8B 44 56 B3 38 A7 |:.168.C....DV.8.|
00001540: 31 37 37 00 73 1D AE 00 53 41 B2 32 3A 46 43 24 |177.s...SA.2:FC$|
00001550: B2 56 24 AA 22 30 3A 22 AA 46 43 24 AA 22 2C 53 |.V$."0:".FC$.",S|
00001560: 22 3A 8B 53 4C B2 31 A7 46 43 24 B2 46 43 24 AA |":.SL.1.FC$.FC$.|
00001570: 22 2C 57 00 89 1D AF 00 8B 53 4C B2 30 A7 46 43 |",W......SL.0.FC|
00001580: 24 B2 46 43 24 AA 22 2C 52 00 B3 1D B0 00 9F 31 |$.FC$.",R......1|
00001590: 35 2C 44 56 2C 31 35 2C 22 53 54 41 54 22 3A 8B |5,DV,15,"STAT":.|
000015A0: 53 4C B2 31 35 A7 98 31 35 2C 46 43 24 3A A0 31 |SL.15..15,FC$:.1|
000015B0: 35 3A 8E 00 D1 1D B1 00 8B 53 4C B2 30 A7 81 51 |5:.......SL.0..Q|
000015C0: B2 31 A4 54 4C 3A 54 58 24 28 51 29 B2 22 22 3A |.1.TL:TX$(Q)."":|
000015D0: 82 00 FE 1D B2 00 9F 31 2C 44 56 2C 53 41 2C 46 |.......1,DV,SA,F|
000015E0: 43 24 3A 53 4C B2 53 4C AA 31 3A 81 58 B2 31 A4 |C$:SL.SL.1:.X.1.|
000015F0: 54 4C 3A 91 53 4C 89 31 38 31 2C 31 37 39 00 3B |TL:.SL.181,179.;|
00001600: 1E B3 00 8B 45 41 B2 30 A7 98 31 2C 54 58 24 28 |....EA.0..1,TX$(|
00001610: 58 29 C7 28 31 33 29 3A 8D 31 38 36 3A 8B 45 41 |X).(13):.186:.EA|
00001620: B2 30 AF 54 58 24 28 58 29 B2 22 2A 37 37 37 37 |.0.TX$(X)."*7777|
00001630: 22 A7 4C 4E B2 31 3A 89 31 38 34 00 52 1E B4 00 |".LN.1:.184.R...|
00001640: 8B 45 41 B2 30 A7 82 58 3A 4C 4E B2 31 3A 89 31 |.EA.0..X:LN.1:.1|
00001650: 38 34 00 84 1E B5 00 8B 45 41 B2 30 A7 84 31 2C |84......EA.0..1,|
00001660: 54 58 24 28 58 29 3A 8D 31 38 36 3A 8B 45 41 B2 |TX$(X):.186:.EA.|
00001670: 30 AF 54 58 24 28 58 29 B2 22 2A 37 37 37 37 22 |0.TX$(X)."*7777"|
00001680: A7 31 38 33 00 90 1E B6 00 8B 45 41 B2 30 A7 82 |.183......EA.0..|
00001690: 00 B5 1E B7 00 8B 45 41 B2 30 A7 81 51 B2 58 AA |......EA.0..Q.X.|
000016A0: 31 A4 B5 28 54 4C 29 3A 54 58 24 28 51 29 B2 22 |1..(TL):TX$(Q)."|
000016B0: 2A 22 3A 82 51 00 C6 1E B8 00 A0 31 3A 8B 44 56 |*":.Q......1:.DV|
000016C0: B1 37 A7 A0 31 35 00 D2 1E B9 00 56 24 B2 22 22 |.7..15.....V$.""|
000016D0: 3A 8E 00 DE 1E BA 00 8B 44 56 B3 38 A7 8E 00 FB |:.......DV.8....|
000016E0: 1E BB 00 84 31 35 2C 45 41 2C 45 42 24 2C 45 43 |....15,EA,EB$,EC|
000016F0: 2C 45 44 3A 8B 45 41 B2 30 A7 8E 00 29 1F BC 00 |,ED:.EA.0...)...|
00001700: 99 22 12 44 49 53 4B 20 45 52 52 4F 52 22 3A 99 |.".DISK ERROR":.|
00001710: 45 41 3B 45 42 24 3B 45 43 3B 45 44 3A 8D 36 30 |EA;EB$;EC;ED:.60|
00001720: 3A 58 B2 31 3A 89 31 38 34 00 5F 1F BD 00 4C 50 |:X.1:.184._...LP|
00001730: B2 30 3A 44 57 B2 4C 3A 4C 46 B2 30 3A 4A 53 B2 |.0:DW.L:LF.0:JS.|
00001740: 30 3A 5A 5A B2 30 3A 57 57 B2 30 3A 4E 43 B2 30 |0:ZZ.0:WW.0:NC.0|
00001750: 3A 4C 55 24 B2 C7 28 31 37 29 3A 50 47 B2 30 00 |:LU$..(17):PG.0.|
00001760: 88 1F BE 00 4C 4C 24 B2 C7 28 31 37 29 3A 4C 52 |....LL$..(17):LR|
00001770: 24 B2 C7 28 31 34 36 29 3A 4C 53 24 B2 C7 28 31 |$..(146):LS$..(1|
00001780: 34 36 29 3A 8D 33 35 33 00 B6 1F BF 00 4E 4D B2 |46):.353.....NM.|
00001790: 30 3A 99 22 12 50 52 49 4E 54 45 52 20 44 45 56 |0:.".PRINTER DEV|
000017A0: 49 43 45 20 4E 42 52 28 32 2C 20 33 2C 20 34 20 |ICE NBR(2, 3, 4 |
000017B0: 4F 52 20 35 29 92 00 CE 1F C0 00 8D 36 31 3A 99 |OR 5).......61:.|
000017C0: 41 24 3A 91 52 25 89 32 35 34 2C 31 39 33 00 F4 |A$:.R%.254,193..|
000017D0: 1F C1 00 8B 41 4E B3 B1 32 AF 41 4E B3 B1 33 AF |....AN..2.AN..3.|
000017E0: 41 4E B3 B1 34 AF 41 4E B3 B1 35 A7 8D 35 39 3A |AN..4.AN..5..59:|
000017F0: 89 31 39 31 00 0D 20 C2 00 50 B2 41 4E 3A 8D 36 |.191.. ..P.AN:.6|
00001800: 37 3A 44 57 B2 4E 39 AB 4D 4C AB 4D 52 00 30 20 |7:DW.N9.ML.MR.0 |
00001810: C3 00 50 47 B2 30 3A 99 22 12 4E 55 4D 42 45 52 |..PG.0:.".NUMBER|
00001820: 20 50 41 47 45 53 20 28 59 2F 4E 29 3F 92 22 3B | PAGES (Y/N)?.";|
00001830: 00 48 20 C4 00 8D 35 34 3A 99 41 24 3A 91 52 25 |.H ...54:.A$:.R%|
00001840: 89 32 35 34 2C 31 39 37 00 58 20 C5 00 8B 41 24 |.254,197.X ...A$|
00001850: B2 22 59 22 A7 32 30 30 00 6E 20 C6 00 8B 41 24 |."Y".200.n ...A$|
00001860: B3 B1 22 4E 22 A7 8D 35 39 3A 89 31 39 35 00 77 |.."N"..59:.195.w|
00001870: 20 C7 00 89 32 30 32 00 8E 20 C8 00 99 22 12 46 | ...202.. ...".F|
00001880: 49 52 53 54 20 50 41 47 45 20 4E 42 52 3F 00 A2 |IRST PAGE NBR?..|
00001890: 20 C9 00 8D 36 31 3A 50 47 B2 41 4E 3A 50 31 B2 | ...61:PG.AN:P1.|
000018A0: 41 4E 00 C0 20 CA 00 99 22 12 44 4F 55 42 4C 45 |AN.. ...".DOUBLE|
000018B0: 20 53 50 41 43 45 20 28 59 2F 4E 29 3F 92 22 3B | SPACE (Y/N)?.";|
000018C0: 00 D8 20 CB 00 8D 35 34 3A 99 41 24 3A 91 52 25 |.. ...54:.A$:.R%|
000018D0: 89 32 35 34 2C 32 30 34 00 EE 20 CC 00 8B 41 24 |.254,204.. ...A$|
000018E0: B2 22 59 22 A7 53 50 B2 31 3A 89 32 30 37 00 04 |."Y".SP.1:.207..|
000018F0: 21 CD 00 8B 41 24 B2 22 4E 22 A7 53 50 B2 30 3A |!...A$."N".SP.0:|
00001900: 89 32 30 37 00 11 21 CE 00 8D 35 39 3A 89 32 30 |.207..!...59:.20|
00001910: 32 00 2A 21 CF 00 99 22 12 4A 55 53 54 49 46 59 |2.*!...".JUSTIFY|
00001920: 20 28 59 2F 4E 29 3F 92 22 3B 00 48 21 D0 00 8D | (Y/N)?.";.H!...|
00001930: 35 34 3A 99 41 24 3A 8B 41 24 B2 22 59 22 A7 4A |54:.A$:.A$."Y".J|
00001940: 53 B2 31 3A 89 32 31 30 00 5E 21 D1 00 8B 41 24 |S.1:.210.^!...A$|
00001950: B3 B1 22 4E 22 A7 8D 35 39 3A 89 32 30 37 00 95 |.."N"..59:.207..|
00001960: 21 D2 00 99 22 12 46 49 52 53 54 20 45 4C 45 4D |!...".FIRST ELEM|
00001970: 45 4E 54 20 54 4F 20 50 52 49 4E 54 22 3A 99 22 |ENT TO PRINT":."|
00001980: 28 31 20 54 4F 22 B5 28 54 4C 29 22 29 3F 20 22 |(1 TO".(TL)")? "|
00001990: 3B 3A 8D 36 31 00 B8 21 D3 00 46 45 B2 41 4E 3A |;:.61..!..FE.AN:|
000019A0: 8B 46 45 B3 31 B0 46 45 B1 54 4C A7 8D 35 39 3A |.FE.1.FE.TL..59:|
000019B0: 89 32 35 34 2C 32 31 30 00 F2 21 D4 00 99 22 12 |.254,210..!...".|
000019C0: 4C 41 53 54 20 45 4C 45 4D 45 4E 54 20 54 4F 20 |LAST ELEMENT TO |
000019D0: 50 52 49 4E 54 22 3A 99 22 28 22 46 45 22 20 54 |PRINT":."("FE" T|
000019E0: 4F 20 22 B5 28 54 4C 29 22 29 3F 20 22 3B 3A 8D |O ".(TL)")? ";:.|
000019F0: 36 31 00 19 22 D5 00 4C 45 B2 41 4E 3A 8B 4C 45 |61.."..LE.AN:.LE|
00001A00: B3 46 45 B0 4C 45 B1 54 4C A7 8D 35 39 3A 91 52 |.FE.LE.TL..59:.R|
00001A10: 25 89 32 35 34 2C 32 31 32 00 4B 22 D6 00 99 22 |%.254,212.K"..."|
00001A20: 93 12 48 4F 57 20 4D 41 4E 59 20 43 4F 50 49 45 |..HOW MANY COPIE|
00001A30: 53 3F 92 22 3B 3A 8D 36 31 3A 4E 43 B2 41 4E 3A |S?.";:.61:NC.AN:|
00001A40: 91 52 25 89 32 35 34 2C 32 31 35 00 5E 22 D7 00 |.R%.254,215.^"..|
00001A50: 8B 4E 43 B2 30 A7 8D 35 39 3A 89 32 31 34 00 9E |.NC.0..59:.214..|
00001A60: 22 D8 00 99 22 12 50 4F 53 49 54 49 4F 4E 20 50 |"...".POSITION P|
00001A70: 41 50 45 52 2C 20 54 55 52 4E 20 4F 4E 20 50 52 |APER, TURN ON PR|
00001A80: 49 4E 54 45 52 2E 20 54 59 50 45 20 27 59 27 20 |INTER. TYPE 'Y' |
00001A90: 57 48 45 4E 20 52 45 41 44 59 2E 92 22 3B 00 B6 |WHEN READY..";..|
00001AA0: 22 D9 00 8D 35 34 3A 99 41 24 3A 91 52 25 89 32 |"...54:.A$:.R%.2|
00001AB0: 35 34 2C 32 31 38 00 CC 22 DA 00 8B 41 24 B3 B1 |54,218.."...A$..|
00001AC0: 22 59 22 A7 8D 35 39 3A 89 32 31 36 00 D9 22 DB |"Y"..59:.216..".|
00001AD0: 00 8B 50 B2 32 A7 32 32 32 00 F3 22 DC 00 9F 50 |..P.2.222.."...P|
00001AE0: 2C 50 2C 37 3A 8B 50 B2 33 A7 97 53 46 2C 49 56 |,P,7:.P.3..SF,IV|
00001AF0: 25 AA 32 00 05 23 DD 00 98 50 2C C7 28 31 37 29 |%.2..#...P,.(17)|
00001B00: C7 28 31 30 29 00 3B 23 DE 00 81 4A B2 46 45 A4 |.(10).;#...J.FE.|
00001B10: 4C 45 3A 42 54 24 B2 22 22 3A 51 B2 C6 28 C9 28 |LE:BT$."":Q..(.(|
00001B20: 54 58 24 28 4A 29 2C 31 29 29 3A 8B 51 B1 31 33 |TX$(J),1)):.Q.13|
00001B30: 32 AF 51 B3 31 34 31 A7 32 35 35 00 5F 23 DF 00 |2.Q.141.255._#..|
00001B40: 4C 31 24 B2 4C 31 24 AA C9 28 54 58 24 28 4A 29 |L1$.L1$..(TX$(J)|
00001B50: 2C 28 C3 28 54 58 24 28 4A 29 29 AB 31 29 29 00 |,(.(TX$(J)).1)).|
00001B60: 74 23 E0 00 8B 51 B2 32 B0 51 B2 33 B0 51 B2 31 |t#...Q.2.Q.3.Q.1|
00001B70: A7 32 36 35 00 96 23 E1 00 8B 51 B2 36 A7 50 45 |.265..#...Q.6.PE|
00001B80: B2 31 3A 4C 31 24 B2 C8 28 4C 31 24 2C C3 28 4C |.1:L1$..(L1$,.(L|
00001B90: 31 24 29 AB 31 29 00 AA 23 E2 00 8B 51 B2 31 38 |1$).1)..#...Q.18|
00001BA0: B0 51 B2 31 34 36 A7 32 36 39 00 BA 23 E3 00 8B |.Q.146.269..#...|
00001BB0: C3 28 4C 31 24 29 B2 30 A7 82 00 E1 23 E4 00 8B |.(L1$).0....#...|
00001BC0: C9 28 4C 31 24 2C 31 29 B2 C7 28 37 29 AF C3 28 |.(L1$,1)..(7)..(|
00001BD0: 4C 31 24 29 B1 B2 44 57 AB 32 AC 4E 4D A7 32 33 |L1$)..DW.2.NM.23|
00001BE0: 31 00 07 24 E5 00 8B C9 28 4C 31 24 2C 31 29 B2 |1..$....(L1$,1).|
00001BF0: C7 28 37 29 A7 4C 24 B2 4C 31 24 3A 4C 31 24 B2 |.(7).L$.L1$:L1$.|
00001C00: 22 22 3A 89 32 33 36 00 30 24 E6 00 8B C3 28 4C |"":.236.0$....(L|
00001C10: 31 24 29 B3 B2 44 57 AB 32 AC 4E 4D AF 54 58 24 |1$)..DW.2.NM.TX$|
00001C20: 28 4A AA 31 29 B3 B1 22 2A 37 37 37 37 22 A7 82 |(J.1).."*7777"..|
00001C30: 00 4A 24 E7 00 4C 24 B2 C8 28 4C 31 24 2C 44 57 |.J$..L$..(L1$,DW|
00001C40: AB 32 AC 4E 4D 29 3A 4B B2 30 00 7E 24 E8 00 4B |.2.NM):K.0.~$..K|
00001C50: B2 4B AA 31 3A 41 24 B2 C9 28 4C 24 2C 4B 29 3A |.K.1:A$..(L$,K):|
00001C60: 8B C8 28 41 24 2C 31 29 B3 B1 22 20 22 AF C3 28 |..(A$,1).." "..(|
00001C70: 41 24 29 B3 B1 C3 28 4C 24 29 A7 32 33 32 00 98 |A$)...(L$).232..|
00001C80: 24 E9 00 8B C3 28 4C 24 29 B2 C3 28 41 24 29 A7 |$....(L$)..(A$).|
00001C90: 52 B2 30 3A 89 32 33 35 00 B1 24 EA 00 4C 24 B2 |R.0:.235..$..L$.|
00001CA0: C8 28 4C 24 2C C3 28 4C 24 29 AB 4B 29 3A 52 B2 |.(L$,.(L$).K):R.|
00001CB0: 31 00 CF 24 EB 00 4C 31 24 B2 C9 28 4C 31 24 2C |1..$..L1$..(L1$,|
00001CC0: C3 28 4C 31 24 29 AB C3 28 4C 24 29 AB 52 29 00 |.(L1$)..(L$).R).|
00001CD0: EB 24 EC 00 8B 53 50 B2 31 A7 98 50 2C C7 28 31 |.$...SP.1..P,.(1|
00001CE0: 30 29 3B 3A 4C 46 B2 4C 46 AA 31 00 06 25 ED 00 |0);:LF.LF.1..%..|
00001CF0: 8B 4A 4A B2 32 A7 57 24 B2 4C 24 3A 4C 24 B2 22 |.JJ.2.W$.L$:L$."|
00001D00: 22 3A 8D 32 39 36 00 28 25 EE 00 A1 41 24 3A 8B |":.296.(%...A$:.|
00001D10: 41 24 B2 22 22 B0 28 50 B2 33 AF 41 24 B2 C7 28 |A$."".(P.3.A$..(|
00001D20: 31 37 29 29 A7 32 34 30 00 5F 25 EF 00 99 3A 99 |17)).240._%...:.|
00001D30: 22 12 27 43 54 52 4C 31 27 20 41 42 4F 52 54 53 |".'CTRL1' ABORTS|
00001D40: 2D 27 43 27 20 43 4F 4E 54 49 4E 55 45 53 22 3A |-'C' CONTINUES":|
00001D50: 8D 35 34 3A 91 52 25 89 32 35 30 2C 32 34 30 00 |.54:.R%.250,240.|
00001D60: A0 25 F0 00 8D 32 37 34 3A 4C 46 B2 4C 46 AA 31 |.%...274:LF.LF.1|
00001D70: 3A 98 50 2C C7 28 33 32 29 3B A6 4D 4C AB 31 29 |:.P,.(32);.ML.1)|
00001D80: 3B A6 4E 4D 29 3B 4C 55 24 3B 4C 52 24 3B 4C 24 |;.NM);LU$;LR$;L$|
00001D90: 3A 4C 55 24 B2 4C 4C 24 3A 4C 52 24 B2 4C 53 24 |:LU$.LL$:LR$.LS$|
00001DA0: 00 AF 25 F1 00 8B 4C 46 B3 34 39 A7 32 34 35 00 |..%...LF.49.245.|
00001DB0: D0 25 F2 00 81 58 B2 31 A4 31 36 3A 98 50 2C C7 |.%...X.1.16:.P,.|
00001DC0: 28 31 30 29 3B 3A 81 59 B2 31 A4 35 30 3A 82 59 |(10);:.Y.1.50:.Y|
00001DD0: 00 F9 25 F3 00 8B 58 B2 34 AF 50 47 B3 B1 30 A7 |..%...X.4.PG..0.|
00001DE0: 98 50 2C C7 28 33 32 29 A6 4E 39 AD 32 29 3B 50 |.P,.(32).N9.2);P|
00001DF0: 47 3A 50 47 B2 50 47 AA 31 00 09 26 F4 00 82 3A |G:PG.PG.1..&...:|
00001E00: 4C 46 B2 30 3A 50 45 B2 30 00 37 26 F5 00 8B 50 |LF.0:PE.0.7&...P|
00001E10: 45 B2 31 AF C3 28 4C 31 24 29 B2 30 A7 81 4C 46 |E.1..(L1$).0..LF|
00001E20: B2 4C 46 A4 34 39 3A 98 50 2C C7 28 31 30 29 3B |.LF.49:.P,.(10);|
00001E30: 3A 82 3A 89 32 34 31 00 52 26 F6 00 8B 54 58 24 |:.:.241.R&...TX$|
00001E40: 28 4A AA 31 29 B3 B1 22 2A 37 37 37 37 22 A7 32 |(J.1).."*7777".2|
00001E50: 32 38 00 75 26 F7 00 8B 4A 4A B2 32 A7 57 24 B2 |28.u&...JJ.2.W$.|
00001E60: 4C 31 24 3A 4C 24 B2 22 22 3A 8D 32 39 36 3A 4C |L1$:L$."":.296:L|
00001E70: 31 24 B2 4C 24 00 A9 26 F8 00 98 50 2C C7 28 33 |1$.L$..&...P,.(3|
00001E80: 32 29 3B A6 4D 4C AB 31 29 3B A6 4E 4D 29 3B 4C |2);.ML.1);.NM);L|
00001E90: 55 24 3B 4C 52 24 3B 4C 31 24 3A 98 50 2C C7 28 |U$;LR$;L1$:.P,.(|
00001EA0: 31 35 29 C7 28 31 34 36 29 00 DF 26 F9 00 98 50 |15).(146)..&...P|
00001EB0: 2C C7 28 31 30 29 3A 4C 46 B2 4C 46 AA 32 3A 8B |,.(10):LF.LF.2:.|
00001EC0: 50 47 B1 30 AF 5A 5A B2 30 A7 50 45 B2 31 3A 4C |PG.0.ZZ.0.PE.1:L|
00001ED0: 31 24 B2 22 22 3A 5A 5A B2 31 3A 89 32 34 35 00 |1$."":ZZ.1:.245.|
00001EE0: 00 27 FA 00 8B 50 B2 32 A7 98 50 2C C7 28 31 30 |.'...P.2..P,.(10|
00001EF0: 29 3B 3A 98 50 2C C7 28 31 30 29 3A 89 32 35 32 |);:.P,.(10):.252|
00001F00: 00 11 27 FB 00 A0 50 3A 4C 55 24 B2 C7 28 31 37 |..'...P:LU$..(17|
00001F10: 29 00 5B 27 FC 00 5A 5A B2 30 3A 4E 43 B2 4E 43 |).['..ZZ.0:NC.NC|
00001F20: AB 31 3A 8B 4E 43 B1 30 A7 99 22 12 93 4E 45 58 |.1:.NC.0.."..NEX|
00001F30: 54 20 43 4F 50 59 22 3A 50 47 B2 50 31 3A 4C 46 |T COPY":PG.P1:LF|
00001F40: B2 30 3A 44 57 B2 4C 3A 4E 4D B2 30 3A 4C 55 24 |.0:DW.L:NM.0:LU$|
00001F50: B2 C7 28 31 37 29 3A 89 32 31 36 00 71 27 FD 00 |..(17):.216.q'..|
00001F60: 99 22 12 45 4E 44 20 50 52 49 4E 54 22 3A 8D 36 |.".END PRINT":.6|
00001F70: 30 00 77 27 FE 00 8E 00 A2 27 FF 00 91 51 AB 31 |0.w'.....'...Q.1|
00001F80: 33 32 89 32 35 36 2C 32 35 37 2C 32 35 38 2C 32 |32.256,257,258,2|
00001F90: 35 39 2C 32 35 36 2C 32 36 31 2C 32 36 32 2C 32 |59,256,261,262,2|
00001FA0: 36 33 00 B7 27 00 01 42 54 24 B2 22 20 20 20 20 |63..'..BT$." |
00001FB0: 20 22 3A 89 32 37 32 00 C5 27 01 01 4E 4D B2 30 | ":.272..'..NM.0|
00001FC0: 3A 89 32 37 32 00 F8 27 02 01 8B 57 57 B2 31 A7 |:.272..'...WW.1.|
00001FD0: 57 57 B2 30 3A 42 54 24 B2 C7 28 31 35 29 3A 44 |WW.0:BT$..(15):D|
00001FE0: 57 B2 4C 3A 4D 4C B2 4D 4C AC 32 3A 4D 52 B2 4D |W.L:ML.ML.2:MR.M|
00001FF0: 52 AC 32 3A 89 32 37 32 00 06 28 03 01 8B 4C 43 |R.2:.272..(...LC|
00002000: B2 31 A7 32 37 32 00 21 28 04 01 42 54 24 B2 C7 |.1.272.!(..BT$..|
00002010: 28 31 37 29 3A 4C 4C 24 B2 42 54 24 3A 89 32 37 |(17):LL$.BT$:.27|
00002020: 32 00 2F 28 05 01 4E 4D B2 37 3A 89 32 37 32 00 |2./(..NM.7:.272.|
00002030: 5E 28 06 01 57 57 B2 31 3A 42 54 24 B2 C7 28 31 |^(..WW.1:BT$..(1|
00002040: 34 29 3A 44 57 B2 4C AD 32 3A 4D 4C B2 4D 4C AD |4):DW.L.2:ML.ML.|
00002050: 32 3A 4D 52 B2 4D 52 AD 32 3A 89 32 37 32 00 6C |2:MR.MR.2:.272.l|
00002060: 28 07 01 8B 4C 43 B2 31 A7 32 37 32 00 88 28 08 |(...LC.1.272..(.|
00002070: 01 42 54 24 B2 C7 28 31 34 35 29 3A 4C 4C 24 B2 |.BT$..(145):LL$.|
00002080: 42 54 24 3A 89 32 37 32 00 9E 28 09 01 8B 51 B2 |BT$:.272..(...Q.|
00002090: 32 A7 42 54 24 B2 22 2C 22 3A 89 32 36 38 00 B4 |2.BT$.",":.268..|
000020A0: 28 0A 01 8B 51 B2 33 A7 42 54 24 B2 22 3B 22 3A |(...Q.3.BT$.";":|
000020B0: 89 32 36 38 00 C7 28 0B 01 8B 51 B2 31 A7 42 54 |.268..(...Q.1.BT|
000020C0: 24 B2 C7 28 35 38 29 00 DC 28 0C 01 4C 31 24 B2 |$..(58)..(..L1$.|
000020D0: 4C 31 24 AA 42 54 24 3A 89 32 32 38 00 F0 28 0D |L1$.BT$:.228..(.|
000020E0: 01 8B 51 B2 31 38 A7 4C 53 24 B2 C7 28 31 38 29 |..Q.18.LS$..(18)|
000020F0: 00 06 29 0E 01 8B 51 B2 31 34 36 A7 4C 53 24 B2 |..)...Q.146.LS$.|
00002100: C7 28 31 34 36 29 00 0F 29 0F 01 89 32 33 30 00 |.(146)..)...230.|
00002110: 2C 29 10 01 41 24 B2 C9 28 54 58 24 28 4A 29 2C |,)..A$..(TX$(J),|
00002120: C3 28 54 58 24 28 4A 29 29 AB 31 29 00 4F 29 11 |.(TX$(J)).1).O).|
00002130: 01 4C 31 24 B2 4C 31 24 AA C8 28 41 24 2C C3 28 |.L1$.L1$..(A$,.(|
00002140: 41 24 29 AB 31 29 AA 42 54 24 3A 89 32 32 38 00 |A$).1).BT$:.228.|
00002150: 5E 29 12 01 8B 4C 24 B2 22 22 A7 32 39 35 00 7A |^)...L$."".295.z|
00002160: 29 13 01 8B C9 28 4C 24 2C 31 29 B2 C7 28 37 29 |)....(L$,1)..(7)|
00002170: B0 4A 53 B3 B1 31 A7 32 39 35 00 B2 29 14 01 8B |.JS..1.295..)...|
00002180: C9 28 4C 24 2C 31 29 B2 C7 28 33 32 29 B0 C9 28 |.(L$,1)..(32)..(|
00002190: 4C 24 2C 31 29 B2 C7 28 31 36 30 29 A7 4C 24 B2 |L$,1)..(160).L$.|
000021A0: C8 28 4C 24 2C C3 28 4C 24 29 AB 31 29 3A 89 32 |.(L$,.(L$).1):.2|
000021B0: 37 36 00 ED 29 15 01 8B C3 28 4C 24 29 B2 44 57 |76..)....(L$).DW|
000021C0: AB 28 32 AC 4E 4D 29 AF C9 28 4C 24 2C 31 29 B3 |.(2.NM)..(L$,1).|
000021D0: B1 C7 28 33 32 29 AF C9 28 4C 24 2C 31 29 B3 B1 |..(32)..(L$,1)..|
000021E0: C7 28 31 36 30 29 A7 43 54 B2 30 3A 8E 00 01 2A |.(160).CT.0:...*|
000021F0: 16 01 42 24 B2 4C 24 3A 59 B2 30 3A 5A 24 B2 22 |..B$.L$:Y.0:Z$."|
00002200: 22 00 19 2A 17 01 43 54 B2 43 54 AA 44 57 AB C3 |"..*..CT.CT.DW..|
00002210: 28 42 24 29 AB 32 AC 4E 4D 00 62 2A 18 01 81 51 |(B$).2.NM.b*...Q|
00002220: B2 31 A4 C3 28 4C 24 29 3A 8B CA 28 4C 24 2C 51 |.1..(L$):..(L$,Q|
00002230: 2C 31 29 B2 C7 28 31 38 29 B0 CA 28 4C 24 2C 51 |,1)..(18)..(L$,Q|
00002240: 2C 31 29 B2 C7 28 31 34 36 29 B0 CA 28 4C 24 2C |,1)..(146)..(L$,|
00002250: 51 2C 31 29 B2 C7 28 31 37 29 A7 43 54 B2 43 54 |Q,1)..(17).CT.CT|
00002260: AA 31 00 9F 2A 19 01 8B CA 28 4C 24 2C 51 2C 31 |.1..*....(L$,Q,1|
00002270: 29 B2 C7 28 34 34 29 B0 CA 28 4C 24 2C 51 2C 31 |)..(44)..(L$,Q,1|
00002280: 29 B2 C7 28 35 38 29 B0 CA 28 4C 24 2C 51 2C 31 |)..(58)..(L$,Q,1|
00002290: 29 B2 C7 28 35 39 29 A7 43 54 B2 43 54 AA 31 00 |)..(59).CT.CT.1.|
000022A0: BD 2A 1A 01 8B CA 28 4C 24 2C 51 2C 31 29 B2 C7 |.*....(L$,Q,1)..|
000022B0: 28 31 34 35 29 A7 43 54 B2 43 54 AA 31 00 C4 2A |(145).CT.CT.1..*|
000022C0: 1B 01 82 51 00 D5 2A 1C 01 8B C3 28 42 24 29 B2 |...Q..*....(B$).|
000022D0: 30 A7 32 38 38 00 F8 2A 1D 01 5A 24 B2 5A 24 AA |0.288..*..Z$.Z$.|
000022E0: C8 28 42 24 2C 31 29 3A 42 24 B2 C9 28 42 24 2C |.(B$,1):B$..(B$,|
000022F0: C3 28 42 24 29 AB 31 29 00 1E 2B 1E 01 8B C9 28 |.(B$).1)..+....(|
00002300: 5A 24 2C 31 29 B2 C7 28 33 32 29 B0 C9 28 5A 24 |Z$,1)..(32)..(Z$|
00002310: 2C 31 29 B2 C7 28 31 36 30 29 A7 32 38 34 00 47 |,1)..(160).284.G|
00002320: 2B 1F 01 59 B2 59 AA 31 3A 5A 24 B2 5A 24 AA C8 |+..Y.Y.1:Z$.Z$..|
00002330: 28 42 24 2C 31 29 3A 42 24 B2 C9 28 42 24 2C C3 |(B$,1):B$..(B$,.|
00002340: 28 42 24 29 AB 31 29 00 73 2B 20 01 8B C3 28 42 |(B$).1).s+ ...(B|
00002350: 24 29 B2 30 B0 59 B1 44 57 AB 32 AC 4E 4D A7 59 |$).0.Y.DW.2.NM.Y|
00002360: B2 30 3A 42 24 B2 5A 24 3A 5A 24 B2 22 22 3A 89 |.0:B$.Z$:Z$."":.|
00002370: 32 38 34 00 9B 2B 21 01 8B C9 28 5A 24 2C 31 29 |284..+!...(Z$,1)|
00002380: B3 B1 C7 28 33 32 29 AF C9 28 5A 24 2C 31 29 B3 |...(32)..(Z$,1).|
00002390: B1 C7 28 31 36 30 29 A7 32 38 37 00 CE 2B 22 01 |..(160).287..+".|
000023A0: 5A 24 B2 5A 24 AA C7 28 33 32 29 3A 8B 59 B1 44 |Z$.Z$..(32):.Y.D|
000023B0: 57 A7 59 B2 30 3A 42 24 B2 5A 24 3A 5A 24 B2 22 |W.Y.0:B$.Z$:Z$."|
000023C0: 22 3A 43 54 B2 43 54 AB 31 3A 89 32 38 34 00 01 |":CT.CT.1:.284..|
000023D0: 2C 23 01 81 51 B2 31 A4 35 AC 43 54 3A 59 B2 59 |,#..Q.1.5.CT:Y.Y|
000023E0: AA 31 3A 5A 24 B2 5A 24 AA C8 28 42 24 2C 31 29 |.1:Z$.Z$..(B$,1)|
000023F0: 3A 42 24 B2 C9 28 42 24 2C C3 28 42 24 29 AB 31 |:B$..(B$,.(B$).1|
00002400: 29 00 2D 2C 24 01 8B C3 28 42 24 29 B2 30 B0 59 |).-,$...(B$).0.Y|
00002410: B1 44 57 AB 32 AC 4E 4D A7 59 B2 30 3A 42 24 B2 |.DW.2.NM.Y.0:B$.|
00002420: 5A 24 3A 5A 24 B2 22 22 3A 89 32 38 34 00 43 2C |Z$:Z$."":.284.C,|
00002430: 25 01 43 54 B2 43 54 AB 31 3A 8B 43 54 B1 30 A7 |%.CT.CT.1:.CT.0.|
00002440: 32 38 37 00 50 2C 26 01 4C 24 B2 5A 24 AA 42 24 |287.P,&.L$.Z$.B$|
00002450: 00 5B 2C 27 01 43 54 B2 30 3A 8E 00 89 2C 28 01 |.[,'.CT.0:...,(.|
00002460: 8B C6 28 4C 4C 24 29 B2 31 34 35 B0 C6 28 4C 55 |..(LL$).145..(LU|
00002470: 24 29 B2 31 34 35 B0 C3 28 57 24 29 B2 30 A7 4C |$).145..(W$).0.L|
00002480: 24 B2 57 24 3A 89 33 30 31 00 AD 2C 29 01 81 41 |$.W$:.301..,)..A|
00002490: B2 31 A4 C3 28 57 24 29 3A 42 24 B2 CA 28 57 24 |.1..(W$):B$..(W$|
000024A0: 2C 41 2C 31 29 3A 42 B2 C6 28 42 24 29 00 C7 2C |,A,1):B..(B$)..,|
000024B0: 2A 01 8B 42 B1 36 34 AF 42 B3 39 31 A7 42 24 B2 |*..B.64.B.91.B$.|
000024C0: C7 28 42 AA 33 32 29 00 DE 2C 2B 01 8B 42 B1 31 |.(B.32)..,+..B.1|
000024D0: 39 32 A7 42 24 B2 C7 28 42 AB 31 32 38 29 00 ED |92.B$..(B.128)..|
000024E0: 2C 2C 01 4C 24 B2 4C 24 AA 42 24 3A 82 00 03 2D |,,.L$.L$.B$:...-|
000024F0: 2D 01 8B 4A 53 B3 B1 31 A7 81 41 B2 31 A4 31 30 |-..JS..1..A.1.10|
00002500: 30 3A 82 00 09 2D 2E 01 8E 00 13 2D 2F 01 42 24 |0:...-.....-/.B$|
00002510: B2 22 22 00 25 2D 30 01 97 32 31 32 2C 30 3A 99 |."".%-0..212,0:.|
00002520: 22 A4 9D 22 3B 00 65 2D 31 01 8B 4C 4E AA 31 35 |"..";.e-1..LN.15|
00002530: B1 54 4C AF 5A 5A B2 30 A7 99 22 12 53 50 41 43 |.TL.ZZ.0..".SPAC|
00002540: 45 20 43 52 49 54 49 43 41 4C 2D 46 49 4E 49 53 |E CRITICAL-FINIS|
00002550: 48 20 4E 4F 57 20 41 4E 44 20 53 41 56 45 2E 22 |H NOW AND SAVE."|
00002560: 3A 5A 5A B2 31 00 9E 2D 32 01 8D 35 34 3A 51 B2 |:ZZ.1..-2..54:Q.|
00002570: C6 28 41 24 29 3A 57 24 B2 C9 28 54 58 24 28 4C |.(A$):W$..(TX$(L|
00002580: 4E 29 2C 31 29 3A 4D B2 C3 28 54 58 24 28 4C 4E |N),1):M..(TX$(LN|
00002590: 29 29 3A 91 52 25 89 33 34 32 2C 33 30 37 00 BA |)):.R%.342,307..|
000025A0: 2D 33 01 8B 51 B2 33 34 A7 99 C7 28 33 34 29 C7 |-3..Q.34...(34).|
000025B0: 28 32 30 29 3B 3A 89 33 33 39 00 DB 2D 34 01 8B |(20);:.339..-4..|
000025C0: 51 B2 34 34 B0 51 B2 35 38 A7 99 41 24 3B 3A 41 |Q.44.Q.58..A$;:A|
000025D0: 24 B2 C7 28 32 29 3A 89 33 34 35 00 F7 2D 35 01 |$..(2):.345..-5.|
000025E0: 8B 51 B2 35 39 A7 99 41 24 3B 3A 41 24 B2 C7 28 |.Q.59..A$;:A$..(|
000025F0: 33 29 3A 89 33 34 35 00 13 2E 36 01 8B 28 51 B1 |3):.345...6..(Q.|
00002600: 33 31 AF 51 B3 31 32 37 29 B0 51 B1 31 35 39 A7 |31.Q.127).Q.159.|
00002610: 33 33 39 00 3F 2E 37 01 8B 51 B3 B1 31 35 37 B0 |339.?.7..Q..157.|
00002620: 57 24 B2 C7 28 37 29 B0 C3 28 42 24 29 B1 32 35 |W$..(7)..(B$).25|
00002630: 30 B0 28 45 B2 31 AF 4D B3 32 29 A7 33 31 38 00 |0.(E.1.M.2).318.|
00002640: 60 2E 38 01 8B 4D B3 32 AF C9 28 54 58 24 28 4C |`.8..M.2..(TX$(L|
00002650: 4E AB 31 29 2C 31 29 B2 C7 28 37 29 A7 33 31 38 |N.1),1)..(7).318|
00002660: 00 83 2E 39 01 8B 4D B3 32 AF 4C 4E B1 31 A7 4C |...9..M.2.LN.1.L|
00002670: 4E B2 4C 4E AB 31 3A 8B 57 24 B2 C7 28 37 29 A7 |N.LN.1:.W$..(7).|
00002680: 33 31 38 00 90 2E 3A 01 8B 4D B3 32 A7 33 31 38 |318...:..M.2.318|
00002690: 00 D2 2E 3B 01 97 32 31 32 2C 30 3A 99 22 20 9D |...;..212,0:." .|
000026A0: 22 3B 3A 8B 42 24 B3 B1 22 22 A7 51 B2 C6 28 C9 |";:.B$.."".Q..(.|
000026B0: 28 42 24 2C 31 29 29 3A 8D 33 38 3A 99 C9 28 42 |(B$,1)):.38:..(B|
000026C0: 24 2C 31 29 3B 3A 97 32 31 32 2C 30 3A 99 22 9D |$,1);:.212,0:.".|
000026D0: 22 3B 00 E5 2E 3C 01 97 32 31 32 2C 30 3A 99 22 |";...<..212,0:."|
000026E0: 9D A4 9D 22 3B 00 18 2F 3D 01 42 24 B2 42 24 AA |...";../=.B$.B$.|
000026F0: C9 28 54 58 24 28 4C 4E 29 2C 31 29 3A 54 58 24 |.(TX$(LN),1):TX$|
00002700: 28 4C 4E 29 B2 C8 28 54 58 24 28 4C 4E 29 2C 4D |(LN)..(TX$(LN),M|
00002710: AB 31 29 3A 89 33 30 36 00 42 2F 3E 01 97 32 31 |.1):.306.B/>..21|
00002720: 32 2C 30 3A 8B 51 B3 B1 32 39 B0 28 45 B2 31 AF |2,0:.Q..29.(E.1.|
00002730: C3 28 54 58 24 28 4C 4E 29 29 B1 38 37 29 A7 33 |.(TX$(LN)).87).3|
00002740: 32 31 00 8A 2F 3F 01 8B 42 24 B1 22 22 A7 41 24 |21../?..B$."".A$|
00002750: B2 C9 28 42 24 2C 31 29 3A 54 58 24 28 4C 4E 29 |..(B$,1):TX$(LN)|
00002760: B2 54 58 24 28 4C 4E 29 AA 41 24 3A 42 24 B2 C8 |.TX$(LN).A$:B$..|
00002770: 28 42 24 2C C3 28 42 24 29 AB 31 29 3A 99 41 24 |(B$,.(B$).1):.A$|
00002780: 3B 3A 8D 33 37 3A 89 33 35 30 00 A8 2F 40 01 99 |;:.37:.350../@..|
00002790: 22 20 22 3B 3A 54 58 24 28 4C 4E 29 B2 54 58 24 |" ";:TX$(LN).TX$|
000027A0: 28 4C 4E 29 AA 22 20 22 00 BD 2F 41 01 8B 51 B1 |(LN)." "../A..Q.|
000027B0: 31 33 32 AF 51 B3 31 34 31 A7 33 32 33 00 DA 2F |132.Q.141.323../|
000027C0: 42 01 8B 28 51 B3 B1 36 AF 51 B3 B1 31 34 36 AF |B..(Q..6.Q..146.|
000027D0: 51 B3 B1 31 38 29 A7 33 32 35 00 EF 2F 43 01 8B |Q..18).325../C..|
000027E0: 51 B2 31 33 37 A7 41 24 B2 C7 28 31 33 33 29 00 |Q.137.A$..(133).|
000027F0: FC 2F 44 01 8D 33 38 3A 89 33 34 35 00 18 30 45 |./D..38:.345..0E|
00002800: 01 8B 51 B2 32 38 A7 99 22 12 22 3B B8 28 38 29 |..Q.28..".";.(8)|
00002810: 3B 22 43 52 43 54 52 53 00 50 30 46 01 8B 28 51 |;"CRCTRS.P0F..(Q|
00002820: B2 33 31 B0 51 B2 31 37 B0 51 B2 31 34 35 B0 51 |.31.Q.17.Q.145.Q|
00002830: B2 31 35 38 B0 51 B2 31 35 39 B0 51 B2 33 30 B0 |.158.Q.159.Q.30.|
00002840: 51 B2 31 35 36 B0 51 B2 35 29 AF 45 B2 31 A7 8E |Q.156.Q.5).E.1..|
00002850: 00 8D 30 47 01 8B 51 B2 28 31 34 38 AF 45 B2 31 |..0G..Q.(148.E.1|
00002860: AF C3 28 54 58 24 28 4C 4E 29 29 AA C3 28 42 24 |..(TX$(LN))..(B$|
00002870: 29 B3 38 38 29 A7 99 22 20 9D 22 41 24 3B 3A 42 |).88).." ."A$;:B|
00002880: 24 B2 42 24 AA 22 20 22 3A 89 33 30 34 00 C0 30 |$.B$." ":.304..0|
00002890: 48 01 8B 51 B2 31 34 38 AF 45 B3 B1 31 AF C3 28 |H..Q.148.E..1..(|
000028A0: 42 24 29 B3 32 34 39 A7 99 22 20 9D 22 3B 41 24 |B$).249.." .";A$|
000028B0: 3B 3A 42 24 B2 42 24 AA 22 20 22 3A 89 33 30 34 |;:B$.B$." ":.304|
000028C0: 00 F0 30 49 01 8B 41 24 B2 C7 28 31 34 31 29 AF |..0I..A$..(141).|
000028D0: 45 B2 31 A7 54 58 24 28 4C 4E 29 B2 54 58 24 28 |E.1.TX$(LN).TX$(|
000028E0: 4C 4E 29 AA C7 28 37 29 3A 99 22 12 3C 22 3A 8E |LN)..(7):.".<":.|
000028F0: 00 FF 30 4A 01 8B 51 B3 B1 32 30 A7 33 33 36 00 |..0J..Q..20.336.|
00002900: 1B 31 4B 01 8B 57 24 B2 C7 28 37 29 B0 28 4D B3 |.1K..W$..(7).(M.|
00002910: 32 AF 4C 4E B3 32 29 A7 33 31 32 00 3C 31 4C 01 |2.LN.2).312.<1L.|
00002920: 8B 4D B3 32 AF C9 28 54 58 24 28 4C 4E AB 31 29 |.M.2..(TX$(LN.1)|
00002930: 2C 31 29 B2 C7 28 37 29 A7 33 31 32 00 4D 31 4D |,1)..(7).312.M1M|
00002940: 01 8B 4D B3 32 A7 4C 4E B2 4C 4E AB 31 00 77 31 |..M.2.LN.LN.1.w1|
00002950: 4E 01 99 22 14 22 3B 3A 54 58 24 28 4C 4E 29 B2 |N..".";:TX$(LN).|
00002960: C8 28 54 58 24 28 4C 4E 29 2C C3 28 54 58 24 28 |.(TX$(LN),.(TX$(|
00002970: 4C 4E 29 29 AB 31 29 00 80 31 4F 01 89 33 30 34 |LN)).1)..1O..304|
00002980: 00 9B 31 50 01 8B 51 B2 31 33 A7 41 24 B2 C7 28 |..1P..Q.13.A$..(|
00002990: 37 29 3A 8B 45 B2 31 A7 33 30 36 00 CE 31 51 01 |7):.E.1.306..1Q.|
000029A0: 8B 41 24 B2 C7 28 37 29 A7 99 22 12 3C 22 3A 4C |.A$..(7)..".<":L|
000029B0: 4E B2 4C 4E AA 31 3A 54 58 24 28 4C 4E 29 B2 54 |N.LN.1:TX$(LN).T|
000029C0: 58 24 28 4C 4E 29 AA 41 24 3A 89 33 34 34 00 D7 |X$(LN).A$:.344..|
000029D0: 31 52 01 89 33 36 35 00 0C 32 53 01 54 58 24 28 |1R..365..2S.TX$(|
000029E0: 4C 4E 29 B2 54 58 24 28 4C 4E 29 AA 41 24 3A 99 |LN).TX$(LN).A$:.|
000029F0: 41 24 3B 3A 8B 42 24 B3 B1 22 22 A7 42 24 B2 C8 |A$;:.B$.."".B$..|
00002A00: 28 42 24 2C C3 28 42 24 29 AB 31 29 00 3E 32 54 |(B$,.(B$).1).>2T|
00002A10: 01 8B 28 C3 28 54 58 24 28 4C 4E 29 29 B1 38 30 |..(.(TX$(LN)).80|
00002A20: AF 45 B3 B1 31 29 B0 28 C3 28 54 58 24 28 4C 4E |.E..1).(.(TX$(LN|
00002A30: 29 29 B1 38 37 AF 45 B2 31 29 A7 33 34 34 00 47 |)).87.E.1).344.G|
00002A40: 32 55 01 89 33 30 34 00 73 32 56 01 8B C3 28 54 |2U..304.s2V...(T|
00002A50: 58 24 28 4C 4E 29 29 B2 31 AF 45 B3 B1 31 A7 54 |X$(LN)).1.E..1.T|
00002A60: 58 24 28 4C 4E 29 B2 22 2A 37 37 37 37 22 3A 89 |X$(LN)."*7777":.|
00002A70: 33 34 34 00 8F 32 57 01 8B 45 B3 B1 31 A7 54 58 |344..2W..E..1.TX|
00002A80: 24 28 4C 4E AA 31 29 B2 22 2A 37 37 37 37 22 00 |$(LN.1)."*7777".|
00002A90: 95 32 58 01 8E 00 A7 32 59 01 8B 51 B2 35 38 A7 |.2X....2Y..Q.58.|
00002AA0: 41 24 B2 C7 28 31 29 00 C6 32 5A 01 54 58 24 28 |A$..(1)..2Z.TX$(|
00002AB0: 4C 4E 29 B2 54 58 24 28 4C 4E 29 AA 41 24 3A 4C |LN).TX$(LN).A$:L|
00002AC0: 4E B2 4C 4E AA 31 00 D8 32 5B 01 8B 42 24 B3 B1 |N.LN.1..2[..B$..|
00002AD0: 22 22 A7 99 22 94 22 3B 00 E4 32 5C 01 8B 45 B3 |""..".";..2\..E.|
00002AE0: B1 30 A7 8E 00 ED 32 5D 01 89 33 30 34 00 0F 33 |.0....2]..304..3|
00002AF0: 5E 01 8B 28 C3 28 54 58 24 28 4C 4E 29 29 B1 38 |^..(.(TX$(LN)).8|
00002B00: 30 AF 45 B3 B1 31 29 A7 4C 4E B2 4C 4E AA 31 00 |0.E..1).LN.LN.1.|
00002B10: 18 33 5F 01 89 33 30 34 00 5A 33 61 01 99 22 12 |.3_..304.Z3a..".|
00002B20: 41 53 43 49 49 20 43 4F 4E 56 45 52 54 20 52 45 |ASCII CONVERT RE|
00002B30: 51 55 49 52 45 44 20 28 59 2F 4E 29 3F 92 22 3B |QUIRED (Y/N)?.";|
00002B40: 3A 8D 35 35 3A 99 41 24 3A 8B 41 24 B2 22 59 22 |:.55:.A$:.A$."Y"|
00002B50: A7 4A 4A B2 32 3A 89 33 35 35 00 76 33 62 01 8B |.JJ.2:.355.v3b..|
00002B60: 41 24 B3 B1 22 4E 22 A7 99 22 12 57 48 41 54 3F |A$.."N"..".WHAT?|
00002B70: 22 3A 89 33 35 36 00 B4 33 63 01 99 22 12 45 4E |":.356..3c..".EN|
00002B80: 54 45 52 20 4E 42 52 20 4F 46 20 43 48 41 52 53 |TER NBR OF CHARS|
00002B90: 20 50 45 52 20 4C 49 4E 45 20 28 38 30 20 49 53 | PER LINE (80 IS|
00002BA0: 20 4E 4F 4D 49 4E 41 4C 29 22 3A 8D 36 31 3A 4E | NOMINAL)":.61:N|
00002BB0: 39 B2 41 4E 00 EF 33 64 01 99 22 12 22 3B 4E 39 |9.AN..3d..".";N9|
00002BC0: 3B 22 45 4E 54 45 52 45 44 2D 43 4F 52 52 45 43 |;"ENTERED-CORREC|
00002BD0: 54 28 59 2F 4E 29 3F 92 22 3B 3A 8D 35 35 3A 99 |T(Y/N)?.";:.55:.|
00002BE0: 41 24 3A 8B 41 24 B3 B1 22 59 22 A7 33 35 35 00 |A$:.A$.."Y".355.|
00002BF0: F5 33 65 01 8E 00 44 34 67 01 8F 20 43 4F 50 59 |.3e...D4g.. COPY|
00002C00: 52 49 47 48 54 20 31 39 38 32 20 52 41 59 4D 41 |RIGHT 1982 RAYMA|
00002C10: 43 20 53 4F 46 54 57 41 52 45 22 14 14 14 14 14 |C SOFTWARE".....|
00002C20: 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 |................|
00002C30: 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 |................|
00002C40: 14 14 14 14 00 5D 34 68 01 8B 41 24 B2 22 44 22 |.....]4h..A$."D"|
00002C50: A7 56 24 B2 22 53 22 3A 53 4C B2 31 35 00 63 34 |.V$."S":SL.15.c4|
00002C60: 69 01 8E 00 88 34 6D 01 8B 51 B2 31 39 B0 51 B2 |i....4m..Q.19.Q.|
00002C70: 31 34 37 A7 51 B2 38 3A 41 24 B2 C7 28 38 29 3A |147.Q.8:A$..(8):|
00002C80: 8D 33 38 3A 89 33 34 35 00 91 34 6F 01 89 33 30 |.38:.345..4o..30|
00002C90: 34 00 A2 34 72 01 8B 51 B2 38 A7 99 22 12 5F 92 |4..4r..Q.8.."._.|
00002CA0: 22 3B 00 A8 34 74 01 8E 00 00 00 01 34 FF 00 80 |";..4t......4...|
00002CB0: 60 18 D0 19 1D 32 |`....2 |
..S...."SOFT-WRITER" COPYRIGHT 1982 BY R
AYMAC SOFTWARE 495 BAND, BOULDER CREEK,
CA..R...."..":.ALL RIGHTS RESERVED......
" .SOFT-WRITER":.".BY RAYMAC SOFTWARE"
:." .COPYRIGHT 1982......".....RS232 PR
INTER (Y/N) ?":.54:.A$:.A$."N".7.#....A$
."Y"..2,2,0,G(6):.:.".ASSURE INTERFACE I
S READY":.7......59:.4.N....B(65534).72.
SF.53272:SZ.17.N....B(65534)..72.SF.3686
9:SZ.8.|...IV%.B(SF).....TL..(8).37:.TX$
(TL):.A.0.TL:TX$(A)."*":.:TX$(1)."*7777"
.....BR$." ....................":.SF.532
72.BR$.BR$.I(BR$,16):L.70:ML.5:.G(8)./..
.MR.5:."..":E.0:.SF,IV%:.SF.53272..".";.
E.....SZ.3)".SOFT-WRITER":..SZ.6)".BY RA
YMAC SOFTWARE.......SZ.6)". COPYRIGHT 1
982 "......:.BR$:.:..SZ);".NEW ":.:..S
Z);".APPND"......:..SZ);".EDIT ":.:..SZ)
;".FILE ":.:..SZ);".PRINT......:.BR$:..S
Z.4)"..SELECT OPTION......".......":..SZ
.2);".>";:SB.1.@....A$:.A$."".19.R....A$
.G(144).12.D....A$.G(141).25.V....A$..G(
17).19......".. ":SB.SB.1:.SB.5.18......
:..SZ.2);".>";:.19.L....".":.SB.26,31,76
,162,189:.12......".NEW RECORD-RETURN TO
CLR MEMORY 'CTRL1' FOR MENU.......54:.R
%.36,28......A$..G(13)..59:.26.G....J.0.
TL:TX$(J)."*":..C....".":.SF,IV%.2:LN.1:
.34.....".":.SF,IV%.2:.LN.0.TL... ..I(T
X$(LN),C(TX$(LN)).1);:.37:.212,0:.TX$(LN
.1).."*7777".....!.TX$(LN.1)."<":LN.LN.1
:.:.".ADD TEXT...".ZZ.0:.LN.LN.TL:.303:.
R%.36,35...#..LN...$...3.%..212,0:Q.F(I(
TX$(LN),1)).E.&..Q.18..".R.";.V.'..Q.6..
".E.";.E.(..Q.2..",";.T.)..Q.3..";";...*
..Q.1..G(58);...+..Q.146..".R.";...,..Q.
7..".<...-..Q.133.Q.140.370......Q.132.4
7,48,49,50,47,51,52,53.../..".5.";:....0
..".W.";:....1..".S.";:.. .2..".L.";:.SF
,IV%.2:....3..".N.";:..<.4..".B.";:..R.5
..".G.";:.SF,IV%:..[.6.R%.2.M.7..A$:.A$.
"".55...8..C(A$).1.A$.H(A$,1)...9..A$.G(
144).R%.1...:.....;..".WHAT?":..B.<..X.1
.12000:.:..M.=.AN$.""...>.A$."":.54:.A$;
:.R%.66,63...?..A$.G(13).65...@.AN$.AN$.
A$:.62.3.A.AN.E(AN$):.AN.0.AN$.."0"..59:
.61.9.B...G.C..".EVEN MARGINS OF 2-20 M
UST BE ENTERED....D..".LEFT MARGIN:.";:.
61:ML.AN:.ML.2.ML.20..59:.68...E...(ML.2
)..ML.2..59:.67...F..".RIGHT MARGIN:.";:
.61:MR.AN:.MR.2.MR.20..59:.70...G...(MR.
2)..MR.2..59:.67.K.H..".LEFT MARGIN=";ML
:.".RIGHT MARGIN=";MR:.".CORRECT (Y/N)."
;A$.Z.I..A$."N".67.O.J..A$.."Y"..59:.67.
..K.L.N9.ML.MR:....L.K.0:E.1:.".".SZ)".E
DIT":.".CTRL1 FOR";:ZZ.0:.SF,IV%.2...M..
". MENU, CTRL2 FOR HELP, OR CRSR DOWN...
N..54:M.F(A$):.R%.91,79...O..M.5.97.&.P.
.M.17.K.TL.2.K.K.1:.92.5.Q..M.159.145.O.
R..M.145.K..0.K.K.1:.92.G.S..M.145.K..1.
.".TOP".U.T..M.30.110...U..M.156..K.K.19
.K:."."K"."I(TX$(K),C(TX$(K)).1);:.212,0
...V.Q.F(I(TX$(K),1)):.M.156.(TX$(K.1)).
."*7777"..38:....W..M.156.(TX$(K.1))."*7
777".K.K.1:.93...X..M.158.122.+.Y..M.31.
131.3.Z..78.=.[.E.0:.._.\..K.0.C(TX$(K))
.1..".NULL":.78...]..TX$(K)."*7777"..".E
ND":K.K.1:.78...^.Q.F(I(TX$(K),1)):."."K
"."I(TX$(K),C(TX$(K)).1);:.38..._..212,0
:.K.0.LN.K:PL.C(TX$(K)):.303:M.Q:.79...`
..78.'.A..". .HELP MENU":." .KEYS:":." .
CTRL1-MAIN MENU.U.B.." .CTRL2-HELP MENU"
:." .CTRL3-MEMRY LEFT.M.C.." .CTRL4-MOVE
TEXT...D.." .CTRL5-SKIP 20 ELEMNT...E..
" .CTRL6-REPLACE ELEMNT":." .CTRL7-INSER
T TEXT...F.." .CTRL8-REPLACE ELEMNT":."
.CRSR DOWN-NEXT LINE...G.." .CRSR UP-PRE
V.LINE.I.H.." .SYMBOLS:":." .5.-TAB5":."
.E.-EJECT":." .N.-INDENT.R.I.." .W.-IND
ENT RESET":." .B.-DBLWIDTH...J.." .S.-DB
LWIDTH RESET":." .G.-UPER CASE/GRAPHICS.
C.K.." .L.-UPPER/LOWER CASE...L.." .<.-R
ETURN(NXT PRGRPH)";...M..78...N..:.".ELE
MENT NUMBER TO DELETE?":AN.0:.61.'.O..R%
.91,112.D.P..AN.0.AN$.."0"..59:.7410.C.Q
..C(TX$(AN)).1..".NULL":.78...R..".LINE
TO DELETE IS:":.".";AN;I(TX$(AN),C(TX$(A
N)).1);:LN.AN:.37...S..:.".'CTRL6' TO DE
LETE, CRSR DOWN TO CONTINUE...T..54:.R%.
91,117...U..A$.G(17).M.17:.80...V..A$..G
(30).116.Q.W..X.AN.TL:TX$(X).TX$(X.1):.X
.TL.2.(TX$(X)).."*7777"...^.X..K.X.K.X..
.Y.TX$(X.1)."*":.".DELETE COMPLETE":.78.
..Z..:.".WHAT IS ELEMENT NUMBER TO REPLA
CE?":.61.G.{..R%.91,124...|..AN.0.AN$.."
0"..61:.122.*.}..".LINE TO REPLACE IS:":
.".";AN;I(TX$(AN),C(TX$(AN)).1);:LN.AN:.
37.].~..:.".'CTRL8' TO REPLACE, CRSR DOW
N TO CONTINUE.P...54:.R%.91,128......A$
.G(17).M.17:.80.B....A$.G(158).LN.AN:TX$
(LN)."*":.303:.".END REPLACE.":.78.K....
127......:.".LINE TO INSERT AFTER:":.61:
AX.AN:K.AN......AN.0.AN$.."0"..59:.131.*
....J.TL.TL.200..1.=....C(TX$(J)).1...E.
...J.TL.10..".NO ROOM FOR INSERT":.78...
...LN.J.TL:.303:.R%.91,137......A$..G(31
)... ...LN..(LN).A....A.AX.J:.(TX$(A))..
"*7777"........X.J.LN:AX.AX.1:A.A.1.....
.Y.A.AX..1:TX$(Y.1).TX$(Y):..*...TX$(AX)
.TX$(J):TX$(J)."*":J.J.1:.J.LN.144.0....
.C....".INSERT COMPLETE-CRSR DOWN TO CON
TINUE.":.78......".FIRST ELEMENT OF BLK?
":.61:FE.AN:.R%.91,146......FE.TL..59:.1
45......".LAST ELEMENT OF BLK?":.61:LE.A
N:.R%.91,148......LE.TL.LE.FE..59:.147.*
....".ELEMNT TO INSRT AFTER?":.61:NE.AN:
.R%.91,150.L....NE.TL.(NE.FE.NE.LE)..59:
.149.A...QR.0:.NE.FE.QR.1......J.TL.TL.2
00..1:.C(TX$(J)).1........(TL.J).(LE.FE)
.J.TL.5:.135......".READY TO MOVE. 'CTRL
4' TO MOVE, CRSR DOWN TO CONTINUE.......
54:.R%.91,156......A$.G(17).Q.17:.80. ..
..A$..G(159).155.R...Y.0:.A.FE.LE:TX$(J.
Y).TX$(A):Y.Y.1:.:LN.J.Y.1.....Y.0:.A.LE
.1.J:TX$(FE.Y).TX$(A):Y.Y.1:.TX$(A).."*7
777"...E. ..A.FE.Y.J:TX$(B)."*":.:AX.NE:
.QR.1.AX.AX.(LE.FE).1.N....139.....EB$."
":V$."":.".FILE NAME (TO 10 CHARS)?":.F
C$.#....C(FC$).10.C(FC$).0..59:.162.Z...
.".LOAD,SAVE OR DELETE FILE (L,S OR D)?"
:SL.0:SA.0.W....54:.A$:.360:.R%.185,166.
.....A$."S".SL.1:SA.1:.168......A$.."L".
A$.."D"..59:.164......".WHAT IS I/O DEVI
CE NBR(1,8,9,10 OR 11)?......61:.R%.185,
170.....DV.AN:.DV.11..59:.168.(....DV.1.
(DV.7.DV.12).173.5....59:.168.C....DV.8.
177.S...SA.2:FC$.V$."0:".FC$.",S":.SL.1.
FC$.FC$.",W......SL.0.FC$.FC$.",R......1
5,DV,15,"STAT":.SL.15..15,FC$: 15:..Q...
.SL.0..Q.1.TL:TX$(Q)."":.......1,DV,SA,F
C$:SL.SL.1:.X.1.TL:.SL.181,179.;....EA.0
..1,TX$(X)G(13):.186:.EA.0.TX$(X)."*7777
".LN.1:.184.R....EA.0..X:LN.1:.184......
EA.0..1,TX$(X):.186:.EA.0.TX$(X)."*7777"
.183......EA.0........EA.0..Q.X.1..(TL):
TX$(Q)."*":.Q.F... 1:.DV.7. 15.R...V$.""
:.......DV.8........15,EA,EB$,EC,ED:.EA.
0...)....".DISK ERROR":.EA;EB$;EC;ED:.60
:X.1:.184._...LP.0:DW.L:LF.0:JS.0:ZZ.0:W
W.0:NC.0:LU$.G(17):PG.0.....LL$.G(17):LR
$.G(146):LS$.G(146):.353.....NM.0:.".PRI
NTER DEVICE NBR(2, 3, 4 OR 5)..N....61:.
A$:.R%.254,193...A..AN..2.AN..3.AN..4.AN
..5..59:.191.. B.P.AN:.67:DW.N9.ML.MR.0
C.PG.0:.".NUMBER PAGES (Y/N)?.";.H D..54
:.A$:.R%.254,197.X E..A$."Y".200.N F..A$
.."N"..59:.195.W G..202.. H..".FIRST PAG
E NBR?.. I..61:PG.AN:P1.AN.. J..".DOUBLE
SPACE (Y/N)?.";.X K..54:.A$:.R%.254,204
.. L..A$."Y".SP.1:.207..!M..A$."N".SP.0:
.207..!N..59:.202.*!O..".JUSTIFY (Y/N)?.
";.H!P..54:.A$:.A$."Y".JS.1:.210.^!Q..A$
.."N"..59:.207..!R..".FIRST ELEMENT TO P
RINT":."(1 TO".(TL)")? ";:.61..!S.FE.AN:
.FE.1.FE.TL..59:.254,210..!T..".LAST ELE
MENT TO PRINT":."("FE" TO ".(TL)")? ";:.
61.."U.LE.AN:.LE.FE.LE.TL..59:.R%.254,21
2.K"V.."..HOW MANY COPIES?.";:.61:NC.AN:
.R%.254,215.^"W..NC.0..59:.214.."X..".PO
SITION PAPER, TURN ON PRINTER. TYPE 'Y'
WHEN READY..";.."Y..54:.A$:.R%.254,218.L
"Z..A$.."Y"..59:.216.Y"...P.2.222.."...P
,P,7:.P.3..SF,IV%.2..#...P,G(17)G(10).;#
...J.FE.LE:BT$."":Q.F(I(TX$(J),1)):.Q.13
2.Q.141.255._#..L1$.L1$.I(TX$(J),(C(TX$(
J)).1)).T#...Q.2.Q.3.Q.1.265..#...Q.6.PE
.1:L1$.H(L1$,C(L1$).1)..#...Q.18.Q.146.2
69..#...C(L1$).0....#...I(L1$,1).G(7).C(
L1$)..DW.2.NM.231..$...I(L1$,1).G(7).L$.
L1$:L1$."":.236.0$...C(L1$)..DW.2.NM.TX$
(J.1).."*7777"...J$..L$.H(L1$,DW.2.NM):K
.0.~$..K.K.1:A$.I(L$,K):.H(A$,1).." ".C(
A$)..C(L$).232..$...C(L$).C(A$).R.0:.235
..$..L$.H(L$,C(L$).K):R.1.O$..L1$.I(L1$,
C(L1$).C(L$).R)..$...SP.1..P,G(10);:LF.L
F.1..%...JJ.2.W$.L$:L$."":.296.(%...A$:.
A$."".(P.3.A$.G(17)).240._%...:.".'CTRL1
' ABORTS-'C' CONTINUES":.54:.R%.250,240.
%...274:LF.LF.1:.P,G(32);.ML.1);.NM);LU
$;LR$;L$:LU$.LL$:LR$.LS$..%...LF.49.245.
P%...X.1.16:.P,G(10);:.Y.1.50:.Y..%...X.
4.PG..0..P,G(32).N9.2);PG:PG.PG.1..&...:
LF.0:PE.0.7&...PE.1.C(L1$).0..LF.LF.49:.
P,G(10);:.:.241.R&...TX$(J.1).."*7777".2
28.U&...JJ.2.W$.L1$:L$."":.296:L1$.L$..&
...P,G(32);.ML.1);.NM);LU$;LR$;L1$:.P,G(
15)G(146)..&...P,G(10):LF.LF.2:.PG.0.ZZ.
0.PE.1:L1$."":ZZ.1:.245..'...P.2..P,G(10
);:.P,G(10):.252..'.. P:LU$.G(17).['..ZZ
.0:NC.NC.1:.NC.0.."..NEXT COPY":PG.P1:LF
.0:DW.L:NM.0:LU$.G(17):.216.Q'...".END P
RINT":.60.W'.....'...Q.132.256,257,258,2
59,256,261,262,263..'..BT$." ":.272.
E'..NM.0:.272..'...WW.1.WW.0:BT$.G(15):D
W.L:ML.ML.2:MR.MR.2:.272..(...LC.1.272.!
(..BT$.G(17):LL$.BT$:.272./(..NM.7:.272.
^(..WW.1:BT$.G(14):DW.L.2:ML.ML.2:MR.MR.
2:.272.L(...LC.1.272..(..BT$.G(145):LL$.
BT$:.272..(...Q.2.BT$.",":.268..(...Q.3.
BT$.";":.268.G(...Q.1.BT$.G(58)..(..L1$.
L1$.BT$:.228..(...Q.18.LS$.G(18)..)...Q.
146.LS$.G(146)..)...230.,)..A$.I(TX$(J),
C(TX$(J)).1).O)..L1$.L1$.H(A$,C(A$).1).B
T$:.228.^)...L$."".295.Z)...I(L$,1).G(7)
.JS..1.295..)...I(L$,1).G(32).I(L$,1).G(
160).L$.H(L$,C(L$).1):.276..)...C(L$).DW
.(2.NM).I(L$,1)..G(32).I(L$,1)..G(160).C
T.0:...*..B$.L$:Y.0:Z$.""..*..CT.CT.DW.C
(B$).2.NM.B*...Q.1.C(L$):.J(L$,Q,1).G(18
).J(L$,Q,1).G(146).J(L$,Q,1).G(17).CT.CT
.1..*...J(L$,Q,1).G(44).J(L$,Q,1).G(58).
J(L$,Q,1).G(59).CT.CT.1..*...J(L$,Q,1).G
(145).CT.CT.1.D*...Q.U*...C(B$).0.288..*
..Z$.Z$.H(B$,1):B$.I(B$,C(B$).1)..+...I(
Z$,1).G(32).I(Z$,1).G(160).284.G+..Y.Y.1
:Z$.Z$.H(B$,1):B$.I(B$,C(B$).1).S+ ..C(B
$).0.Y.DW.2.NM.Y.0:B$.Z$:Z$."":.284..+!.
.I(Z$,1)..G(32).I(Z$,1)..G(160).287.N+".
Z$.Z$.G(32):.Y.DW.Y.0:B$.Z$:Z$."":CT.CT.
1:.284..,#..Q.1.5.CT:Y.Y.1:Z$.Z$.H(B$,1)
:B$.I(B$,C(B$).1).-,$..C(B$).0.Y.DW.2.NM
.Y.0:B$.Z$:Z$."":.284.C,%.CT.CT.1:.CT.0.
287.P,&.L$.Z$.B$.[,'.CT.0:...,(..F(LL$).
145.F(LU$).145.C(W$).0.L$.W$:.301..,)..A
.1.C(W$):B$.J(W$,A,1):B.F(B$).G,*..B.64.
B.91.B$.G(B.32)..,+..B.192.B$.G(B.128)..
,,.L$.L$.B$:...--..JS..1..A.1.100:...-..
...-/.B$."".%-0..212,0:."..";.E-1..LN.15
.TL.ZZ.0..".SPACE CRITICAL-FINISH NOW AN
D SAVE.":ZZ.1..-2..54:Q.F(A$):W$.I(TX$(L
N),1):M.C(TX$(LN)):.R%.342,307..-3..Q.34
..G(34)G(20);:.339..-4..Q.44.Q.58..A$;:A
$.G(2):.345..-5..Q.59..A$;:A$.G(3):.345.
..6..(Q.31.Q.127).Q.159.339.?.7..Q..157.
W$.G(7).C(B$).250.(E.1.M.2).318.`.8..M.2
.I(TX$(LN.1),1).G(7).318...9..M.2.LN.1.L
N.LN.1:.W$.G(7).318...:..M.2.318.R.;..21
2,0:." .";:.B$.."".Q.F(I(B$,1)):.38:.I(B
$,1);:.212,0:.".";...<..212,0:."...";../
=.B$.B$.I(TX$(LN),1):TX$(LN).H(TX$(LN),M
.1):.306.B/>..212,0:.Q..29.(E.1.C(TX$(LN
)).87).321../?..B$."".A$.I(B$,1):TX$(LN)
.TX$(LN).A$:B$.H(B$,C(B$).1):.A$;:.37:.3
50../@.." ";:TX$(LN).TX$(LN)." "../A..Q.
132.Q.141.323.Z/B..(Q..6.Q..146.Q..18).3
25../C..Q.137.A$.G(133)../D..38:.345..0E
..Q.28..".";.(8);"CRCTRS.P0F..(Q.31.Q.17
.Q.145.Q.158.Q.159.Q.30.Q.156.Q.5).E.1..
..0G..Q.(148.E.1.C(TX$(LN)).C(B$).88).."
."A$;:B$.B$." ":.304..0H..Q.148.E..1.C(
B$).249.." .";A$;:B$.B$." ":.304..0I..A$
.G(141).E.1.TX$(LN).TX$(LN).G(7):.".<":.
..0J..Q..20.336..1K..W$.G(7).(M.2.LN.2).
312.<1L..M.2.I(TX$(LN.1),1).G(7).312.M1M
..M.2.LN.LN.1.W1N..".";:TX$(LN).H(TX$(LN
),C(TX$(LN)).1)..1O..304..1P..Q.13.A$.G(
7):.E.1.306.N1Q..A$.G(7)..".<":LN.LN.1:T
X$(LN).TX$(LN).A$:.344.W1R..365..2S.TX$(
LN).TX$(LN).A$:.A$;:.B$.."".B$.H(B$,C(B$
).1).>2T..(C(TX$(LN)).80.E..1).(C(TX$(LN
)).87.E.1).344.G2U..304.S2V..C(TX$(LN)).
1.E..1.TX$(LN)."*7777":.344..2W..E..1.TX
$(LN.1)."*7777"..2X....2Y..Q.58.A$.G(1).
F2Z.TX$(LN).TX$(LN).A$:LN.LN.1.X2[..B$..
""..".";..2\..E..0....2]..304..3^..(C(TX
$(LN)).80.E..1).LN.LN.1..3_..304.Z3A..".
ASCII CONVERT REQUIRED (Y/N)?.";:.55:.A$
:.A$."Y".JJ.2:.355.V3B..A$.."N"..".WHAT?
":.356..3C..".ENTER NBR OF CHARS PER LIN
E (80 IS NOMINAL)":.61:N9.AN..3D..".";N9
;"ENTERED-CORRECT(Y/N)?.";:.55:.A$:.A$..
"Y".355..3E...D4G.. COPYRIGHT 1982 RAYMA
C SOFTWARE".............................
.............]4H..A$."D".V$."S":SL.15.C4
I....4M..Q.19.Q.147.Q.8:A$.G(8):.38:.345
..4O..304..4R..Q.8.."._.";..4T......4...
`.P..2
> CLICK IMAGE PREVIEW FOR FULL MODAL