DEMO.LETTERS
FILE INFORMATION
FILENAME(S): DEMO.LETTERS
FILE TYPE(S): PRG
FILE SIZE: 13.1K
FIRST SEEN: 2025-11-30 19:55:20
APPEARS ON: 1 disk(s)
FILE HASH
9fd4decf5b9c14c13dc1abf28e87fc1726197d8b384895a37ec81bc6ce37907b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GROG | DEMO.LETTERS | PRG | Curtcool, Hans Curt | 11 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 64 00 8D 20 31 30 30 30 3A 8F 20 49 |....d.. 1000:. I|
00000010: 4E 49 54 49 41 4C 49 5A 41 54 49 4F 4E 00 3B 08 |NITIALIZATION.;.|
00000020: 69 00 8D 20 33 38 30 30 3A 8F 20 43 41 55 54 49 |i.. 3800:. CAUTI|
00000030: 4F 4E 20 4D 45 53 53 41 47 45 53 00 55 08 6E 00 |ON MESSAGES.U.n.|
00000040: 8D 20 31 32 30 30 3A 8F 20 55 53 45 52 27 53 20 |. 1200:. USER'S |
00000050: 53 50 45 43 53 00 68 08 78 00 8F 20 20 47 4F 53 |SPECS.h.x.. GOS|
00000060: 55 42 20 33 30 30 30 30 00 87 08 82 00 8D 20 31 |UB 30000...... 1|
00000070: 33 30 30 3A 8F 20 44 49 53 50 4C 41 59 20 4D 41 |300:. DISPLAY MA|
00000080: 49 4E 20 4D 45 4E 55 00 A5 08 8C 00 8D 20 31 34 |IN MENU...... 14|
00000090: 30 30 3A 8F 20 44 49 53 50 4C 41 59 20 53 55 42 |00:. DISPLAY SUB|
000000A0: 4D 4D 45 4E 55 00 BD 08 8E 00 8B 20 46 35 B2 32 |MMENU...... F5.2|
000000B0: 20 A7 20 46 35 B2 30 3A 89 20 31 33 30 00 E0 08 | . F5.0:. 130...|
000000C0: 91 00 8D 20 31 35 30 30 3A 8F 20 43 48 4F 4F 53 |... 1500:. CHOOS|
000000D0: 45 20 4C 45 54 54 45 52 20 4F 50 54 49 4F 4E 53 |E LETTER OPTIONS|
000000E0: 00 03 09 96 00 8D 20 33 30 30 30 3A 8F 20 50 52 |...... 3000:. PR|
000000F0: 45 50 41 52 45 20 42 4C 41 4E 4B 20 49 4E 53 45 |EPARE BLANK INSE|
00000100: 52 54 53 00 2F 09 A0 00 8D 20 33 34 30 30 3A 8F |RTS./.... 3400:.|
00000110: 20 44 49 53 50 4C 41 59 20 42 4C 41 4E 4B 20 4C | DISPLAY BLANK L|
00000120: 45 54 54 45 52 20 54 4F 20 53 43 52 45 45 4E 00 |ETTER TO SCREEN.|
00000130: 4B 09 AA 00 8D 20 33 32 30 30 20 3A 8F 20 49 4E |K.... 3200 :. IN|
00000140: 50 55 54 20 52 4F 55 54 49 4E 45 00 6E 09 AC 00 |PUT ROUTINE.n...|
00000150: 8D 20 33 34 30 30 3A 8F 20 44 49 53 50 4C 41 59 |. 3400:. DISPLAY|
00000160: 20 46 49 4C 4C 45 44 20 4C 45 54 54 45 52 00 8C | FILLED LETTER..|
00000170: 09 AD 00 8D 20 33 36 30 30 3A 8F 20 45 20 44 20 |.... 3600:. E D |
00000180: 49 20 54 20 20 52 4F 55 54 49 4E 45 00 A7 09 AE |I T ROUTINE....|
00000190: 00 8B 20 46 4D B2 31 20 A7 20 9F 34 2C 34 3A 9D |.. FM.1 . .4,4:.|
000001A0: 34 3A 89 20 31 38 30 00 C1 09 AF 00 8F 20 20 20 |4:. 180...... |
000001B0: 20 20 20 20 20 4F 50 45 4E 34 2C 34 3A 43 4D 44 | OPEN4,4:CMD|
000001C0: 34 00 E3 09 B0 00 8D 20 33 33 30 30 3A 8F 20 50 |4...... 3300:. P|
000001D0: 52 49 4E 54 20 53 45 4E 44 45 52 27 53 20 53 50 |RINT SENDER'S SP|
000001E0: 45 43 53 00 05 0A B4 00 8D 20 33 31 30 30 3A 8F |ECS...... 3100:.|
000001F0: 20 50 52 49 4E 54 20 4C 45 54 54 45 52 20 26 20 | PRINT LETTER & |
00000200: 49 4E 50 55 54 00 26 0A B9 00 8D 20 33 33 35 30 |INPUT.&.... 3350|
00000210: 3A 8F 20 43 4F 4D 50 4C 45 54 45 20 54 48 45 20 |:. COMPLETE THE |
00000220: 4C 45 54 54 45 52 00 50 0A C3 00 8D 20 33 35 30 |LETTER.P.... 350|
00000230: 30 3A 8F 20 53 41 4D 45 20 4C 45 54 54 45 52 2C |0:. SAME LETTER,|
00000240: 4E 45 57 20 41 44 44 52 45 53 53 20 4D 45 4E 55 |NEW ADDRESS MENU|
00000250: 00 68 0A C8 00 8B 20 46 35 B2 31 20 A7 20 46 35 |.h.... F5.1 . F5|
00000260: B2 30 3A 89 20 31 34 35 00 85 0A CA 00 8B 20 46 |.0:. 145...... F|
00000270: 35 B2 32 20 A7 20 46 35 B2 30 3A 46 4D B2 30 3A |5.2 . F5.0:FM.0:|
00000280: 89 20 31 33 30 00 9D 0A CC 00 8B 20 46 35 B2 33 |. 130...... F5.3|
00000290: 20 A7 20 46 35 B2 30 3A 89 20 39 39 30 00 A3 0A | . F5.0:. 990...|
000002A0: DE 03 80 00 A9 0A DF 03 8F 00 AF 0A E0 03 8F 00 |................|
000002B0: B5 0A E1 03 8F 00 D7 0A E7 03 8F 20 49 20 4E 20 |........... I N |
000002C0: 49 20 54 20 49 20 41 20 4C 20 49 20 5A 20 41 20 |I T I A L I Z A |
000002D0: 54 20 49 20 4F 20 4E 00 F2 0A E8 03 86 20 53 24 |T I O N...... S$|
000002E0: 28 32 30 29 2C 54 24 28 35 30 29 2C 49 24 28 33 |(20),T$(50),I$(3|
000002F0: 30 29 00 24 0B F2 03 54 24 B2 22 20 20 20 20 20 |0).$...T$." |
00000300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000320: 20 20 20 22 00 2A 0B 42 04 8E 00 30 0B 43 04 8F | ".*.B...0.C..|
00000330: 00 36 0B 44 04 8F 00 3C 0B 45 04 8F 00 54 0B AF |.6.D...<.E...T..|
00000340: 04 8F 20 45 4E 54 45 52 20 55 53 45 52 20 53 50 |.. ENTER USER SP|
00000350: 45 43 27 53 00 5D 0B B0 04 99 22 93 22 00 77 0B |EC'S.]....".".w.|
00000360: B4 04 99 A3 38 29 22 C5 4E 54 45 52 20 59 4F 55 |....8)".NTER YOU|
00000370: 52 20 CE C1 CD C5 22 00 97 0B B6 04 99 20 A3 38 |R ...."...... .8|
00000380: 29 22 20 28 C6 49 52 53 54 4E 41 4D 45 2C D3 55 |)" (.IRSTNAME,.U|
00000390: 52 4E 41 4D 45 29 22 00 A3 0B B8 04 85 20 53 24 |RNAME)"...... S$|
000003A0: 28 31 29 00 AC 0B BA 04 99 22 93 22 00 D0 0B BE |(1)......"."....|
000003B0: 04 99 20 A3 36 29 22 C5 4E 54 45 52 20 59 4F 55 |.. .6)".NTER YOU|
000003C0: 52 20 C3 CF CD D0 C1 CE D9 20 CE C1 CD C5 20 22 |R ....... .... "|
000003D0: 00 DC 0B C2 04 85 20 53 24 28 32 29 00 E5 0B C4 |...... S$(2)....|
000003E0: 04 99 22 93 22 00 0C 0C C8 04 99 20 A3 36 29 22 |.."."...... .6)"|
000003F0: C5 4E 54 45 52 20 59 4F 55 52 20 C3 CF CD D0 C1 |.NTER YOUR .....|
00000400: CE D9 A0 C1 C4 C4 D2 C5 D3 D3 20 22 00 2B 0C CA |.......... ".+..|
00000410: 04 99 A3 36 29 20 20 20 22 28 23 2C D3 54 52 45 |...6) "(#,.TRE|
00000420: 45 54 2C D3 55 49 54 45 23 29 22 00 37 0C CC 04 |ET,.UITE#)".7...|
00000430: 85 20 53 24 28 33 29 00 40 0C CE 04 99 22 93 22 |. S$(3).@...."."|
00000440: 00 5E 0C D2 04 99 20 A3 36 29 20 20 22 C5 4E 54 |.^.... .6) ".NT|
00000450: 45 52 20 59 4F 55 52 20 C3 C9 D4 D9 20 22 00 6A |ER YOUR .... ".j|
00000460: 0C D4 04 85 20 53 24 28 34 29 00 94 0C D5 04 99 |.... S$(4)......|
00000470: 20 A3 36 29 20 20 22 C5 4E 54 45 52 20 59 4F 55 | .6) ".NTER YOU|
00000480: 52 20 D0 D2 CF D6 C9 CE C3 C5 20 4F 52 20 D3 D4 |R ........ OR ..|
00000490: C1 D4 C5 22 00 A0 0C D6 04 85 20 53 24 28 35 29 |..."...... S$(5)|
000004A0: 00 C5 0C D7 04 53 24 28 34 29 B2 53 24 28 34 29 |.....S$(4).S$(4)|
000004B0: AA 22 2C 20 22 AA 53 24 28 35 29 3A 53 24 28 36 |.", ".S$(5):S$(6|
000004C0: 29 B2 22 20 22 00 CE 0C D8 04 99 22 93 22 00 F1 |)." "......"."..|
000004D0: 0C DC 04 99 20 A3 36 29 20 22 C5 4E 54 45 52 20 |.... .6) ".NTER |
000004E0: 59 4F 55 52 20 D0 CF D3 D4 C1 CC A0 C3 CF C4 C5 |YOUR ...........|
000004F0: 22 00 FD 0C E0 04 85 20 53 24 28 35 29 00 06 0D |"...... S$(5)...|
00000500: E2 04 99 22 93 22 00 22 0D E6 04 99 20 A3 36 29 |...".".".... .6)|
00000510: 20 22 C5 4E 54 45 52 20 54 48 45 20 C4 C1 D4 C5 | ".NTER THE ....|
00000520: 20 22 00 3F 0D E8 04 99 20 A3 36 29 20 22 28 CD | ".?.... .6) "(.|
00000530: 4F 4E 54 48 2C C4 41 59 2C D9 45 41 52 29 22 00 |ONTH,.AY,.EAR)".|
00000540: 4B 0D EA 04 85 20 53 24 28 38 29 00 54 0D EC 04 |K.... S$(8).T...|
00000550: 99 22 93 22 00 81 0D F0 04 99 20 A3 36 29 20 22 |."."...... .6) "|
00000560: C5 4E 54 45 52 20 59 4F 55 52 20 C3 CF CD D0 C1 |.NTER YOUR .....|
00000570: CE D9 20 D0 C8 CF CE C5 20 CE D5 CD C2 C5 D2 20 |.. ..... ...... |
00000580: 22 00 8D 0D F4 04 85 20 53 24 28 37 29 00 93 0D |"...... S$(7)...|
00000590: 0A 05 8E 00 99 0D 0B 05 8F 00 9F 0D 0C 05 8F 00 |................|
000005A0: A5 0D 0D 05 8F 00 BD 0D 13 05 8F 20 44 49 53 50 |........... DISP|
000005B0: 4C 41 59 20 4D 41 49 4E 20 4D 45 4E 55 00 F1 0D |LAY MAIN MENU...|
000005C0: 14 05 99 22 93 22 3A 99 20 A3 32 29 22 20 C6 20 |...".":. .2)" . |
000005D0: CF 20 D2 20 CD 20 20 20 CC 20 C5 20 D4 20 D4 20 |. . . . . . . |
000005E0: C5 20 D2 20 D3 20 20 20 CD 20 C5 20 CE 20 D5 20 |. . . . . . . |
000005F0: 22 00 22 0E 15 05 99 20 A3 32 29 22 2A 2A 2A 2A |".".... .2)"****|
00000600: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000610: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 |***************"|
00000620: 3A 99 00 3D 0E 17 05 99 20 22 20 28 41 29 20 C6 |:..=.... " (A) .|
00000630: 41 56 4F 55 52 20 4C 45 54 54 45 52 22 00 59 0E |AVOUR LETTER".Y.|
00000640: 19 05 99 20 22 20 28 42 29 20 C9 4E 51 55 49 52 |... " (B) .NQUIR|
00000650: 59 20 4C 45 54 54 45 52 22 00 75 0E 1B 05 99 20 |Y LETTER".u.... |
00000660: 22 20 28 43 29 20 D0 41 59 4D 45 4E 54 20 4C 45 |" (C) .AYMENT LE|
00000670: 54 54 45 52 22 00 8F 0E 1D 05 99 20 22 20 28 44 |TTER"...... " (D|
00000680: 29 20 D3 41 4C 45 53 20 4C 45 54 54 45 52 22 00 |) .ALES LETTER".|
00000690: AA 0E 1F 05 99 20 22 20 28 45 29 20 C3 52 45 44 |..... " (E) .RED|
000006A0: 49 54 20 4C 45 54 54 45 52 22 00 C8 0E 21 05 99 |IT LETTER"...!..|
000006B0: 20 22 20 28 46 29 20 C3 4F 4D 50 4C 41 49 4E 54 | " (F) .OMPLAINT|
000006C0: 20 4C 45 54 54 45 52 22 00 E7 0E 23 05 99 20 22 | LETTER"...#.. "|
000006D0: 20 28 47 29 20 C3 4F 4C 4C 45 43 54 49 4F 4E 20 | (G) .OLLECTION |
000006E0: 4C 45 54 54 45 52 22 00 07 0F 25 05 99 20 22 20 |LETTER"...%.. " |
000006F0: 28 48 29 20 C1 50 50 4C 49 43 41 54 49 4F 4E 20 |(H) .PPLICATION |
00000700: 4C 45 54 54 45 52 22 00 22 0F 27 05 99 20 22 20 |LETTER".".'.. " |
00000710: 28 49 29 20 CD 49 53 43 45 4C 4C 41 4E 45 4F 55 |(I) .ISCELLANEOU|
00000720: 53 22 00 3C 0F 29 05 99 20 22 20 28 4A 29 20 C5 |S".<.).. " (J) .|
00000730: D8 C9 D4 20 50 52 4F 47 52 41 4D 22 00 79 0F 2D |... PROGRAM".y.-|
00000740: 05 99 3A 99 22 C5 CE D4 C5 D2 20 54 48 45 20 4C |..:."..... THE L|
00000750: 45 54 54 45 52 20 4F 46 20 54 48 45 20 44 45 53 |ETTER OF THE DES|
00000760: 49 52 45 44 20 54 59 50 45 20 4F 46 20 46 4F 52 |IRED TYPE OF FOR|
00000770: 4D 20 4C 45 54 54 45 52 22 00 7F 0F 6E 05 8E 00 |M LETTER"...n...|
00000780: 85 0F 6F 05 8F 00 8B 0F 70 05 8F 00 91 0F 71 05 |..o.....p.....q.|
00000790: 8F 00 A2 0F 78 05 45 31 24 B2 C7 28 36 35 AA 31 |....x.E1$..(65.1|
000007A0: 30 29 00 C9 0F 7A 05 A1 20 45 30 24 3A 8B 20 45 |0)...z.. E0$:. E|
000007B0: 30 24 B3 22 41 22 20 B0 20 45 30 24 B1 45 31 24 |0$."A" . E0$.E1$|
000007C0: 20 A7 20 89 20 31 34 30 32 00 DA 0F 7C 05 58 30 | . . 1402...|.X0|
000007D0: B2 C6 28 45 30 24 29 AB 36 34 00 17 10 82 05 91 |..(E0$).64......|
000007E0: 20 58 30 20 8D 20 32 31 30 30 2C 32 32 30 30 2C | X0 . 2100,2200,|
000007F0: 32 33 30 30 2C 32 34 30 30 2C 32 35 30 30 2C 32 |2300,2400,2500,2|
00000800: 36 30 30 2C 32 37 30 30 2C 32 38 30 30 2C 32 39 |600,2700,2800,29|
00000810: 30 30 2C 32 39 39 35 00 1D 10 D2 05 8E 00 23 10 |00,2995.......#.|
00000820: D3 05 8F 00 29 10 D4 05 8F 00 2F 10 D5 05 8F 00 |....)...../.....|
00000830: 4B 10 DB 05 8F 20 43 48 4F 4F 53 45 20 4C 45 54 |K.... CHOOSE LET|
00000840: 54 45 52 20 4F 50 54 49 4F 4E 53 00 56 10 DC 05 |TER OPTIONS.V...|
00000850: 99 22 93 22 3A 99 00 81 10 E1 05 99 20 22 20 CF |.".":....... " .|
00000860: D0 D4 C9 CF CE C1 CC A0 C9 CE D3 C5 D2 D4 C9 CF |................|
00000870: CE D3 A0 D4 CF A0 D4 C8 C5 A0 CC C5 D4 D4 C5 D2 |................|
00000880: 22 00 B1 10 E3 05 99 20 22 2A 2A 2A 2A 2A 2A 2A |"...... "*******|
00000890: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 99 3A |************":.:|
000008B0: 99 00 D4 10 E6 05 99 20 22 20 28 31 29 20 C9 4E |....... " (1) .N|
000008C0: 53 45 52 54 20 27 C1 D4 D4 CE 3A 27 20 43 4C 41 |SERT '....:' CLA|
000008D0: 55 53 45 22 00 F7 10 EB 05 99 20 22 20 28 32 29 |USE"...... " (2)|
000008E0: 20 C9 4E 53 45 52 54 20 59 4F 55 52 20 4A 4F 42 | .NSERT YOUR JOB|
000008F0: 20 54 49 54 4C 45 22 00 13 11 F0 05 99 20 22 20 | TITLE"...... " |
00000900: 28 33 29 20 C2 4F 54 48 20 28 31 29 20 26 20 28 |(3) .OTH (1) & (|
00000910: 32 29 22 00 33 11 F3 05 99 20 22 20 28 34 29 20 |2)".3.... " (4) |
00000920: D2 45 46 55 53 45 20 54 48 45 20 4F 50 54 49 4F |.EFUSE THE OPTIO|
00000930: 4E 53 22 00 4D 11 F5 05 99 20 22 20 28 35 29 20 |NS".M.... " (5) |
00000940: C5 D8 C9 D4 20 D0 52 4F 47 52 41 4D 22 00 71 11 |.... .ROGRAM".q.|
00000950: FA 05 A1 20 59 32 24 3A 8B 20 59 32 24 B3 22 31 |... Y2$:. Y2$."1|
00000960: 22 20 B0 20 59 32 24 B1 22 35 22 A7 20 31 35 33 |" . Y2$."5". 153|
00000970: 30 00 7F 11 FC 05 59 32 B2 C5 28 59 32 24 29 00 |0.....Y2..(Y2$).|
00000980: A3 11 FF 05 91 20 59 32 20 89 20 31 35 34 31 2C |..... Y2 . 1541,|
00000990: 31 35 34 32 2C 31 35 34 33 2C 31 35 34 34 2C 31 |1542,1543,1544,1|
000009A0: 35 34 35 00 BC 11 05 06 46 41 B2 31 3A 4E 49 B2 |545.....FA.1:NI.|
000009B0: 4E 49 AA 31 3A 20 89 20 31 35 38 30 00 D5 11 06 |NI.1: . 1580....|
000009C0: 06 46 4A B2 31 3A 4E 49 B2 4E 49 AA 31 3A 20 89 |.FJ.1:NI.NI.1: .|
000009D0: 20 31 35 38 30 00 F3 11 07 06 46 41 B2 31 3A 46 | 1580.....FA.1:F|
000009E0: 4A B2 31 3A 4E 49 B2 4E 49 AA 32 3A 20 89 20 31 |J.1:NI.NI.2: . 1|
000009F0: 35 38 30 00 FE 11 08 06 89 20 31 35 38 30 00 04 |580...... 1580..|
00000A00: 12 09 06 80 00 0A 12 2C 06 8E 00 38 12 34 08 99 |.......,...8.4..|
00000A10: 22 93 22 3A 99 20 A3 35 29 22 20 C6 20 C1 20 D6 |".":. .5)" . . .|
00000A20: 20 CF 20 D5 20 D2 20 20 20 CC 20 C5 20 D4 20 D4 | . . . . . . .|
00000A30: 20 C5 20 D2 20 D3 20 22 00 69 12 35 08 99 20 A3 | . . . ".i.5.. .|
00000A40: 32 29 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |2)"*************|
00000A50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A60: 2A 2A 2A 2A 2A 2A 22 3A 99 00 87 12 37 08 99 20 |******":....7.. |
00000A70: 22 20 28 31 29 20 C6 41 56 4F 55 52 20 52 45 51 |" (1) .AVOUR REQ|
00000A80: 55 45 53 54 45 44 22 00 A3 12 39 08 99 20 22 20 |UESTED"...9.. " |
00000A90: 28 32 29 20 C6 41 56 4F 55 52 20 47 52 41 4E 54 |(2) .AVOUR GRANT|
00000AA0: 45 44 22 00 BF 12 3B 08 99 20 22 20 28 33 29 20 |ED"...;.. " (3) |
00000AB0: C6 41 56 4F 55 52 20 52 45 46 55 53 45 44 22 00 |.AVOUR REFUSED".|
00000AC0: E0 12 3D 08 99 20 22 20 28 34 29 20 D2 C5 D4 D5 |..=.. " (4) ....|
00000AD0: D2 CE 20 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 22 |.. TO MAIN MENU"|
00000AE0: 00 08 13 57 08 A1 20 58 31 24 3A 8B 20 58 31 24 |...W.. X1$:. X1$|
00000AF0: B3 22 31 22 20 B0 20 58 31 24 B1 22 34 22 20 20 |."1" . X1$."4" |
00000B00: A7 20 89 20 32 31 33 35 00 16 13 58 08 58 31 B2 |. . 2135...X.X1.|
00000B10: C5 28 58 31 24 29 00 36 13 59 08 91 20 58 31 20 |.(X1$).6.Y.. X1 |
00000B20: 89 20 20 32 31 34 31 2C 32 31 34 32 2C 32 31 34 |. 2141,2142,214|
00000B30: 33 2C 32 31 34 34 00 5A 13 5D 08 4E 49 B2 20 36 |3,2144.Z.].NI. 6|
00000B40: 3A 4E 53 B2 32 37 3A 46 24 B2 22 46 41 56 2D 31 |:NS.27:F$."FAV-1|
00000B50: 2D 31 22 3A 89 20 32 31 39 30 00 7E 13 5E 08 4E |-1":. 2190.~.^.N|
00000B60: 49 B2 20 38 3A 4E 53 B2 32 39 3A 46 24 B2 22 46 |I. 8:NS.29:F$."F|
00000B70: 41 56 2D 31 2D 32 22 3A 89 20 32 31 39 30 00 A2 |AV-1-2":. 2190..|
00000B80: 13 5F 08 4E 49 B2 38 20 3A 4E 53 B2 32 37 3A 46 |._.NI.8 :NS.27:F|
00000B90: 24 B2 22 46 41 56 2D 31 2D 33 22 3A 89 20 32 31 |$."FAV-1-3":. 21|
00000BA0: 39 30 00 AB 13 60 08 46 35 B2 32 00 B1 13 8E 08 |90...`.F5.2.....|
00000BB0: 8E 00 E0 13 98 08 99 22 93 22 3A 99 20 A3 34 29 |.......".":. .4)|
00000BC0: 22 20 C9 A0 CE A0 D1 A0 D5 A0 C9 A0 D2 A0 D9 A0 |" ..............|
00000BD0: A0 A0 CC A0 C5 A0 D4 A0 D4 A0 C5 A0 D2 A0 D3 22 |..............."|
00000BE0: 00 11 14 99 08 99 20 A3 32 29 22 2A 2A 2A 2A 2A |...... .2)"*****|
00000BF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000C00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A |**************":|
00000C10: 99 00 2D 14 9B 08 99 20 22 20 28 31 29 20 C2 55 |..-.... " (1) .U|
00000C20: 59 45 52 27 53 20 4C 45 54 54 45 52 22 00 4A 14 |YER'S LETTER".J.|
00000C30: 9D 08 99 20 22 20 28 32 29 20 D2 45 53 50 4F 4E |... " (2) .ESPON|
00000C40: 53 45 20 54 4F 20 28 31 29 22 00 6E 14 9F 08 99 |SE TO (1)".n....|
00000C50: 20 22 20 28 33 29 20 C1 43 4B 4E 4F 57 4C 45 44 | " (3) .CKNOWLED|
00000C60: 47 45 4D 45 4E 54 20 4F 46 20 28 31 29 22 00 8E |GEMENT OF (1)"..|
00000C70: 14 A1 08 99 20 22 20 28 34 29 20 C6 4F 52 4D 20 |.... " (4) .ORM |
00000C80: 41 4E 53 57 45 52 20 54 4F 20 28 31 29 22 00 B4 |ANSWER TO (1)"..|
00000C90: 14 A3 08 99 20 22 20 28 35 29 20 C1 4E 53 57 45 |.... " (5) .NSWE|
00000CA0: 52 20 54 4F 20 4F 52 44 45 52 20 52 45 43 45 49 |R TO ORDER RECEI|
00000CB0: 56 45 44 22 00 F2 14 A5 08 99 20 22 20 28 36 29 |VED"...... " (6)|
00000CC0: 20 C1 4E 53 57 45 52 20 54 4F 20 28 31 29 20 53 | .NSWER TO (1) S|
00000CD0: 55 47 47 45 53 54 49 4E 47 20 44 49 46 46 45 52 |UGGESTING DIFFER|
00000CE0: 45 4E 54 20 20 20 20 20 20 20 50 52 4F 44 55 43 |ENT PRODUC|
00000CF0: 54 22 00 13 15 B5 08 99 20 22 20 28 37 29 20 D2 |T"...... " (7) .|
00000D00: C5 D4 D5 D2 CE 20 54 4F 20 4D 41 49 4E 20 4D 45 |..... TO MAIN ME|
00000D10: 4E 55 22 00 3B 15 BB 08 A1 20 58 32 24 3A 8B 20 |NU".;.... X2$:. |
00000D20: 58 32 24 B3 22 31 22 20 B0 20 58 32 24 B1 22 37 |X2$."1" . X2$."7|
00000D30: 22 20 20 A7 20 89 20 32 32 33 35 00 49 15 BC 08 |" . . 2235.I...|
00000D40: 58 32 B2 C5 28 58 32 24 29 00 78 15 BD 08 91 20 |X2..(X2$).x.... |
00000D50: 58 32 20 89 20 20 32 32 34 31 2C 32 32 34 32 2C |X2 . 2241,2242,|
00000D60: 32 32 34 33 2C 32 32 34 34 2C 32 32 34 35 2C 32 |2243,2244,2245,2|
00000D70: 32 34 36 2C 32 32 34 37 00 9C 15 C1 08 4E 49 B2 |246,2247.....NI.|
00000D80: 20 36 3A 4E 53 B2 32 33 3A 46 24 B2 22 49 4E 51 | 6:NS.23:F$."INQ|
00000D90: 2D 32 2D 31 22 3A 89 20 32 32 39 30 00 C0 15 C2 |-2-1":. 2290....|
00000DA0: 08 4E 49 B2 20 37 3A 4E 53 B2 32 35 3A 46 24 B2 |.NI. 7:NS.25:F$.|
00000DB0: 22 49 4E 51 2D 32 2D 32 22 3A 89 20 32 32 39 30 |"INQ-2-2":. 2290|
00000DC0: 00 E4 15 C3 08 4E 49 B2 20 36 3A 4E 53 B2 32 37 |.....NI. 6:NS.27|
00000DD0: 3A 46 24 B2 22 49 4E 51 2D 32 2D 33 22 3A 89 20 |:F$."INQ-2-3":. |
00000DE0: 32 32 39 30 00 08 16 C4 08 4E 49 B2 20 35 3A 4E |2290.....NI. 5:N|
00000DF0: 53 B2 32 37 3A 46 24 B2 22 49 4E 51 2D 32 2D 34 |S.27:F$."INQ-2-4|
00000E00: 22 3A 89 20 32 32 39 30 00 2C 16 C5 08 4E 49 B2 |":. 2290.,...NI.|
00000E10: 20 36 3A 4E 53 B2 33 32 3A 46 24 B2 22 49 4E 51 | 6:NS.32:F$."INQ|
00000E20: 2D 32 2D 35 22 3A 89 20 32 32 39 30 00 50 16 C6 |-2-5":. 2290.P..|
00000E30: 08 4E 49 B2 31 30 3A 4E 53 B2 33 33 3A 46 24 B2 |.NI.10:NS.33:F$.|
00000E40: 22 49 4E 51 2D 32 2D 36 22 3A 89 20 32 32 39 30 |"INQ-2-6":. 2290|
00000E50: 00 59 16 C7 08 46 35 B2 32 00 5F 16 F2 08 8E 00 |.Y...F5.2._.....|
00000E60: 8E 16 FC 08 99 22 93 22 3A 99 20 A3 34 29 22 20 |.....".":. .4)" |
00000E70: D0 A0 C1 A0 D9 A0 CD A0 C5 20 CE 20 D4 20 20 20 |......... . . |
00000E80: CC A0 C5 A0 D4 A0 D4 A0 C5 A0 D2 A0 D3 22 00 BF |............."..|
00000E90: 16 FD 08 99 20 A3 32 29 22 2A 2A 2A 2A 2A 2A 2A |.... .2)"*******|
00000EA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 99 00 |************":..|
00000EC0: DC 16 FF 08 99 20 22 20 28 31 29 20 C3 48 45 51 |..... " (1) .HEQ|
00000ED0: 55 45 20 45 4E 43 4C 4F 53 45 44 22 00 FD 16 01 |UE ENCLOSED"....|
00000EE0: 09 99 20 22 20 28 32 29 20 C1 43 4B 4E 4F 57 4C |.. " (2) .CKNOWL|
00000EF0: 45 44 47 45 20 50 41 59 4D 45 4E 54 22 00 19 17 |EDGE PAYMENT"...|
00000F00: 03 09 99 20 22 20 28 33 29 20 C2 49 4C 4C 49 4E |... " (3) .ILLIN|
00000F10: 47 20 45 52 52 4F 52 20 22 00 36 17 05 09 99 20 |G ERROR ".6.... |
00000F20: 22 20 28 34 29 20 C1 43 4B 4E 4F 57 4C 45 44 47 |" (4) .CKNOWLEDG|
00000F30: 45 20 28 33 29 22 00 5D 17 07 09 99 20 22 20 28 |E (3)".].... " (|
00000F40: 35 29 20 D2 45 54 55 52 4E 20 41 4E 20 55 4E 53 |5) .ETURN AN UNS|
00000F50: 49 47 4E 45 44 20 43 48 45 51 55 45 22 00 84 17 |IGNED CHEQUE"...|
00000F60: 09 09 99 20 22 20 28 36 29 20 D3 54 4F 50 20 50 |... " (6) .TOP P|
00000F70: 41 59 4D 45 4E 54 20 4F 4E 20 41 20 43 48 45 51 |AYMENT ON A CHEQ|
00000F80: 55 45 20 22 00 A9 17 0B 09 99 20 22 20 28 37 29 |UE "...... " (7)|
00000F90: 20 C1 4C 4C 4F 57 20 44 49 53 43 4F 55 4E 54 20 | .LLOW DISCOUNT |
00000FA0: 44 45 44 55 43 54 45 44 22 00 D1 17 0D 09 99 20 |DEDUCTED"...... |
00000FB0: 22 20 28 38 29 20 C4 49 53 41 4C 4C 4F 57 20 44 |" (8) .ISALLOW D|
00000FC0: 49 53 43 4F 55 4E 54 20 44 45 44 55 43 54 45 44 |ISCOUNT DEDUCTED|
00000FD0: 22 00 F2 17 19 09 99 20 22 20 28 39 29 20 D2 C5 |"...... " (9) ..|
00000FE0: D4 D5 D2 CE 20 54 4F 20 4D 41 49 4E 20 4D 45 4E |.... TO MAIN MEN|
00000FF0: 55 22 00 1A 18 1F 09 A1 20 58 33 24 3A 8B 20 58 |U"...... X3$:. X|
00001000: 33 24 B3 22 31 22 20 B0 20 58 33 24 B1 22 39 22 |3$."1" . X3$."9"|
00001010: 20 20 A7 20 89 20 32 33 33 35 00 28 18 20 09 58 | . . 2335.(. .X|
00001020: 33 B2 C5 28 58 33 24 29 00 61 18 21 09 91 20 58 |3..(X3$).a.!.. X|
00001030: 33 20 89 20 20 32 33 34 31 2C 32 33 34 32 2C 32 |3 . 2341,2342,2|
00001040: 33 34 33 2C 32 33 34 34 2C 32 33 34 35 2C 32 33 |343,2344,2345,23|
00001050: 34 36 2C 32 33 34 37 2C 32 33 34 38 2C 32 33 34 |46,2347,2348,234|
00001060: 39 00 85 18 25 09 4E 49 B2 20 37 3A 4E 53 B2 32 |9...%.NI. 7:NS.2|
00001070: 33 3A 46 24 B2 22 50 41 59 2D 33 2D 31 22 3A 89 |3:F$."PAY-3-1":.|
00001080: 20 32 33 39 30 00 A9 18 26 09 4E 49 B2 20 37 3A | 2390...&.NI. 7:|
00001090: 4E 53 B2 32 35 3A 46 24 B2 22 50 41 59 2D 33 2D |NS.25:F$."PAY-3-|
000010A0: 32 22 3A 89 20 32 33 39 30 00 CD 18 27 09 4E 49 |2":. 2390...'.NI|
000010B0: B2 31 30 3A 4E 53 B2 33 31 3A 46 24 B2 22 50 41 |.10:NS.31:F$."PA|
000010C0: 59 2D 33 2D 33 22 3A 89 20 32 33 39 30 00 F1 18 |Y-3-3":. 2390...|
000010D0: 28 09 4E 49 B2 20 37 3A 4E 53 B2 32 38 3A 46 24 |(.NI. 7:NS.28:F$|
000010E0: B2 22 50 41 59 2D 33 2D 34 22 3A 89 20 32 33 39 |."PAY-3-4":. 239|
000010F0: 30 00 15 19 29 09 4E 49 B2 20 37 3A 4E 53 B2 32 |0...).NI. 7:NS.2|
00001100: 37 3A 46 24 B2 22 50 41 59 2D 33 2D 35 22 3A 89 |7:F$."PAY-3-5":.|
00001110: 20 32 33 39 30 00 39 19 2A 09 4E 49 B2 31 30 3A | 2390.9.*.NI.10:|
00001120: 4E 53 B2 32 36 3A 46 24 B2 22 50 41 59 2D 33 2D |NS.26:F$."PAY-3-|
00001130: 36 22 3A 89 20 32 33 39 30 00 5D 19 2B 09 4E 49 |6":. 2390.].+.NI|
00001140: B2 31 31 3A 4E 53 B2 33 35 3A 46 24 B2 22 50 41 |.11:NS.35:F$."PA|
00001150: 59 2D 33 2D 37 22 3A 89 20 32 33 39 30 00 81 19 |Y-3-7":. 2390...|
00001160: 2C 09 4E 49 B2 31 30 3A 4E 53 B2 33 32 3A 46 24 |,.NI.10:NS.32:F$|
00001170: B2 22 50 41 59 2D 33 2D 38 22 3A 89 20 32 33 39 |."PAY-3-8":. 239|
00001180: 30 00 8A 19 2D 09 46 35 B2 32 00 90 19 56 09 8E |0...-.F5.2...V..|
00001190: 00 BD 19 60 09 99 22 93 22 3A 99 20 A3 36 29 22 |...`..".":. .6)"|
000011A0: 20 D3 20 C1 20 CC 20 C5 20 D3 20 20 20 20 CC 20 | . . . . . . |
000011B0: C5 20 D4 20 D4 20 C5 20 D2 A0 D3 20 22 00 EF 19 |. . . . ... "...|
000011C0: 61 09 99 20 A3 32 29 22 2A 2A 2A 2A 2A 2A 2A 2A |a.. .2)"********|
000011D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000011E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 99 00 |************":..|
000011F0: 09 1A 63 09 99 20 22 20 28 31 29 20 D3 41 4C 45 |..c.. " (1) .ALE|
00001200: 53 20 4C 45 54 54 45 52 22 00 2A 1A 7D 09 99 20 |S LETTER".*.}.. |
00001210: 22 20 28 32 29 20 D2 C5 D4 D5 D2 CE 20 54 4F 20 |" (2) ...... TO |
00001220: 4D 41 49 4E 20 4D 45 4E 55 22 00 52 1A 83 09 A1 |MAIN MENU".R....|
00001230: 20 58 34 24 3A 8B 20 58 34 24 B3 22 31 22 20 B0 | X4$:. X4$."1" .|
00001240: 20 58 34 24 B1 22 32 22 20 20 A7 20 89 20 32 34 | X4$."2" . . 24|
00001250: 33 35 00 60 1A 84 09 58 34 B2 C5 28 58 34 24 29 |35.`...X4..(X4$)|
00001260: 00 76 1A 85 09 91 20 58 34 20 89 20 20 32 34 34 |.v.... X4 . 244|
00001270: 31 2C 32 34 34 32 00 9A 1A 89 09 4E 49 B2 20 38 |1,2442.....NI. 8|
00001280: 3A 4E 53 B2 33 34 3A 46 24 B2 22 53 41 4C 2D 34 |:NS.34:F$."SAL-4|
00001290: 2D 31 22 3A 89 20 32 34 39 30 00 A3 1A 8A 09 46 |-1":. 2490.....F|
000012A0: 35 B2 32 00 A9 1A BA 09 8E 00 D6 1A C4 09 99 22 |5.2............"|
000012B0: 93 22 3A 99 20 A3 35 29 22 20 C3 20 D2 20 C5 20 |.":. .5)" . . . |
000012C0: C4 20 C9 20 D4 20 20 20 CC 20 C5 A0 D4 20 D4 20 |. . . . ... . |
000012D0: C5 20 D2 20 D3 22 00 07 1B C5 09 99 20 A3 32 29 |. . ."...... .2)|
000012E0: 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |"***************|
000012F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001300: 2A 2A 2A 2A 22 3A 99 00 23 1B C7 09 99 20 22 20 |****":..#.... " |
00001310: 28 31 29 20 D2 45 51 55 45 53 54 20 43 52 45 44 |(1) .EQUEST CRED|
00001320: 49 54 22 00 40 1B C9 09 99 20 22 20 28 32 29 20 |IT".@.... " (2) |
00001330: C1 43 4B 4E 4F 57 4C 45 44 47 45 20 28 31 29 22 |.CKNOWLEDGE (1)"|
00001340: 00 5C 1B CB 09 99 20 22 20 28 33 29 20 C3 52 45 |.\.... " (3) .RE|
00001350: 44 49 54 20 47 52 41 4E 54 45 44 22 00 81 1B CD |DIT GRANTED"....|
00001360: 09 99 20 22 20 28 34 29 20 D2 45 51 55 45 53 54 |.. " (4) .EQUEST|
00001370: 20 43 52 45 44 49 54 20 53 54 41 4E 44 49 4E 47 | CREDIT STANDING|
00001380: 22 00 B0 1B CF 09 99 20 22 20 28 35 29 20 C6 41 |"...... " (5) .A|
00001390: 56 4F 55 52 41 42 4C 45 20 43 52 45 44 49 54 20 |VOURABLE CREDIT |
000013A0: 52 45 46 45 52 45 4E 43 45 20 47 49 56 45 4E 22 |REFERENCE GIVEN"|
000013B0: 00 CD 1B D1 09 99 20 22 20 28 36 29 20 C3 52 45 |...... " (6) .RE|
000013C0: 44 49 54 20 52 45 46 55 53 45 44 20 22 00 17 1C |DIT REFUSED "...|
000013D0: D3 09 99 20 22 20 28 37 29 20 D5 4E 46 41 56 4F |... " (7) .NFAVO|
000013E0: 55 52 41 42 4C 45 20 43 52 45 44 49 54 20 52 45 |URABLE CREDIT RE|
000013F0: 46 45 52 45 4E 43 45 20 47 49 56 45 4E 20 28 38 |FERENCE GIVEN (8|
00001400: 29 20 D2 C5 D4 D5 D2 CE 20 54 4F 20 4D 41 49 4E |) ...... TO MAIN|
00001410: 20 4D 45 4E 55 20 22 00 3F 1C E7 09 A1 20 58 35 | MENU ".?.... X5|
00001420: 24 3A 8B 20 58 35 24 B3 22 31 22 20 B0 20 58 35 |$:. X5$."1" . X5|
00001430: 24 B1 22 38 22 20 20 A7 20 89 20 32 35 33 35 00 |$."8" . . 2535.|
00001440: 4D 1C E8 09 58 35 B2 C5 28 58 35 24 29 00 81 1C |M...X5..(X5$)...|
00001450: E9 09 91 20 58 35 20 89 20 20 32 35 34 31 2C 32 |... X5 . 2541,2|
00001460: 35 34 32 2C 32 35 34 33 2C 32 35 34 34 2C 32 35 |542,2543,2544,25|
00001470: 34 35 2C 32 35 34 36 2C 32 35 34 37 2C 32 35 34 |45,2546,2547,254|
00001480: 38 00 A5 1C ED 09 4E 49 B2 20 35 3A 4E 53 B2 32 |8.....NI. 5:NS.2|
00001490: 35 3A 46 24 B2 22 43 52 44 2D 35 2D 31 22 3A 89 |5:F$."CRD-5-1":.|
000014A0: 20 32 35 39 30 00 C9 1C EE 09 4E 49 B2 20 36 3A | 2590.....NI. 6:|
000014B0: 4E 53 B2 33 31 3A 46 24 B2 22 43 52 44 2D 35 2D |NS.31:F$."CRD-5-|
000014C0: 32 22 3A 89 20 32 35 39 30 00 ED 1C EF 09 4E 49 |2":. 2590.....NI|
000014D0: B2 20 36 3A 4E 53 B2 32 38 3A 46 24 B2 22 43 52 |. 6:NS.28:F$."CR|
000014E0: 44 2D 35 2D 33 22 3A 89 20 32 35 39 30 00 11 1D |D-5-3":. 2590...|
000014F0: F0 09 4E 49 B2 20 36 3A 4E 53 B2 32 38 3A 46 24 |..NI. 6:NS.28:F$|
00001500: B2 22 43 52 44 2D 35 2D 34 22 3A 89 20 32 35 39 |."CRD-5-4":. 259|
00001510: 30 00 35 1D F1 09 4E 49 B2 20 39 3A 4E 53 B2 33 |0.5...NI. 9:NS.3|
00001520: 32 3A 46 24 B2 22 43 52 44 2D 35 2D 35 22 3A 89 |2:F$."CRD-5-5":.|
00001530: 20 32 35 39 30 00 59 1D F2 09 4E 49 B2 20 37 3A | 2590.Y...NI. 7:|
00001540: 4E 53 B2 33 31 3A 46 24 B2 22 43 52 44 2D 35 2D |NS.31:F$."CRD-5-|
00001550: 36 22 3A 89 20 32 35 39 30 00 7D 1D F3 09 4E 49 |6":. 2590.}...NI|
00001560: B2 20 37 3A 4E 53 B2 33 33 3A 46 24 B2 22 43 52 |. 7:NS.33:F$."CR|
00001570: 44 2D 35 2D 37 22 3A 89 20 32 35 39 30 00 86 1D |D-5-7":. 2590...|
00001580: F4 09 46 35 B2 32 00 8C 1D 1E 0A 8E 00 C0 1D 28 |..F5.2.........(|
00001590: 0A 99 22 93 22 3A 99 20 A3 32 29 22 20 C3 20 CF |..".":. .2)" . .|
000015A0: A0 CD 20 D0 20 CC 20 C1 20 C9 20 CE 20 D4 20 20 |.. . . . . . . |
000015B0: 20 20 CC 20 C5 A0 D4 20 D4 20 C5 20 D2 20 D3 22 | . ... . . . ."|
000015C0: 00 F2 1D 29 0A 99 20 A3 32 29 22 2A 2A 2A 2A 2A |...).. .2)"*****|
000015D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000015E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 |***************"|
000015F0: 3A 99 00 0D 1E 2B 0A 99 20 22 20 28 31 29 20 C3 |:....+.. " (1) .|
00001600: 4C 41 49 4D 20 4C 45 54 54 45 52 20 22 00 2D 1E |LAIM LETTER ".-.|
00001610: 2D 0A 99 20 22 20 28 32 29 20 C7 45 4E 45 52 41 |-.. " (2) .ENERA|
00001620: 4C 20 43 4F 4D 50 4C 41 49 4E 54 20 22 00 49 1E |L COMPLAINT ".I.|
00001630: 2F 0A 99 20 22 20 28 33 29 20 CC 41 54 45 20 44 |/.. " (3) .ATE D|
00001640: 45 4C 49 56 45 52 59 20 22 00 69 1E 31 0A 99 20 |ELIVERY ".i.1.. |
00001650: 22 20 28 34 29 20 C9 4E 56 41 4C 49 44 20 43 4F |" (4) .NVALID CO|
00001660: 4D 50 4C 41 49 4E 54 20 22 00 8B 1E 33 0A 99 20 |MPLAINT "...3.. |
00001670: 22 20 28 35 29 20 C1 4E 53 57 45 52 20 54 4F 20 |" (5) .NSWER TO |
00001680: 43 4F 4D 50 4C 41 49 4E 54 53 22 00 AC 1E 45 0A |COMPLAINTS"...E.|
00001690: 99 20 22 20 28 36 29 20 D2 C5 D4 D5 D2 CE 20 54 |. " (6) ...... T|
000016A0: 4F 20 4D 41 49 4E 20 4D 45 4E 55 22 00 D4 1E 4B |O MAIN MENU"...K|
000016B0: 0A A1 20 58 36 24 3A 8B 20 58 36 24 B3 22 31 22 |.. X6$:. X6$."1"|
000016C0: 20 B0 20 58 36 24 B1 22 36 22 20 20 A7 20 89 20 | . X6$."6" . . |
000016D0: 32 36 33 35 00 E2 1E 4C 0A 58 36 B2 C5 28 58 36 |2635...L.X6..(X6|
000016E0: 24 29 00 0C 1F 4D 0A 91 20 58 36 20 89 20 20 32 |$)...M.. X6 . 2|
000016F0: 36 34 31 2C 32 36 34 32 2C 32 36 34 33 2C 32 36 |641,2642,2643,26|
00001700: 34 34 2C 32 36 34 35 2C 32 36 34 36 00 30 1F 51 |44,2645,2646.0.Q|
00001710: 0A 4E 49 B2 31 30 3A 4E 53 B2 33 35 3A 46 24 B2 |.NI.10:NS.35:F$.|
00001720: 22 43 4F 4D 2D 36 2D 31 22 3A 89 20 32 36 39 30 |"COM-6-1":. 2690|
00001730: 00 54 1F 52 0A 4E 49 B2 31 30 3A 4E 53 B2 33 31 |.T.R.NI.10:NS.31|
00001740: 3A 46 24 B2 22 43 4F 4D 2D 36 2D 32 22 3A 89 20 |:F$."COM-6-2":. |
00001750: 32 36 39 30 00 78 1F 53 0A 4E 49 B2 20 39 3A 4E |2690.x.S.NI. 9:N|
00001760: 53 B2 33 34 3A 46 24 B2 22 43 4F 4D 2D 36 2D 33 |S.34:F$."COM-6-3|
00001770: 22 3A 89 20 32 36 39 30 00 9C 1F 54 0A 4E 49 B2 |":. 2690...T.NI.|
00001780: 31 31 3A 4E 53 B2 33 35 3A 46 24 B2 22 43 4F 4D |11:NS.35:F$."COM|
00001790: 2D 36 2D 34 22 3A 89 20 32 36 39 30 00 C0 1F 55 |-6-4":. 2690...U|
000017A0: 0A 4E 49 B2 20 39 3A 4E 53 B2 33 35 3A 46 24 B2 |.NI. 9:NS.35:F$.|
000017B0: 22 43 4F 4D 2D 36 2D 35 22 3A 89 20 32 36 39 30 |"COM-6-5":. 2690|
000017C0: 00 C9 1F 56 0A 46 35 B2 32 00 CF 1F 82 0A 8E 00 |...V.F5.2.......|
000017D0: 05 20 8C 0A 99 22 93 22 3A 99 20 A3 32 29 22 C3 |. ...".":. .2)".|
000017E0: 20 CF 20 CC 20 CC 20 C5 20 C3 20 D4 A0 C9 A0 CF | . . . . . .....|
000017F0: A0 CE A0 20 20 20 CC 20 C5 20 D4 20 D4 20 C5 20 |... . . . . . |
00001800: D2 20 D3 20 22 00 39 20 8D 0A 99 20 A3 31 29 22 |. . ".9 ... .1)"|
00001810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001820: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001830: 2A 2A 2A 2A 2A 2A 22 3A 99 00 54 20 8F 0A 99 20 |******":..T ... |
00001840: 22 20 28 41 29 20 C6 49 52 53 54 20 4C 45 54 54 |" (A) .IRST LETT|
00001850: 45 52 20 22 00 71 20 91 0A 99 20 22 20 28 42 29 |ER ".q ... " (B)|
00001860: 20 D3 45 43 4F 4E 44 20 20 4C 45 54 54 45 52 20 | .ECOND LETTER |
00001870: 22 00 8D 20 93 0A 99 20 22 20 28 43 29 20 D4 48 |".. ... " (C) .H|
00001880: 49 52 44 20 20 4C 45 54 54 45 52 20 22 00 A9 20 |IRD LETTER ".. |
00001890: 95 0A 99 20 22 20 28 44 29 20 C6 4F 55 52 54 48 |... " (D) .OURTH|
000018A0: 20 4C 45 54 54 45 52 20 22 00 C4 20 97 0A 99 20 | LETTER ".. ... |
000018B0: 22 20 28 45 29 20 C6 49 46 54 48 20 4C 45 54 54 |" (E) .IFTH LETT|
000018C0: 45 52 20 22 00 E0 20 99 0A 99 20 22 20 28 46 29 |ER ".. ... " (F)|
000018D0: 20 C6 52 49 45 4E 44 4C 59 20 53 54 59 4C 45 22 | .RIENDLY STYLE"|
000018E0: 00 F9 20 9B 0A 99 20 22 20 28 47 29 20 C7 45 4E |.. ... " (G) .EN|
000018F0: 45 52 41 4C 20 23 32 20 22 00 16 21 9D 0A 99 20 |ERAL #2 "..!... |
00001900: 22 20 28 48 29 20 C8 55 4D 4F 55 52 4F 55 53 20 |" (H) .UMOUROUS |
00001910: 53 54 59 4C 45 22 00 2F 21 9F 0A 99 20 22 20 28 |STYLE"./!... " (|
00001920: 49 29 20 C6 52 49 45 4E 44 4C 59 20 23 32 22 00 |I) .RIENDLY #2".|
00001930: 48 21 A1 0A 99 20 22 20 28 4A 29 20 D0 52 45 53 |H!... " (J) .RES|
00001940: 53 49 4E 47 20 20 20 22 00 66 21 A3 0A 99 20 22 |SING ".f!... "|
00001950: 20 28 4B 29 20 CD 4F 52 45 20 50 52 45 53 53 49 | (K) .ORE PRESSI|
00001960: 4E 47 20 20 20 22 00 84 21 A5 0A 99 20 22 20 28 |NG "..!... " (|
00001970: 4C 29 20 CD 4F 53 54 20 50 52 45 53 53 49 4E 47 |L) .OST PRESSING|
00001980: 20 20 20 22 00 A5 21 A7 0A 99 20 22 20 28 4D 29 | "..!... " (M)|
00001990: 20 C8 41 56 45 20 59 4F 55 20 46 4F 52 47 4F 54 | .AVE YOU FORGOT|
000019A0: 54 45 4E 3F 22 00 C6 21 A9 0A 99 20 22 20 28 4E |TEN?"..!... " (N|
000019B0: 29 20 D2 C5 D4 D5 D2 CE 20 54 4F 20 4D 41 49 4E |) ...... TO MAIN|
000019C0: 20 4D 45 4E 55 22 00 D7 21 AA 0A 45 31 24 B2 C7 | MENU"..!..E1$..|
000019D0: 28 36 35 AA 31 33 29 00 FE 21 AC 0A A1 20 45 30 |(65.13)..!... E0|
000019E0: 24 3A 8B 20 45 30 24 B3 22 41 22 20 B0 20 45 30 |$:. E0$."A" . E0|
000019F0: 24 B1 45 31 24 20 A7 20 89 20 32 37 33 32 00 0F |$.E1$ . . 2732..|
00001A00: 22 AE 0A 58 37 B2 C6 28 45 30 24 29 AB 36 34 00 |"..X7..(E0$).64.|
00001A10: 24 22 AF 0A 8B 20 58 37 B2 31 34 20 A7 20 46 35 |$"... X7.14 . F5|
00001A20: B2 32 3A 8E 00 6D 22 B0 0A 91 58 37 89 32 37 35 |.2:..m"...X7.275|
00001A30: 31 2C 32 37 35 32 2C 32 37 35 33 2C 32 37 35 34 |1,2752,2753,2754|
00001A40: 2C 32 37 35 35 2C 32 37 35 36 2C 32 37 35 37 2C |,2755,2756,2757,|
00001A50: 32 37 35 38 2C 32 37 35 39 2C 32 37 36 30 2C 32 |2758,2759,2760,2|
00001A60: 37 36 31 2C 32 37 36 32 2C 32 37 36 33 00 91 22 |761,2762,2763.."|
00001A70: BF 0A 4E 49 B2 20 37 3A 4E 53 B2 32 38 3A 46 24 |..NI. 7:NS.28:F$|
00001A80: B2 22 43 4F 4D 2D 37 2D 31 22 3A 89 20 32 37 39 |."COM-7-1":. 279|
00001A90: 30 00 B5 22 C0 0A 4E 49 B2 20 38 3A 4E 53 B2 32 |0.."..NI. 8:NS.2|
00001AA0: 39 3A 46 24 B2 22 43 4F 4D 2D 37 2D 32 22 3A 89 |9:F$."COM-7-2":.|
00001AB0: 20 32 37 39 30 00 D9 22 C1 0A 4E 49 B2 20 37 3A | 2790.."..NI. 7:|
00001AC0: 4E 53 B2 32 36 3A 46 24 B2 22 43 4F 4D 2D 37 2D |NS.26:F$."COM-7-|
00001AD0: 33 22 3A 89 20 32 37 39 30 00 FD 22 C2 0A 4E 49 |3":. 2790.."..NI|
00001AE0: B2 20 37 3A 4E 53 B2 33 32 3A 46 24 B2 22 43 4F |. 7:NS.32:F$."CO|
00001AF0: 4D 2D 37 2D 34 22 3A 89 20 32 37 39 30 00 21 23 |M-7-4":. 2790.!#|
00001B00: C3 0A 4E 49 B2 20 37 3A 4E 53 B2 33 33 3A 46 24 |..NI. 7:NS.33:F$|
00001B10: B2 22 43 4F 4D 2D 37 2D 35 22 3A 89 20 32 37 39 |."COM-7-5":. 279|
00001B20: 30 00 45 23 C4 0A 4E 49 B2 20 37 3A 4E 53 B2 33 |0.E#..NI. 7:NS.3|
00001B30: 35 3A 46 24 B2 22 43 4F 4D 2D 37 2D 36 22 3A 89 |5:F$."COM-7-6":.|
00001B40: 20 32 37 39 30 00 69 23 C5 0A 4E 49 B2 20 39 3A | 2790.i#..NI. 9:|
00001B50: 4E 53 B2 33 32 3A 46 24 B2 22 43 4F 4D 2D 37 2D |NS.32:F$."COM-7-|
00001B60: 37 22 3A 89 20 32 37 39 30 00 8D 23 C6 0A 4E 49 |7":. 2790..#..NI|
00001B70: B2 20 35 3A 4E 53 B2 32 32 3A 46 24 B2 22 43 4F |. 5:NS.22:F$."CO|
00001B80: 4D 2D 37 2D 38 22 3A 89 20 32 37 39 30 00 B1 23 |M-7-8":. 2790..#|
00001B90: C7 0A 4E 49 B2 20 35 3A 4E 53 B2 33 32 3A 46 24 |..NI. 5:NS.32:F$|
00001BA0: B2 22 43 4F 4D 2D 37 2D 39 22 3A 89 20 32 37 39 |."COM-7-9":. 279|
00001BB0: 30 00 D6 23 C8 0A 4E 49 B2 20 36 3A 4E 53 B2 33 |0..#..NI. 6:NS.3|
00001BC0: 33 3A 46 24 B2 22 43 4F 4D 2D 37 2D 31 30 22 3A |3:F$."COM-7-10":|
00001BD0: 89 20 32 37 39 30 00 FB 23 C9 0A 4E 49 B2 20 35 |. 2790..#..NI. 5|
00001BE0: 3A 4E 53 B2 33 33 3A 46 24 B2 22 43 4F 4D 2D 37 |:NS.33:F$."COM-7|
00001BF0: 2D 31 31 22 3A 89 20 32 37 39 30 00 20 24 CA 0A |-11":. 2790. $..|
00001C00: 4E 49 B2 20 37 3A 4E 53 B2 33 33 3A 46 24 B2 22 |NI. 7:NS.33:F$."|
00001C10: 43 4F 4D 2D 37 2D 31 32 22 3A 89 20 32 37 39 30 |COM-7-12":. 2790|
00001C20: 00 45 24 CB 0A 4E 49 B2 20 36 3A 4E 53 B2 33 31 |.E$..NI. 6:NS.31|
00001C30: 3A 46 24 B2 22 43 4F 4D 2D 37 2D 31 33 22 3A 89 |:F$."COM-7-13":.|
00001C40: 20 32 37 39 30 00 4B 24 E6 0A 8E 00 80 24 F0 0A | 2790.K$.....$..|
00001C50: 99 22 93 22 3A 99 20 22 20 C1 20 D0 20 D0 20 CC |.".":. " . . . .|
00001C60: 20 C9 A0 C3 20 C1 20 D4 A0 C9 20 CF 20 CE 20 20 | ... . ... . . |
00001C70: 20 20 CC 20 C5 20 D4 20 D4 A0 C5 A0 D2 A0 D3 22 | . . . ......."|
00001C80: 00 B3 24 F1 0A 99 20 22 2A 2A 2A 2A 2A 2A 2A 2A |..$... "********|
00001C90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001CA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001CB0: 22 3A 99 00 CF 24 F3 0A 99 20 22 20 28 31 29 20 |":...$... " (1) |
00001CC0: C1 50 50 4C 49 43 41 54 49 4F 4E 20 20 20 22 00 |.PPLICATION ".|
00001CD0: ED 24 F5 0A 99 20 22 20 28 32 29 20 C1 43 4B 4E |.$... " (2) .CKN|
00001CE0: 4F 57 4C 45 44 47 45 20 28 31 29 20 22 00 0C 25 |OWLEDGE (1) "..%|
00001CF0: F7 0A 99 20 22 20 28 33 29 20 C1 43 4B 4E 4F 57 |... " (3) .CKNOW|
00001D00: 4C 45 44 47 45 20 28 31 29 20 23 32 00 26 25 F9 |LEDGE (1) #2.&%.|
00001D10: 0A 99 20 22 20 28 34 29 20 C6 4F 4C 4C 4F 57 20 |.. " (4) .OLLOW |
00001D20: 2D 20 55 50 20 22 00 47 25 0D 0B 99 20 22 20 28 |- UP ".G%... " (|
00001D30: 35 29 20 D2 C5 D4 D5 D2 CE 20 54 4F 20 4D 41 49 |5) ...... TO MAI|
00001D40: 4E 20 4D 45 4E 55 22 00 6F 25 13 0B A1 20 58 38 |N MENU".o%... X8|
00001D50: 24 3A 8B 20 58 38 24 B3 22 31 22 20 B0 20 58 38 |$:. X8$."1" . X8|
00001D60: 24 B1 22 35 22 20 20 A7 20 89 20 32 38 33 35 00 |$."5" . . 2835.|
00001D70: 7D 25 14 0B 58 38 B2 C5 28 58 38 24 29 00 A2 25 |}%..X8..(X8$)..%|
00001D80: 15 0B 91 20 58 38 20 89 20 20 32 38 34 31 2C 32 |... X8 . 2841,2|
00001D90: 38 34 32 2C 32 38 34 33 2C 32 38 34 34 2C 32 38 |842,2843,2844,28|
00001DA0: 34 35 00 C6 25 19 0B 4E 49 B2 20 38 3A 4E 53 B2 |45..%..NI. 8:NS.|
00001DB0: 33 31 3A 46 24 B2 22 41 50 50 2D 38 2D 31 22 3A |31:F$."APP-8-1":|
00001DC0: 89 20 32 38 39 30 00 EA 25 1A 0B 4E 49 B2 20 39 |. 2890..%..NI. 9|
00001DD0: 3A 4E 53 B2 32 39 3A 46 24 B2 22 41 50 50 2D 38 |:NS.29:F$."APP-8|
00001DE0: 2D 32 22 3A 89 20 32 38 39 30 00 0E 26 1B 0B 4E |-2":. 2890..&..N|
00001DF0: 49 B2 20 36 3A 4E 53 B2 32 36 3A 46 24 B2 22 41 |I. 6:NS.26:F$."A|
00001E00: 50 50 2D 38 2D 33 22 3A 89 20 32 38 39 30 00 32 |PP-8-3":. 2890.2|
00001E10: 26 1C 0B 4E 49 B2 20 36 3A 4E 53 B2 33 30 3A 46 |&..NI. 6:NS.30:F|
00001E20: 24 B2 22 41 50 50 2D 38 2D 34 22 3A 89 20 32 38 |$."APP-8-4":. 28|
00001E30: 39 30 00 3B 26 1D 0B 46 35 B2 32 00 41 26 4A 0B |90.;&..F5.2.A&J.|
00001E40: 8E 00 6D 26 54 0B 99 22 93 22 3A 99 20 A3 36 29 |..m&T..".":. .6)|
00001E50: 22 20 CD A0 C9 A0 D3 A0 C3 A0 C5 A0 CC A0 CC A0 |" ..............|
00001E60: C1 A0 CE A0 C5 A0 CF A0 D5 A0 D3 20 22 00 9E 26 |........... "..&|
00001E70: 55 0B 99 20 A3 32 29 22 2A 2A 2A 2A 2A 2A 2A 2A |U.. .2)"********|
00001E80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001E90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 99 00 BE |***********":...|
00001EA0: 26 57 0B 99 20 22 20 28 31 29 20 C3 48 41 4E 47 |&W.. " (1) .HANG|
00001EB0: 45 20 4F 46 20 41 44 44 52 45 53 53 20 22 00 E3 |E OF ADDRESS "..|
00001EC0: 26 59 0B 99 20 22 20 28 32 29 20 CD 45 4D 4F 20 |&Y.. " (2) .EMO |
00001ED0: 2D 20 C7 49 56 45 20 49 4E 46 4F 52 4D 41 54 49 |- .IVE INFORMATI|
00001EE0: 4F 4E 22 00 0F 27 5B 0B 99 20 22 20 28 33 29 20 |ON"..'[.. " (3) |
00001EF0: CD 45 4D 4F 20 2D 20 C1 53 4B 20 46 4F 52 20 52 |.EMO - .SK FOR R|
00001F00: 45 43 4F 4D 4D 45 4E 44 41 54 49 4F 4E 53 22 00 |ECOMMENDATIONS".|
00001F10: 30 27 5D 0B 99 20 22 20 28 34 29 20 D2 C5 D4 D5 |0'].. " (4) ....|
00001F20: D2 CE 20 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 22 |.. TO MAIN MENU"|
00001F30: 00 58 27 77 0B A1 20 58 39 24 3A 8B 20 58 39 24 |.X'w.. X9$:. X9$|
00001F40: B3 22 31 22 20 B0 20 58 39 24 B1 22 34 22 20 20 |."1" . X9$."4" |
00001F50: A7 20 89 20 32 39 33 35 00 66 27 78 0B 58 39 B2 |. . 2935.f'x.X9.|
00001F60: C5 28 58 39 24 29 00 86 27 79 0B 91 20 58 39 20 |.(X9$)..'y.. X9 |
00001F70: 89 20 20 32 39 34 31 2C 32 39 34 32 2C 32 39 34 |. 2941,2942,294|
00001F80: 33 2C 32 39 34 34 00 AA 27 7D 0B 4E 49 B2 31 35 |3,2944..'}.NI.15|
00001F90: 3A 4E 53 B2 34 32 3A 46 24 B2 22 4D 49 53 2D 39 |:NS.42:F$."MIS-9|
00001FA0: 2D 31 22 3A 89 20 32 39 39 30 00 D3 27 7E 0B 4E |-1":. 2990..'~.N|
00001FB0: 49 B2 31 32 3A 4E 53 B2 33 38 3A 46 24 B2 22 4D |I.12:NS.38:F$."M|
00001FC0: 49 53 2D 39 2D 32 22 3A 46 4D B2 31 3A 89 20 32 |IS-9-2":FM.1:. 2|
00001FD0: 39 39 30 00 FC 27 7F 0B 4E 49 B2 31 30 3A 4E 53 |990..'..NI.10:NS|
00001FE0: B2 32 30 3A 46 24 B2 22 4D 49 53 2D 39 2D 33 22 |.20:F$."MIS-9-3"|
00001FF0: 3A 46 4D B2 31 3A 89 20 32 39 39 30 00 05 28 80 |:FM.1:. 2990..(.|
00002000: 0B 46 35 B2 32 00 0B 28 AE 0B 8E 00 11 28 AF 0B |.F5.2..(.....(..|
00002010: 8F 00 17 28 B0 0B 8F 00 1D 28 B1 0B 8F 00 23 28 |...(.....(....#(|
00002020: B3 0B 80 00 29 28 B5 0B 8F 00 2F 28 B6 0B 8F 00 |....)(..../(....|
00002030: 4D 28 B7 0B 8F 20 50 52 49 4E 54 20 42 4C 41 4E |M(... PRINT BLAN|
00002040: 4B 20 46 4F 52 4D 20 4C 45 54 54 45 52 00 57 28 |K FORM LETTER.W(|
00002050: B8 0B 99 20 22 93 22 00 66 28 BA 0B 81 20 42 B2 |... ".".f(... B.|
00002060: 30 20 A4 20 4E 49 00 82 28 BD 0B 49 24 28 42 29 |0 . NI..(..I$(B)|
00002070: B2 22 2D 2D 22 AA C7 28 36 35 AA 42 29 AA 22 2D |."--"..(65.B)."-|
00002080: 2D 22 00 8A 28 C2 0B 82 20 42 00 A5 28 EA 0B 9F |-"..(... B..(...|
00002090: 20 32 2C 38 2C 32 2C 22 4F 3A 22 AA 46 24 AA 22 | 2,8,2,"O:".F$."|
000020A0: 2C 53 2C 52 22 00 C7 28 EF 0B 81 20 4B B2 30 20 |,S,R"..(... K.0 |
000020B0: A4 20 4E 53 3A 84 32 2C 41 24 3A 54 24 28 4B 29 |. NS:.2,A$:T$(K)|
000020C0: B2 41 24 3A 82 20 4B 00 CF 28 F4 0B A0 20 32 00 |.A$:. K..(... 2.|
000020D0: D5 28 12 0C 8E 00 DB 28 13 0C 8F 00 E1 28 14 0C |.(.....(.....(..|
000020E0: 8F 00 E7 28 15 0C 8F 00 00 29 1C 0C 50 32 B2 30 |...(.....)..P2.0|
000020F0: 20 3A 8B 20 46 33 B3 B1 31 20 A7 20 99 22 93 22 | :. F3..1 . ."."|
00002100: 00 0F 29 1D 0C 81 20 50 B2 30 20 A4 20 4E 53 00 |..)... P.0 . NS.|
00002110: 3C 29 21 0C 8B 20 46 41 B2 31 20 AF 20 50 B2 38 |<)!.. FA.1 . P.8|
00002120: 20 A7 20 98 34 3A 98 34 3A 98 34 2C 22 11 20 C1 | . .4:.4:.4,". .|
00002130: D4 D4 CE 3A 20 22 3B 3A 46 46 B2 31 00 63 29 22 |...: ";:FF.1.c)"|
00002140: 0C 8B 20 46 46 B2 31 20 A7 20 46 46 B2 30 3A 98 |.. FF.1 . FF.0:.|
00002150: 34 2C 22 11 22 49 24 28 50 32 29 3A 50 32 B2 50 |4,"."I$(P2):P2.P|
00002160: 32 AA 31 00 71 29 26 0C 50 52 24 B2 54 24 28 50 |2.1.q)&.PR$.T$(P|
00002170: 29 00 91 29 30 0C 8B 20 CA 28 50 52 24 2C 31 2C |)..)0.. .(PR$,1,|
00002180: 31 29 B2 22 2A 22 20 A7 20 99 3A 8D 20 34 30 30 |1)."*" . .:. 400|
00002190: 30 00 AF 29 32 0C 8B 20 CA 28 50 52 24 2C 31 2C |0..)2.. .(PR$,1,|
000021A0: 31 29 B2 22 24 22 20 A7 20 8D 20 34 35 30 30 00 |1)."$" . . 4500.|
000021B0: B7 29 44 0C 82 20 50 00 BD 29 6C 0C 8E 00 C3 29 |.)D.. P..)l....)|
000021C0: 76 0C 8F 00 C9 29 77 0C 8F 00 CF 29 78 0C 8F 00 |v....)w....)x...|
000021D0: EF 29 7F 0C 8F 20 49 20 4E 20 50 20 55 20 54 20 |.)... I N P U T |
000021E0: 20 20 52 20 4F 20 55 20 54 20 49 20 4E 20 45 00 | R O U T I N E.|
000021F0: 00 2A 80 0C 81 20 4C B2 30 20 A4 20 4E 49 AB 31 |.*... L.0 . NI.1|
00002200: 00 27 2A 85 0C 99 22 C5 4E 54 45 52 20 54 48 45 |.'*...".NTER THE|
00002210: 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 4F 46 20 | INFORMATION OF |
00002220: 22 3B 49 24 28 4C 29 00 33 2A 8A 0C 85 20 49 24 |";I$(L).3*... I$|
00002230: 28 4C 29 00 42 2A 8F 0C 99 20 22 91 91 91 20 20 |(L).B*... "... |
00002240: 20 22 00 72 2A 90 0C 99 20 22 20 20 20 20 20 20 | ".r*... " |
00002250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002270: 20 22 00 A2 2A 91 0C 99 20 22 20 20 20 20 20 20 | "..*... " |
00002280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000022A0: 20 22 00 AE 2A 92 0C 99 20 22 91 91 91 22 00 B6 | "..*... "..."..|
000022B0: 2A 94 0C 82 20 4C 00 BC 2A D0 0C 8E 00 C2 2A DB |*... L..*.....*.|
000022C0: 0C 8F 00 C8 2A DC 0C 8F 00 CE 2A DD 0C 8F 00 F1 |....*.....*.....|
000022D0: 2A E3 0C 8F 20 50 20 52 20 49 20 4E 20 54 20 54 |*... P R I N T T|
000022E0: 48 45 20 53 45 4E 44 45 52 27 53 20 53 50 45 43 |HE SENDER'S SPEC|
000022F0: 53 00 FD 2A E4 0C 9F 34 2C 34 3A 9D 34 00 0B 2B |S..*...4,4:.4..+|
00002300: E5 0C 81 20 4C B2 32 20 A4 20 37 00 4C 2B E6 0C |... L.2 . 7.L+..|
00002310: 54 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 |T$." |
00002320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002340: 20 20 20 20 20 20 20 20 20 20 20 22 00 81 2B E7 | "..+.|
00002350: 0C 51 31 B2 C3 28 53 24 28 4C 29 29 3A 51 32 B2 |.Q1..(S$(L)):Q2.|
00002360: B5 28 51 31 AD 32 29 3A 54 24 B2 CA 28 54 24 2C |.(Q1.2):T$..(T$,|
00002370: 31 2C 28 AB 51 32 AB 31 35 AA C3 28 54 24 29 29 |1,(.Q2.15..(T$))|
00002380: 29 00 94 2B E9 0C 98 34 2C 54 24 22 11 22 20 53 |)..+...4,T$"." S|
00002390: 24 28 4C 29 00 9C 2B EE 0C 82 20 4C 00 A5 2B F3 |$(L)..+... L..+.|
000023A0: 0C 46 33 B2 31 00 B2 2B F8 0C 98 34 3A 98 34 3A |.F3.1..+...4:.4:|
000023B0: 98 34 00 EE 2B FA 0C 54 24 B2 22 20 20 20 20 20 |.4..+..T$." |
000023C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000023D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000023E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 00 | "..|
000023F0: 2C FB 0C 98 34 2C 54 24 22 11 22 53 24 28 38 29 |,...4,T$"."S$(8)|
00002400: 00 0A 2C FD 0C 98 34 3A 98 34 00 10 2C 11 0D 8E |..,...4:.4..,...|
00002410: 00 16 2C 13 0D 8F 00 1C 2C 14 0D 8F 00 3E 2C 15 |..,.....,....>,.|
00002420: 0D 8F 20 43 20 4F 20 4D 20 50 20 4C 20 45 20 54 |.. C O M P L E T|
00002430: 20 45 20 20 54 48 45 20 4C 45 54 54 45 52 00 75 | E THE LETTER.u|
00002440: 2C 16 0D 54 24 B2 22 20 20 20 20 20 20 20 20 20 |,..T$." |
00002450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002470: 20 20 20 20 22 00 87 2C 17 0D 98 34 2C 54 24 22 | "..,...4,T$"|
00002480: 11 22 53 24 28 31 29 00 B2 2C 18 0D 8B 20 46 4A |."S$(1)..,... FJ|
00002490: B2 31 20 A7 20 46 4A B2 30 3A 98 34 2C 54 24 22 |.1 . FJ.0:.4,T$"|
000024A0: 11 22 49 24 28 4E 49 AB 31 29 3A 4E 49 B2 4E 49 |."I$(NI.1):NI.NI|
000024B0: AB 31 00 CC 2C 1A 0D 8B 20 46 41 B2 31 20 A7 20 |.1..,... FA.1 . |
000024C0: 46 41 B2 30 3A 4E 49 B2 4E 49 AB 31 00 D3 2C 20 |FA.0:NI.NI.1.., |
000024D0: 0D A0 34 00 D9 2C 34 0D 8E 00 DF 2C 3F 0D 8F 00 |..4..,4....,?...|
000024E0: E5 2C 40 0D 8F 00 EB 2C 41 0D 8F 00 08 2D 47 0D |.,@....,A....-G.|
000024F0: 8F 20 42 4C 41 4E 4B 20 4C 45 54 54 45 52 20 54 |. BLANK LETTER T|
00002500: 4F 20 53 43 52 45 45 4E 00 21 2D 48 0D 50 32 B2 |O SCREEN.!-H.P2.|
00002510: 30 20 3A 8B 20 46 33 B3 B1 31 20 A7 20 99 22 93 |0 :. F3..1 . .".|
00002520: 22 00 30 2D 49 0D 81 20 50 B2 30 20 A4 20 4E 53 |".0-I.. P.0 . NS|
00002530: 00 58 2D 4D 0D 8B 20 46 41 B2 31 20 AF 20 50 B2 |.X-M.. FA.1 . P.|
00002540: 38 20 A7 20 99 3A 99 3A 99 22 20 C1 D4 D4 CE 3A |8 . .:.:." ....:|
00002550: 20 22 3B 3A 46 46 B2 31 00 7B 2D 4E 0D 8B 20 46 | ";:FF.1.{-N.. F|
00002560: 46 B2 31 20 A7 20 46 46 46 B2 30 3A 99 49 24 28 |F.1 . FFF.0:.I$(|
00002570: 50 32 29 3A 50 32 B2 50 32 AA 31 00 89 2D 52 0D |P2):P2.P2.1..-R.|
00002580: 50 52 24 B2 54 24 28 50 29 00 A9 2D 5C 0D 8B 20 |PR$.T$(P)..-\.. |
00002590: CA 28 50 52 24 2C 31 2C 31 29 B2 22 2A 22 20 A7 |.(PR$,1,1)."*" .|
000025A0: 20 99 3A 8D 20 35 30 30 30 00 C7 2D 5E 0D 8B 20 | .:. 5000..-^.. |
000025B0: CA 28 50 52 24 2C 31 2C 31 29 B2 22 24 22 20 A7 |.(PR$,1,1)."$" .|
000025C0: 20 8D 20 35 35 30 30 00 CF 2D 70 0D 82 20 50 00 | . 5500..-p.. P.|
000025D0: EA 2D 7A 0D 8B 20 46 4A B2 31 20 A7 20 99 20 54 |.-z.. FJ.1 . . T|
000025E0: 24 20 49 24 28 4E 49 AB 31 29 00 F0 2D 98 0D 8E |$ I$(NI.1)..-...|
000025F0: 00 F6 2D A2 0D 8F 00 FC 2D A3 0D 8F 00 02 2E A4 |..-.....-.......|
00002600: 0D 8F 00 08 2E A5 0D 8F 00 27 2E AB 0D 8F 20 53 |.........'.... S|
00002610: 41 4D 45 20 4C 45 54 54 45 52 2C 20 4E 45 57 20 |AME LETTER, NEW |
00002620: 41 44 44 52 45 53 53 00 30 2E AC 0D 99 22 93 22 |ADDRESS.0...."."|
00002630: 00 3A 2E B1 0D 99 3A 99 3A 99 00 61 2E B6 0D 99 |.:....:.:..a....|
00002640: 22 20 20 20 20 31 29 20 D3 41 4D 45 20 4C 45 54 |" 1) .AME LET|
00002650: 54 45 52 2C 4E 45 57 20 41 44 44 52 45 53 53 20 |TER,NEW ADDRESS |
00002660: 22 00 82 2E B8 0D 99 22 20 20 20 20 32 29 20 D2 |"......" 2) .|
00002670: C5 D4 D5 D2 CE 20 54 4F 20 4D 41 49 4E 20 4D 45 |..... TO MAIN ME|
00002680: 4E 55 00 9C 2E BA 0D 99 22 20 20 20 20 33 29 20 |NU......" 3) |
00002690: C5 D8 C9 D4 20 50 52 4F 47 52 41 4D 00 A6 2E BE |.... PROGRAM....|
000026A0: 0D 99 3A 99 3A 99 00 D6 2E C0 0D 99 22 C5 4E 54 |..:.:.......".NT|
000026B0: 45 52 20 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 |ER THE NUMBER OF|
000026C0: 20 54 48 45 20 44 45 53 49 52 45 44 20 46 55 4E | THE DESIRED FUN|
000026D0: 43 54 49 4F 4E 22 00 FB 2E C5 0D A1 20 59 30 24 |CTION"...... Y0$|
000026E0: 3A 8B 20 59 30 24 B3 22 31 22 20 B0 20 59 30 24 |:. Y0$."1" . Y0$|
000026F0: B1 22 33 22 20 A7 20 33 35 32 35 00 09 2F C6 0D |."3" . 3525../..|
00002700: 59 30 B2 C5 28 59 30 24 29 00 23 2F C8 0D 91 20 |Y0..(Y0$).#/... |
00002710: 59 30 20 89 20 33 35 34 30 2C 33 35 34 32 2C 33 |Y0 . 3540,3542,3|
00002720: 35 34 34 00 33 2F D4 0D 46 35 B2 31 3A 89 20 33 |544.3/..F5.1:. 3|
00002730: 35 38 30 00 43 2F D6 0D 46 35 B2 32 3A 89 20 33 |580.C/..F5.2:. 3|
00002740: 35 38 30 00 53 2F D8 0D 46 35 B2 33 3A 89 20 33 |580.S/..F5.3:. 3|
00002750: 35 38 30 00 59 2F FC 0D 8E 00 5F 2F 07 0E 8F 00 |580.Y/...._/....|
00002760: 65 2F 08 0E 8F 00 6B 2F 09 0E 8F 00 8A 2F 0F 0E |e/....k/...../..|
00002770: 8F 20 20 45 20 44 20 49 20 54 20 20 20 52 20 4F |. E D I T R O|
00002780: 20 55 20 54 20 49 20 4E 20 45 00 B6 2F 10 0E 99 | U T I N E../...|
00002790: 3A 99 22 C4 4F 20 59 4F 55 20 4E 45 45 44 20 54 |:.".O YOU NEED T|
000027A0: 4F 20 45 44 49 54 20 41 4E 20 45 4E 54 52 59 3F |O EDIT AN ENTRY?|
000027B0: 28 D9 2F CE 29 22 00 DC 2F 15 0E A1 20 4E 24 3A |(./.)"../... N$:|
000027C0: 8B 20 4E 24 B3 B1 22 59 22 20 AF 20 4E 24 B3 B1 |. N$.."Y" . N$..|
000027D0: 22 4E 22 20 A7 20 89 20 33 36 30 35 00 F2 2F 18 |"N" . . 3605../.|
000027E0: 0E 8B 20 4E 24 B2 22 4E 22 20 A7 20 89 20 33 36 |.. N$."N" . . 36|
000027F0: 38 30 00 23 30 1A 0E 99 22 93 22 3A 99 3A 99 22 |80.#0...".":.:."|
00002800: 20 20 C8 45 52 45 20 49 53 20 57 48 41 54 20 59 | .ERE IS WHAT Y|
00002810: 4F 55 20 48 41 56 45 20 45 4E 54 45 52 45 44 2E |OU HAVE ENTERED.|
00002820: 22 3A 99 00 34 30 1F 0E 81 20 45 B2 30 20 A4 20 |":..40... E.0 . |
00002830: 4E 49 AB 31 00 51 30 21 0E 99 22 20 28 22 AA C7 |NI.1.Q0!.." ("..|
00002840: 28 36 35 AA 45 29 AA 22 29 20 22 AA 49 24 28 45 |(65.E).") ".I$(E|
00002850: 29 00 59 30 23 0E 82 20 45 00 89 30 25 0E 99 3A |).Y0#.. E..0%..:|
00002860: 99 22 C5 4E 54 45 52 20 54 48 45 20 4C 45 54 54 |.".NTER THE LETT|
00002870: 45 52 20 4F 46 20 45 4E 54 52 59 20 54 4F 20 42 |ER OF ENTRY TO B|
00002880: 45 20 45 44 49 54 45 44 22 00 9A 30 28 0E 45 31 |E EDITED"..0(.E1|
00002890: 24 B2 C7 28 36 35 AA 4E 49 29 00 C0 30 29 0E A1 |$..(65.NI)..0)..|
000028A0: 20 45 30 24 3A 8B 20 45 30 24 B3 22 41 22 B0 20 | E0$:. E0$."A". |
000028B0: 45 30 24 B1 45 31 24 20 A7 20 89 20 33 36 32 35 |E0$.E1$ . . 3625|
000028C0: 00 D1 30 2B 0E 45 44 B2 C6 28 45 30 24 29 AB 36 |..0+.ED..(E0$).6|
000028D0: 35 00 FD 30 2E 0E 99 22 93 22 3A 99 3A 99 49 24 |5..0...".":.:.I$|
000028E0: 28 45 44 29 3A 99 3A 99 22 20 D9 4F 55 20 4D 41 |(ED):.:." .OU MA|
000028F0: 59 20 4E 4F 57 20 45 44 49 54 22 3A 99 00 0A 31 |Y NOW EDIT":...1|
00002900: 31 0E 85 20 49 24 28 45 44 29 00 10 31 33 0E 99 |1.. I$(ED)..13..|
00002910: 00 38 31 36 0E 99 22 C9 53 20 54 48 45 52 45 20 |.816..".S THERE |
00002920: 4D 4F 52 45 20 54 4F 20 42 45 20 45 44 49 54 45 |MORE TO BE EDITE|
00002930: 44 3F 28 D9 2F CE 29 22 00 5E 31 38 0E A1 20 4E |D?(./.)".^18.. N|
00002940: 24 3A 8B 20 4E 24 B3 B1 22 59 22 20 AF 20 4E 24 |$:. N$.."Y" . N$|
00002950: B3 B1 22 4E 22 20 A7 20 89 20 33 36 34 30 00 74 |.."N" . . 3640.t|
00002960: 31 3B 0E 8B 20 4E 24 B2 22 59 22 20 A7 20 89 20 |1;.. N$."Y" . . |
00002970: 33 36 31 30 00 7A 31 60 0E 8E 00 80 31 6F 0E 8F |3610.z1`....1o..|
00002980: 00 86 31 70 0E 8F 00 B1 31 73 0E 8F 20 53 20 54 |..1p....1s.. S T|
00002990: 20 52 20 49 20 4E 20 47 20 20 4C 20 45 20 4E 20 | R I N G L E N |
000029A0: 47 20 54 20 48 20 20 20 43 20 48 20 45 20 43 20 |G T H C H E C |
000029B0: 4B 00 BF 31 74 0E 99 C3 28 49 24 28 4C 29 29 00 |K..1t...(I$(L)).|
000029C0: 01 32 79 0E 8B 20 C3 28 49 24 28 4C 29 29 20 B1 |.2y.. .(I$(L)) .|
000029D0: 20 37 39 20 A7 20 99 22 20 20 D9 CF D5 D2 20 C5 | 79 . ." .... .|
000029E0: CE D4 D2 D9 20 C9 D3 20 D4 CF CF A0 CC CF CE C7 |.... .. ........|
000029F0: 22 3A 49 24 28 4C 29 B2 22 20 22 3A 4C B2 4C AB |":I$(L)." ":L.L.|
00002A00: 31 00 07 32 A6 0E 8E 00 14 32 D8 0E 99 22 93 22 |1..2.....2..."."|
00002A10: 3A 99 3A 99 00 39 32 E2 0E 99 22 20 20 20 20 20 |:.:..92..." |
00002A20: 20 20 20 20 20 C3 20 20 C1 20 20 D5 20 20 D4 20 | . . . . |
00002A30: 20 C9 20 20 CF 20 20 CE 22 00 43 32 E3 0E 99 3A | . . .".C2...:|
00002A40: 99 3A 99 00 8E 32 EC 0E 99 22 20 20 31 29 20 D4 |.:...2..." 1) .|
00002A50: 4F 20 49 4E 43 4C 55 44 45 20 41 20 43 4F 4D 4D |O INCLUDE A COMM|
00002A60: 41 28 2C 29 20 4F 52 20 41 20 43 4F 4C 4F 4E 28 |A(,) OR A COLON(|
00002A70: 3A 29 20 20 20 20 20 20 49 4E 20 59 4F 55 52 20 |:) IN YOUR |
00002A80: 45 4E 54 52 59 2C 20 42 45 47 49 4E 22 3B 00 B1 |ENTRY, BEGIN";..|
00002A90: 32 EE 0E 99 22 20 49 54 20 57 49 54 48 20 4F 50 |2..." IT WITH OP|
00002AA0: 45 4E 20 20 20 20 20 20 20 51 55 4F 54 45 53 2E |EN QUOTES.|
00002AB0: 22 00 F8 32 EF 0E 99 3A 99 22 20 20 32 29 20 D4 |"..2...:." 2) .|
00002AC0: 4F 20 45 4E 54 45 52 20 41 20 C2 CC C1 CE CB 20 |O ENTER A ..... |
00002AD0: 4C 49 4E 45 2C 20 4A 55 53 54 20 54 59 50 45 20 |LINE, JUST TYPE |
00002AE0: 20 20 20 20 20 20 20 49 4E 20 4F 50 45 4E 20 51 | IN OPEN Q|
00002AF0: 55 4F 54 45 53 2C 22 3B 00 21 33 F0 0E 99 22 20 |UOTES,";.!3..." |
00002B00: 41 4E 44 20 54 48 45 4E 20 50 52 45 53 53 20 20 |AND THEN PRESS |
00002B10: 20 20 20 20 20 20 20 20 3C D2 C5 D4 D5 D2 CE 3E | <......>|
00002B20: 22 00 69 33 F2 0E 99 3A 99 22 20 20 33 29 20 D9 |".i3...:." 3) .|
00002B30: 4F 55 52 20 45 4E 54 52 59 20 CD D5 D3 D4 A0 42 |OUR ENTRY .....B|
00002B40: 45 20 4C 45 53 53 20 54 48 41 4E 20 45 49 47 48 |E LESS THAN EIGH|
00002B50: 54 59 20 20 20 20 20 20 43 48 41 52 41 43 54 45 |TY CHARACTE|
00002B60: 52 53 20 4C 4F 4E 47 22 3B 00 94 33 F4 0E 99 22 |RS LONG";..3..."|
00002B70: 2C 20 4F 52 20 49 54 20 57 49 4C 4C 20 42 45 20 |, OR IT WILL BE |
00002B80: 20 20 20 20 20 20 20 20 20 54 52 55 4E 43 41 54 | TRUNCAT|
00002B90: 45 44 2E 22 00 C2 33 1E 0F 99 3A 99 3A 99 22 20 |ED."..3...:.:." |
00002BA0: 20 20 20 20 20 D0 52 45 53 53 20 41 4E 59 20 CC | .RESS ANY .|
00002BB0: C5 D4 D4 C5 D2 20 54 4F 20 43 4F 4E 54 49 4E 55 |..... TO CONTINU|
00002BC0: 45 22 00 EB 33 28 0F A1 20 4E 30 24 20 3A 8B 20 |E"..3(.. N0$ :. |
00002BD0: 4E 30 24 B1 22 5A 22 20 B0 20 4E 30 24 20 B3 22 |N0$."Z" . N0$ ."|
00002BE0: 41 22 20 A7 20 89 20 33 38 38 30 00 F1 33 32 0F |A" . . 3880..32.|
00002BF0: 8E 00 F7 33 97 0F 8F 00 FD 33 98 0F 8F 00 03 34 |...3.....3.....4|
00002C00: 99 0F 8F 00 0F 34 A0 0F 4C B2 32 3A 52 B2 32 00 |.....4..L.2:R.2.|
00002C10: 4A 34 A1 0F 8B 20 CA 28 50 52 24 2C C3 28 50 52 |J4... .(PR$,.(PR|
00002C20: 24 29 2C 31 29 B2 22 2A 22 20 A7 20 50 52 24 B2 |$),1)."*" . PR$.|
00002C30: CA 28 50 52 24 2C 4C 2C 28 AB 52 AA C3 28 50 52 |.(PR$,L,(.R..(PR|
00002C40: 24 29 29 29 3A 46 50 52 B2 31 00 68 34 A2 0F 8B |$))):FPR.1.h4...|
00002C50: 20 46 50 52 B2 31 20 A7 20 46 50 52 B2 30 3A 98 | FPR.1 . FPR.0:.|
00002C60: 34 2C 22 11 22 50 52 24 00 A3 34 AA 0F 8B 20 CA |4,"."PR$..4... .|
00002C70: 28 50 52 24 2C C3 28 50 52 24 29 2C 31 29 B2 22 |(PR$,.(PR$),1)."|
00002C80: 26 22 20 A7 20 50 52 24 B2 CA 28 50 52 24 2C 4C |&" . PR$..(PR$,L|
00002C90: 2C 28 AB 52 AA C3 28 50 52 24 29 29 29 3A 46 50 |,(.R..(PR$))):FP|
00002CA0: 52 B2 31 00 C2 34 AC 0F 8B 20 46 50 52 B2 31 20 |R.1..4... FPR.1 |
00002CB0: A7 20 46 50 52 B2 30 3A 98 34 2C 22 11 22 50 52 |. FPR.0:.4,"."PR|
00002CC0: 24 3B 00 FC 34 B4 0F 8B 20 CA 28 50 52 24 2C C3 |$;..4... .(PR$,.|
00002CD0: 28 50 52 24 29 2C 31 29 B2 22 24 22 20 A7 20 50 |(PR$),1)."$" . P|
00002CE0: 52 24 B2 CA 28 50 52 24 2C 4C 2C 28 AB 52 AA C3 |R$..(PR$,L,(.R..|
00002CF0: 28 50 52 24 29 29 29 3A 46 31 B2 31 00 2F 35 B5 |(PR$))):F1.1./5.|
00002D00: 0F 8B 20 46 31 B2 31 A7 20 46 31 B2 30 3A 98 34 |.. F1.1. F1.0:.4|
00002D10: 2C 22 11 22 20 50 52 24 3B 3A 98 34 2C 22 11 22 |,"." PR$;:.4,"."|
00002D20: 49 24 28 50 32 29 3B 3A 50 32 B2 50 32 AA 31 00 |I$(P2);:P2.P2.1.|
00002D30: 35 35 FA 0F 8E 00 70 35 94 11 8B 20 CA 28 50 52 |55....p5... .(PR|
00002D40: 24 2C C3 28 50 52 24 29 2C 31 29 B2 22 2A 22 20 |$,.(PR$),1)."*" |
00002D50: A7 20 50 52 24 B2 CA 28 50 52 24 2C 4C 2C 28 AB |. PR$..(PR$,L,(.|
00002D60: 52 AA C3 28 50 52 24 29 29 29 3A 46 50 52 B2 31 |R..(PR$))):FPR.1|
00002D70: 00 8E 35 96 11 8B 20 46 50 52 B2 31 20 A7 20 46 |..5... FPR.1 . F|
00002D80: 50 52 B2 30 3A 98 34 2C 22 11 22 50 52 24 00 C9 |PR.0:.4,"."PR$..|
00002D90: 35 9E 11 8B 20 CA 28 50 52 24 2C C3 28 50 52 24 |5... .(PR$,.(PR$|
00002DA0: 29 2C 31 29 B2 22 26 22 20 A7 20 50 52 24 B2 CA |),1)."&" . PR$..|
00002DB0: 28 50 52 24 2C 4C 2C 28 AB 52 AA C3 28 50 52 24 |(PR$,L,(.R..(PR$|
00002DC0: 29 29 29 3A 46 50 52 B2 31 00 E8 35 A0 11 8B 20 |))):FPR.1..5... |
00002DD0: 46 50 52 B2 31 20 A7 20 46 50 52 B2 30 3A 98 34 |FPR.1 . FPR.0:.4|
00002DE0: 2C 22 11 22 50 52 24 3B 00 22 36 A8 11 8B 20 CA |,"."PR$;."6... .|
00002DF0: 28 50 52 24 2C C3 28 50 52 24 29 2C 31 29 B2 22 |(PR$,.(PR$),1)."|
00002E00: 24 22 20 A7 20 50 52 24 B2 CA 28 50 52 24 2C 4C |$" . PR$..(PR$,L|
00002E10: 2C 28 AB 52 AA C3 28 50 52 24 29 29 29 3A 46 32 |,(.R..(PR$))):F2|
00002E20: B2 31 00 54 36 A9 11 8B 20 46 32 B2 31 A7 20 46 |.1.T6... F2.1. F|
00002E30: 32 B2 30 3A 98 34 2C 22 11 22 50 52 24 3B 3A 98 |2.0:.4,"."PR$;:.|
00002E40: 34 2C 22 11 22 49 24 28 50 32 29 3B 3A 50 32 B2 |4,"."I$(P2);:P2.|
00002E50: 50 32 AA 31 00 5A 36 EE 11 8E 00 66 36 88 13 4C |P2.1.Z6....f6..L|
00002E60: B2 32 3A 52 B2 32 00 A2 36 89 13 8B 20 CA 28 50 |.2:R.2..6... .(P|
00002E70: 52 24 2C C3 28 50 52 24 29 2C 31 29 B2 22 2A 22 |R$,.(PR$),1)."*"|
00002E80: 20 A7 20 50 52 24 B2 CA 28 50 52 24 2C 4C 2C 28 | . PR$..(PR$,L,(|
00002E90: AB 52 AA C3 28 50 52 24 29 29 29 3A 99 20 50 52 |.R..(PR$))):. PR|
00002EA0: 24 3B 00 DE 36 92 13 8B 20 CA 28 50 52 24 2C C3 |$;..6... .(PR$,.|
00002EB0: 28 50 52 24 29 2C 31 29 B2 22 26 22 20 A7 20 50 |(PR$),1)."&" . P|
00002EC0: 52 24 B2 CA 28 50 52 24 2C 4C 2C 28 AB 52 AA C3 |R$..(PR$,L,(.R..|
00002ED0: 28 50 52 24 29 29 29 3A 99 20 50 52 24 3B 00 18 |(PR$))):. PR$;..|
00002EE0: 37 9C 13 8B 20 CA 28 50 52 24 2C C3 28 50 52 24 |7... .(PR$,.(PR$|
00002EF0: 29 2C 31 29 B2 22 24 22 20 A7 20 50 52 24 B2 CA |),1)."$" . PR$..|
00002F00: 28 50 52 24 2C 4C 2C 28 AB 52 AA C3 28 50 52 24 |(PR$,L,(.R..(PR$|
00002F10: 29 29 29 3A 46 31 B2 31 00 42 37 9D 13 8B 20 46 |))):F1.1.B7... F|
00002F20: 31 B2 31 A7 20 46 31 B2 30 3A 99 20 50 52 24 3B |1.1. F1.0:. PR$;|
00002F30: 3A 99 20 49 24 28 50 32 29 3B 3A 50 32 B2 50 32 |:. I$(P2);:P2.P2|
00002F40: AA 31 00 48 37 E2 13 8E 00 84 37 7C 15 8B 20 CA |.1.H7.....7|.. .|
00002F50: 28 50 52 24 2C C3 28 50 52 24 29 2C 31 29 B2 22 |(PR$,.(PR$),1)."|
00002F60: 2A 22 20 A7 20 50 52 24 B2 CA 28 50 52 24 2C 4C |*" . PR$..(PR$,L|
00002F70: 2C 28 AB 52 AA C3 28 50 52 24 29 29 29 3A 99 20 |,(.R..(PR$))):. |
00002F80: 50 52 24 3B 00 C0 37 86 15 8B 20 CA 28 50 52 24 |PR$;..7... .(PR$|
00002F90: 2C C3 28 50 52 24 29 2C 31 29 B2 22 26 22 20 A7 |,.(PR$),1)."&" .|
00002FA0: 20 50 52 24 B2 CA 28 50 52 24 2C 4C 2C 28 AB 52 | PR$..(PR$,L,(.R|
00002FB0: AA C3 28 50 52 24 29 29 29 3A 99 20 50 52 24 3B |..(PR$))):. PR$;|
00002FC0: 00 FA 37 90 15 8B 20 CA 28 50 52 24 2C C3 28 50 |..7... .(PR$,.(P|
00002FD0: 52 24 29 2C 31 29 B2 22 24 22 20 A7 20 50 52 24 |R$),1)."$" . PR$|
00002FE0: B2 CA 28 50 52 24 2C 4C 2C 28 AB 52 AA C3 28 50 |..(PR$,L,(.R..(P|
00002FF0: 52 24 29 29 29 3A 46 32 B2 31 00 24 38 91 15 8B |R$))):F2.1.$8...|
00003000: 20 46 32 B2 31 A7 20 46 32 B2 30 3A 99 20 50 52 | F2.1. F2.0:. PR|
00003010: 24 3B 3A 99 20 49 24 28 50 32 29 3B 3A 50 32 B2 |$;:. I$(P2);:P2.|
00003020: 50 32 AA 31 00 2A 38 D6 15 8E 00 4C 38 83 4E 9F |P2.1.*8....L8.N.|
00003030: 31 35 2C 38 2C 31 35 3A 86 20 41 24 28 33 30 29 |15,8,15:. A$(30)|
00003040: 3A 46 24 B2 22 50 41 59 2D 53 32 22 00 68 38 84 |:F$."PAY-S2".h8.|
00003050: 4E 9F 20 32 2C 38 2C 32 2C 22 40 4F 3A 22 AA 46 |N. 2,8,2,"@O:".F|
00003060: 24 AA 22 2C 53 2C 57 22 00 7D 38 85 4E 8D 34 30 |$.",S,W".}8.N.40|
00003070: 30 30 30 3A 49 B2 30 3A 4E 53 B2 32 34 00 83 38 |000:I.0:NS.24..8|
00003080: 89 4E 8C 00 A1 38 8E 4E 87 20 41 24 3A 8B 20 41 |.N...8.N. A$:. A|
00003090: 24 B3 B1 22 45 4F 46 22 A7 20 89 20 32 30 32 30 |$.."EOF". . 2020|
000030A0: 30 00 BD 38 98 4E 8B 20 41 24 B2 22 45 4F 46 22 |0..8.N. A$."EOF"|
000030B0: 20 A7 20 A0 32 3A 89 20 32 30 32 34 39 00 CF 38 | . .2:. 20249..8|
000030C0: E8 4E 98 32 2C 41 24 3A 89 20 32 30 31 31 30 00 |.N.2,A$:. 20110.|
000030D0: EA 38 19 4F 9F 20 32 2C 38 2C 32 2C 22 4F 3A 22 |.8.O. 2,8,2,"O:"|
000030E0: AA 46 24 AA 22 2C 53 2C 52 22 00 0C 39 1A 4F 81 |.F$.",S,R"..9.O.|
000030F0: 20 4B B2 30 20 A4 20 4E 53 3A 84 32 2C 41 24 28 | K.0 . NS:.2,A$(|
00003100: 4B 29 3A 99 41 24 28 4B 29 3A 82 4B 00 18 39 42 |K):.A$(K):.K..9B|
00003110: 4F 83 20 22 2A 20 24 22 00 24 39 43 4F 83 20 22 |O. "* $".$9CO. "|
00003120: 24 20 2A 22 00 30 39 44 4F 83 20 22 2A 20 24 22 |$ *".09DO. "* $"|
00003130: 00 3C 39 45 4F 83 20 22 24 20 2A 22 00 48 39 46 |.<9EO. "$ *".H9F|
00003140: 4F 83 20 22 2A 20 24 22 00 54 39 47 4F 83 20 22 |O. "* $".T9GO. "|
00003150: 24 20 2A 22 00 60 39 48 4F 83 20 22 2A 20 24 22 |$ *".`9HO. "* $"|
00003160: 00 6C 39 49 4F 83 20 22 24 20 2A 22 00 7A 39 4A |.l9IO. "$ *".z9J|
00003170: 4F 83 20 22 2A 20 20 20 2A 22 00 8B 39 4C 4F 83 |O. "* *"..9LO.|
00003180: 20 22 2A 20 44 45 41 52 20 24 22 00 98 39 4D 4F | "* DEAR $"..9MO|
00003190: 83 20 22 24 3B 20 2A 22 00 A5 39 4E 4F 83 20 22 |. "$; *"..9NO. "|
000031A0: 2A 20 20 2A 22 00 D5 39 4F 4F 83 20 22 2A 20 20 |* *"..9OO. "* |
000031B0: 20 20 20 54 48 41 4E 4B 20 59 4F 55 20 46 4F 52 | THANK YOU FOR|
000031C0: 20 59 4F 55 52 20 43 48 45 51 55 45 20 44 41 54 | YOUR CHEQUE DAT|
000031D0: 45 44 20 24 22 00 E6 39 50 4F 83 20 22 24 20 46 |ED $"..9PO. "$ F|
000031E0: 4F 52 20 24 24 22 00 F2 39 51 4F 83 20 22 24 2E |OR $$"..9QO. "$.|
000031F0: 2A 22 00 01 3A 53 4F 83 20 22 2A 20 20 20 20 2A |*"..:SO. "* *|
00003200: 22 00 3B 3A 54 4F 83 20 22 2A 20 20 20 20 20 53 |".;:TO. "* S|
00003210: 48 4F 55 4C 44 20 59 4F 55 20 52 45 51 55 49 52 |HOULD YOU REQUIR|
00003220: 45 20 41 4E 59 20 41 44 44 49 54 49 4F 4E 41 4C |E ANY ADDITIONAL|
00003230: 20 50 52 4F 44 55 43 54 53 26 22 00 67 3A 55 4F | PRODUCTS&".g:UO|
00003240: 83 20 22 24 20 50 4C 45 41 53 45 20 44 4F 20 4E |. "$ PLEASE DO N|
00003250: 4F 54 20 48 45 53 49 54 41 54 45 20 54 4F 20 43 |OT HESITATE TO C|
00003260: 41 4C 4C 2E 20 2A 22 00 74 3A 56 4F 83 20 22 2A |ALL. *".t:VO. "*|
00003270: 20 20 2A 22 00 B7 3A 57 4F 8F 20 20 20 20 20 44 | *"..:WO. D|
00003280: 41 54 41 20 22 2A 20 20 20 4F 55 52 20 52 45 43 |ATA "* OUR REC|
00003290: 4F 52 44 53 20 44 4F 20 4E 4F 54 20 49 4E 44 49 |ORDS DO NOT INDI|
000032A0: 43 41 54 45 20 54 48 41 54 20 57 45 20 4F 52 44 |CATE THAT WE ORD|
000032B0: 45 52 45 44 20 24 22 00 E1 3A 58 4F 8F 20 20 20 |ERED $"..:XO. |
000032C0: 44 41 54 41 20 22 24 20 46 4F 52 20 54 48 49 53 |DATA "$ FOR THIS|
000032D0: 20 41 4D 4F 55 4E 54 20 44 55 52 49 4E 47 20 2A | AMOUNT DURING *|
000032E0: 22 00 27 3B 59 4F 8F 20 20 44 41 54 41 20 22 2A |".';YO. DATA "*|
000032F0: 54 48 41 54 20 4D 4F 4E 54 48 2E 20 57 49 4C 4C |THAT MONTH. WILL|
00003300: 20 59 4F 55 20 50 4C 45 41 53 45 20 43 48 45 43 | YOU PLEASE CHEC|
00003310: 4B 20 41 4E 44 20 53 45 45 20 49 46 20 41 4E 20 |K AND SEE IF AN |
00003320: 45 52 52 4F 52 26 22 00 4F 3B 5B 4F 8F 20 20 44 |ERROR&".O;[O. D|
00003330: 41 54 41 20 22 24 20 48 41 53 20 42 45 45 4E 20 |ATA "$ HAS BEEN |
00003340: 4D 41 44 45 20 49 4E 20 59 4F 55 52 20 2A 22 00 |MADE IN YOUR *".|
00003350: 6F 3B 5C 4F 8F 20 20 44 41 54 41 20 22 2A 53 54 |o;\O. DATA "*ST|
00003360: 41 54 45 4D 45 4E 54 53 2E 20 20 20 20 2A 22 00 |ATEMENTS. *".|
00003370: 83 3B 5D 4F 8F 20 44 41 54 41 20 22 2A 20 20 20 |.;]O. DATA "* |
00003380: 20 2A 22 00 99 3B 5E 4F 8F 20 20 20 44 41 54 41 | *"..;^O. DATA|
00003390: 20 22 2A 20 20 20 20 2A 22 00 AF 3B 5F 4F 8F 20 | "* *"..;_O. |
000033A0: 20 20 44 41 54 41 20 22 2A 20 20 20 20 2A 22 00 | DATA "* *".|
000033B0: F3 3B 65 4F 83 20 22 2A 20 20 20 20 20 20 20 20 |.;eO. "* |
000033C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000033D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000033E0: 59 4F 55 52 53 20 56 45 52 59 20 54 52 55 4C 59 |YOURS VERY TRULY|
000033F0: 20 2A 22 00 02 3C 66 4F 83 20 22 2A 20 20 20 20 | *"..<fO. "* |
00003400: 2A 22 00 11 3C 67 4F 83 20 22 2A 20 20 20 20 2A |*"..<gO. "* *|
00003410: 22 00 20 3C 68 4F 83 20 22 2A 20 20 20 20 2A 22 |". <hO. "* *"|
00003420: 00 2F 3C 69 4F 83 20 22 2A 20 20 20 20 2A 22 00 |./<iO. "* *".|
00003430: 3B 3C 78 4F 83 20 22 45 4F 46 22 00 50 3C 30 75 |;<xO. "EOF".P<0u|
00003440: 81 20 49 B2 31 A4 37 3A 99 53 24 28 49 29 3A 82 |. I.1.7:.S$(I):.|
00003450: 00 56 3C 3A 75 8E 00 6E 3C 40 9C 84 31 35 2C 45 |.V<:u..n<@..15,E|
00003460: 31 24 2C 45 32 24 2C 45 33 24 2C 45 34 24 00 8D |1$,E2$,E3$,E4$..|
00003470: 3C 4A 9C 8B C5 28 45 31 24 29 B1 30 A7 99 45 31 |<J...(E1$).0..E1|
00003480: 24 2C 45 32 24 2C 45 33 24 2C 45 34 24 00 93 3C |$,E2$,E3$,E4$..<|
00003490: 54 9C 8E 00 00 00 |T..... |
....D.. 1000:. INITIALIZATION.;.I.. 3800
:. CAUTION MESSAGES.U.N.. 1200:. USER'S
SPECS.H.X.. GOSUB 30000...... 1300:. DI
SPLAY MAIN MENU...... 1400:. DISPLAY SUB
MMENU...... F5.2 . F5.0:. 130...... 1500
:. CHOOSE LETTER OPTIONS...... 3000:. PR
EPARE BLANK INSERTS./. .. 3400:. DISPLAY
BLANK LETTER TO SCREEN.K.... 3200 :. IN
PUT ROUTINE.N.... 3400:. DISPLAY FILLED
LETTER...... 3600:. E D I T ROUTINE....
.. FM.1 . .4,4:.4:. 180.A.... OPE
N4,4:CMD4...... 3300:. PRINT SENDER'S SP
ECS...... 3100:. PRINT LETTER & INPUT.&.
... 3350:. COMPLETE THE LETTER.P.C.. 350
0:. SAME LETTER,NEW ADDRESS MENU.H.H.. F
5.1 . F5.0:. 145...J.. F5.2 . F5.0:FM.0:
. 130...L.. F5.3 . F5.0:. 990...........
..............W.... I N I T I A L I Z A
T I O N...... S$(20),T$(50),I$(30).$...T
$."
".*.B...0.C...6.D...<.E...T.... ENTER
USER SPEC'S.]....".".W.....8)"ENTER YOU
R NAME"...... .8)" (FIRSTNAME,SURNAME)".
..... S$(1)......".".P.... .6)"ENTER YOU
R COMPANY NAME "...B.. S$(2)...D.."."...
H.. .6)"ENTER YOUR COMPANY ADDRESS ".+.J
...6) "(#,STREET,SUITE#)".7.L.. S$(3).
@.N..".".^.R.. .6) "ENTER YOUR CITY ".J
.T.. S$(4)...U.. .6) "ENTER YOUR PROVIN
CE OR STATE". .V.. S$(5).E.W.S$(4).S$(4)
.", ".S$(5):S$(6)." ".N.X.."."...... .6)
"ENTER YOUR POSTAL CODE"...... S$(5)...
...".".".... .6) "ENTER THE DATE ".?....
.6) "(MONTH,DAY,YEAR)".K.... S$(8).T...
."."...... .6) "ENTER YOUR COMPANY PHONE
NUMBER "...... S$(7)...................
........... DISPLAY MAIN MENU......".":.
.2)" F O R M L E T T E R S M E N U
".".... .2)"****************************
*******":..=.... " (A) FAVOUR LETTER".Y.
... " (B) INQUIRY LETTER".U.... " (C) PA
YMENT LETTER"...... " (D) SALES LETTER".
..... " (E) CREDIT LETTER".H.!.. " (F) C
OMPLAINT LETTER"...#.. " (G) COLLECTION
LETTER"...%.. " (H) APPLICATION LETTER".
".'.. " (I) MISCELLANEOUS".<.).. " (J) E
XIT PROGRAM".Y.-..:."ENTER THE LETTER OF
THE DESIRED TYPE OF FORM LETTER"..N...
..O.....P.....Q.....X.E1$.G(65.10).I.Z..
E0$:. E0$."A" . E0$.E1$ . . 1402.Z.|.X0
.F(E0$).64...... X0 . 2100,2200,2300,240
0,2500,2600,2700,2800,2900,2995...R...#.
S...).T.../.U...K.... CHOOSE LETTER OPTI
ONS.V....".":....... " OPTIONAL INSERTIO
NS TO THE LETTER"...... "***************
********************":.:..T.... " (1) IN
SERT 'ATTN:' CLAUSE"...... " (2) INSERT
YOUR JOB TITLE"...... " (3) BOTH (1) & (
2)".3.... " (4) REFUSE THE OPTIONS".M...
. " (5) EXIT PROGRAM".Q.... Y2$:. Y2$."1
" . Y2$."5". 1530....Y2.E(Y2$)...... Y2
. 1541,1542,1543,1544,1545.....FA.1:NI.
NI.1: . 1580.U...FJ.1:NI.NI.1: . 1580...
..FA.1:FJ.1:NI.NI.2: . 1580...... 1580..
.......,...8.4..".":. .5)" F A V O U R
L E T T E R S ".I.5.. .2)"*************
**********************":....7.. " (1) FA
VOUR REQUESTED"...9.. " (2) FAVOUR GRANT
ED"...;.. " (3) FAVOUR REFUSED"...=.. "
(4) RETURN TO MAIN MENU"...W.. X1$:. X1$
."1" . X1$."4" . . 2135...X.X1.E(X1$).6
.Y.. X1 . 2141,2142,2143,2144.Z.].NI. 6
:NS.27:F$."FAV-1-1":. 2190.~.^.NI. 8:NS.
29:F$."FAV-1-2":. 2190..._.NI.8 :NS.27:F
$."FAV-1-3":. 2190...`.F5.2............"
.":. .4)" I N Q U I R Y L E T T E R S"
...... .2)"*****************************
******":..-.... " (1) BUYER'S LETTER".J.
... " (2) RESPONSE TO (1)".N.... " (3) A
CKNOWLEDGEMENT OF (1)"...... " (4) FORM
ANSWER TO (1)"...... " (5) ANSWER TO ORD
ER RECEIVED"...... " (6) ANSWER TO (1) S
UGGESTING DIFFERENT PRODUCT"......
" (7) RETURN TO MAIN MENU".;.... X2$:.
X2$."1" . X2$."7" . . 2235.I...X2.E(X2$
).X.... X2 . 2241,2242,2243,2244,2245,2
246,2247...A.NI. 6:NS.23:F$."INQ-2-1":.
2290...B.NI. 7:NS.25:F$."INQ-2-2":. 2290
...C.NI. 6:NS.27:F$."INQ-2-3":. 2290...D
.NI. 5:NS.27:F$."INQ-2-4":. 2290.,.E.NI.
6:NS.32:F$."INQ-2-5":. 2290.P.F.NI.10:N
S.33:F$."INQ-2-6":. 2290.Y.G.F5.2._.....
.....".":. .4)" P A Y M E N T L E T T
E R S"...... .2)"***********************
************":....... " (1) CHEQUE ENCLO
SED"...... " (2) ACKNOWLEDGE PAYMENT"...
... " (3) BILLING ERROR ".6.... " (4) AC
KNOWLEDGE (3)".].... " (5) RETURN AN UNS
IGNED CHEQUE"...... " (6) STOP PAYMENT O
N A CHEQUE "...... " (7) ALLOW DISCOUNT
DEDUCTED".Q.... " (8) DISALLOW DISCOUNT
DEDUCTED"...... " (9) RETURN TO MAIN MEN
U"...... X3$:. X3$."1" . X3$."9" . . 23
35.(. .X3.E(X3$).A.!.. X3 . 2341,2342,2
343,2344,2345,2346,2347,2348,2349...%.NI
. 7:NS.23:F$."PAY-3-1":. 2390...&.NI. 7:
NS.25:F$."PAY-3-2":. 2390.M.'.NI.10:NS.3
1:F$."PAY-3-3":. 2390...(.NI. 7:NS.28:F$
."PAY-3-4":. 2390...).NI. 7:NS.27:F$."PA
Y-3-5":. 2390.9.*.NI.10:NS.26:F$."PAY-3-
6":. 2390.].+.NI.11:NS.35:F$."PAY-3-7":.
2390...,.NI.10:NS.32:F$."PAY-3-8":. 239
0...-.F5.2...V.....`..".":. .6)" S A L E
S L E T T E R S "...A.. .2)"********
****************************":....C.. "
(1) SALES LETTER".*.}.. " (2) RETURN TO
MAIN MENU".R.... X4$:. X4$."1" . X4$."2"
. . 2435.`...X4.E(X4$).V.... X4 . 244
1,2442.....NI. 8:NS.34:F$."SAL-4-1":. 24
90.....F5.2.......V.D..".":. .5)" C R E
D I T L E T T E R S"...E.. .2)"*******
****************************":..#.G.. "
(1) REQUEST CREDIT".@.I.. " (2) ACKNOWLE
DGE (1)".\.K.. " (3) CREDIT GRANTED"...M
.. " (4) REQUEST CREDIT STANDING"...O..
" (5) FAVOURABLE CREDIT REFERENCE GIVEN"
.M.Q.. " (6) CREDIT REFUSED "...S.. " (7
) UNFAVOURABLE CREDIT REFERENCE GIVEN (8
) RETURN TO MAIN MENU ".?.... X5$:. X5$.
"1" . X5$."8" . . 2535.M...X5.E(X5$)...
... X5 . 2541,2542,2543,2544,2545,2546,
2547,2548.....NI. 5:NS.25:F$."CRD-5-1":.
2590.I...NI. 6:NS.31:F$."CRD-5-2":. 259
0.....NI. 6:NS.28:F$."CRD-5-3":. 2590...
..NI. 6:NS.28:F$."CRD-5-4":. 2590.5...NI
. 9:NS.32:F$."CRD-5-5":. 2590.Y...NI. 7:
NS.31:F$."CRD-5-6":. 2590.}...NI. 7:NS.3
3:F$."CRD-5-7":. 2590.....F5.2.........(
..".":. .2)" C O M P L A I N T L E T
T E R S"...).. .2)"*********************
***************":....+.. " (1) CLAIM LET
TER ".-.-.. " (2) GENERAL COMPLAINT ".I.
/.. " (3) LATE DELIVERY ".I.1.. " (4) IN
VALID COMPLAINT "...3.. " (5) ANSWER TO
COMPLAINTS"...E.. " (6) RETURN TO MAIN M
ENU".T.K.. X6$:. X6$."1" . X6$."6" . .
2635...L.X6.E(X6$)...M.. X6 . 2641,2642
,2643,2644,2645,2646.0.Q.NI.10:NS.35:F$.
"COM-6-1":. 2690.T.R.NI.10:NS.31:F$."COM
-6-2":. 2690.X.S.NI. 9:NS.34:F$."COM-6-3
":. 2690...T.NI.11:NS.35:F$."COM-6-4":.
2690...U.NI. 9:NS.35:F$."COM-6-5":. 2690
.I.V.F5.2.O...... ...".":. .2)"C O L L E
C T I O N L E T T E R S ".9 ... .1)"
**************************************":
..T ... " (A) FIRST LETTER ".Q ... " (B)
SECOND LETTER ".. ... " (C) THIRD LET
TER ".. ... " (D) FOURTH LETTER ".D ...
" (E) FIFTH LETTER ".. ... " (F) FRIENDL
Y STYLE".. ... " (G) GENERAL #2 "..!...
" (H) HUMOUROUS STYLE"./!... " (I) FRIEN
DLY #2".H!... " (J) PRESSING ".F!... "
(K) MORE PRESSING "..!... " (L) MOST
PRESSING "..!... " (M) HAVE YOU FORGOT
TEN?".F!... " (N) RETURN TO MAIN MENU".W
!..E1$.G(65.13)..!... E0$:. E0$."A" . E0
$.E1$ . . 2732.."..X7.F(E0$).64.$"... X7
.14 . F5.2:..M"...X7.2751,2752,2753,2754
,2755,2756,2757,2758,2759,2760,2761,2762
,2763.."..NI. 7:NS.28:F$."COM-7-1":. 279
0.."..NI. 8:NS.29:F$."COM-7-2":. 2790.Y"
A.NI. 7:NS.26:F$."COM-7-3":. 2790.."B.NI
. 7:NS.32:F$."COM-7-4":. 2790.!#C.NI. 7:
NS.33:F$."COM-7-5":. 2790.E#D.NI. 7:NS.3
5:F$."COM-7-6":. 2790.I#E.NI. 9:NS.32:F$
."COM-7-7":. 2790..#F.NI. 5:NS.22:F$."CO
M-7-8":. 2790..#G.NI. 5:NS.32:F$."COM-7-
9":. 2790.V#H.NI. 6:NS.33:F$."COM-7-10":
. 2790..#I.NI. 5:NS.33:F$."COM-7-11":. 2
790. $J.NI. 7:NS.33:F$."COM-7-12":. 2790
.E$K.NI. 6:NS.31:F$."COM-7-13":. 2790.K$
.....$...".":. " A P P L I C A T I O N
L E T T E R S"..$... "****************
************************":..O$... " (1)
APPLICATION "..$... " (2) ACKNOWLEDGE
(1) "..%... " (3) ACKNOWLEDGE (1) #2.&%.
.. " (4) FOLLOW - UP ".G%... " (5) RETUR
N TO MAIN MENU".O%... X8$:. X8$."1" . X8
$."5" . . 2835.}%..X8.E(X8$)..%... X8 .
2841,2842,2843,2844,2845.F%..NI. 8:NS.
31:F$."APP-8-1":. 2890..%..NI. 9:NS.29:F
$."APP-8-2":. 2890..&..NI. 6:NS.26:F$."A
PP-8-3":. 2890.2&..NI. 6:NS.30:F$."APP-8
-4":. 2890.;&..F5.2.A&J...M&T..".":. .6)
" M I S C E L L A N E O U S "..&U.. .2)"
***********************************":...
&W.. " (1) CHANGE OF ADDRESS "..&Y.. " (
2) MEMO - GIVE INFORMATION"..'[.. " (3)
MEMO - ASK FOR RECOMMENDATIONS".0'].. "
(4) RETURN TO MAIN MENU".X'W.. X9$:. X9$
."1" . X9$."4" . . 2935.F'X.X9.E(X9$)..
'Y.. X9 . 2941,2942,2943,2944..'}.NI.15
:NS.42:F$."MIS-9-1":. 2990.S'~.NI.12:NS.
38:F$."MIS-9-2":FM.1:. 2990..'.NI.10:NS
.20:F$."MIS-9-3":FM.1:. 2990..(..F5.2..(
.....(.....(.....(....#(....)(..../(....
M(... PRINT BLANK FORM LETTER.W(... ".".
F(... B.0 . NI..(..I$(B)."--".G(65.B)."-
-"..(B.. B..(... 2,8,2,"O:".F$.",S,R".G(
... K.0 . NS:.2,A$:T$(K).A$:. K.O(.. 2.
U(.....(.....(.....(.....)..P2.0 :. F3..
1 . ."."..)... P.0 . NS.<)!.. FA.1 . P.8
. .4:.4:.4,". ATTN: ";:FF.1.C)".. FF.1
. FF.0:.4,"."I$(P2):P2.P2.1.Q)&.PR$.T$(P
)..)0.. J(PR$,1,1)."*" . .:. 4000..)2..
J(PR$,1,1)."$" . . 4500..)D.. P..)L...C)
V...I)W...O)X....).. I N P U T R O U
T I N E..*... L.0 . NI.1.'*..."ENTER THE
INFORMATION OF ";I$(L).3*... I$(L).B*..
. "... ".R*... "
"..*... "
"..*... "..."..
*... L..*P...B*....H*....N*.....*... P R
I N T THE SENDER'S SPECS..*...4,4:.4..+
... L.2 . 7.L+..T$."
"..+.
.Q1.C(S$(L)):Q2..(Q1.2):T$.J(T$,1,(.Q2.1
5.C(T$)))..+...4,T$"." S$(L)..+... L..+.
.F3.1..+...4:.4:.4..+..T$."
"..
,...4,T$"."S$(8)..,...4:.4..,.....,.....
,....>,... C O M P L E T E THE LETTER.U
,..T$."
"..,...4,T$"."S$(1)..,... FJ
.1 . FJ.0:.4,T$"."I$(NI.1):NI.NI.1.L,...
FA.1 . FA.0:NI.NI.1.S, . 4.Y,4....,?...
.,@....,A....-G.. BLANK LETTER TO SCREEN
.!-H.P2.0 :. F3..1 . .".".0-I.. P.0 . NS
.X-M.. FA.1 . P.8 . .:.:." ATTN: ";:FF.1
.{-N.. FF.1 . FFF.0:.I$(P2):P2.P2.1..-R.
PR$.T$(P)..-\.. J(PR$,1,1)."*" . .:. 500
0.G-^.. J(PR$,1,1)."$" . . 5500.O-P.. P.
.-Z.. FJ.1 . . T$ I$(NI.1)..-.....-.....
-................'.... SAME LETTER, NEW
ADDRESS.0....".".:....:.:..A...." 1)
SAME LETTER,NEW ADDRESS "......" 2) R
ETURN TO MAIN MENU......" 3) EXIT PRO
GRAM......:.:..V...."ENTER THE NUMBER OF
THE DESIRED FUNCTION"...E.. Y0$:. Y0$."
1" . Y0$."3" . 3525../F.Y0.E(Y0$).#/H..
Y0 . 3540,3542,3544.3/T.F5.1:. 3580.C/V.
F5.2:. 3580.S/X.F5.3:. 3580.Y/...._/....
E/....K/...../... E D I T R O U T I N
E../...:."DO YOU NEED TO EDIT AN ENTRY?
(Y/N)"../... N$:. N$.."Y" . N$.."N" . .
3605../... N$."N" . . 3680.#0...".":.:."
HERE IS WHAT YOU HAVE ENTERED.":..40..
. E.0 . NI.1.Q0!.." (".G(65.E).") ".I$(E
).Y0#.. E..0%..:."ENTER THE LETTER OF EN
TRY TO BE EDITED"..0(.E1$.G(65.NI)..0)..
E0$:. E0$."A". E0$.E1$ . . 3625.Q0+.ED.
F(E0$).65..0...".":.:.I$(ED):.:." YOU MA
Y NOW EDIT":...11.. I$(ED)..13...816.."I
S THERE MORE TO BE EDITED?(Y/N)".^18.. N
$:. N$.."Y" . N$.."N" . . 3640.T1;.. N$.
"Y" . . 3610.Z1`....1O....1P....1S.. S T
R I N G L E N G T H C H E C K..1T..C
(I$(L))..2Y.. C(I$(L)) . 79 . ." YOUR E
NTRY IS TOO LONG":I$(L)." ":L.L.1..2....
.2X..".":.:..92..." C A U T
I O N".C2...:.:...2..." 1) TO INCLUD
E A COMMA(,) OR A COLON(:) IN YOUR
ENTRY, BEGIN";..2..." IT WITH OPEN
QUOTES."..2...:." 2) TO ENTER A BLANK
LINE, JUST TYPE IN OPEN QUOTES,";
.!3..." AND THEN PRESS <RETURN>
".I3...:." 3) YOUR ENTRY MUST BE LESS T
HAN EIGHTY CHARACTERS LONG";..3..."
, OR IT WILL BE TRUNCATED.".B3.
..:.:." PRESS ANY LETTER TO CONTINU
E"..3(.. N0$ :. N0$."Z" . N0$ ."A" . . 3
880..32....3.....3.....4.....4 .L.2:R.2.
J4... J(PR$,C(PR$),1)."*" . PR$.J(PR$,L,
(.R.C(PR$))):FPR.1.H4... FPR.1 . FPR.0:.
4,"."PR$..4... J(PR$,C(PR$),1)."&" . PR$
.J(PR$,L,(.R.C(PR$))):FPR.1.B4... FPR.1
. FPR.0:.4,"."PR$;..4... J(PR$,C(PR$),1)
."$" . PR$.J(PR$,L,(.R.C(PR$))):F1.1./5.
.. F1.1. F1.0:.4,"." PR$;:.4,"."I$(P2);:
P2.P2.1.55....P5... J(PR$,C(PR$),1)."*"
. PR$.J(PR$,L,(.R.C(PR$))):FPR.1..5... F
PR.1 . FPR.0:.4,"."PR$.I5... J(PR$,C(PR$
),1)."&" . PR$.J(PR$,L,(.R.C(PR$))):FPR.
1..5 .. FPR.1 . FPR.0:.4,"."PR$;."6... J
(PR$,C(PR$),1)."$" . PR$.J(PR$,L,(.R.C(P
R$))):F2.1.T6... F2.1. F2.0:.4,"."PR$;:.
4,"."I$(P2);:P2.P2.1.Z6....F6..L.2:R.2..
6... J(PR$,C(PR$),1)."*" . PR$.J(PR$,L,(
.R.C(PR$))):. PR$;..6... J(PR$,C(PR$),1)
."&" . PR$.J(PR$,L,(.R.C(PR$))):. PR$;..
7... J(PR$,C(PR$),1)."$" . PR$.J(PR$,L,(
.R.C(PR$))):F1.1.B7... F1.1. F1.0:. PR$;
:. I$(P2);:P2.P2.1.H7.....7|.. J(PR$,C(P
R$),1)."*" . PR$.J(PR$,L,(.R.C(PR$))):.
PR$;..7... J(PR$,C(PR$),1)."&" . PR$.J(P
R$,L,(.R.C(PR$))):. PR$;..7... J(PR$,C(P
R$),1)."$" . PR$.J(PR$,L,(.R.C(PR$))):F2
.1.$8... F2.1. F2.0:. PR$;:. I$(P2);:P2.
P2.1.*8V...L8.N.15,8,15:. A$(30):F$."PAY
-S2".H8.N. 2,8,2,"@O:".F$.",S,W".}8.N.40
000:I.0:NS.24..8.N...8.N. A$:. A$.."EOF"
. . 20200..8.N. A$."EOF" . 2:. 20249.O8
.N.2,A$:. 20110..8.O. 2,8,2,"O:".F$.",S,
R"..9.O. K.0 . NS:.2,A$(K):.A$(K):.K..9B
O. "* $".$9CO. "$ *".09DO. "* $".<9EO. "
$ *".H9FO. "* $".T9GO. "$ *".`9HO. "* $"
.L9IO. "$ *".Z9JO. "* *"..9LO. "* DEAR
$"..9MO. "$; *"..9NO. "* *".U9OO. "*
THANK YOU FOR YOUR CHEQUE DATED $"..9
PO. "$ FOR $$"..9QO. "$.*"..:SO. "* *
".;:TO. "* SHOULD YOU REQUIRE ANY AD
DITIONAL PRODUCTS&".G:UO. "$ PLEASE DO N
OT HESITATE TO CALL. *".T:VO. "* *"..:W
O. DATA "* OUR RECORDS DO NOT INDI
CATE THAT WE ORDERED $"..:XO. DATA "$
FOR THIS AMOUNT DURING *".';YO. DATA "*
THAT MONTH. WILL YOU PLEASE CHECK AND SE
E IF AN ERROR&".O;[O. DATA "$ HAS BEEN
MADE IN YOUR *".O;\O. DATA "*STATEMENTS
. *"..;]O. DATA "* *"..;^O. DATA
"* *"..;_O. DATA "* *"..;EO. "*
YOURS VERY TRULY *"..<FO. "* *"..<GO.
"* *". <HO. "* *"./<IO. "* *".
;<XO. "EOF".P<0U. I.1.7:.S$(I):..V<:U..N
<@..15,E1$,E2$,E3$,E4$..<J..E(E1$).0..E1
$,E2$,E3$,E4$..<T.....
> CLICK IMAGE PREVIEW FOR FULL MODAL