LETTER WRITER
FILE INFORMATION
FILENAME(S): LETTER WRITER
FILE TYPE(S): PRG
FILE SIZE: 7.7K
FIRST SEEN: 2025-12-01 01:48:30
APPEARS ON: 1 disk(s)
FILE HASH
8978b74b45c7fc84610456c28fde9d6b71f298fc8720c62a314daab8271e8508
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PD187 DCB 6 88 | LETTER WRITER | PRG | hedning, Mattias H00r | 19 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 0A 00 96 A5 45 28 58 29 B2 B8 28 30 |.. .....E(X)..(0|
00000010: 29 AB 36 35 35 33 36 AC 28 B8 28 30 29 B3 30 29 |).65536.(.(0).0)|
00000020: 00 4F 08 14 00 54 37 25 B2 C2 28 32 31 33 29 3A |.O...T7%..(213):|
00000030: 59 31 25 B2 28 54 37 25 AA 32 29 AD 32 30 3A 59 |Y1%.(T7%.2).20:Y|
00000040: 54 25 B2 28 54 37 25 AB 32 31 29 AD 33 AA 31 00 |T%.(T7%.21).3.1.|
00000050: 73 08 1E 00 9F 34 2C 34 2C 37 3A 8B 59 31 25 B2 |s....4,4,7:.Y1%.|
00000060: 32 AF A5 45 28 30 29 B3 33 31 30 30 30 A7 59 31 |2..E(0).31000.Y1|
00000070: 25 B2 33 00 89 08 28 00 8B 59 31 25 B1 32 A7 98 |%.3...(..Y1%.2..|
00000080: 34 3A A0 34 3A 9F 34 2C 34 00 A5 08 32 00 44 4B |4:.4:.4,4...2.DK|
00000090: 25 B2 31 3A 97 35 33 32 38 30 2C 30 3A 97 35 33 |%.1:.53280,0:.53|
000000A0: 32 38 31 2C 30 00 C3 08 3C 00 54 31 B2 37 39 3A |281,0...<.T1.79:|
000000B0: 4D 47 B2 31 3A 45 54 B2 B5 28 A5 45 28 30 29 AD |MG.1:ET..(.E(0).|
000000C0: 36 30 29 00 00 09 46 00 59 32 25 B2 34 3A 59 33 |60)...F.Y2%.4:Y3|
000000D0: 25 B2 34 3A 59 34 25 B2 31 37 3A 43 44 24 B2 22 |%.4:Y4%.17:CD$."|
000000E0: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000000F0: 11 11 11 11 11 11 11 22 3A 50 4B 25 B2 31 39 34 |.......":PK%.194|
00000100: 00 33 09 50 00 8B 59 31 25 B1 31 A7 43 44 24 B2 |.3.P..Y1%.1.CD$.|
00000110: 43 44 24 AA 22 11 11 22 3A 59 32 25 B2 32 3A 59 |CD$."..":Y2%.2:Y|
00000120: 33 25 B2 31 30 3A 59 34 25 B2 32 31 3A 50 4B 25 |3%.10:Y4%.21:PK%|
00000130: B2 35 32 00 69 09 5A 00 4C 4C B2 31 3A 47 24 B2 |.52.i.Z.LL.1:G$.|
00000140: C7 28 33 34 29 3A 53 48 24 B2 C7 28 31 36 30 29 |.(34):SH$..(160)|
00000150: 3A 86 54 24 28 45 54 29 2C 54 52 24 28 32 30 29 |:.T$(ET),TR$(20)|
00000160: 2C 50 52 47 24 28 39 39 29 00 82 09 64 00 96 A5 |,PRG$(99)...d...|
00000170: 41 28 58 29 B2 57 33 AA 28 5A 36 AB 31 29 AD 59 |A(X).W3.(Z6.1).Y|
00000180: 32 25 00 B1 09 6E 00 53 24 B2 C7 28 33 32 29 3A |2%...n.S$..(32):|
00000190: 81 49 B2 31 A4 31 35 3A 53 51 24 B2 53 51 24 AA |.I.1.15:SQ$.SQ$.|
000001A0: 53 24 3A 82 3A 53 50 24 B2 C8 28 53 51 24 2C 35 |S$:.:SP$..(SQ$,5|
000001B0: 29 00 BA 09 78 00 89 31 36 30 00 E1 09 82 00 99 |)...x..160......|
000001C0: A3 59 54 25 29 22 1C 2A 2A 2A 9E 20 C4 49 53 4B |.YT%)".***. .ISK|
000001D0: 20 45 52 52 4F 52 20 1C 2A 2A 2A 22 3A 89 31 35 | ERROR .***":.15|
000001E0: 30 00 0B 0A 8C 00 99 A3 59 54 25 29 22 11 1C 2A |0.......YT%)"..*|
000001F0: 2A 2A 9E 20 CE 4F 20 46 49 4C 45 20 49 4E 20 4D |**. .O FILE IN M|
00000200: 45 4D 4F 52 59 20 1C 2A 2A 2A 22 00 15 0A 96 00 |EMORY .***".....|
00000210: 8D 32 30 31 30 00 2D 0A A0 00 8F 20 2A 2A 2A 20 |.2010.-.... *** |
00000220: 4D 41 49 4E 20 4D 45 4E 55 20 2A 2A 2A 00 48 0A |MAIN MENU ***.H.|
00000230: AA 00 8B 59 31 25 B3 33 A7 97 37 38 38 2C 50 4B |...Y1%.3..788,PK|
00000240: 25 3A 99 22 0E 08 22 3B 00 7C 0A B4 00 99 22 93 |%:."..";.|....".|
00000250: 11 11 12 9A 20 20 20 20 20 20 20 CC 20 C5 A0 D4 |.... . ...|
00000260: A0 D4 A0 C5 A0 D2 A0 A0 20 D7 A0 D2 A0 C9 A0 D4 |........ .......|
00000270: A0 C5 A0 D2 20 20 20 20 20 20 20 22 00 92 0A BE |.... "....|
00000280: 00 99 A3 33 29 22 9E 11 11 CF 50 54 49 4F 4E 53 |...3)"....PTIONS|
00000290: 3A 22 00 C0 0A C8 00 99 A3 35 29 22 11 1E 28 1C |:".......5)"..(.|
000002A0: 31 1E 29 20 D7 52 49 54 45 22 3A 99 A3 35 29 22 |1.) .RITE":..5)"|
000002B0: 28 1C 32 1E 29 20 C5 44 49 54 20 54 45 58 54 22 |(.2.) .DIT TEXT"|
000002C0: 00 FA 0A D2 00 99 A3 35 29 22 28 1C 33 1E 29 20 |.......5)"(.3.) |
000002D0: C4 49 53 50 4C 41 59 20 4C 45 54 54 45 52 22 3A |.ISPLAY LETTER":|
000002E0: 99 A3 35 29 22 28 1C 34 1E 29 20 C1 44 44 52 45 |..5)"(.4.) .DDRE|
000002F0: 53 53 20 4C 45 54 54 45 52 22 00 17 0B DC 00 99 |SS LETTER"......|
00000300: A3 35 29 22 28 1C 35 1E 29 20 D0 52 49 4E 54 20 |.5)"(.5.) .RINT |
00000310: 4C 45 54 54 45 52 22 00 4C 0B E6 00 99 A3 35 29 |LETTER".L.....5)|
00000320: 22 28 1C 36 1E 29 20 C6 49 4C 45 20 43 4F 4D 4D |"(.6.) .ILE COMM|
00000330: 41 4E 44 53 22 3A 99 A3 35 29 22 28 1C 37 1E 29 |ANDS":..5)"(.7.)|
00000340: 20 D3 45 54 20 46 4F 52 4D 41 54 22 00 8E 0B F0 | .ET FORMAT"....|
00000350: 00 99 A3 35 29 22 28 1C 38 1E 29 20 D2 45 54 55 |...5)"(.8.) .ETU|
00000360: 52 4E 20 54 4F 20 C8 2E C1 2E CC 2E 22 3A 99 A3 |RN TO ......":..|
00000370: 33 29 22 11 1C 3C C3 D2 D3 D2 3E 55 50 1E 20 41 |3)"..<....>UP. A|
00000380: 44 56 41 4E 43 45 53 20 50 41 50 45 52 22 00 B0 |DVANCES PAPER"..|
00000390: 0B FA 00 41 43 B2 30 3A 52 57 B2 30 3A 81 49 B2 |...AC.0:RW.0:.I.|
000003A0: 31 A4 32 3A 82 49 3A 81 4A B2 31 A4 32 3A 82 4A |1.2:.I:.J.1.2:.J|
000003B0: 00 CE 0B 04 01 99 A3 59 54 25 AA 36 29 22 11 11 |.......YT%.6)"..|
000003C0: D7 41 49 54 22 3A 8D 32 30 34 30 3A A0 32 00 FC |.AIT":.2040:.2..|
000003D0: 0B 0E 01 99 A3 59 54 25 AB 31 29 22 91 9A 22 3B |.....YT%.1)"..";|
000003E0: B5 28 A5 45 28 30 29 AD 28 54 31 AB 35 29 29 22 |.(.E(0).(T1.5))"|
000003F0: 1E 4C 49 4E 45 53 20 46 52 45 45 22 00 15 0C 18 |.LINES FREE"....|
00000400: 01 99 A3 59 54 25 29 22 D4 4F 50 20 4C 49 4E 45 |...YT%)".OP LINE|
00000410: 3A 9A 22 48 49 00 33 0C 22 01 99 A3 33 29 22 9E |:."HI.3."...3)".|
00000420: 11 D3 45 4C 45 43 54 20 41 4E 20 4F 50 54 49 4F |..ELECT AN OPTIO|
00000430: 4E 2E 22 00 3D 0C 2C 01 8D 32 30 32 30 00 54 0C |N.".=.,..2020.T.|
00000440: 36 01 8B 41 24 B2 22 91 22 A7 8D 32 34 30 30 3A |6..A$."."..2400:|
00000450: 89 33 30 30 00 66 0C 40 01 8B 20 C5 28 41 24 29 |.300.f.@.. .(A$)|
00000460: B1 38 A7 33 30 30 00 9E 0C 4A 01 49 B2 C5 28 41 |.8.300...J.I..(A|
00000470: 24 29 3A 99 22 93 22 3A 91 49 89 34 33 30 2C 39 |$):.".":.I.430,9|
00000480: 32 30 2C 31 31 36 30 2C 33 35 30 2C 31 34 33 30 |20,1160,350,1430|
00000490: 2C 35 36 30 2C 32 31 32 30 2C 31 32 32 30 00 A7 |,560,2120,1220..|
000004A0: 0C 54 01 89 31 36 30 00 C9 0C 5E 01 99 22 93 12 |.T..160...^.."..|
000004B0: 9A 20 20 20 C1 C4 C4 D2 C5 D3 D3 C9 CE C7 A0 CC |. ............|
000004C0: C5 D4 D4 C5 D2 A0 A0 A0 22 00 08 0D 63 01 81 49 |........"...c..I|
000004D0: B2 31 A4 35 3A 99 22 13 11 11 9E C1 44 44 52 45 |.1.5:.".....DDRE|
000004E0: 53 53 45 45 27 53 20 4E 41 4D 45 11 11 11 22 3A |SSEE'S NAME...":|
000004F0: 99 22 C1 44 44 52 45 53 53 11 11 11 22 3A 99 22 |.".DDRESS...":."|
00000500: C3 49 54 59 11 11 11 22 00 2F 0D 68 01 99 22 D3 |.ITY..."./.h..".|
00000510: 54 41 54 45 20 2B 20 DA 49 50 11 11 11 22 3A 99 |TATE + .IP...":.|
00000520: 22 D4 4F 44 41 59 27 53 20 44 41 54 45 1E 22 00 |".ODAY'S DATE.".|
00000530: 60 0D 72 01 81 4A B2 31 A4 35 3A 99 C8 28 43 44 |`.r..J.1.5:..(CD|
00000540: 24 2C 4A AC 34 29 3B 22 20 20 22 43 24 28 4A 29 |$,J.4);" "C$(J)|
00000550: 3B 3A 8B 43 24 28 4A 29 B2 22 22 A7 99 53 48 24 |;:.C$(J).""..SH$|
00000560: 00 67 0D 7C 01 82 4A 00 97 0D 86 01 99 C8 28 43 |.g.|..J.......(C|
00000570: 44 24 2C 49 AC 34 29 3B 3A 85 22 1E 22 3B 43 24 |D$,I.4);:.".";C$|
00000580: 28 49 29 3A 8B 43 24 28 49 29 B2 53 48 24 A7 43 |(I):.C$(I).SH$.C|
00000590: 24 28 49 29 B2 22 22 00 9E 0D 90 01 82 49 00 B6 |$(I).""......I..|
000005A0: 0D 9A 01 99 22 11 11 9E CF CB 3F 20 28 1C D9 9E |....".....? (...|
000005B0: 2F 1C CE 9E 29 22 00 CC 0D 9D 01 8D 32 30 31 30 |/...)"......2010|
000005C0: 3A 8B 41 24 B2 22 4E 22 A7 33 35 30 00 DD 0D A0 |:.A$."N".350....|
000005D0: 01 8B 41 24 B3 B1 22 59 22 A7 34 31 33 00 E6 0D |..A$.."Y".413...|
000005E0: A4 01 89 31 36 30 00 22 0E AE 01 99 22 12 9A 20 |...160."....".. |
000005F0: 20 20 D7 D2 C9 D4 C5 20 20 20 11 22 3A 99 22 9E | ..... .":.".|
00000600: D0 52 45 53 53 20 1C D2 C5 D4 D5 D2 CE 9E 20 46 |.RESS ........ F|
00000610: 4F 52 20 4E 45 57 20 50 41 52 41 47 52 41 50 48 |OR NEW PARAGRAPH|
00000620: 2C 22 00 4A 0E B3 01 99 22 50 52 45 53 53 20 41 |,".J...."PRESS A|
00000630: 47 41 49 4E 20 54 4F 20 52 45 54 55 52 4E 20 54 |GAIN TO RETURN T|
00000640: 4F 20 4D 45 4E 55 2E 05 11 22 00 62 0E B8 01 8B |O MENU...".b....|
00000650: 48 49 B1 30 A7 99 48 49 3B 54 24 28 48 49 29 22 |HI.0..HI;T$(HI)"|
00000660: 11 22 00 7C 0E C2 01 8D 31 32 38 30 3A 8B 4C B3 |.".|....1280:.L.|
00000670: 32 B0 4C 4C B2 B1 45 54 A7 31 36 30 00 94 0E CC |2.LL..ET.160....|
00000680: 01 54 24 28 4C 4C 29 B2 4C 24 3A 99 3A 4C 4C B2 |.T$(LL).L$:.:LL.|
00000690: 4C 4C AA 31 00 9D 0E D6 01 89 34 35 30 00 BA 0E |LL.1......450...|
000006A0: E0 01 8B 43 58 B1 43 59 A7 43 5A B2 43 58 3A 43 |...CX.CY.CZ.CX:C|
000006B0: 58 B2 43 59 3A 43 59 B2 43 5A 00 C9 0E EA 01 43 |X.CY:CY.CZ.....C|
000006C0: 5A B2 43 59 AB 43 58 AA 31 00 D3 0E F4 01 8D 32 |Z.CY.CX.1......2|
000006D0: 30 34 30 00 E3 0E FE 01 81 49 B2 43 58 A4 48 49 |040......I.CX.HI|
000006E0: AB 43 5A 00 F6 0E 08 02 54 24 28 49 29 B2 54 24 |.CZ.....T$(I).T$|
000006F0: 28 49 AA 43 5A 29 00 12 0F 12 02 82 49 3A 54 24 |(I.CZ)......I:T$|
00000700: 28 49 29 B2 22 8A 22 3A 43 58 B2 30 3A 4A B2 49 |(I).".":CX.0:J.I|
00000710: AA 31 00 2E 0F 1C 02 81 49 B2 4A A4 4A AA 43 5A |.1......I.J.J.CZ|
00000720: AA 32 3A 54 24 28 49 29 B2 22 22 3A 82 49 00 3D |.2:T$(I)."":.I.=|
00000730: 0F 26 02 8D 32 30 34 30 3A 89 39 34 30 00 5C 0F |.&..2040:.940.\.|
00000740: 30 02 99 22 93 12 9A 11 20 20 20 C6 C9 CC C5 A0 |0..".... .....|
00000750: C3 CF CD CD C1 CE C4 D3 A0 A0 A0 22 00 74 0F 32 |...........".t.2|
00000760: 02 99 22 11 12 1C CC 92 9E 4F 41 44 20 41 20 46 |.."......OAD A F|
00000770: 49 4C 45 22 00 92 0F 34 02 99 22 20 12 1C D3 92 |ILE"...4.." ....|
00000780: 9E 41 56 45 20 43 55 52 52 45 4E 54 20 46 49 4C |.AVE CURRENT FIL|
00000790: 45 22 00 B2 0F 36 02 99 22 20 20 12 1C D0 92 9E |E"...6.." .....|
000007A0: 55 52 47 45 20 43 55 52 52 45 4E 54 20 46 49 4C |URGE CURRENT FIL|
000007B0: 45 22 00 D3 0F 38 02 99 22 20 20 20 12 1C C4 92 |E"...8.." ....|
000007C0: 9E 49 52 45 43 54 4F 52 59 20 4F 46 20 46 49 4C |.IRECTORY OF FIL|
000007D0: 45 53 22 00 02 10 3A 02 99 22 D0 52 45 53 53 20 |ES"...:..".RESS |
000007E0: 1C 3C D3 C8 C9 C6 D4 3E 12 CC 92 9E 20 54 4F 20 |.<.....>.... TO |
000007F0: 4C 4F 41 44 20 41 20 53 50 4F 4F 4C 20 46 49 4C |LOAD A SPOOL FIL|
00000800: 45 22 00 32 10 3C 02 99 22 D0 52 45 53 53 20 1C |E".2.<..".RESS .|
00000810: 3C D3 C8 C9 C6 D4 3E 12 D3 92 9E 20 54 4F 20 53 |<.....>.... TO S|
00000820: 41 56 45 20 41 53 20 53 50 4F 4F 4C 20 46 49 4C |AVE AS SPOOL FIL|
00000830: 45 22 00 61 10 3F 02 99 22 28 41 4E 59 20 4F 54 |E".a.?.."(ANY OT|
00000840: 48 45 52 20 4B 45 59 20 52 45 54 55 52 4E 53 20 |HER KEY RETURNS |
00000850: 59 4F 55 20 54 4F 20 54 48 45 20 4D 45 4E 55 29 |YOU TO THE MENU)|
00000860: 22 00 71 10 44 02 8D 32 30 31 30 3A 4D 24 B2 41 |".q.D..2010:M$.A|
00000870: 24 00 9D 10 4E 02 46 4B 24 B2 22 40 57 2F 22 3A |$...N.FK$."@W/":|
00000880: 8B 4D 24 B2 22 CC 22 B0 4D 24 B2 22 D3 22 A7 46 |.M$.".".M$.".".F|
00000890: 4B 24 B2 22 40 53 2F 22 3A 89 36 33 30 00 AE 10 |K$."@S/":.630...|
000008A0: 58 02 8B 4D 24 B2 22 44 22 A7 32 33 30 30 00 BE |X..M$."D".2300..|
000008B0: 10 62 02 8B 4D 24 B2 22 50 22 A7 38 33 30 00 D7 |.b..M$."P".830..|
000008C0: 10 6C 02 8B 4D 24 B3 B1 22 53 22 AF 4D 24 B3 B1 |.l..M$.."S".M$..|
000008D0: 22 4C 22 A7 31 36 30 00 F5 10 76 02 8B 28 4D 24 |"L".160...v..(M$|
000008E0: B2 22 53 22 B0 4D 24 B2 22 D3 22 29 AF 48 49 B2 |."S".M$.".").HI.|
000008F0: 30 A7 31 34 30 00 19 11 80 02 99 22 11 12 1C D4 |0.140......"....|
00000900: 92 9E 41 50 45 20 4F 52 20 12 1C C4 92 9E 49 53 |..APE OR .....IS|
00000910: 4B 11 22 3A 8D 32 30 31 30 00 45 11 8A 02 4A B2 |K.":.2010.E...J.|
00000920: 31 3A 8B 4D 24 B2 22 4C 22 A7 85 22 D3 54 41 52 |1:.M$."L"..".TAR|
00000930: 54 49 4E 47 20 41 44 44 52 45 53 53 20 20 31 9D |TING ADDRESS 1.|
00000940: 9D 9D 22 3B 4A 00 55 11 94 02 8B 41 24 B2 22 44 |..";J.U....A$."D|
00000950: 22 A7 37 32 30 00 66 11 9E 02 8B 41 24 B3 B1 22 |".720.f....A$.."|
00000960: 54 22 A7 31 36 30 00 7E 11 A8 02 8B 4D 24 B2 22 |T".160.~....M$."|
00000970: 53 22 B0 4D 24 B2 22 D3 22 A7 41 43 B2 31 00 AE |S".M$.".".AC.1..|
00000980: 11 B2 02 99 22 9E D0 52 45 53 53 20 41 4E 59 20 |...."..RESS ANY |
00000990: 4B 45 59 20 57 48 45 4E 20 54 41 50 45 20 49 53 |KEY WHEN TAPE IS|
000009A0: 20 52 45 41 44 59 2E 22 3A 8D 32 30 31 30 00 C1 | READY.":.2010..|
000009B0: 11 BC 02 8B 59 31 25 B1 32 A7 97 31 34 34 2C 38 |....Y1%.2..144,8|
000009C0: 35 00 D2 11 C6 02 9F 32 2C 31 2C 41 43 3A 89 37 |5......2,1,AC:.7|
000009D0: 38 30 00 E2 11 D0 02 8B 44 4B 25 B3 B1 31 A7 31 |80......DK%..1.1|
000009E0: 33 30 00 FC 11 DA 02 85 22 11 D7 48 41 54 20 46 |30......"..HAT F|
000009F0: 49 4C 45 4E 41 4D 45 22 3B 46 4C 24 00 25 12 E4 |ILENAME";FL$.%..|
00000A00: 02 46 4D 24 B2 22 2C 53 2C 57 22 3A 8B 4D 24 B2 |.FM$.",S,W":.M$.|
00000A10: 22 4C 22 B0 4D 24 B2 22 CC 22 A7 46 4D 24 B2 22 |"L".M$.".".FM$."|
00000A20: 2C 53 2C 52 22 00 39 12 EE 02 46 4C 24 B2 46 4B |,S,R".9...FL$.FK|
00000A30: 24 AA 46 4C 24 AA 46 4D 24 00 59 12 F8 02 9F 32 |$.FL$.FM$.Y....2|
00000A40: 2C 38 2C 32 2C 46 4C 24 3A 8D 32 30 38 30 3A 8B |,8,2,FL$:.2080:.|
00000A50: 45 31 B3 B1 30 A7 31 33 30 00 70 12 02 03 8B 4D |E1..0.130.p....M|
00000A60: 24 B2 22 D3 22 A7 52 57 B2 32 3A 89 31 35 31 30 |$.".".RW.2:.1510|
00000A70: 00 87 12 0C 03 8B 4D 24 B2 22 4C 22 B0 4D 24 B2 |......M$."L".M$.|
00000A80: 22 CC 22 A7 38 31 30 00 A2 12 16 03 81 49 B2 31 |".".810......I.1|
00000A90: A4 48 49 3A 98 32 2C 47 24 AA 54 24 28 49 29 AA |.HI:.2,G$.T$(I).|
00000AA0: 47 24 00 B4 12 20 03 99 22 2A 22 3B 3A 82 49 3A |G$... .."*";:.I:|
00000AB0: 89 31 36 30 00 D6 12 2A 03 81 49 B2 4A A4 45 54 |.160...*..I.J.ET|
00000AC0: 3A 84 32 2C 54 24 28 49 29 3A 8B 28 53 54 29 AF |:.2,T$(I):.(ST).|
00000AD0: 36 34 A7 31 36 30 00 E8 12 34 03 99 22 2A 22 3B |64.160...4.."*";|
00000AE0: 3A 82 49 3A 89 31 33 30 00 26 13 3E 03 99 22 11 |:.I:.130.&.>..".|
00000AF0: C1 52 45 20 59 4F 55 20 53 55 52 45 3F 28 1C D9 |.RE YOU SURE?(..|
00000B00: 9E 2F 1C CE 9E 29 22 3A 8D 32 30 31 30 3A 8B 41 |./...)":.2010:.A|
00000B10: 24 B3 B1 22 59 22 A7 99 22 C1 42 4F 52 54 45 44 |$.."Y"..".BORTED|
00000B20: 22 3A 89 31 35 30 00 54 13 48 03 81 49 B2 31 A4 |":.150.T.H..I.1.|
00000B30: 45 54 3A 54 24 28 49 29 B2 22 22 3A 82 3A 81 49 |ET:T$(I)."":.:.I|
00000B40: B2 31 A4 34 3A 43 24 28 49 29 B2 22 22 3A 82 3A |.1.4:C$(I)."":.:|
00000B50: 89 31 34 30 00 6C 13 52 03 8D 32 30 34 30 3A 4C |.140.l.R..2040:L|
00000B60: 47 B2 A5 41 28 30 29 3A 41 43 B2 30 00 82 13 5C |G..A(0):AC.0...\|
00000B70: 03 99 22 93 22 4C 47 22 9D 3E 22 3B 54 24 28 4C |.."."LG".>";T$(L|
00000B80: 47 29 00 AD 13 66 03 81 4C 42 B2 31 A4 32 30 3A |G)...f..LB.1.20:|
00000B90: 99 3A 99 3A 8D 31 32 38 30 3A 8B 4C B3 32 B0 48 |.:.:.1280:.L.2.H|
00000BA0: 49 AA 4C 42 B1 45 54 AB 32 A7 38 39 30 00 C0 13 |I.LB.ET.2.890...|
00000BB0: 70 03 54 52 24 28 4C 42 29 B2 4C 24 3A 82 4C 42 |p.TR$(LB).L$:.LB|
00000BC0: 00 D6 13 7A 03 4C 42 B2 4C 42 AB 31 3A 8B 4C 42 |...z.LB.LB.1:.LB|
00000BD0: B2 30 A7 39 34 30 00 04 14 84 03 81 49 B2 48 49 |.0.940......I.HI|
00000BE0: AA 4C 42 A4 4C 47 AA 31 AA 4C 42 A9 AB 31 3A 54 |.LB.LG.1.LB..1:T|
00000BF0: 24 28 49 29 B2 54 24 28 49 AB 4C 42 29 3A 82 49 |$(I).T$(I.LB):.I|
00000C00: 3A 4A B2 30 00 41 14 8E 03 81 49 B2 4C 47 AA 31 |:J.0.A....I.LG.1|
00000C10: A4 4C 47 AA 4C 42 3A 4A B2 4A AA 31 3A 54 24 28 |.LG.LB:J.J.1:T$(|
00000C20: 49 29 B2 54 52 24 28 4A 29 3A 54 52 24 28 4A 29 |I).TR$(J):TR$(J)|
00000C30: B2 22 22 3A 82 49 3A 8D 32 30 34 30 3A 89 39 34 |."":.I:.2040:.94|
00000C40: 30 00 4F 14 98 03 8B 48 49 B2 30 A7 31 34 30 00 |0.O....HI.0.140.|
00000C50: 69 14 9D 03 99 22 11 12 9A 20 20 20 C5 C4 C9 D4 |i...."... ....|
00000C60: A0 D4 C5 D8 D4 A0 A0 A0 22 00 A7 14 A2 03 43 58 |........".....CX|
00000C70: B2 30 3A 85 22 9E 11 11 D3 54 41 52 54 49 4E 47 |.0:."....TARTING|
00000C80: 20 41 54 20 4C 49 4E 45 20 23 20 20 1C 31 05 9D | AT LINE # .1..|
00000C90: 9D 9D 22 3B 57 33 3A 5A 36 B2 31 3A 5A 35 B2 31 |..";W3:Z6.1:Z5.1|
00000CA0: 3A 4A 47 24 B2 22 22 00 C0 14 AC 03 8B 57 33 B1 |:JG$.""......W3.|
00000CB0: 48 49 AB 59 33 25 A7 57 33 B2 48 49 AB 59 33 25 |HI.Y3%.W3.HI.Y3%|
00000CC0: 00 CF 14 B6 03 8B 57 33 B3 31 A7 57 33 B2 31 00 |......W3.1.W3.1.|
00000CD0: EA 14 C0 03 5A 34 B2 31 3A 99 22 93 22 3A 81 49 |....Z4.1:.".":.I|
00000CE0: B2 57 33 A4 57 33 AA 59 33 25 00 1D 15 CA 03 99 |.W3.W3.Y3%......|
00000CF0: C8 28 43 44 24 2C 5A 34 29 3B 49 22 9D 22 3B A3 |.(CD$,Z4);I".";.|
00000D00: 34 29 C7 28 33 34 29 3B 54 24 28 49 29 3B C7 28 |4).(34);T$(I);.(|
00000D10: 33 34 29 3A 5A 34 B2 5A 34 AA 59 32 25 00 24 15 |34):Z4.Z4.Y2%.$.|
00000D20: D4 03 82 49 00 3F 15 DE 03 99 C8 28 43 44 24 2C |...I.?.....(CD$,|
00000D30: 32 32 29 3B 3A 8B 59 31 25 B1 31 A7 99 3A 99 00 |22);:.Y1%.1..:..|
00000D40: 7C 15 E8 03 99 22 1C 3C C3 D2 D3 D2 3E 52 49 47 ||....".<....>RIG|
00000D50: 48 54 9E 20 45 44 49 54 20 12 1C CD 92 9E 45 4E |HT. EDIT .....EN|
00000D60: 55 20 12 1C D3 92 9E 57 41 50 20 12 1C C4 92 9E |U .....WAP .....|
00000D70: 45 4C 45 54 45 20 4C 49 4E 45 22 3B 00 89 15 ED |ELETE LINE";....|
00000D80: 03 8B 59 31 25 B1 31 A7 99 00 BE 15 F2 03 99 22 |..Y1%.1........"|
00000D90: 12 1C C9 92 9E 4E 53 45 52 54 20 4C 49 4E 45 20 |.....NSERT LINE |
00000DA0: 1C 3C C3 D2 D3 D2 3E 55 50 2F 44 4F 57 4E 9E 20 |.<....>UP/DOWN. |
00000DB0: 53 45 4C 45 43 54 53 20 4C 49 4E 45 22 3B 00 DA |SELECTS LINE";..|
00000DC0: 15 FC 03 8B 5A 36 B3 31 A7 5A 36 B2 31 3A 57 33 |....Z6.1.Z6.1:W3|
00000DD0: B2 57 33 AB 31 3A 89 39 34 30 00 FA 15 06 04 8B |.W3.1:.940......|
00000DE0: 5A 36 B1 59 34 25 A7 5A 36 B2 59 34 25 3A 57 33 |Z6.Y4%.Z6.Y4%:W3|
00000DF0: B2 57 33 AA 31 3A 89 39 34 30 00 0F 16 10 04 99 |.W3.1:.940......|
00000E00: C8 28 43 44 24 2C 5A 35 29 22 20 9D 20 22 3B 00 |.(CD$,Z5)" . ";.|
00000E10: 2C 16 1A 04 99 C8 28 43 44 24 2C 5A 36 29 22 12 |,.....(CD$,Z6)".|
00000E20: 1C 3E 05 92 22 3B 3A 5A 35 B2 5A 36 00 36 16 24 |.>..";:Z5.Z6.6.$|
00000E30: 04 8D 32 30 31 30 00 52 16 2E 04 8B 41 24 B2 22 |..2010.R....A$."|
00000E40: 11 22 A7 5A 36 B2 5A 36 AA 59 32 25 3A 89 31 30 |.".Z6.Z6.Y2%:.10|
00000E50: 32 30 00 82 16 38 04 8B 41 24 B2 22 1D 22 A7 99 |20...8..A$."."..|
00000E60: A3 32 29 3B 3A 4A 47 24 B2 54 24 28 A5 41 28 30 |.2);:JG$.T$(.A(0|
00000E70: 29 29 3A 85 54 24 28 A5 41 28 30 29 29 3A 89 39 |)):.T$(.A(0)):.9|
00000E80: 34 30 00 9E 16 42 04 8B 41 24 B2 22 91 22 A7 5A |40...B..A$.".".Z|
00000E90: 36 B2 5A 36 AB 59 32 25 3A 89 31 30 32 30 00 BE |6.Z6.Y2%:.1020..|
00000EA0: 16 4C 04 8B 41 24 B2 22 44 22 AF 43 58 B3 B1 30 |.L..A$."D".CX..0|
00000EB0: A7 43 59 B2 A5 41 28 30 29 3A 89 34 38 30 00 D3 |.CY..A(0):.480..|
00000EC0: 16 56 04 8B 41 24 B2 22 44 22 A7 43 58 B2 A5 41 |.V..A$."D".CX..A|
00000ED0: 28 30 29 00 E3 16 60 04 8B 41 24 B2 22 49 22 A7 |(0)...`..A$."I".|
00000EE0: 38 35 30 00 20 17 6A 04 8B 41 24 B2 22 53 22 AF |850. .j..A$."S".|
00000EF0: 4A 47 24 B3 B1 22 22 A7 4A 48 24 B2 54 24 28 A5 |JG$.."".JH$.T$(.|
00000F00: 41 28 30 29 29 3A 54 24 28 A5 41 28 30 29 29 B2 |A(0)):T$(.A(0)).|
00000F10: 4A 47 24 3A 4A 47 24 B2 4A 48 24 3A 89 39 34 30 |JG$:JG$.JH$:.940|
00000F20: 00 30 17 74 04 8B 41 24 B2 22 4D 22 A7 31 36 30 |.0.t..A$."M".160|
00000F30: 00 3A 17 7E 04 89 31 30 36 30 00 48 17 88 04 8B |.:.~..1060.H....|
00000F40: 48 49 B2 30 A7 31 34 30 00 52 17 92 04 8D 31 39 |HI.0.140.R....19|
00000F50: 39 30 00 72 17 9C 04 54 55 B2 54 31 3A 54 31 B2 |90.r...TU.T1:T1.|
00000F60: 54 37 25 3A 52 57 B2 31 3A 8B 49 B2 34 A7 41 43 |T7%:RW.1:.I.4.AC|
00000F70: B2 31 00 7C 17 A6 04 89 31 35 31 30 00 92 17 B0 |.1.|....1510....|
00000F80: 04 54 31 B2 54 55 3A 8B 41 24 B2 22 11 22 A7 31 |.T1.TU:.A$.".".1|
00000F90: 36 30 00 9B 17 BA 04 89 31 35 30 00 D2 17 C4 04 |60......150.....|
00000FA0: 99 22 93 11 11 11 11 11 11 11 11 11 11 C9 4E 20 |."............N |
00000FB0: 43 41 53 45 20 59 4F 55 52 20 54 45 58 54 20 48 |CASE YOUR TEXT H|
00000FC0: 41 53 4E 27 54 20 42 45 45 4E 20 53 41 56 45 44 |ASN'T BEEN SAVED|
00000FD0: 2C 22 00 00 18 CE 04 99 22 20 44 4F 20 59 4F 55 |,"......" DO YOU|
00000FE0: 20 53 54 49 4C 4C 20 57 49 53 48 20 54 4F 20 4C | STILL WISH TO L|
00000FF0: 45 41 56 45 3F 20 28 1C 59 9E 2F 1C 4E 9E 29 22 |EAVE? (.Y./.N.)"|
00001000: 00 0A 18 D8 04 8D 32 30 32 30 00 1C 18 E2 04 8B |......2020......|
00001010: 20 41 24 B3 B1 22 59 22 A7 31 36 30 00 30 18 EC | A$.."Y".160.0..|
00001020: 04 8B 20 59 31 25 B1 32 A7 97 31 34 34 2C 38 35 |.. Y1%.2..144,85|
00001030: 00 3B 18 F6 04 89 31 30 30 30 30 00 45 18 00 05 |.;....10000.E...|
00001040: 4C 24 B2 22 22 00 5C 18 0A 05 8B 41 43 B2 31 33 |L$."".\....AC.13|
00001050: B0 4C 4C B2 31 A7 4C 24 B2 22 5F 22 00 6F 18 14 |.LL.1.L$."_".o..|
00001060: 05 99 22 A4 9D 22 3B 3A 4C B2 C3 28 4C 24 29 00 |.."..";:L..(L$).|
00001070: 88 18 1E 05 8D 32 30 32 30 3A 8B 41 24 B2 22 1D |.....2020:.A$.".|
00001080: 22 A7 41 24 B2 53 50 24 00 9A 18 28 05 8B 41 24 |".A$.SP$...(..A$|
00001090: B2 53 48 24 A7 41 24 B2 53 24 00 A7 18 32 05 41 |.SH$.A$.S$...2.A|
000010A0: 43 B2 C6 28 41 24 29 00 CB 18 3C 05 8B 28 4C B1 |C..(A$)...<..(L.|
000010B0: 35 37 AF 41 43 B2 33 32 29 B0 4C B1 37 32 B0 41 |57.AC.32).L.72.A|
000010C0: 43 B2 31 33 A7 99 53 24 3B 3A 8E 00 FC 18 46 05 |C.13..S$;:....F.|
000010D0: 8B 28 41 43 B2 32 30 B0 41 43 B2 31 34 38 29 AF |.(AC.20.AC.148).|
000010E0: 4C B1 31 A7 99 22 14 22 3B 3A 4C 24 B2 C8 28 4C |L.1..".";:L$..(L|
000010F0: 24 2C 4C AB 31 29 3A 89 31 33 30 30 00 0C 19 50 |$,L.1):.1300...P|
00001100: 05 8B 41 43 B2 33 34 A7 31 33 30 30 00 3D 19 5A |..AC.34.1300.=.Z|
00001110: 05 8B 28 41 43 B1 33 31 AF 41 43 B3 39 36 29 B0 |..(AC.31.AC.96).|
00001120: 28 41 43 B1 31 39 32 AF 41 43 B3 32 31 39 29 A7 |(AC.192.AC.219).|
00001130: 4C 24 B2 4C 24 AA 41 24 3A 99 41 24 3B 00 47 19 |L$.L$.A$:.A$;.G.|
00001140: 64 05 89 31 33 30 30 00 7D 19 6E 05 81 49 B2 31 |d..1300.}.n..I.1|
00001150: A4 48 49 3A 59 37 24 B2 54 24 28 49 29 3A 8D 31 |.HI:Y7$.T$(I):.1|
00001160: 37 39 30 3A 8B 41 24 B2 22 11 22 A7 41 43 B2 31 |790:.A$.".".AC.1|
00001170: 3A 99 22 11 C1 42 4F 52 54 49 4E 47 22 00 A2 19 |:."..BORTING"...|
00001180: 78 05 82 49 3A 8B 50 47 B3 B1 30 A7 81 50 47 B2 |x..I:.PG..0..PG.|
00001190: 50 47 AA 31 A4 35 37 3A 98 34 3A 82 3A 8D 31 37 |PG.1.57:.4:.:.17|
000011A0: 39 30 00 B0 19 82 05 8B 41 43 B2 31 A7 31 36 30 |90......AC.1.160|
000011B0: 00 BF 19 8C 05 50 44 B2 30 3A 89 31 33 39 30 00 |.....PD.0:.1390.|
000011C0: CD 19 96 05 8B 48 49 B2 30 A7 31 34 30 00 04 1A |.....HI.0.140...|
000011D0: A0 05 99 22 11 12 9A 20 20 20 D0 D2 C9 CE D4 20 |..."... ..... |
000011E0: CC C5 D4 D4 C5 D2 A0 A0 A0 22 3A 99 22 20 11 12 |.........":." ..|
000011F0: 1C D0 92 9E 52 49 4E 54 20 4E 45 57 20 4C 45 54 |....RINT NEW LET|
00001200: 54 45 52 22 00 43 1A AA 05 99 22 20 20 12 1C C3 |TER".C...." ...|
00001210: 92 9E 4F 4E 54 49 4E 55 45 20 4F 4C 44 20 4C 45 |..ONTINUE OLD LE|
00001220: 54 54 45 52 22 3A 99 22 20 20 20 12 1C D3 92 9E |TTER":." .....|
00001230: 50 4F 4F 4C 20 46 49 4C 45 20 50 52 49 4E 54 49 |POOL FILE PRINTI|
00001240: 4E 47 22 00 6C 1A B4 05 52 57 B2 30 3A 8D 32 30 |NG".l...RW.0:.20|
00001250: 31 30 3A 4D 24 B2 41 24 3A 8B 4D 24 B2 22 43 22 |10:M$.A$:.M$."C"|
00001260: A7 8D 31 39 39 30 3A 89 31 35 34 30 00 85 1A BE |..1990:.1540....|
00001270: 05 8B 4D 24 B3 B1 22 50 22 AF 4D 24 B3 B1 22 53 |..M$.."P".M$.."S|
00001280: 22 A7 31 36 30 00 C0 1A C8 05 50 47 B2 30 3A 50 |".160.....PG.0:P|
00001290: 44 B2 30 3A 8D 32 34 30 30 3A 99 22 11 D0 52 45 |D.0:.2400:."..RE|
000012A0: 53 53 20 1C 3C 43 52 53 52 3E 55 50 9E 20 54 4F |SS .<CRSR>UP. TO|
000012B0: 20 41 44 56 41 4E 43 45 20 50 41 50 45 52 2E 22 | ADVANCE PAPER."|
000012C0: 00 E8 1A CD 05 99 22 11 D0 52 45 53 53 20 41 4E |......"..RESS AN|
000012D0: 59 20 4F 54 48 45 52 20 4B 45 59 20 57 48 45 4E |Y OTHER KEY WHEN|
000012E0: 20 52 45 41 44 59 2E 22 00 03 1B D2 05 8D 32 30 | READY."......20|
000012F0: 32 30 3A 8B 41 24 B2 22 91 22 A7 98 34 3A 89 31 |20:.A$."."..4:.1|
00001300: 34 39 30 00 20 1B DC 05 8D 31 39 39 30 3A 8B 4D |490. ....1990:.M|
00001310: 24 B2 22 53 22 A7 52 57 B2 33 3A 89 31 33 39 30 |$."S".RW.3:.1390|
00001320: 00 33 1B E6 05 8B 43 24 28 31 29 B2 22 22 A7 31 |.3....C$(1)."".1|
00001330: 35 34 30 00 59 1B F0 05 81 49 B2 31 A4 37 3A 59 |540.Y....I.1.7:Y|
00001340: 37 24 B2 43 24 28 49 29 3A 8B 49 B2 33 A7 59 37 |7$.C$(I):.I.3.Y7|
00001350: 24 B2 59 37 24 AA 22 2C 22 00 65 1B FA 05 8D 31 |$.Y7$.",".e....1|
00001360: 37 39 30 3A 82 00 7E 1B 04 06 54 4C B2 48 49 3A |790:..~...TL.HI:|
00001370: 50 48 B2 30 3A 49 B2 31 3A 54 24 B2 22 22 00 9E |PH.0:I.1:T$.""..|
00001380: 1B 0E 06 8B C3 28 54 24 29 AA C3 28 54 24 28 49 |.....(T$)..(T$(I|
00001390: 29 AA 53 24 29 B1 32 34 35 A7 31 35 39 30 00 C9 |).S$).245.1590..|
000013A0: 1B 18 06 8B 28 C8 28 54 24 28 49 29 2C 31 29 B2 |....(.(T$(I),1).|
000013B0: 22 5F 22 AF 49 B3 B1 31 29 B0 49 B1 54 4C A7 50 |"_".I..1).I.TL.P|
000013C0: 48 B2 31 3A 89 31 35 39 30 00 E2 1B 22 06 54 24 |H.1:.1590...".T$|
000013D0: B2 54 24 AA 54 24 28 49 29 AA 53 24 3A 49 B2 49 |.T$.T$(I).S$:I.I|
000013E0: AA 31 00 EC 1B 2C 06 89 31 35 35 30 00 0C 1C 36 |.1...,..1550...6|
000013F0: 06 8B C8 28 54 24 2C 31 29 B2 22 5F 22 A7 54 24 |...(T$,1)."_".T$|
00001400: B2 53 50 24 AA CA 28 54 24 2C 32 29 00 1B 1C 40 |.SP$..(T$,2)...@|
00001410: 06 81 4A B2 54 31 A4 31 A9 AB 31 00 4E 1C 4A 06 |..J.T1.1..1.N.J.|
00001420: 8B CA 28 54 24 2C 4A 2C 31 29 B2 53 24 A7 54 31 |..(T$,J,1).S$.T1|
00001430: 24 B2 C8 28 54 24 2C 4A AB 31 29 3A 54 24 B2 CA |$..(T$,J.1):T$..|
00001440: 28 54 24 2C 4A AA 31 29 3A 89 31 36 33 30 00 70 |(T$,J.1):.1630.p|
00001450: 1C 54 06 82 4A 3A 54 31 24 B2 C8 28 54 24 2C 54 |.T..J:T1$..(T$,T|
00001460: 31 AB 31 29 3A 54 24 B2 CA 28 54 24 2C 54 31 29 |1.1):T$..(T$,T1)|
00001470: 00 8D 1C 5E 06 8B 4D 47 B2 31 AF 28 52 57 B3 B1 |...^..MG.1.(RW..|
00001480: 31 B0 41 43 B2 31 29 A7 8D 31 39 32 30 00 A6 1C |1.AC.1)..1920...|
00001490: 68 06 59 37 24 B2 54 31 24 3A 8D 31 37 39 30 3A |h.Y7$.T1$:.1790:|
000014A0: 54 31 24 B2 22 22 00 B6 1C 72 06 8B 44 54 B2 31 |T1$.""...r..DT.1|
000014B0: A7 8D 31 37 39 30 00 C7 1C 7C 06 8B 41 24 B2 22 |..1790...|..A$."|
000014C0: 41 22 A7 31 37 35 30 00 DA 1C 86 06 8B C3 28 54 |A".1750.......(T|
000014D0: 24 29 B1 54 31 A7 31 36 30 30 00 EF 1C 90 06 8B |$).T1.1600......|
000014E0: 50 48 B2 31 AF 54 24 B2 22 22 A7 31 37 30 30 00 |PH.1.T$."".1700.|
000014F0: F9 1C 9A 06 89 31 37 32 30 00 0E 1D A4 06 50 48 |.....1720.....PH|
00001500: B2 30 3A 8B 44 54 B2 30 A7 8D 31 37 39 30 00 1E |.0:.DT.0..1790..|
00001510: 1D AE 06 8B 49 B2 B3 54 4C A7 31 35 37 30 00 2D |....I..TL.1570.-|
00001520: 1D B8 06 8B 50 48 B2 31 A7 31 36 30 30 00 3C 1D |....PH.1.1600.<.|
00001530: C2 06 8B 49 B1 54 4C A7 31 37 35 30 00 46 1D CC |...I.TL.1750.F..|
00001540: 06 89 31 35 35 30 00 57 1D D6 06 91 52 57 89 31 |..1550.W....RW.1|
00001550: 32 30 30 2C 31 36 30 00 95 1D E0 06 99 22 11 11 |200,160......"..|
00001560: 9E C1 44 56 41 4E 43 45 20 54 4F 20 54 4F 50 2D |..DVANCE TO TOP-|
00001570: 4F 46 2D 46 4F 52 4D 3F 28 1C D9 9E 2F 1C CE 9E |OF-FORM?(.../...|
00001580: 29 22 3A 8D 32 30 31 30 3A 8B 41 24 B3 B1 22 59 |)":.2010:.A$.."Y|
00001590: 22 A7 31 36 30 00 A3 1D EA 06 8B 50 47 B2 30 A7 |".160......PG.0.|
000015A0: 31 36 30 00 B3 1D F4 06 8D 31 37 39 30 3A 89 31 |160......1790:.1|
000015B0: 37 37 30 00 C2 1D FE 06 8B 52 57 B2 32 A7 31 39 |770......RW.2.19|
000015C0: 30 30 00 D8 1D 08 07 A1 41 24 3A 8B 41 24 B2 22 |00......A$:.A$."|
000015D0: 1D 22 A7 8D 32 30 32 30 00 E7 1D 12 07 8B 52 57 |."..2020......RW|
000015E0: B2 33 A7 31 38 34 30 00 FF 1D 1C 07 8B 52 57 B2 |.3.1840......RW.|
000015F0: 31 A7 99 59 37 24 3A 59 37 24 B2 22 22 3A 8E 00 |1..Y7$:Y7$."":..|
00001600: 15 1E 26 07 59 37 24 B2 C8 28 53 51 24 2C 53 50 |..&.Y7$..(SQ$,SP|
00001610: 29 AA 59 37 24 00 27 1E 30 07 98 34 2C 59 37 24 |).Y7$.'.0..4,Y7$|
00001620: 3A 59 37 24 B2 22 22 00 3C 1E 3A 07 50 47 B2 50 |:Y7$."".<.:.PG.P|
00001630: 47 AA 31 3A 8B 50 47 B3 35 38 A7 8E 00 5F 1E 44 |G.1:.PG.58..._.D|
00001640: 07 50 44 B2 50 44 AA 31 3A 50 44 24 B2 22 28 22 |.PD.PD.1:PD$."("|
00001650: AA CA 28 C4 28 50 44 29 2C 32 29 AA 22 29 22 00 |..(.(PD),2).")".|
00001660: 73 1E 4E 07 98 34 3A 98 34 2C 22 22 A3 36 35 29 |s.N..4:.4,"".65)|
00001670: 50 44 24 00 89 1E 58 07 81 4A B2 31 A4 36 3A 98 |PD$...X..J.1.6:.|
00001680: 34 3A 82 4A 3A 50 47 B2 30 00 8F 1E 62 07 8E 00 |4:.J:PG.0...b...|
00001690: B4 1E 6C 07 59 37 24 B2 C8 28 53 51 24 2C 53 50 |..l.Y7$..(SQ$,SP|
000016A0: 29 AA 59 37 24 3A 8B 59 37 24 B2 22 22 A7 59 37 |).Y7$:.Y7$."".Y7|
000016B0: 24 B2 53 24 00 CE 1E 76 07 98 32 2C 47 24 AA 59 |$.S$...v..2,G$.Y|
000016C0: 37 24 AA 47 24 3A 59 37 24 B2 22 22 3A 8E 00 FA |7$.G$:Y7$."":...|
000016D0: 1E 80 07 4A 35 B2 31 3A 54 38 B2 54 31 AB C3 28 |...J5.1:T8.T1..(|
000016E0: 54 31 24 29 3A 4A B2 31 3A 4D 44 B2 30 3A 8B 54 |T1$):J.1:MD.0:.T|
000016F0: 38 B1 32 35 A7 54 38 B2 32 35 00 0D 1F 8A 07 4D |8.25.T8.25.....M|
00001700: 44 24 B2 CA 28 54 31 24 2C 4A 2C 31 29 00 1F 1F |D$..(T1$,J,1)...|
00001710: 94 07 8B 4D 44 24 B3 B1 53 24 A7 4D 44 B2 31 00 |...MD$..S$.MD.1.|
00001720: 35 1F 9E 07 8B 4D 44 24 B2 53 24 AF 4D 44 B2 30 |5....MD$.S$.MD.0|
00001730: A7 31 39 37 30 00 6E 1F A8 07 8B 4D 44 24 B2 53 |.1970.n....MD$.S|
00001740: 24 A7 54 31 24 B2 C8 28 54 31 24 2C 4A 29 AA CA |$.T1$..(T1$,J)..|
00001750: 28 54 31 24 2C 4A 29 3A 4A B2 4A AA 31 3A 4A 35 |(T1$,J):J.J.1:J5|
00001760: B2 4A 35 AA 31 3A 8B 4A 35 B1 54 38 A7 8E 00 84 |.J5.1:.J5.T8....|
00001770: 1F B2 07 4A B2 4A AA 31 3A 8B 4A B1 C3 28 54 31 |...J.J.1:.J..(T1|
00001780: 24 29 A7 8E 00 8E 1F BC 07 89 31 39 33 30 00 BD |$)........1930..|
00001790: 1F C6 07 99 22 11 9E D0 52 45 53 53 20 1C 3C C3 |...."...RESS .<.|
000017A0: D2 D3 D2 3E 52 49 47 48 54 9E 20 54 4F 20 50 41 |...>RIGHT. TO PA|
000017B0: 55 53 45 20 28 41 4E 59 20 4B 45 59 22 00 ED 1F |USE (ANY KEY"...|
000017C0: CB 07 99 22 43 4F 4E 54 49 4E 55 45 53 29 4F 52 |..."CONTINUES)OR|
000017D0: 20 50 52 45 53 53 20 1C C1 9E 20 54 4F 20 41 42 | PRESS ... TO AB|
000017E0: 4F 52 54 20 54 4F 20 4D 45 4E 55 2E 22 00 19 20 |ORT TO MENU.".. |
000017F0: D0 07 99 22 11 1C 20 20 20 20 20 20 20 2A 2A 2A |...".. ***|
00001800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001810: 2A 2A 2A 2A 05 11 22 3A 8E 00 2E 20 DA 07 81 49 |****..":... ...I|
00001820: 4B B2 31 A4 31 30 3A A1 41 24 3A 82 49 4B 00 42 |K.1.10:.A$:.IK.B|
00001830: 20 E4 07 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 30 | ...A$:.A$."".20|
00001840: 32 30 00 48 20 EE 07 8E 00 66 20 F8 07 81 49 B2 |20.H ....f ...I.|
00001850: 31 A4 45 54 AB 32 3A 8B 54 24 28 49 29 B2 22 8A |1.ET.2:.T$(I).".|
00001860: 22 A7 32 30 37 30 00 9B 20 02 08 8B 54 24 28 49 |".2070.. ...T$(I|
00001870: 29 B2 22 22 A7 8B 54 24 28 49 AA 31 29 B2 22 22 |).""..T$(I.1).""|
00001880: AF 54 24 28 49 AA 32 29 B2 22 22 A7 54 24 28 49 |.T$(I.2)."".T$(I|
00001890: 29 B2 22 8A 22 3A 89 32 30 37 30 00 A2 20 0C 08 |).".":.2070.. ..|
000018A0: 82 49 00 B4 20 16 08 48 49 B2 49 AB 31 3A 4C 4C |.I.. ..HI.I.1:LL|
000018B0: B2 49 3A 8E 00 CD 20 20 08 8B 45 45 B2 30 A7 45 |.I:... ..EE.0.E|
000018C0: 45 B2 31 35 3A 9F 45 45 2C 38 2C 45 45 00 E2 20 |E.15:.EE,8,EE.. |
000018D0: 2A 08 84 45 45 2C 45 31 2C 45 32 24 2C 45 33 2C |*..EE,E1,E2$,E3,|
000018E0: 45 34 00 EE 20 34 08 8B 45 31 B2 30 A7 8E 00 02 |E4.. 4..E1.0....|
000018F0: 21 3E 08 99 45 31 3B 45 32 24 3B 45 33 3B 45 34 |!>..E1;E2$;E3;E4|
00001900: 3A 8E 00 1C 21 48 08 99 22 12 9A 20 20 20 D3 C5 |:...!H..".. ..|
00001910: D4 A0 C6 CF D2 CD C1 D4 20 20 20 22 00 43 21 4D |........ ".C!M|
00001920: 08 99 43 44 24 A3 59 54 25 29 22 9A 2A 9E 20 49 |..CD$.YT%)".*. I|
00001930: 53 20 44 45 46 41 55 4C 54 20 53 45 54 54 49 4E |S DEFAULT SETTIN|
00001940: 47 22 3B 00 59 21 52 08 99 22 13 11 11 11 11 CD |G";.Y!R.."......|
00001950: 41 52 47 49 4E 53 3A 11 22 00 6B 21 5C 08 99 22 |ARGINS:.".k!\.."|
00001960: 9A 2A 12 1C CE 92 9E 4F 4E 45 22 00 87 21 66 08 |.*.....ONE"..!f.|
00001970: 99 22 20 12 1C D3 92 9E 4D 41 4C 4C 20 28 2E 35 |." .....MALL (.5|
00001980: 20 49 4E 43 48 29 22 00 B5 21 70 08 99 22 20 12 | INCH)"..!p.." .|
00001990: 1C CC 92 9E 41 52 47 45 20 28 31 2E 35 20 49 4E |....ARGE (1.5 IN|
000019A0: 43 48 29 22 3A 8D 32 30 31 30 3A 54 31 B2 37 39 |CH)":.2010:T1.79|
000019B0: 3A 53 50 B2 30 00 CC 21 7A 08 8B 41 24 B2 22 53 |:SP.0..!z..A$."S|
000019C0: 22 A7 54 31 B2 37 32 3A 53 50 B2 34 00 E3 21 84 |".T1.72:SP.4..!.|
000019D0: 08 8B 41 24 B2 22 4C 22 A7 54 31 B2 36 33 3A 53 |..A$."L".T1.63:S|
000019E0: 50 B2 38 00 12 22 8E 08 99 22 11 11 D2 49 47 48 |P.8.."..."...IGH|
000019F0: 54 2D 4A 55 53 54 49 46 49 43 41 54 49 4F 4E 3F |T-JUSTIFICATION?|
00001A00: 20 28 9A 2A 1C D9 9E 2F 1C CE 9E 29 22 3A 4D 47 | (.*.../...)":MG|
00001A10: B2 31 00 29 22 98 08 8D 32 30 31 30 3A 8B 41 24 |.1.)"...2010:.A$|
00001A20: B2 22 4E 22 A7 4D 47 B2 30 00 5C 22 A2 08 99 22 |."N".MG.0.\"..."|
00001A30: 11 11 C4 4F 55 42 4C 45 20 53 50 41 43 45 3F 22 |...OUBLE SPACE?"|
00001A40: 3A 99 22 20 12 1C D9 92 9E 45 53 22 3A 99 22 20 |:." .....ES":." |
00001A50: 12 1C CE 92 9E 4F 22 3A 44 54 B2 30 00 94 22 AC |.....O":DT.0..".|
00001A60: 08 99 22 9A 2A 12 1C CA 92 9E 55 53 54 20 42 45 |..".*.....UST BE|
00001A70: 54 57 45 45 4E 20 50 41 52 41 47 52 41 50 48 53 |TWEEN PARAGRAPHS|
00001A80: 22 3A 8D 32 30 31 30 3A 8B 41 24 B2 22 59 22 A7 |":.2010:.A$."Y".|
00001A90: 44 54 B2 31 00 A5 22 B6 08 8B 41 24 B2 22 4E 22 |DT.1.."...A$."N"|
00001AA0: A7 44 54 B2 32 00 B4 22 C0 08 8B 59 31 25 B1 32 |.DT.2.."...Y1%.2|
00001AB0: A7 31 36 30 00 DF 22 CA 08 99 22 11 11 D2 45 50 |.160.."..."...EP|
00001AC0: 45 41 54 49 4E 47 20 4B 45 59 53 3F 20 28 1C D9 |EATING KEYS? (..|
00001AD0: 9E 2F 9A 2A 1C CE 9E 29 22 3A 8D 32 30 31 30 00 |./.*...)":.2010.|
00001AE0: FB 22 D4 08 97 36 35 30 2C 30 3A 8B 41 24 B2 22 |."...650,0:.A$."|
00001AF0: 59 22 A7 97 36 35 30 2C 31 32 38 00 04 23 DE 08 |Y"..650,128..#..|
00001B00: 89 31 36 30 00 34 23 FC 08 99 22 11 11 1C 20 20 |.160.4#..."... |
00001B10: 20 20 20 20 2A 2A 2A 9E 20 CC 4F 41 44 49 4E 47 | ***. .OADING|
00001B20: 20 C4 49 52 45 43 54 4F 52 59 20 1C 2A 2A 2A 22 | .IRECTORY .***"|
00001B30: 3A 4E B2 31 00 44 23 FE 08 9F 31 2C 38 2C 30 2C |:N.1.D#...1,8,0,|
00001B40: 22 24 30 22 00 52 23 01 09 A1 23 31 2C 41 24 2C |"$0".R#...#1,A$,|
00001B50: 42 24 00 60 23 06 09 A1 23 31 2C 41 24 2C 42 24 |B$.`#...#1,A$,B$|
00001B60: 00 6E 23 0B 09 A1 23 31 2C 41 24 2C 42 24 00 88 |.n#...#1,A$,B$..|
00001B70: 23 10 09 A1 23 31 2C 42 24 3A 8B 20 53 54 B3 B1 |#...#1,B$:. ST..|
00001B80: 30 20 A7 20 32 33 35 35 00 9F 23 15 09 8B 20 42 |0 . 2355..#... B|
00001B90: 24 B3 B1 C7 28 33 34 29 20 A7 20 32 33 32 30 00 |$...(34) . 2320.|
00001BA0: CF 23 1A 09 A1 23 31 2C 42 24 3A 8B 20 42 24 B3 |.#...#1,B$:. B$.|
00001BB0: B1 C7 28 33 34 29 A7 50 52 47 24 28 4E 29 B2 50 |..(34).PRG$(N).P|
00001BC0: 52 47 24 28 4E 29 AA 42 24 3A 89 32 33 33 30 00 |RG$(N).B$:.2330.|
00001BD0: F7 23 1F 09 8B C8 28 50 52 47 24 28 4E 29 2C 31 |.#....(PRG$(N),1|
00001BE0: 29 B3 B1 22 40 22 A7 50 52 47 24 28 4E 29 B2 22 |).."@".PRG$(N)."|
00001BF0: 22 3A 89 32 33 31 30 00 14 24 24 09 A1 23 31 2C |":.2310..$$..#1,|
00001C00: 42 24 3A 8B 20 42 24 B2 C7 28 33 32 29 20 A7 20 |B$:. B$..(32) . |
00001C10: 32 33 34 30 00 26 24 29 09 A1 23 31 2C 42 24 3A |2340.&$)..#1,B$:|
00001C20: A1 23 31 2C 42 24 00 3C 24 2E 09 8B 53 54 B2 30 |.#1,B$.<$...ST.0|
00001C30: A7 4E B2 4E AA 31 3A 89 32 33 31 30 00 43 24 33 |.N.N.1:.2310.C$3|
00001C40: 09 A0 31 00 86 24 38 09 8B 50 52 47 24 28 31 29 |..1..$8..PRG$(1)|
00001C50: B2 22 22 A7 99 22 1C 2A 2A 2A 9E D4 48 45 52 45 |.""..".***..HERE|
00001C60: 20 41 52 45 20 4E 4F 20 46 49 4C 45 53 20 4F 4E | ARE NO FILES ON|
00001C70: 20 54 48 49 53 20 44 49 53 4B 20 1C 2A 2A 2A 9E | THIS DISK .***.|
00001C80: 22 3A 89 35 38 30 00 A1 24 3D 09 99 22 93 11 9A |":.580..$=.."...|
00001C90: 12 20 20 20 C4 49 52 45 43 54 4F 52 59 20 20 20 |. .IRECTORY |
00001CA0: 22 00 CD 24 42 09 99 22 11 9E CC 45 54 54 45 52 |"..$B.."...ETTER|
00001CB0: 20 D7 52 49 54 45 52 20 46 49 4C 45 53 20 4F 4E | .RITER FILES ON|
00001CC0: 20 54 48 49 53 20 44 49 53 4B 3A 11 22 00 F3 24 | THIS DISK:."..$|
00001CD0: 47 09 81 50 B2 31 A4 4E 3A 99 A3 35 29 22 1E 22 |G..P.1.N:..5)"."|
00001CE0: 3B 50 52 47 24 28 50 29 3A 50 52 47 24 28 50 29 |;PRG$(P):PRG$(P)|
00001CF0: B2 22 22 00 20 25 4C 09 82 50 3A 99 22 11 9E D0 |."". %L..P:."...|
00001D00: 52 45 53 53 20 41 4E 59 20 4B 45 59 20 46 4F 52 |RESS ANY KEY FOR|
00001D10: 20 C6 49 4C 45 20 C3 4F 4D 4D 41 4E 44 53 2E 22 | .ILE .OMMANDS."|
00001D20: 00 36 25 51 09 A1 41 4E 24 3A 8B 41 4E 24 B2 22 |.6%Q..AN$:.AN$."|
00001D30: 22 A7 32 33 38 35 00 3F 25 56 09 89 35 36 30 00 |".2385.?%V..560.|
00001D40: 4D 25 60 09 A0 34 2C 34 3A 9F 34 2C 34 00 67 25 |M%`..4,4:.4,4.g%|
00001D50: 6A 09 98 34 3A 8B A8 C2 28 31 34 34 29 AF 31 32 |j..4:...(144).12|
00001D60: 38 A7 89 32 34 33 30 00 A4 25 74 09 99 22 20 20 |8..2430..%t.." |
00001D70: 1C 2A 2A 2A 20 9E D0 CC C5 C1 D3 C5 A0 D4 D5 D2 |.*** ...........|
00001D80: CE A0 D4 C8 C5 A0 D0 D2 C9 CE D4 C5 D2 A0 CF CE |................|
00001D90: A0 1C 2A 2A 2A 9E 91 22 3A 50 50 B2 31 3A 89 20 |..***..":PP.1:. |
00001DA0: 32 34 31 30 00 D9 25 7E 09 8B 50 50 B2 31 A7 99 |2410..%~..PP.1..|
00001DB0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00001DC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001DD0: 20 20 20 20 20 20 20 91 22 00 EB 25 88 09 A0 34 | ."..%...4|
00001DE0: 2C 34 3A 9F 34 2C 34 2C 37 3A 8E 00 11 26 10 27 |,4:.4,4,7:...&.'|
00001DF0: 8F 2A 2A 2A 20 52 45 54 55 52 4E 20 54 4F 20 48 |.*** RETURN TO H|
00001E00: 2E 41 2E 4C 2E 20 52 4F 55 54 49 4E 45 20 2A 2A |.A.L. ROUTINE **|
00001E10: 2A 00 27 26 1A 27 97 35 33 32 38 30 2C 30 3A 97 |*.'&.'.53280,0:.|
00001E20: 35 33 32 38 31 2C 30 00 37 26 2E 27 48 24 B2 22 |53281,0.7&.'H$."|
00001E30: 48 2E 41 2E 4C 2E 22 00 42 26 38 27 97 31 39 38 |H.A.L.".B&8'.198|
00001E40: 2C 34 00 5A 26 42 27 99 22 93 90 11 11 4C 4F 41 |,4.Z&B'."....LOA|
00001E50: 44 22 C7 28 33 34 29 48 24 3B 00 6C 26 4C 27 99 |D".(34)H$;.l&L'.|
00001E60: 20 C7 28 33 34 29 22 2C 38 13 22 3B 00 91 26 56 | .(34)",8.";..&V|
00001E70: 27 97 36 33 31 2C 31 33 3A 97 36 33 32 2C 38 32 |'.631,13:.632,82|
00001E80: 3A 97 36 33 33 2C 31 31 37 3A 97 36 33 34 2C 31 |:.633,117:.634,1|
00001E90: 33 00 97 26 60 27 80 00 00 00 |3..&`'.... |
.. .....E(X)..(0).65536.(.(0).0).O...T7%
.B(213):Y1%.(T7%.2).20:YT%.(T7%.21).3.1.
S....4,4,7:.Y1%.2..E(0).31000.Y1%.3...(.
.Y1%.2..4: 4:.4,4...2.DK%.1:.53280,0:.53
281,0.C.<.T1.79:MG.1:ET..(.E(0).60)...F.
Y2%.4:Y3%.4:Y4%.17:CD$."................
.......":PK%.194.3.P..Y1%.1.CD$.CD$.".."
:Y2%.2:Y3%.10:Y4%.21:PK%.52.I.Z.LL.1:G$.
G(34):SH$.G(160):.T$(ET),TR$(20),PRG$(99
)...D...A(X).W3.(Z6.1).Y2%...N.S$.G(32):
.I.1.15:SQ$.SQ$.S$:.:SP$.H(SQ$,5)...X..1
60.......YT%)".***. DISK ERROR .***":.15
0.......YT%)"..***. NO FILE IN MEMORY .*
**"......2010.-. .. *** MAIN MENU ***.H.
...Y1%.3..788,PK%:."..";.|....".....
L E T T E R W R I T E R "....
...3)"...OPTIONS:"...H...5)"..(.1.) WRIT
E":..5)"(.2.) EDIT TEXT"...R...5)"(.3.)
DISPLAY LETTER":..5)"(.4.) ADDRESS LETTE
R".......5)"(.5.) PRINT LETTER".L.....5)
"(.6.) FILE COMMANDS":..5)"(.7.) SET FOR
MAT".......5)"(.8.) RETURN TO H.A.L.":..
3)"..<CRSR>UP. ADVANCES PAPER".....AC.0:
RW.0:.I.1.2:.I:.J.1.2:.J.N.....YT%.6)"..
WAIT":.2040: 2.......YT%.1)"..";.(.E(0).
(T1.5))".LINES FREE".......YT%)"TOP LINE
:."HI.3."...3)"..SELECT AN OPTION.".=.,.
.2020.T.6..A$."."..2400:.300.F.@.. E(A$)
.8.300...J.I.E(A$):.".":.I.430,920,1160,
350,1430,560,2120,1220...T..160.I.^.."..
. ADDRESSING LETTER "...C..I.1.5:.".
...ADDRESSEE'S NAME...":."ADDRESS...":."
CITY..."./.H.."STATE + ZIP...":."TODAY'S
DATE.".`.R..J.1.5:.H(CD$,J.4);" "C$(J)
;:.C$(J).""..SH$.G.|..J......H(CD$,I.4);
:.".";C$(I):.C$(I).SH$.C$(I).""......I..
...."...OK? (.Y./.N.)".L....2010:.A$."N"
.350... ..A$.."Y".413......160."...."..
WRITE .":.".PRESS .RETURN. FOR NEW P
ARAGRAPH,".J...."PRESS AGAIN TO RETURN T
O MENU...".B....HI.0..HI;T$(HI)".".|.B..
1280:.L.2.LL..ET.160...L.T$(LL).L$:.:LL.
LL.1...V..450......CX.CY.CZ.CX:CX.CY:CY.
CZ.I...CZ.CY.CX.1.S....2040......I.CX.HI
.CZ.....T$(I).T$(I.CZ)......I:T$(I).".":
CX.0:J.I.1......I.J.J.CZ.2:T$(I)."":.I.=
.&..2040:.940.\.0..".... FILE COMMANDS
".T.2.."...L..OAD A FILE"...4.." ..S.
.AVE CURRENT FILE"...6.." ..P..URGE CUR
RENT FILE".S.8.." ..D..IRECTORY OF FIL
ES"...:.."PRESS .<SHIFT>.L.. TO LOAD A S
POOL FILE".2.<.."PRESS .<SHIFT>.S.. TO S
AVE AS SPOOL FILE".A.?.."(ANY OTHER KEY
RETURNS YOU TO THE MENU)".Q.D..2010:M$.A
$...N.FK$."@W/":.M$."L".M$."S".FK$."@S/"
:.630...X..M$."D".2300...B..M$."P".830.W
.L..M$.."S".M$.."L".160...V..(M$."S".M$.
"S").HI.0.140......"...T..APE OR ..D..IS
K.":.2010.E...J.1:.M$."L".."STARTING ADD
RESS 1...";J.U....A$."D".720.F....A$.."
T".160.~....M$."S".M$."S".AC.1......".PR
ESS ANY KEY WHEN TAPE IS READY.":.2010.A
....Y1%.2..144,85.R.F..2,1,AC:.780...P..
DK%..1.130...Z..".WHAT FILENAME";FL$.%..
.FM$.",S,W":.M$."L".M$."L".FM$.",S,R".9.
..FL$.FK$.FL$.FM$.Y....2,8,2,FL$:.2080:.
E1..0.130.P....M$."S".RW.2:.1510......M$
."L".M$."L".810......I.1.HI:.2,G$.T$(I).
G$... .."*";:.I:.160.V.*..I.J.ET:.2,T$(I
):.(ST).64.160...4.."*";:.I:.130.&.>..".
ARE YOU SURE?(.Y./.N.)":.2010:.A$.."Y"..
"ABORTED":.150.T.H..I.1.ET:T$(I)."":.:.I
.1.4:C$(I)."":.:.140.L.R..2040:LG..A(0):
AC.0...\.."."LG".>";T$(LG)...F..LB.1.20:
.:.:.1280:.L.2.HI.LB.ET.2.890...P.TR$(LB
).L$:.LB.V.Z.LB.LB.1:.LB.0.940......I.HI
.LB.LG.1.LB..1:T$(I).T$(I.LB):.I:J.0.A..
..I.LG.1.LG.LB:J.J.1:T$(I).TR$(J):TR$(J)
."":.I:.2040:.940.O....HI.0.140.I...."..
. EDIT TEXT ".....CX.0:."...STARTING
AT LINE # .1....";W3:Z6.1:Z5.1:JG$."".
.....W3.HI.Y3%.W3.HI.Y3%.O....W3.1.W3.1.
....Z4.1:.".":.I.W3.W3.Y3%...J..H(CD$,Z4
);I".";.4)G(34);T$(I);G(34):Z4.Z4.Y2%.$.
T..I.?....H(CD$,22);:.Y1%.1..:..|....".<
CRSR>RIGHT. EDIT ..M..ENU ..S..WAP ..D..
ELETE LINE";......Y1%.1........"..I..NSE
RT LINE .<CRSR>UP/DOWN. SELECTS LINE";.Z
....Z6.1.Z6.1:W3.W3.1:.940......Z6.Y4%.Z
6.Y4%:W3.W3.1:.940......H(CD$,Z5)" . ";.
,....H(CD$,Z6)"..>..";:Z5.Z6.6.$..2010.R
....A$.".".Z6.Z6.Y2%:.1020...8..A$."."..
.2);:JG$.T$(.A(0)):.T$(.A(0)):.940...B..
A$.".".Z6.Z6.Y2%:.1020...L..A$."D".CX..0
.CY..A(0):.480.S.V..A$."D".CX..A(0)...`.
.A$."I".850. .J..A$."S".JG$.."".JH$.T$(.
A(0)):T$(.A(0)).JG$:JG$.JH$:.940.0.T..A$
."M".160.:.~..1060.H....HI.0.140.R....19
90.R...TU.T1:T1.T7%:RW.1:.I.4.AC.1.|....
1510.....T1.TU:.A$.".".160......150.R.D.
."...........IN CASE YOUR TEXT HASN'T BE
EN SAVED,"...N.." DO YOU STILL WISH TO L
EAVE? (.Y./.N.)"...X..2020...... A$.."Y"
.160.0.... Y1%.2..144,85.;....10000.E...
L$."".\....AC.13.LL.1.L$."_".O...."..";:
L.C(L$)......2020:.A$.".".A$.SP$...(..A$
.SH$.A$.S$...2.AC.F(A$).K.<..(L.57.AC.32
).L.72.AC.13..S$;:....F..(AC.20.AC.148).
L.1..".";:L$.H(L$,L.1):.1300...P..AC.34.
1300.=.Z..(AC.31.AC.96).(AC.192.AC.219).
L$.L$.A$:.A$;.G.D..1300.}.N..I.1.HI:Y7$.
T$(I):.1790:.A$.".".AC.1:.".ABORTING"...
X..I:.PG..0..PG.PG.1.57:.4:.:.1790......
AC.1.160.....PD.0:.1390.M....HI.0.140...
.."... PRINT LETTER ":." ...P..RINT
NEW LETTER".C...." ..C..ONTINUE OLD LE
TTER":." ..S..POOL FILE PRINTING".L...
RW.0:.2010:M$.A$:.M$."C"..1990:.1540....
..M$.."P".M$.."S".160...H.PG.0:PD.0:.240
0:.".PRESS .<CRSR>UP. TO ADVANCE PAPER."
...M..".PRESS ANY OTHER KEY WHEN READY."
...R..2020:.A$."."..4:.1490. ....1990:.M
$."S".RW.3:.1390.3....C$(1)."".1540.Y...
.I.1.7:Y7$.C$(I):.I.3.Y7$.Y7$.",".E....1
790:..~...TL.HI:PH.0:I.1:T$.""......C(T$
).C(T$(I).S$).245.1590.I....(H(T$(I),1).
"_".I..1).I.TL.PH.1:.1590...".T$.T$.T$(I
).S$:I.I.1...,..1550...6..H(T$,1)."_".T$
.SP$.J(T$,2)...@..J.T1.1..1.N.J..J(T$,J,
1).S$.T1$.H(T$,J.1):T$.J(T$,J.1):.1630.P
.T..J:T1$.H(T$,T1.1):T$.J(T$,T1)...^..MG
.1.(RW..1.AC.1)..1920...H.Y7$.T1$:.1790:
T1$.""...R..DT.1..1790.G.|..A$."A".1750.
Z....C(T$).T1.1600......PH.1.T$."".1700.
.....1720.....PH.0:.DT.0..1790......I..T
L.1570.-....PH.1.1600.<.B..I.TL.1750.F.L
..1550.W.V..RW.1200,160......"...ADVANCE
TO TOP-OF-FORM?(.Y./.N.)":.2010:.A$.."Y
".160......PG.0.160......1790:.1770.B...
.RW.2.1900.X....A$:.A$."."..2020......RW
.3.1840......RW.1..Y7$:Y7$."":....&.Y7$.
H(SQ$,SP).Y7$.'.0..4,Y7$:Y7$."".<.:.PG.P
G.1:.PG.58..._.D.PD.PD.1:PD$."(".J(D(PD)
,2).")".S.N..4:.4,"".65)PD$...X..J.1.6:.
4:.J:PG.0...B.....L.Y7$.H(SQ$,SP).Y7$:.Y
7$."".Y7$.S$.N.V..2,G$.Y7$.G$:Y7$."":...
...J5.1:T8.T1.C(T1$):J.1:MD.0:.T8.25.T8.
25.....MD$.J(T1$,J,1)......MD$..S$.MD.1.
5....MD$.S$.MD.0.1970.N....MD$.S$.T1$.H(
T1$,J).J(T1$,J):J.J.1:J5.J5.1:.J5.T8....
...J.J.1:.J.C(T1$)........1930...F.."..P
RESS .<CRSR>RIGHT. TO PAUSE (ANY KEY"...
K.."CONTINUES)OR PRESS .A. TO ABORT TO M
ENU.".. P..".. *******************
****..":... Z..IK.1.10:.A$:.IK.B ...A$:.
A$."".2020.H ....F ...I.1.ET.2:.T$(I).".
".2070.. ...T$(I).""..T$(I.1)."".T$(I.2)
."".T$(I).".":.2070.. ...I.. ..HI.I.1:LL
.I:..M ..EE.0.EE.15:.EE,8,EE.. *..EE,E1
,E2$,E3,E4.. 4..E1.0....!>..E1;E2$;E3;E4
:...!H..".. SET FORMAT ".C!M..CD$.YT
%)".*. IS DEFAULT SETTING";.Y!R..".....M
ARGINS:.".K!\..".*..N..ONE"..!F.." ..S..
MALL (.5 INCH)"..!P.." ..L..ARGE (1.5 IN
CH)":.2010:T1.79:SP.0.L!Z..A$."S".T1.72:
SP.4..!...A$."L".T1.63:SP.8.."..."..RIGH
T-JUSTIFICATION? (.*.Y./.N.)":MG.1.)"...
2010:.A$."N".MG.0.\"..."..DOUBLE SPACE?"
:." ..Y..ES":." ..N..O":DT.0.."...".*..J
..UST BETWEEN PARAGRAPHS":.2010:.A$."Y".
DT.1.."...A$."N".DT.2.."...Y1%.2.160.."J
.."..REPEATING KEYS? (.Y./.*.N.)":.2010.
."T..650,0:.A$."Y"..650,128..#...160.4#.
.."... ***. LOADING DIRECTORY .***"
:N.1.D#...1,8,0,"$0".R#...#1,A$,B$.`#...
#1,A$,B$.N#...#1,A$,B$..#...#1,B$:. ST..
0 . 2355..#... B$..G(34) . 2320.O#...#1,
B$:. B$..G(34).PRG$(N).PRG$(N).B$:.2330.
.#...H(PRG$(N),1).."@".PRG$(N)."":.2310.
.$$..#1,B$:. B$.G(32) . 2340.&$)..#1,B$:
.#1,B$.<$...ST.0.N.N.1:.2310.C$3. 1..$8.
.PRG$(1).""..".***.THERE ARE NO FILES ON
THIS DISK .***.":.580..$=..".... DIRE
CTORY ".M$B.."..LETTER WRITER FILES ON
THIS DISK:."..$G..P.1.N:..5)".";PRG$(P)
:PRG$(P)."". %L..P:."..PRESS ANY KEY FOR
FILE COMMANDS.".6%Q..AN$:.AN$."".2385.?
%V..560.M%`. 4,4:.4,4.G%J..4:..B(144).12
8..2430..%T.." .*** .PLEASE TURN THE PR
INTER ON .***..":PP.1:. 2410.Y%~..PP.1..
" .
"..%.. 4,4:.4,4,7:...&.'.*** RETURN TO H
.A.L. ROUTINE ***.'&.'.53280,0:.53281,0.
7&.'H$."H.A.L.".B&8'.198,4.Z&B'."....LOA
D"G(34)H$;.L&L'. G(34)",8.";..&V'.631,13
:.632,82:.633,117:.634,13..&`'....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL