ENVELOPE MASTER
FILE INFORMATION
FILENAME(S): ENVELOPE MASTER
FILE TYPE(S): PRG
FILE SIZE: 6.2K
FIRST SEEN: 2025-11-30 18:12:05
APPEARS ON: 1 disk(s)
FILE HASH
2f8ff25010dbf63c5acf5adce8e1dc4c9a817715122ff0d6338d61b57760c2bf
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 39 S 1 | ENVELOPE MASTER | PRG | Sailor, Ganheden | 10 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 0A 00 97 20 35 33 32 38 30 2C 30 3A |..'.... 53280,0:| 00000010: 97 20 35 33 32 38 31 2C 30 3A 99 22 93 95 22 3A |. 53281,0:."..":| 00000020: 86 20 41 24 28 37 29 00 33 08 1E 00 8D 20 36 30 |. A$(7).3.... 60| 00000030: 35 30 30 00 39 08 32 00 3A 00 6B 08 3C 00 99 22 |500.9.2.:.k.<.."| 00000040: 93 22 3A 99 A3 38 29 22 05 12 20 44 45 43 49 4D |.":..8)".. DECIM| 00000050: 41 4C 20 45 51 55 49 56 45 4C 45 4E 54 53 20 92 |AL EQUIVELENTS .| 00000060: 9A 22 3A 99 3A 53 49 5A 45 B2 30 00 87 08 46 00 |.":.:SIZE.0...F.| 00000070: 8C 3A 81 20 58 B2 31 20 A4 20 37 3A 87 20 41 24 |.:. X.1 . 7:. A$| 00000080: 28 58 29 3A 82 20 58 00 BC 08 50 00 81 20 58 B2 |(X):. X...P.. X.| 00000090: 31 20 A4 20 37 3A 53 49 5A 45 B2 53 49 5A 45 AA |1 . 7:SIZE.SIZE.| 000000A0: 2E 31 32 35 3A 99 A3 31 34 29 41 24 28 58 29 3B |.125:..14)A$(X);| 000000B0: 22 3D 22 3B 53 49 5A 45 3A 82 20 58 00 EE 08 5A |"=";SIZE:. X...Z| 000000C0: 00 99 22 11 11 96 20 50 4C 45 41 53 45 20 45 4E |.."... PLEASE EN| 000000D0: 54 45 52 20 54 48 45 20 45 4E 56 45 4C 4F 50 53 |TER THE ENVELOPS| 000000E0: 20 4D 45 41 53 55 52 45 4D 45 4E 54 53 22 00 1E | MEASUREMENTS"..| 000000F0: 09 64 00 99 22 49 4E 20 44 45 43 49 4D 41 4C 2E |.d.."IN DECIMAL.| 00000100: 20 49 46 20 55 4E 43 45 52 54 41 49 4E 2C 20 50 | IF UNCERTAIN, P| 00000110: 4C 45 41 53 45 20 43 48 45 43 4B 2E 99 22 00 4C |LEASE CHECK..".L| 00000120: 09 69 00 99 22 11 53 54 41 4E 44 41 52 44 20 42 |.i..".STANDARD B| 00000130: 55 53 53 49 4E 45 53 53 20 45 4E 56 45 4C 4F 50 |USSINESS ENVELOP| 00000140: 45 20 3D 20 39 20 58 20 34 2E 35 22 00 8A 09 78 |E = 9 X 4.5"...x| 00000150: 00 99 22 11 81 45 4E 54 45 52 20 54 48 45 20 45 |.."..ENTER THE E| 00000160: 4E 56 45 4C 4F 50 45 27 53 20 57 49 44 54 48 20 |NVELOPE'S WIDTH | 00000170: 98 3A 05 22 3B 3A 4E 55 B2 31 3A 8D 36 31 30 30 |.:.";:NU.1:.6100| 00000180: 30 3A 45 57 B2 C5 28 41 24 29 00 A3 09 7D 00 8B |0:EW..(A$)...}..| 00000190: 41 24 B2 22 22 20 A7 20 99 22 91 91 22 3B 3A 89 |A$."" . ."..";:.| 000001A0: 31 32 30 00 E3 09 82 00 99 22 11 9C 45 4E 54 45 |120......"..ENTE| 000001B0: 52 20 54 48 45 20 45 4E 56 45 4C 4F 50 45 27 53 |R THE ENVELOPE'S| 000001C0: 20 48 45 49 47 48 54 20 98 3A 05 22 3B 3A 4E 55 | HEIGHT .:.";:NU| 000001D0: B2 31 3A 8D 20 36 31 30 30 30 3A 45 48 B2 C5 28 |.1:. 61000:EH..(| 000001E0: 41 24 29 00 FC 09 87 00 8B 41 24 B2 22 22 20 A7 |A$)......A$."" .| 000001F0: 20 99 22 91 91 22 3B 3A 89 31 33 30 00 2E 0A 8C | ."..";:.130....| 00000200: 00 99 22 93 12 20 20 20 20 20 20 20 20 20 20 20 |..".. | 00000210: 20 20 52 45 54 55 52 4E 20 41 44 44 52 45 53 53 | RETURN ADDRESS| 00000220: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 5D | ".]| 00000230: 0A 8D 00 99 22 11 11 45 4E 54 45 52 20 59 4F 55 |...."..ENTER YOU| 00000240: 52 20 43 48 4F 49 43 45 20 4F 46 20 52 45 54 55 |R CHOICE OF RETU| 00000250: 52 4E 20 41 44 44 52 45 53 53 45 53 22 00 7E 0A |RN ADDRESSES".~.| 00000260: 8E 00 99 22 11 05 20 31 98 29 96 20 43 4F 4D 4D |...".. 1.). COMM| 00000270: 4F 44 4F 52 45 20 4D 41 47 41 5A 49 4E 45 00 9E |ODORE MAGAZINE..| 00000280: 0A 8F 00 99 22 20 05 32 98 29 20 99 4C 4F 41 44 |...." .2.) .LOAD| 00000290: 53 54 41 52 20 4D 41 47 41 5A 49 4E 45 22 00 B4 |STAR MAGAZINE"..| 000002A0: 0A 90 00 99 22 20 05 33 98 29 20 9A 27 4F 54 48 |...." .3.) .'OTH| 000002B0: 45 52 27 22 00 EF 0A 91 00 99 22 11 9F 45 4E 54 |ER'"......"..ENT| 000002C0: 45 52 20 53 45 4C 45 43 54 49 4F 4E 20 98 28 9A |ER SELECTION .(.| 000002D0: 31 2D 33 2C 30 3D 41 42 4F 52 54 98 29 20 3A 05 |1-3,0=ABORT.) :.| 000002E0: 22 3B 3A 4E 55 B2 31 3A 8D 20 36 31 30 30 30 00 |";:NU.1:. 61000.| 000002F0: 0B 0B 92 00 8B 41 24 B2 22 30 22 20 A7 20 8D 36 |.....A$."0" . .6| 00000300: 32 30 30 30 20 3A 89 20 31 34 30 00 1E 0B 93 00 |2000 :. 140.....| 00000310: 8B 20 41 24 B2 22 31 22 20 A7 20 37 36 30 00 31 |. A$."1" . 760.1| 00000320: 0B 94 00 8B 20 41 24 B2 22 32 22 20 A7 20 37 39 |.... A$."2" . 79| 00000330: 30 00 44 0B 95 00 8B 20 41 24 B3 B1 22 33 22 20 |0.D.... A$.."3" | 00000340: A7 31 34 30 00 77 0B 96 00 99 22 93 12 05 20 20 |.140.w...."... | 00000350: 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 | RETUR| 00000360: 4E 20 41 44 44 52 45 53 53 20 20 20 20 20 20 20 |N ADDRESS | 00000370: 20 20 20 20 20 20 22 00 A9 0B 9B 00 99 22 98 20 | "......". | 00000380: 46 52 4F 4D 20 9B 28 1C 4E 41 4D 45 98 29 20 20 |FROM .(.NAME.) | 00000390: 98 20 3A 05 22 3B 3A 4E 55 B2 30 3A 8D 36 31 30 |. :.";:NU.0:.610| 000003A0: 30 30 3A 52 4E 24 B2 41 24 00 C0 0B B9 00 8B 41 |00:RN$.A$......A| 000003B0: 24 B2 22 22 A7 8D 36 32 30 30 30 3A 89 31 35 30 |$.""..62000:.150| 000003C0: 00 ED 0B BE 00 99 22 98 A0 46 52 4F 4D 20 9B 28 |......"..FROM .(| 000003D0: 81 41 44 44 52 45 53 53 9B 29 98 3A 05 22 3B 3A |.ADDRESS.).:.";:| 000003E0: 8D 36 31 30 30 30 3A 52 41 24 B2 41 24 00 04 0C |.61000:RA$.A$...| 000003F0: BF 00 8B 41 24 B2 22 22 A7 8D 36 32 30 30 30 3A |...A$.""..62000:| 00000400: 89 31 35 30 00 31 0C C3 00 99 22 98 20 46 52 4F |.150.1....". FRO| 00000410: 4D 20 9B 28 9E 43 49 54 59 9B 29 20 20 20 98 3A |M .(.CITY.) .:| 00000420: 05 22 3B 3A 8D 36 31 30 30 30 3A 52 43 24 B2 41 |.";:.61000:RC$.A| 00000430: 24 00 48 0C C4 00 8B 41 24 B2 22 22 A7 8D 36 32 |$.H....A$.""..62| 00000440: 30 30 30 3A 89 31 35 30 00 75 0C C8 00 99 22 98 |000:.150.u....".| 00000450: 20 46 52 4F 4D 20 9B 28 1E 53 54 41 54 45 9B 29 | FROM .(.STATE.)| 00000460: 20 20 98 3A 05 22 3B 3A 8D 36 31 30 30 30 3A 52 | .:.";:.61000:R| 00000470: 53 24 B2 41 24 00 8C 0C C9 00 8B 41 24 B2 22 22 |S$.A$......A$.""| 00000480: A7 8D 36 32 30 30 30 3A 89 31 35 30 00 B9 0C CD |..62000:.150....| 00000490: 00 99 22 98 20 46 52 4F 4D 20 9B 28 9A 5A 49 50 |..". FROM .(.ZIP| 000004A0: 9B 29 20 20 20 20 98 3A 05 22 3B 3A 8D 36 31 30 |.) .:.";:.610| 000004B0: 30 30 3A 52 5A 24 B2 41 24 00 D0 0C CE 00 8B 41 |00:RZ$.A$......A| 000004C0: 24 B2 22 22 A7 8D 36 32 30 30 30 3A 89 31 35 30 |$.""..62000:.150| 000004D0: 00 DA 0C D2 00 99 22 93 22 3A 00 0D 0D D3 00 99 |......".":......| 000004E0: 22 93 12 05 20 20 20 20 20 20 20 20 20 20 20 20 |"... | 000004F0: 20 52 45 54 55 52 4E 20 41 44 44 52 45 53 53 20 | RETURN ADDRESS | 00000500: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 29 0D | ".).| 00000510: D4 00 99 22 11 1C 20 4E 41 4D 45 20 20 20 20 20 |...".. NAME | 00000520: 98 3A 9B 12 22 3B 52 4E 24 00 44 0D D5 00 99 22 |.:..";RN$.D...."| 00000530: 20 81 41 44 44 52 45 53 53 20 20 98 3A 9B 12 22 | .ADDRESS .:.."| 00000540: 3B 52 41 24 00 5F 0D D6 00 99 22 20 9E 43 49 54 |;RA$._...." .CIT| 00000550: 59 20 20 20 20 20 98 3A 9B 12 22 3B 52 43 24 00 |Y .:..";RC$.| 00000560: 7A 0D D7 00 99 22 20 1E 53 54 41 54 45 20 20 20 |z...." .STATE | 00000570: 20 98 3A 9B 12 22 3B 52 53 24 00 95 0D D9 00 99 | .:..";RS$......| 00000580: 22 20 9A 5A 49 50 20 43 4F 44 45 20 98 3A 9B 12 |" .ZIP CODE .:..| 00000590: 22 3B 52 5A 24 00 D6 0D DC 00 99 22 11 11 05 49 |";RZ$......"...I| 000005A0: 53 20 54 48 49 53 20 43 4F 52 52 45 43 54 20 28 |S THIS CORRECT (| 000005B0: 59 2F 4E 29 3A 22 3B 3A 4E 55 B2 30 3A 8D 36 31 |Y/N):";:NU.0:.61| 000005C0: 30 30 30 3A 41 4E 24 B2 41 24 3A 8B 41 24 B2 22 |000:AN$.A$:.A$."| 000005D0: 22 A7 20 32 31 30 00 EA 0D E1 00 8B 20 41 4E 24 |". 210...... AN$| 000005E0: B2 22 59 22 20 A7 20 32 33 30 00 FE 0D E2 00 8B |."Y" . 230......| 000005F0: 20 41 4E 24 B2 22 4E 22 20 A7 20 31 34 30 00 08 | AN$."N" . 140..| 00000600: 0E E3 00 89 20 32 31 30 00 3B 0E E6 00 99 22 93 |.... 210.;....".| 00000610: 12 05 20 20 20 20 20 20 20 20 20 20 20 20 53 45 |.. SE| 00000620: 4E 44 49 4E 47 20 41 44 44 52 45 53 53 20 20 20 |NDING ADDRESS | 00000630: 20 20 20 20 20 20 20 20 20 20 22 00 6B 0E E7 00 | ".k...| 00000640: 99 22 11 11 45 4E 54 45 52 20 59 4F 55 52 20 43 |."..ENTER YOUR C| 00000650: 48 4F 49 43 45 20 4F 46 20 53 45 4E 44 49 4E 47 |HOICE OF SENDING| 00000660: 20 41 44 44 52 45 53 53 45 53 22 00 8C 0E E8 00 | ADDRESSES".....| 00000670: 99 22 11 05 20 31 98 29 96 20 43 4F 4D 4D 4F 44 |.".. 1.). COMMOD| 00000680: 4F 52 45 20 4D 41 47 41 5A 49 4E 45 00 AC 0E E9 |ORE MAGAZINE....| 00000690: 00 99 22 20 05 32 98 29 20 99 4C 4F 41 44 53 54 |.." .2.) .LOADST| 000006A0: 41 52 20 4D 41 47 41 5A 49 4E 45 22 00 C2 0E EA |AR MAGAZINE"....| 000006B0: 00 99 22 20 05 33 98 29 20 9A 27 4F 54 48 45 52 |.." .3.) .'OTHER| 000006C0: 27 22 00 FD 0E EB 00 99 22 11 9F 45 4E 54 45 52 |'"......"..ENTER| 000006D0: 20 53 45 4C 45 43 54 49 4F 4E 20 98 28 9A 31 2D | SELECTION .(.1-| 000006E0: 33 2C 30 3D 41 42 4F 52 54 98 29 20 3A 05 22 3B |3,0=ABORT.) :.";| 000006F0: 3A 4E 55 B2 31 3A 8D 20 36 31 30 30 30 00 17 0F |:NU.1:. 61000...| 00000700: EC 00 8B 41 24 B2 22 30 22 20 A7 20 8D 36 32 30 |...A$."0" . .620| 00000710: 30 30 3A 89 32 33 30 00 2A 0F ED 00 8B 20 41 24 |00:.230.*.... A$| 00000720: B2 22 31 22 20 A7 20 38 32 30 00 3D 0F EE 00 8B |."1" . 820.=....| 00000730: 20 41 24 B2 22 32 22 20 A7 20 38 35 30 00 50 0F | A$."2" . 850.P.| 00000740: EF 00 8B 20 41 24 B3 B1 22 33 22 20 A7 32 33 30 |... A$.."3" .230| 00000750: 00 83 0F FA 00 99 22 93 12 05 20 20 20 20 20 20 |......"... | 00000760: 20 20 20 20 20 20 53 45 4E 44 49 4E 47 20 41 44 | SENDING AD| 00000770: 44 52 45 53 53 20 20 20 20 20 20 20 20 20 20 20 |DRESS | 00000780: 20 20 22 00 B5 0F FF 00 99 22 98 20 20 54 4F 20 | "......". TO | 00000790: 20 9B 28 1C 4E 41 4D 45 98 29 20 20 98 20 3A 05 | .(.NAME.) . :.| 000007A0: 22 3B 3A 4E 55 B2 30 3A 8D 36 31 30 30 30 3A 54 |";:NU.0:.61000:T| 000007B0: 4E 24 B2 41 24 00 CD 0F 00 01 8B 41 24 B2 22 22 |N$.A$......A$.""| 000007C0: A7 8D 36 32 30 30 30 3A 89 20 32 35 30 00 FA 0F |..62000:. 250...| 000007D0: 04 01 99 22 98 A0 20 54 4F 20 20 9B 28 81 41 44 |...".. TO .(.AD| 000007E0: 44 52 45 53 53 9B 29 98 3A 05 22 3B 3A 8D 36 31 |DRESS.).:.";:.61| 000007F0: 30 30 30 3A 54 41 24 B2 41 24 00 12 10 05 01 8B |000:TA$.A$......| 00000800: 41 24 B2 22 22 A7 8D 36 32 30 30 30 3A 89 20 32 |A$.""..62000:. 2| 00000810: 35 30 00 3F 10 09 01 99 22 98 20 20 54 4F 20 20 |50.?....". TO | 00000820: 9B 28 9E 43 49 54 59 9B 29 20 20 20 98 3A 05 22 |.(.CITY.) .:."| 00000830: 3B 3A 8D 36 31 30 30 30 3A 54 43 24 B2 41 24 00 |;:.61000:TC$.A$.| 00000840: 57 10 0A 01 8B 41 24 B2 22 22 A7 8D 36 32 30 30 |W....A$.""..6200| 00000850: 30 3A 89 20 32 35 30 00 84 10 0E 01 99 22 98 20 |0:. 250......". | 00000860: 20 54 4F 20 20 9B 28 1E 53 54 41 54 45 9B 29 20 | TO .(.STATE.) | 00000870: 20 98 3A 05 22 3B 3A 8D 36 31 30 30 30 3A 54 53 | .:.";:.61000:TS| 00000880: 24 B2 41 24 00 9C 10 0F 01 8B 41 24 B2 22 22 A7 |$.A$......A$."".| 00000890: 8D 36 32 30 30 30 3A 89 20 32 35 30 00 C9 10 13 |.62000:. 250....| 000008A0: 01 99 22 98 20 20 54 4F 20 20 9B 28 9A 5A 49 50 |..". TO .(.ZIP| 000008B0: 9B 29 20 20 20 20 98 3A 05 22 3B 3A 8D 36 31 30 |.) .:.";:.610| 000008C0: 30 30 3A 54 5A 24 B2 41 24 00 E1 10 14 01 8B 41 |00:TZ$.A$......A| 000008D0: 24 B2 22 22 A7 8D 36 32 30 30 30 3A 89 20 32 35 |$.""..62000:. 25| 000008E0: 30 00 EB 10 18 01 99 22 93 22 3A 00 1E 11 19 01 |0......".":.....| 000008F0: 99 22 93 12 05 20 20 20 20 20 20 20 20 20 20 20 |."... | 00000900: 20 20 53 45 4E 44 49 4E 47 20 41 44 44 52 45 53 | SENDING ADDRES| 00000910: 53 20 20 20 20 20 20 20 20 20 20 20 20 22 00 3A |S ".:| 00000920: 11 1A 01 99 22 11 1C 20 4E 41 4D 45 20 20 20 20 |....".. NAME | 00000930: 20 98 3A 9B 12 22 3B 54 4E 24 00 55 11 1B 01 99 | .:..";TN$.U....| 00000940: 22 20 81 41 44 44 52 45 53 53 20 20 98 3A 9B 12 |" .ADDRESS .:..| 00000950: 22 3B 54 41 24 00 70 11 1C 01 99 22 20 9E 43 49 |";TA$.p...." .CI| 00000960: 54 59 20 20 20 20 20 98 3A 9B 12 22 3B 54 43 24 |TY .:..";TC$| 00000970: 00 8B 11 1D 01 99 22 20 1E 53 54 41 54 45 20 20 |......" .STATE | 00000980: 20 20 98 3A 9B 12 22 3B 54 53 24 00 A6 11 1F 01 | .:..";TS$.....| 00000990: 99 22 20 9A 5A 49 50 20 43 4F 44 45 20 98 3A 9B |." .ZIP CODE .:.| 000009A0: 12 22 3B 54 5A 24 00 E7 11 22 01 99 22 11 11 05 |.";TZ$...".."...| 000009B0: 49 53 20 54 48 49 53 20 43 4F 52 52 45 43 54 20 |IS THIS CORRECT | 000009C0: 28 59 2F 4E 29 3A 22 3B 3A 4E 55 B2 30 3A 8D 36 |(Y/N):";:NU.0:.6| 000009D0: 31 30 30 30 3A 41 4E 24 B2 41 24 3A 8B 41 24 B2 |1000:AN$.A$:.A$.| 000009E0: 22 22 A7 20 32 38 31 00 FD 11 54 01 8B 20 41 4E |"". 281...T.. AN| 000009F0: 24 B2 22 59 22 20 A7 20 89 20 33 36 30 00 13 12 |$."Y" . . 360...| 00000A00: 5E 01 8B 20 41 4E 24 B2 22 4E 22 20 A7 20 89 20 |^.. AN$."N" . . | 00000A10: 32 33 30 00 1D 12 63 01 89 20 32 38 31 00 27 12 |230...c.. 281.'.| 00000A20: 68 01 99 22 20 93 22 00 56 12 72 01 99 22 11 11 |h.." .".V.r.."..| 00000A30: 1E 49 53 20 54 48 45 52 45 20 41 20 4C 4F 57 45 |.IS THERE A LOWE| 00000A40: 52 20 46 4C 41 47 20 54 4F 20 54 48 45 20 41 44 |R FLAG TO THE AD| 00000A50: 44 52 45 53 53 22 00 82 12 7C 01 99 22 11 9A 45 |DRESS"...|.."..E| 00000A60: 58 41 4D 50 4C 45 98 3A 05 20 50 48 4F 54 4F 47 |XAMPLE.:. PHOTOG| 00000A70: 52 41 50 48 53 2D 44 4F 20 4E 4F 54 20 42 45 4E |RAPHS-DO NOT BEN| 00000A80: 44 22 00 B5 12 86 01 99 22 11 98 20 52 45 53 50 |D"......".. RESP| 00000A90: 4F 4E 43 45 9B 20 28 9A 59 2F 4E 9B 29 20 3A 05 |ONCE. (.Y/N.) :.| 00000AA0: 22 3B 3A 4E 55 B2 30 3A 8D 36 31 30 30 30 3A 41 |";:NU.0:.61000:A| 00000AB0: 46 24 B2 41 24 00 C8 12 90 01 8B 20 41 46 24 B2 |F$.A$...... AF$.| 00000AC0: 22 4E 22 A7 20 34 32 30 00 DB 12 95 01 8B 20 41 |"N". 420...... A| 00000AD0: 46 24 B2 22 59 22 A7 20 34 31 30 00 E5 12 96 01 |F$."Y". 410.....| 00000AE0: 89 20 33 36 30 00 15 13 9A 01 99 22 11 9C 45 4E |. 360......"..EN| 00000AF0: 54 45 52 20 54 48 45 20 4D 45 53 53 41 47 45 20 |TER THE MESSAGE | 00000B00: 9B 3A 05 22 3B 3A 8D 36 31 30 30 30 3A 46 4C 41 |.:.";:.61000:FLA| 00000B10: 47 24 B2 41 24 00 1F 13 A4 01 99 22 93 05 22 00 |G$.A$......"..".| 00000B20: 50 13 AE 01 99 22 11 11 11 11 11 96 20 20 20 20 |P...."...... | 00000B30: 49 4E 53 45 52 54 A0 54 48 45 22 3B 45 48 3B 22 |INSERT.THE";EH;"| 00000B40: 58 22 3B 45 57 3B 22 45 4E 56 45 4C 4F 50 45 22 |X";EW;"ENVELOPE"| 00000B50: 00 81 13 B8 01 99 22 11 81 20 20 54 55 52 4E 20 |......".. TURN | 00000B60: 4F 4E 20 50 52 49 4E 54 45 52 20 41 4E 44 20 50 |ON PRINTER AND P| 00000B70: 52 45 53 53 20 9E 28 1E 52 45 54 55 52 4E 9E 29 |RESS .(.RETURN.)| 00000B80: 22 00 AB 13 BD 01 99 22 11 20 20 20 20 20 20 20 |"......". | 00000B90: 9A 4F 52 20 50 52 45 53 53 20 28 53 50 41 43 45 |.OR PRESS (SPACE| 00000BA0: 29 20 54 4F 20 41 42 4F 52 54 22 00 BF 13 C2 01 |) TO ABORT".....| 00000BB0: A1 41 24 3A 8B 41 24 B2 22 22 A7 20 34 35 30 00 |.A$:.A$."". 450.| 00000BC0: D9 13 C7 01 8B 41 24 B2 22 20 22 A7 20 8D 36 32 |.....A$." ". .62| 00000BD0: 30 30 30 3A 89 20 34 32 30 00 EE 13 CC 01 8B 41 |000:. 420......A| 00000BE0: 24 B3 B1 C7 28 31 33 29 20 A7 20 34 35 30 00 01 |$...(13) . 450..| 00000BF0: 14 D6 01 9F 20 31 35 2C 34 2C 31 35 3A A0 20 31 |.... 15,4,15:. 1| 00000C00: 35 00 3A 14 E0 01 8B 20 53 54 B3 B1 30 20 A7 20 |5.:.... ST..0 . | 00000C10: 99 22 11 54 48 45 20 50 52 49 4E 54 45 52 20 44 |.".THE PRINTER D| 00000C20: 4F 45 53 20 4E 4F 54 20 52 45 53 50 4F 4E 44 20 |OES NOT RESPOND | 00000C30: 2E 2E 2E 22 3A 89 20 34 34 30 00 51 14 EA 01 9F |...":. 440.Q....| 00000C40: 20 31 30 2C 34 2C 31 30 3A 98 31 30 3A A0 20 31 | 10,4,10:.10:. 1| 00000C50: 30 00 57 14 F4 01 3A 00 5D 14 FE 01 3A 00 69 14 |0.W...:.]...:.i.| 00000C60: 08 02 3A 41 44 4A B2 AB 31 00 72 14 12 02 9F 34 |..:ADJ..1.r....4| 00000C70: 2C 34 00 81 14 1C 02 98 34 2C A6 31 29 3B 52 4E |,4......4,.1);RN| 00000C80: 24 00 90 14 26 02 98 34 2C A6 31 29 3B 52 41 24 |$...&..4,.1);RA$| 00000C90: 00 A8 14 30 02 98 34 2C A6 31 29 3B 52 43 24 3B |...0..4,.1);RC$;| 00000CA0: 22 2C 20 22 3B 52 53 24 00 B7 14 3A 02 98 34 2C |", ";RS$...:..4,| 00000CB0: A6 31 29 3B 52 5A 24 00 DD 14 44 02 8D 20 38 38 |.1);RZ$...D.. 88| 00000CC0: 30 3A 8F 20 43 41 4C 43 55 4C 41 54 45 20 44 4F |0:. CALCULATE DO| 00000CD0: 57 4E 20 54 4F 20 41 44 44 52 45 53 53 00 F3 14 |WN TO ADDRESS...| 00000CE0: 4E 02 81 20 58 B2 31 20 A4 20 44 41 3A 98 34 3A |N.. X.1 . DA:.4:| 00000CF0: 82 20 58 00 12 15 58 02 8D 20 39 30 30 3A 8F 20 |. X...X.. 900:. | 00000D00: 47 45 54 20 4C 4F 4E 47 45 53 54 20 53 54 52 49 |GET LONGEST STRI| 00000D10: 4E 47 00 2F 15 62 02 8D 20 39 33 30 3A 8F 20 43 |NG./.b.. 930:. C| 00000D20: 41 4C 43 55 4C 41 54 45 20 53 50 43 28 23 29 00 |ALCULATE SPC(#).| 00000D30: 3E 15 6C 02 98 34 2C A6 58 29 3B 54 4E 24 00 4D |>.l..4,.X);TN$.M| 00000D40: 15 76 02 98 34 2C A6 58 29 3B 54 41 24 00 65 15 |.v..4,.X);TA$.e.| 00000D50: 80 02 98 34 2C A6 58 29 3B 54 43 24 3B 22 2C 20 |...4,.X);TC$;", | 00000D60: 22 3B 54 53 24 00 74 15 8A 02 98 34 2C A6 58 29 |";TS$.t....4,.X)| 00000D70: 3B 54 5A 24 00 A0 15 94 02 8B 20 41 46 24 B2 22 |;TZ$...... AF$."| 00000D80: 59 22 A7 20 8D 20 39 35 30 3A 8F 20 43 41 4C 43 |Y". . 950:. CALC| 00000D90: 55 4C 41 54 45 20 4C 49 4E 45 53 20 44 4F 57 4E |ULATE LINES DOWN| 00000DA0: 00 B6 15 9E 02 81 20 58 B2 31 20 A4 20 44 4E 3A |...... X.1 . DN:| 00000DB0: 98 34 3A 82 20 58 00 E6 15 A8 02 8D 20 39 36 30 |.4:. X...... 960| 00000DC0: 3A 8F 20 43 41 4C 43 55 4C 41 54 45 20 53 50 43 |:. CALCULATE SPC| 00000DD0: 28 58 29 20 54 4F 20 43 45 4E 54 45 52 20 55 50 |(X) TO CENTER UP| 00000DE0: 20 46 4C 41 47 24 00 F7 15 B2 02 98 34 2C A6 58 | FLAG$......4,.X| 00000DF0: 29 3B 46 4C 41 47 24 00 2B 16 BC 02 99 22 93 11 |);FLAG$.+...."..| 00000E00: 96 50 52 49 4E 54 20 41 4E 4F 54 48 45 52 20 20 |.PRINT ANOTHER | 00000E10: 98 28 9A 59 2F 4E 98 29 20 3A 05 22 3B 3A 8D 36 |.(.Y/N.) :.";:.6| 00000E20: 31 30 30 30 3A 41 4E 24 B2 41 24 00 4B 16 C6 02 |1000:AN$.A$.K...| 00000E30: 8B 20 41 4E 24 B2 22 4E 22 A7 20 A0 34 3A 8D 20 |. AN$."N". .4:. | 00000E40: 36 32 30 30 30 3A 89 20 37 30 30 00 5E 16 CB 02 |62000:. 700.^...| 00000E50: 8B 20 41 4E 24 B2 22 59 22 A7 20 37 32 30 00 68 |. AN$."Y". 720.h| 00000E60: 16 CD 02 89 20 37 30 30 00 9C 16 D0 02 99 22 81 |.... 700......".| 00000E70: 11 11 53 41 4D 45 20 41 44 44 52 45 53 53 45 53 |..SAME ADDRESSES| 00000E80: 20 98 28 9A 59 2F 4E 98 29 20 3A 05 22 3B 3A 8D | .(.Y/N.) :.";:.| 00000E90: 36 31 30 30 30 3A 41 4E 24 B2 41 24 00 B4 16 DA |61000:AN$.A$....| 00000EA0: 02 8B 20 41 4E 24 B2 22 59 22 A7 20 A0 34 3A 89 |.. AN$."Y". .4:.| 00000EB0: 20 34 39 30 00 CB 16 DF 02 8B 20 41 4E 24 B2 22 | 490...... AN$."| 00000EC0: 4E 22 A7 20 A0 34 3A 89 20 36 30 00 D5 16 E4 02 |N". .4:. 60.....| 00000ED0: 89 20 37 32 30 00 E2 16 EE 02 98 34 3A A0 20 34 |. 720......4:. 4| 00000EE0: 3A 80 00 02 17 F8 02 8F 20 44 45 46 41 55 4C 54 |:....... DEFAULT| 00000EF0: 20 52 45 54 55 52 4E 20 41 44 44 52 45 53 53 20 | RETURN ADDRESS | 00000F00: 23 31 00 4A 17 02 03 52 4E 24 B2 22 43 4F 4D 4D |#1.J...RN$."COMM| 00000F10: 4F 44 4F 52 45 20 4D 41 47 41 5A 49 4E 45 22 3A |ODORE MAGAZINE":| 00000F20: 52 41 24 B2 22 31 32 30 30 20 57 49 4C 53 4F 4E |RA$."1200 WILSON| 00000F30: 20 44 52 49 56 45 22 3A 52 43 24 B2 22 57 45 53 | DRIVE":RC$."WES| 00000F40: 54 20 43 48 45 53 54 45 52 22 00 6A 17 0C 03 52 |T CHESTER".j...R| 00000F50: 53 24 B2 22 50 41 2E 22 3A 52 5A 24 B2 22 31 39 |S$."PA.":RZ$."19| 00000F60: 33 38 30 22 3A 89 20 32 31 30 00 8A 17 16 03 8F |380":. 210......| 00000F70: 20 44 45 46 41 55 4C 54 20 52 45 54 55 52 4E 20 | DEFAULT RETURN | 00000F80: 41 44 44 52 45 53 53 20 23 32 00 C3 17 20 03 52 |ADDRESS #2... .R| 00000F90: 4E 24 B2 22 4C 4F 41 44 53 54 41 52 22 3A 52 41 |N$."LOADSTAR":RA| 00000FA0: 24 B2 22 50 2E 4F 2E 20 42 4F 58 20 33 30 30 30 |$."P.O. BOX 3000| 00000FB0: 38 22 3A 52 43 24 B2 22 53 48 52 45 56 45 50 4F |8":RC$."SHREVEPO| 00000FC0: 52 54 22 00 E7 17 2A 03 52 53 24 B2 22 4C 41 22 |RT"...*.RS$."LA"| 00000FD0: 3A 52 5A 24 B2 22 37 31 31 33 30 2D 30 30 30 38 |:RZ$."71130-0008| 00000FE0: 22 3A 89 20 32 31 30 00 05 18 34 03 8F 20 44 45 |":. 210...4.. DE| 00000FF0: 46 41 55 4C 54 20 28 54 4F 29 20 41 44 44 52 45 |FAULT (TO) ADDRE| 00001000: 53 53 20 23 31 00 4D 18 3E 03 54 4E 24 B2 22 43 |SS #1.M.>.TN$."C| 00001010: 4F 4D 4D 4F 44 4F 52 45 20 4D 41 47 41 5A 49 4E |OMMODORE MAGAZIN| 00001020: 45 22 3A 54 41 24 B2 22 31 32 30 30 20 57 49 4C |E":TA$."1200 WIL| 00001030: 53 4F 4E 20 44 52 49 56 45 22 3A 54 43 24 B2 22 |SON DRIVE":TC$."| 00001040: 57 45 53 54 20 43 48 45 53 54 45 52 22 00 6D 18 |WEST CHESTER".m.| 00001050: 48 03 54 53 24 B2 22 50 41 2E 22 3A 54 5A 24 B2 |H.TS$."PA.":TZ$.| 00001060: 22 31 39 33 38 30 22 3A 89 20 32 38 30 00 8B 18 |"19380":. 280...| 00001070: 52 03 8F 20 44 45 46 41 55 4C 54 20 28 54 4F 29 |R.. DEFAULT (TO)| 00001080: 20 41 44 44 52 45 53 53 20 23 32 00 C4 18 5C 03 | ADDRESS #2...\.| 00001090: 54 4E 24 B2 22 4C 4F 41 44 53 54 41 52 22 3A 54 |TN$."LOADSTAR":T| 000010A0: 41 24 B2 22 50 2E 4F 2E 20 42 4F 58 20 33 30 30 |A$."P.O. BOX 300| 000010B0: 30 38 22 3A 54 43 24 B2 22 53 48 52 45 56 45 50 |08":TC$."SHREVEP| 000010C0: 4F 52 54 22 00 E8 18 66 03 54 53 24 B2 22 4C 41 |ORT"...f.TS$."LA| 000010D0: 22 3A 54 5A 24 B2 22 37 31 31 33 30 2D 30 30 30 |":TZ$."71130-000| 000010E0: 38 22 3A 89 20 32 38 30 00 0B 19 70 03 44 41 B2 |8":. 280...p.DA.| 000010F0: B5 28 28 45 48 AC 36 29 AD 32 29 AB 36 3A 8B 20 |.((EH.6).2).6:. | 00001100: 44 41 B3 31 20 A7 20 44 41 B2 30 00 11 19 7A 03 |DA.1 . DA.0...z.| 00001110: 8E 00 37 19 84 03 41 43 B2 C3 28 54 4E 24 29 3A |..7...AC..(TN$):| 00001120: 8B 20 C3 28 54 41 24 29 B1 41 43 20 A7 20 41 43 |. .(TA$).AC . AC| 00001130: B2 C3 28 54 41 24 29 00 65 19 8E 03 8B 20 C3 28 |..(TA$).e.... .(| 00001140: 54 43 24 29 AA C3 28 54 53 24 29 AA 32 B1 41 43 |TC$)..(TS$).2.AC| 00001150: 20 A7 20 41 43 B2 C3 28 54 43 24 29 AA C3 28 54 | . AC..(TC$)..(T| 00001160: 53 24 29 AA 32 00 6B 19 98 03 8E 00 95 19 A2 03 |S$).2.k.........| 00001170: 58 B2 B5 28 28 45 57 AC 31 30 29 AD 32 29 AA 41 |X..((EW.10).2).A| 00001180: 44 4A AB 28 41 43 AD 32 29 3A 8B 20 58 B3 31 20 |DJ.(AC.2):. X.1 | 00001190: A7 20 58 B2 30 00 9B 19 AC 03 8E 00 AD 19 B6 03 |. X.0...........| 000011A0: 44 4E B2 B5 28 44 41 AC 2E 36 29 3A 8E 00 DD 19 |DN..(DA..6):....| 000011B0: C0 03 58 B2 B5 28 28 45 57 AC 31 30 29 AD 32 29 |..X..((EW.10).2)| 000011C0: AA 41 44 4A AB 28 C3 28 46 4C 41 47 24 29 AD 32 |.ADJ.(.(FLAG$).2| 000011D0: 29 3A 8B 20 58 B3 31 20 A7 20 58 B2 30 00 E3 19 |):. X.1 . X.0...| 000011E0: CA 03 8E 00 13 1A D4 03 83 20 22 31 2F 38 22 2C |......... "1/8",| 000011F0: 22 31 2F 34 22 2C 22 33 2F 38 22 2C 22 31 2F 32 |"1/4","3/8","1/2| 00001200: 22 2C 22 35 2F 38 22 2C 22 33 2F 34 22 2C 22 37 |","5/8","3/4","7| 00001210: 2F 38 22 00 19 1A 54 EC 8F 00 42 1A 5E EC 99 22 |/8"...T...B.^.."| 00001220: 93 11 08 0E 92 20 20 20 20 20 20 20 20 20 20 20 |..... | 00001230: 20 9E CC 20 CF 20 C1 20 C4 20 D3 20 D4 20 C1 20 | .. . . . . . . | 00001240: D2 22 00 48 1A 68 EC 99 00 6D 1A 72 EC 99 22 20 |.".H.h...m.r.." | 00001250: 20 20 20 20 20 20 20 20 20 20 9A D0 52 4F 55 44 | ..ROUD| 00001260: 4C 59 20 50 52 45 53 45 4E 54 53 3A 22 00 73 1A |LY PRESENTS:".s.| 00001270: 86 EC 99 00 79 1A 90 EC 99 00 A3 1A 9A EC 99 22 |....y.........."| 00001280: 20 20 20 20 05 C5 20 CE 20 D6 20 C5 20 CC 20 CF | .. . . . . .| 00001290: 20 D0 20 C5 20 20 20 CD 20 C1 20 D3 20 D4 20 C5 | . . . . . . .| 000012A0: 20 D2 22 00 CD 1A A4 EC 99 22 20 20 20 20 98 A3 | ."......" ..| 000012B0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................| 000012C0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 D3 1A |............"...| 000012D0: AE EC 99 00 04 1B B8 EC 99 22 20 05 12 20 20 20 |........." .. | 000012E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000012F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001300: 20 20 20 22 00 36 1B C2 EC 99 22 20 12 20 62 59 | ".6...." . bY| 00001310: 3A 6A 45 52 4F 4D 45 20 65 20 72 45 55 54 45 52 |:jEROME e rEUTER| 00001320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1C | .| 00001330: B0 AE 05 20 20 22 00 68 1B CC EC 99 22 20 12 20 |... ".h...." . | 00001340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001360: 20 1C AD BD 05 20 20 22 00 98 1B D6 EC 99 22 20 | .... "......" | 00001370: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00001380: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001390: 20 20 20 20 20 20 20 22 00 C8 1B E0 EC 99 22 20 | "......" | 000013A0: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000013B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000013C0: 20 20 20 20 20 20 20 22 00 F8 1B EA EC 99 22 20 | "......" | 000013D0: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 6C 6F |. lo| 000013E0: 61 64 73 74 61 72 20 20 20 20 20 20 20 20 20 20 |adstar | 000013F0: 20 20 20 20 20 20 20 22 00 28 1C F4 EC 99 22 20 | ".(...." | 00001400: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 70 2E |. p.| 00001410: 6F 2E 20 62 4F 58 20 33 30 30 30 38 20 20 20 20 |o. bOX 30008 | 00001420: 20 20 20 20 20 20 20 22 00 58 1C FE EC 99 22 20 | ".X...." | 00001430: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 73 48 |. sH| 00001440: 52 45 56 45 50 4F 52 54 2C 20 6C 61 20 20 20 20 |REVEPORT, la | 00001450: 20 20 20 20 20 20 20 22 00 88 1C 08 ED 99 22 20 | "......" | 00001460: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 37 31 |. 71| 00001470: 31 33 30 2D 30 30 30 38 20 20 20 20 20 20 20 20 |130-0008 | 00001480: 20 20 20 20 20 20 20 22 00 B8 1C 12 ED 99 22 20 | "......" | 00001490: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000014A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000014B0: 20 20 20 20 20 20 20 22 00 E8 1C 1C ED 99 22 20 | "......" | 000014C0: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000014D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000014E0: 20 20 20 20 20 20 20 22 00 18 1D 26 ED 99 22 20 | "...&.." | 000014F0: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00001500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001510: 20 20 20 20 20 20 20 22 00 1E 1D 30 ED 99 00 4B | "...0...K| 00001520: 1D 3A ED 99 22 20 20 20 20 20 20 96 12 20 20 20 |.:.." .. | 00001530: 20 20 20 20 63 4F 50 59 52 49 47 48 54 20 31 39 | cOPYRIGHT 19| 00001540: 38 37 20 20 20 20 20 20 20 20 22 00 78 1D 44 ED |87 ".x.D.| 00001550: 99 22 20 20 20 20 20 20 1E 12 20 20 20 20 20 20 |." .. | 00001560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001570: 20 20 20 20 20 20 20 22 00 A6 1D 4E ED 99 22 20 | "...N.." | 00001580: 20 20 20 20 20 9A 12 20 20 20 20 20 20 20 20 70 | .. p| 00001590: 72 65 73 73 20 28 73 70 61 63 65 29 20 20 20 20 |ress (space) | 000015A0: 20 20 20 20 22 3B 00 B0 1D 58 ED 99 22 13 22 3B | ";...X..".";| 000015B0: 00 C5 1D 80 ED A1 41 24 3A 8B 41 24 B2 22 22 A7 |......A$:.A$."".| 000015C0: 36 30 38 30 30 00 D8 1D 85 ED 8B 41 24 B3 B1 22 |60800......A$.."| 000015D0: 20 22 A7 36 30 38 30 30 00 EA 1D 8A ED 99 22 93 | ".60800......".| 000015E0: 22 3B C7 28 31 34 32 29 3A 8E 00 02 1E 48 EE 41 |";.(142):....H.A| 000015F0: 24 B2 22 22 3A 99 22 A4 22 3B 3A 81 41 B2 31 A4 |$."":.".";:.A.1.| 00001600: 32 35 00 17 1E 4D EE A1 42 24 3A 8B 42 24 B2 22 |25...M..B$:.B$."| 00001610: 22 A7 36 31 30 30 35 00 2F 1E 52 EE 8B 42 24 B2 |".61005./.R..B$.| 00001620: C7 28 31 33 29 20 A7 20 99 22 9D 20 22 3A 8E 00 |.(13) . .". ":..| 00001630: 6B 1E 57 EE 8B 42 24 B2 C7 28 32 30 29 20 AF 20 |k.W..B$..(20) . | 00001640: 41 B1 31 20 A7 20 99 22 9D 9D 20 20 9D 9D A4 22 |A.1 . .".. ..."| 00001650: 3B 3A 41 B2 41 AB 31 3A 41 24 B2 C8 28 41 24 2C |;:A.A.1:A$..(A$,| 00001660: 41 AB 31 29 3A 89 36 31 30 30 35 00 81 1E 5C EE |A.1):.61005...\.| 00001670: 8B 42 24 B2 C7 28 32 30 29 20 A7 20 36 31 30 30 |.B$..(20) . 6100| 00001680: 35 00 A1 1E 61 EE 8B 28 41 B2 32 35 29 B0 28 28 |5...a..(A.25).((| 00001690: 4E 55 29 AF 28 41 B2 36 29 29 A7 20 36 31 30 30 |NU).(A.6)). 6100| 000016A0: 35 00 BE 1E 66 EE 8B 42 24 B1 B2 22 30 22 AF 42 |5...f..B$.."0".B| 000016B0: 24 B3 B2 22 39 22 20 A7 20 36 31 30 37 30 00 D2 |$.."9" . 61070..| 000016C0: 1E 6B EE 8B 42 24 B2 22 2E 22 20 A7 20 36 31 30 |.k..B$."." . 610| 000016D0: 37 30 00 E5 1E 6C EE 8B 20 4E 55 B2 31 20 A7 20 |70...l.. NU.1 . | 000016E0: 36 31 30 30 35 00 04 1F 70 EE 8B 42 24 B2 B1 22 |61005...p..B$.."| 000016F0: C1 22 20 AF 20 42 24 B3 B2 22 DA 22 20 A7 20 36 |." . B$.."." . 6| 00001700: 31 30 37 30 00 20 1F 75 EE 8B 42 24 B3 22 20 22 |1070. .u..B$." "| 00001710: B0 20 42 24 B1 22 5A 22 20 A7 20 36 31 30 30 35 |. B$."Z" . 61005| 00001720: 00 44 1F 8E EE 99 22 9D 22 42 24 3B 3A 97 32 31 |.D...."."B$;:.21| 00001730: 32 2C 2E 3A 99 22 A4 22 3B 3A 41 24 B2 41 24 AA |2,.:.".";:A$.A$.| 00001740: 42 24 3A 82 00 56 1F 30 F2 99 22 13 11 11 11 11 |B$:..V.0..".....| 00001750: 11 11 11 11 11 22 00 80 1F 35 F2 99 22 9B 1D 1D |....."...5.."...| 00001760: 1D 1D 1D 1D 1D 1D 12 20 20 20 20 20 20 20 20 20 |....... | 00001770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 22 | ."| 00001780: 00 A9 1F 3A F2 99 22 1D 1D 1D 1D 1D 1D 1D 1D 12 |...:..".........| 00001790: 20 20 51 55 49 54 20 3A 20 41 52 45 20 59 4F 55 | QUIT : ARE YOU| 000017A0: 20 53 55 52 45 3F 20 92 22 00 D2 1F 3F F2 99 22 | SURE? ."...?.."| 000017B0: 1D 1D 1D 1D 1D 1D 1D 1D 12 20 20 20 20 20 20 20 |......... | 000017C0: 20 20 59 29 45 53 20 4F 52 20 4E 29 4F 20 20 20 | Y)ES OR N)O | 000017D0: 92 22 00 FB 1F 44 F2 99 22 1D 1D 1D 1D 1D 1D 1D |."...D..".......| 000017E0: 1D 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 000017F0: 20 20 20 20 20 20 20 20 20 92 22 00 10 20 4E F2 | .".. N.| 00001800: A1 41 24 3A 8B 41 24 B2 22 22 A7 36 32 30 33 30 |.A$:.A$."".62030| 00001810: 00 2A 20 53 F2 8B 41 24 B2 22 59 22 B0 41 24 B2 |.* S..A$."Y".A$.| 00001820: 22 D9 22 A7 20 36 32 30 35 30 00 40 20 58 F2 8B |".". 62050.@ X..| 00001830: 41 24 B2 22 4E 22 B0 41 24 B2 22 CE 22 A7 20 8E |A$."N".A$.".". .| 00001840: 00 4C 20 5D F2 89 20 36 32 30 33 30 00 7A 20 62 |.L ].. 62030.z b| 00001850: F2 9F 31 35 2C 38 2C 31 35 2C 22 52 30 3A 48 45 |..15,8,15,"R0:HE| 00001860: 4C 4C 4F 20 43 4F 4E 4E 45 43 54 3D 48 45 4C 4C |LLO CONNECT=HELL| 00001870: 4F 20 43 4F 4E 4E 45 43 54 22 00 89 20 67 F2 84 |O CONNECT".. g..| 00001880: 31 35 2C 45 52 3A A0 31 35 00 9F 20 68 F2 8B 20 |15,ER:.15.. h.. | 00001890: 45 52 B3 B1 36 33 20 A7 20 99 22 93 22 3A 80 00 |ER..63 . .".":..| 000018A0: B6 20 76 F2 93 22 48 45 4C 4C 4F 20 43 4F 4E 4E |. v.."HELLO CONN| 000018B0: 45 43 54 22 2C 38 00 00 00 |ECT",8... |
..'.... 53280,0:. 53281,0:."..":. A$(7).
3.... 60500.9.2.:.K.<..".":..8)".. DECIM
AL EQUIVELENTS ..":.:SIZE.0...F..:. X.1
. 7:. A$(X):. X...P.. X.1 . 7:SIZE.SIZE.
.125:..14)A$(X);"=";SIZE:. X...Z.."... P
LEASE ENTER THE ENVELOPS MEASUREMENTS"..
.D.."IN DECIMAL. IF UNCERTAIN, PLEASE CH
ECK..".L.I..".STANDARD BUSSINESS ENVELOP
E = 9 X 4.5"...X.."..ENTER THE ENVELOPE'
S WIDTH .:.";:NU.1:.61000:EW.E(A$)...}..
A$."" . ."..";:.120......"..ENTER THE EN
VELOPE'S HEIGHT .:.";:NU.1:. 61000:EH.E(
A$)......A$."" . ."..";:.130......"..
RETURN ADDRESS ".]
...."..ENTER YOUR CHOICE OF RETURN ADDRE
SSES".~....".. 1.). COMMODORE MAGAZINE..
...." .2.) .LOADSTAR MAGAZINE"......" .3
.) .'OTHER'"......"..ENTER SELECTION .(.
1-3,0=ABORT.) :.";:NU.1:. 61000......A$.
"0" . .62000 :. 140...... A$."1" . 760.1
.... A$."2" . 790.D.... A$.."3" .140.W..
.."... RETURN ADDRESS
"......". FROM .(.NAME.) . :.";:N
U.0:.61000:RN$.A$......A$.""..62000:.150
......". FROM .(.ADDRESS.).:.";:.61000:R
A$.A$......A$.""..62000:.150.1.C..". FRO
M .(.CITY.) .:.";:.61000:RC$.A$.H.D..A
$.""..62000:.150.U.H..". FROM .(.STATE.)
.:.";:.61000:RS$.A$...I..A$.""..62000:
.150...M..". FROM .(.ZIP.) .:.";:.610
00:RZ$.A$.P.N..A$.""..62000:.150.Z.R..".
":...S.."... RETURN ADDRESS
".).T..".. NAME .:..";RN
$.D.U.." .ADDRESS .:..";RA$._.V.." .CIT
Y .:..";RC$.Z.W.." .STATE .:..";R
S$...Y.." .ZIP CODE .:..";RZ$.V...."...I
S THIS CORRECT (Y/N):";:NU.0:.61000:AN$.
A$:.A$."". 210...... AN$."Y" . 230......
AN$."N" . 140...... 210.;...."...
SENDING ADDRESS ".K...
."..ENTER YOUR CHOICE OF SENDING ADDRESS
ES"......".. 1.). COMMODORE MAGAZINE....
.." .2.) .LOADSTAR MAGAZINE".B...." .3.)
.'OTHER'"......"..ENTER SELECTION .(.1-
3,0=ABORT.) :.";:NU.1:. 61000......A$."0
" . .62000:.230.*.... A$."1" . 820.=....
A$."2" . 850.P.... A$.."3" .230......".
.. SENDING ADDRESS
"......". TO .(.NAME.) . :.";:NU.0:
.61000:TN$.A$.M....A$.""..62000:. 250...
...". TO .(.ADDRESS.).:.";:.61000:TA$.
A$......A$.""..62000:. 250.?....". TO
.(.CITY.) .:.";:.61000:TC$.A$.W....A$.
""..62000:. 250......". TO .(.STATE.)
.:.";:.61000:TS$.A$......A$.""..62000:.
250.I....". TO .(.ZIP.) .:.";:.610
00:TZ$.A$......A$.""..62000:. 250......"
.":......"... SENDING ADDRES
S ".:....".. NAME .:..";T
N$.U...." .ADDRESS .:..";TA$.P...." .CI
TY .:..";TC$......" .STATE .:..";
TS$......" .ZIP CODE .:..";TZ$...".."...
IS THIS CORRECT (Y/N):";:NU.0:.61000:AN$
.A$:.A$."". 281...T.. AN$."Y" . . 360...
^.. AN$."N" . . 230...C.. 281.'.H.." .".
V.R.."...IS THERE A LOWER FLAG TO THE AD
DRESS"...|.."..EXAMPLE.:. PHOTOGRAPHS-DO
NOT BEND"......".. RESPONCE. (.Y/N.) :.
";:NU.0:.61000:AF$.A$.H.... AF$."N". 420
...... AF$."Y". 410...... 360......"..EN
TER THE MESSAGE .:.";:.61000:FLAG$.A$...
..."..".P...."...... INSERT THE";EH;"
X";EW;"ENVELOPE"......".. TURN ON PRINT
ER AND PRESS .(.RETURN.)"......".
.OR PRESS (SPACE) TO ABORT"...B..A$:.A$.
"". 450.Y.G..A$." ". .62000:. 420...L..A
$..G(13) . 450...V.. 15,4,15: 15.:....
ST..0 . .".THE PRINTER DOES NOT RESPOND
...":. 440.Q.... 10,4,10:.10: 10.W...:.
]...:.I...:ADJ..1.R....4,4......4,.1);RN
$...&..4,.1);RA$...0..4,.1);RC$;", ";RS$
...:..4,.1);RZ$...D.. 880:. CALCULATE DO
WN TO ADDRESS...N.. X.1 . DA:.4:. X...X.
. 900:. GET LONGEST STRING./.B.. 930:. C
ALCULATE SPC(#).>.L..4,.X);TN$.M.V..4,.X
);TA$.E....4,.X);TC$;", ";TS$.T....4,.X)
;TZ$. .... AF$."Y". . 950:. CALCULATE LI
NES DOWN...... X.1 . DN:.4:. X...... 960
:. CALCULATE SPC(X) TO CENTER UP FLAG$..
....4,.X);FLAG$.+...."...PRINT ANOTHER
.(.Y/N.) :.";:.61000:AN$.A$.K.F.. AN$."N
". 4:. 62000:. 700.^.K.. AN$."Y". 720.H
.M.. 700...P.."...SAME ADDRESSES .(.Y/N.
) :.";:.61000:AN$.A$...Z.. AN$."Y". 4:.
490.K.... AN$."N". 4:. 60.U.... 720...
...4: 4:....... DEFAULT RETURN ADDRESS
#1.J...RN$."COMMODORE MAGAZINE":RA$."120
0 WILSON DRIVE":RC$."WEST CHESTER".J...R
S$."PA.":RZ$."19380":. 210...... DEFAULT
RETURN ADDRESS #2.C. .RN$."LOADSTAR":RA
$."P.O. BOX 30008":RC$."SHREVEPORT"...*.
RS$."LA":RZ$."71130-0008":. 210...4.. DE
FAULT (TO) ADDRESS #1.M.>.TN$."COMMODORE
MAGAZINE":TA$."1200 WILSON DRIVE":TC$."
WEST CHESTER".M.H.TS$."PA.":TZ$."19380":
. 280...R.. DEFAULT (TO) ADDRESS #2.D.\.
TN$."LOADSTAR":TA$."P.O. BOX 30008":TC$.
"SHREVEPORT"...F.TS$."LA":TZ$."71130-000
8":. 280...P.DA..((EH.6).2).6:. DA.1 . D
A.0...Z...7...AC.C(TN$):. C(TA$).AC . AC
.C(TA$).E.... C(TC$).C(TS$).2.AC . AC.C(
TC$).C(TS$).2.K.........X..((EW.10).2).A
DJ.(AC.2):. X.1 . X.0...........DN..(DA.
.6):......X..((EW.10).2).ADJ.(C(FLAG$).2
):. X.1 . X.0...J.....T.. "1/8","1/4","3
/8","1/2","5/8","3/4","7/8"...T...B.^.."
..... .L O A D S T A R".H.H..
.M.R.." .PROUDLY PRESENTS:".S.
....Y.........." .E N V E L O P E M
A S T E R".M...." ..................
............".S.........." ..
".6.B.." . BY
:JEROME E REUTER .... ".H
.L.." .
.... "...V.." .
".H...." .
"......" .
LOADSTAR ".(...."
. P.O. BOX 30008 "
.X...." . SHREVEPORT, LA
"......" . 71130-0008
"......" .
"......" .
"...&.."
. "
...0...K.:.." .. COPYRIGHT 19
87 ".X.D.." ..
"...N.." .. P
RESS (SPACE) ";...X..".";.E....A$
:.A$."".60800.X....A$.." ".60800......".
";G(142):....H.A$."":.".";:.A.1.25...M..
B$:.B$."".61005./.R..B$.G(13) . .". ":..
K.W..B$.G(20) . A.1 . .".. ...";:A.A.1:
A$.H(A$,A.1):.61005...\..B$.G(20) . 6100
5...A..(A.25).((NU).(A.6)). 61005...F..B
$.."0".B$.."9" . 61070.R.K..B$."." . 610
70...L.. NU.1 . 61005...P..B$.."A" . B$.
."Z" . 61070. .U..B$." ". B$."Z" . 61005
.D...."."B$;:.212,.:.".";:A$.A$.B$:..V.0
..".........."...5.."..........
."...:.."......... QUIT :
ARE YOU SURE? .".R.?..".........
Y)ES OR N)O ."...D..".........
.".. N..A$:.A$."".62030
.* S..A$."Y".A$."Y". 62050.@ X..A$."N".A
$."N". ..L ].. 62030.Z B..15,8,15,"R0:HE
LLO CONNECT=HELLO CONNECT".. G..15,ER: 1
5.. H.. ER..63 . .".":... V.."HELLO CONN
ECT",8...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL