PRINTER 64/128
FILE INFORMATION
FILENAME(S): PRINTER 64/128
FILE TYPE(S): PRG
FILE SIZE: 5.5K
FIRST SEEN: 2025-10-20 14:31:20
APPEARS ON: 1 disk(s)
FILE HASH
7372a7eaa016ada1b2883142f4411d723e1d6edb91eb195f62adb10267f0d9c1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NOV DEC RERUN | PRINTER 64/128 | PRG | Treasure Chest - Klaus Der Suhler | 12 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 2D 1C 05 00 8F 20 43 4F 4E 54 52 4F 4C 20 |..-.... CONTROL | 00000010: 59 4F 55 52 20 50 52 49 4E 54 45 52 20 2D 20 57 |YOUR PRINTER - W| 00000020: 49 4C 4C 49 41 4D 20 4D 43 4C 45 4F 44 00 35 1C |ILLIAM MCLEOD.5.| 00000030: 0A 00 89 35 30 00 47 1C 14 00 5A 5A 24 B2 22 50 |...50.G...ZZ$."P| 00000040: 52 49 4E 54 45 52 22 00 5E 1C 1E 00 9F 31 35 2C |RINTER".^....15,| 00000050: 38 2C 31 35 2C 22 53 30 3A 22 AA 5A 5A 24 00 70 |8,15,"S0:".ZZ$.p| 00000060: 1C 28 00 A0 31 35 3A 94 20 5A 5A 24 2C 38 3A 80 |.(..15:. ZZ$,8:.| 00000070: 00 9B 1C 32 00 86 20 50 24 28 31 33 29 2C 48 50 |...2.. P$(13),HP| 00000080: 24 28 31 33 29 2C 41 24 28 31 33 29 2C 4D 24 28 |$(13),A$(13),M$(| 00000090: 31 31 29 2C 48 4D 24 28 31 31 29 00 D3 1C 3C 00 |11),HM$(11)...<.| 000000A0: 4C B2 39 3A 54 B2 39 3A 4C 4C B2 33 39 3A 41 B2 |L.9:T.9:LL.39:A.| 000000B0: C2 28 32 31 35 29 3A 8B 20 41 B2 31 32 38 20 A7 |.(215):. A.128 .| 000000C0: 20 4C B2 31 39 3A 54 B2 31 39 3A 4C 4C B2 37 39 | L.19:T.19:LL.79| 000000D0: 3A FE 25 00 EF 1C 46 00 49 B2 31 3A 48 24 B2 22 |:.%...F.I.1:H$."| 000000E0: 12 22 3A 4E 24 B2 22 92 22 3A 52 4D B2 38 30 00 |.":N$.".":RM.80.| 000000F0: 23 1D 50 00 5A 24 B2 C7 28 32 39 29 3A 52 24 B2 |#.P.Z$..(29):R$.| 00000100: C7 28 31 33 29 3A 43 24 B2 C7 28 32 37 29 3A 43 |.(13):C$..(27):C| 00000110: 55 24 B2 C7 28 31 34 35 29 3A 43 44 24 B2 C7 28 |U$..(145):CD$..(| 00000120: 31 37 29 00 3F 1D 5A 00 53 B2 35 3A 20 8F 20 54 |17).?.Z.S.5: . T| 00000130: 52 41 4E 53 50 41 52 45 4E 54 20 4D 4F 44 45 00 |RANSPARENT MODE.| 00000140: 55 1D 64 00 97 35 33 32 38 30 2C 30 3A 97 35 33 |U.d..53280,0:.53| 00000150: 32 38 31 2C 30 00 6D 1D 6E 00 87 20 4E 24 28 49 |281,0.m.n.. N$(I| 00000160: 29 3A 8F 20 4D 41 49 4E 20 4D 45 4E 55 00 8E 1D |):. MAIN MENU...| 00000170: 78 00 83 20 53 54 59 4C 45 2C 4D 41 52 47 49 4E |x.. STYLE,MARGIN| 00000180: 53 2C 55 54 49 4C 49 54 59 2C 51 55 49 54 00 98 |S,UTILITY,QUIT..| 00000190: 1D 82 00 83 20 45 4E 44 00 B7 1D 8C 00 8B 20 4E |.... END...... N| 000001A0: 24 28 49 29 B2 22 45 4E 44 22 20 A7 20 4B B2 49 |$(I)."END" . K.I| 000001B0: AB 31 3A 89 31 37 30 00 F2 1D 96 00 4E 24 28 49 |.1:.170.....N$(I| 000001C0: 29 B2 22 20 20 22 AA 4E 24 28 49 29 AA 22 20 20 |)." ".N$(I)." | 000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001E0: 22 3A 4E 24 28 49 29 B2 C8 28 4E 24 28 49 29 2C |":N$(I)..(N$(I),| 000001F0: 4C 29 00 01 1E A0 00 49 B2 49 AA 31 3A 89 31 31 |L).....I.I.1:.11| 00000200: 30 00 0E 1E AA 00 81 49 B2 31 A4 4B AA 31 00 24 |0......I.1.K.1.$| 00000210: 1E B4 00 48 24 28 49 29 B2 48 24 AA 4E 24 28 49 |...H$(I).H$.N$(I| 00000220: 29 AA 4E 24 00 2A 1E BE 00 82 00 3A 1E C8 00 4B |).N$.*.....:...K| 00000230: B2 31 3A 8F 20 53 54 59 4C 45 00 46 1E D2 00 87 |.1:. STYLE.F....| 00000240: 20 50 24 28 4B 29 00 8A 1E DC 00 83 20 45 58 49 | P$(K)...... EXI| 00000250: 54 2C 45 4C 49 54 45 2C 49 54 41 4C 49 43 53 2C |T,ELITE,ITALICS,| 00000260: 43 4F 4E 44 45 4E 53 45 44 2C 50 52 4F 50 4F 52 |CONDENSED,PROPOR| 00000270: 54 49 4F 4E 41 4C 2C 45 58 50 41 4E 44 45 44 2C |TIONAL,EXPANDED,| 00000280: 45 4D 50 48 41 53 49 5A 45 44 00 C7 1E E6 00 83 |EMPHASIZED......| 00000290: 20 42 4F 4C 44 46 41 43 45 2C 53 55 42 53 43 52 | BOLDFACE,SUBSCR| 000002A0: 49 50 54 53 2C 53 55 50 45 52 53 43 52 49 50 54 |IPTS,SUPERSCRIPT| 000002B0: 53 2C 44 4F 55 42 4C 45 20 48 49 47 48 2C 51 55 |S,DOUBLE HIGH,QU| 000002C0: 41 44 20 48 49 47 48 00 D1 1E F0 00 83 20 45 4E |AD HIGH...... EN| 000002D0: 44 00 F1 1E FA 00 8B 20 50 24 28 4B 29 B2 22 45 |D...... P$(K)."E| 000002E0: 4E 44 22 20 A7 20 4A 31 B2 4B AB 31 3A 89 32 38 |ND" . J1.K.1:.28| 000002F0: 30 00 28 1F 04 01 50 24 28 4B 29 B2 22 20 22 AA |0.(...P$(K)." ".| 00000300: 50 24 28 4B 29 AA 22 20 20 20 20 20 20 20 20 20 |P$(K)." | 00000310: 20 20 20 20 20 22 3A 50 24 28 4B 29 B2 C8 28 50 | ":P$(K)..(P| 00000320: 24 28 4B 29 2C 31 39 29 00 37 1F 0E 01 4B B2 4B |$(K),19).7...K.K| 00000330: AA 31 3A 89 32 31 30 00 46 1F 18 01 81 20 4B B2 |.1:.210.F.... K.| 00000340: 31 20 A4 20 4A 31 00 5F 1F 22 01 48 50 24 28 4B |1 . J1._.".HP$(K| 00000350: 29 B2 48 24 AA 50 24 28 4B 29 AA 4E 24 3A 82 00 |).H$.P$(K).N$:..| 00000360: 71 1F 2C 01 4B B2 31 3A 8F 20 4D 41 52 47 49 4E |q.,.K.1:. MARGIN| 00000370: 53 00 7D 1F 36 01 87 20 4D 24 28 4B 29 00 BA 1F |S.}.6.. M$(K)...| 00000380: 40 01 83 20 45 58 49 54 2C 54 4F 50 20 4D 41 52 |@.. EXIT,TOP MAR| 00000390: 47 49 4E 2C 42 4F 54 54 4F 4D 20 4D 41 52 47 49 |GIN,BOTTOM MARGI| 000003A0: 4E 2C 4C 45 46 54 20 4D 41 52 47 49 4E 2C 52 49 |N,LEFT MARGIN,RI| 000003B0: 47 48 54 20 4D 41 52 47 49 4E 00 DD 1F 4A 01 83 |GHT MARGIN...J..| 000003C0: 20 4C 49 4E 45 20 53 50 41 43 49 4E 47 20 4E 2F | LINE SPACING N/| 000003D0: 32 31 36 2C 46 4F 52 4D 20 46 45 45 44 00 E7 1F |216,FORM FEED...| 000003E0: 54 01 83 20 45 4E 44 00 05 20 5E 01 8B 4D 24 28 |T.. END.. ^..M$(| 000003F0: 4B 29 B2 22 45 4E 44 22 A7 20 4A 32 B2 4B AB 31 |K)."END". J2.K.1| 00000400: 3A 89 33 38 30 00 3C 20 68 01 4D 24 28 4B 29 B2 |:.380.< h.M$(K).| 00000410: 22 20 22 AA 4D 24 28 4B 29 AA 22 20 20 20 20 20 |" ".M$(K)." | 00000420: 20 20 20 20 20 20 20 20 20 22 3A 4D 24 28 4B 29 | ":M$(K)| 00000430: B2 C8 28 4D 24 28 4B 29 2C 31 39 29 00 4B 20 72 |..(M$(K),19).K r| 00000440: 01 4B B2 4B AA 31 3A 89 33 31 30 00 5A 20 7C 01 |.K.K.1:.310.Z |.| 00000450: 81 20 4B B2 31 20 A4 20 4A 32 00 73 20 86 01 48 |. K.1 . J2.s ..H| 00000460: 4D 24 28 4B 29 B2 48 24 AA 4D 24 28 4B 29 AA 4E |M$(K).H$.M$(K).N| 00000470: 24 3A 82 00 85 20 90 01 4B B2 31 3A 8F 20 55 54 |$:... ..K.1:. UT| 00000480: 49 4C 49 54 59 00 91 20 9A 01 87 20 47 24 28 4B |ILITY.. ... G$(K| 00000490: 29 00 C7 20 A4 01 83 20 45 58 49 54 2C 52 45 53 |).. ... EXIT,RES| 000004A0: 45 54 20 50 52 49 4E 54 45 52 2C 53 4C 41 53 48 |ET PRINTER,SLASH| 000004B0: 20 5A 45 52 4F 2C 50 41 50 45 52 20 4F 55 54 20 | ZERO,PAPER OUT | 000004C0: 53 49 47 20 4F 46 46 00 EC 20 AE 01 83 20 53 41 |SIG OFF.. ... SA| 000004D0: 4D 50 4C 45 20 50 52 49 4E 54 4F 55 54 2C 50 52 |MPLE PRINTOUT,PR| 000004E0: 49 4E 54 20 41 4E 44 20 56 49 45 57 00 F6 20 B8 |INT AND VIEW.. .| 000004F0: 01 83 20 45 4E 44 00 14 21 C2 01 8B 47 24 28 4B |.. END..!...G$(K| 00000500: 29 B2 22 45 4E 44 22 A7 20 4A 33 B2 4B AB 31 3A |)."END". J3.K.1:| 00000510: 89 34 38 30 00 4B 21 CC 01 47 24 28 4B 29 B2 22 |.480.K!..G$(K)."| 00000520: 20 22 AA 47 24 28 4B 29 AA 22 20 20 20 20 20 20 | ".G$(K)." | 00000530: 20 20 20 20 20 20 20 20 22 3A 47 24 28 4B 29 B2 | ":G$(K).| 00000540: C8 28 47 24 28 4B 29 2C 31 39 29 00 5A 21 D6 01 |.(G$(K),19).Z!..| 00000550: 4B B2 4B AA 31 3A 89 34 31 30 00 69 21 E0 01 81 |K.K.1:.410.i!...| 00000560: 20 4B B2 31 20 A4 20 4A 33 00 82 21 EA 01 48 47 | K.1 . J3..!..HG| 00000570: 24 28 4B 29 B2 48 24 AA 47 24 28 4B 29 AA 4E 24 |$(K).H$.G$(K).N$| 00000580: 3A 82 00 92 21 F4 01 8F 20 4D 41 49 4E 20 4D 45 |:...!... MAIN ME| 00000590: 4E 55 00 A0 21 FE 01 47 B2 30 3A 99 22 93 9E 22 |NU..!..G.0:.".."| 000005A0: 00 BE 21 08 02 99 20 48 24 28 31 29 3B 4E 24 28 |..!... H$(1);N$(| 000005B0: 32 29 3B 4E 24 28 33 29 3B 4E 24 28 34 29 00 D2 |2);N$(3);N$(4)..| 000005C0: 21 12 02 81 4B B2 31 A4 4C 4C 3A 99 22 A3 22 3B |!...K.1.LL:.".";| 000005D0: 3A 82 00 E8 21 1C 02 99 22 13 22 3A 81 20 49 B2 |:...!...".":. I.| 000005E0: 31 A4 32 31 3A 99 3A 82 00 F7 21 26 02 8B 41 B2 |1.21:.:...!&..A.| 000005F0: 31 32 38 89 35 37 30 00 32 22 30 02 99 22 12 20 |128.570.2"0..". | 00000600: 43 55 52 53 4F 52 20 52 54 20 54 4F 20 53 45 4C |CURSOR RT TO SEL| 00000610: 45 43 54 2C 20 52 45 54 55 52 4E 20 54 4F 20 45 |ECT, RETURN TO E| 00000620: 58 45 43 55 54 45 20 22 3A 99 22 13 22 3A 89 35 |XECUTE ":.".":.5| 00000630: 39 30 00 74 22 3A 02 99 22 12 20 20 20 20 20 20 |90.t":..". | 00000640: 20 20 20 20 20 20 3C 43 55 52 53 4F 52 20 52 49 | <CURSOR RI| 00000650: 47 48 54 3E 20 54 4F 20 53 45 4C 45 43 54 20 20 |GHT> TO SELECT | 00000660: 20 20 20 20 20 20 20 20 20 20 3C 52 45 54 55 52 | <RETUR| 00000670: 4E 3E 22 3B 00 9E 22 44 02 99 22 12 20 54 4F 20 |N>";.."D..". TO | 00000680: 45 58 45 43 55 54 45 20 20 20 20 20 20 20 20 20 |EXECUTE | 00000690: 20 20 20 20 22 C7 28 31 39 29 3A 99 3A 99 00 B8 | ".(19):.:...| 000006A0: 22 4E 02 49 B2 31 3A 8D 36 38 30 3A 8B 20 58 24 |"N.I.1:.680:. X$| 000006B0: B2 52 24 20 89 37 33 30 00 D5 22 58 02 99 4E 24 |.R$ .730.."X..N$| 000006C0: 28 31 29 3B 48 24 28 32 29 3B 4E 24 28 33 29 3B |(1);H$(2);N$(3);| 000006D0: 4E 24 28 34 29 00 EF 22 62 02 49 B2 32 3A 8D 36 |N$(4).."b.I.2:.6| 000006E0: 38 30 3A 8B 20 58 24 B2 52 24 20 89 37 33 30 00 |80:. X$.R$ .730.| 000006F0: 0C 23 6C 02 99 4E 24 28 31 29 3B 4E 24 28 32 29 |.#l..N$(1);N$(2)| 00000700: 3B 48 24 28 33 29 3B 4E 24 28 34 29 00 26 23 76 |;H$(3);N$(4).&#v| 00000710: 02 49 B2 33 3A 8D 36 38 30 3A 8B 20 58 24 B2 52 |.I.3:.680:. X$.R| 00000720: 24 20 89 37 33 30 00 43 23 80 02 99 4E 24 28 31 |$ .730.C#...N$(1| 00000730: 29 3B 4E 24 28 32 29 3B 4E 24 28 33 29 3B 48 24 |);N$(2);N$(3);H$| 00000740: 28 34 29 00 5D 23 8A 02 49 B2 34 3A 8D 36 38 30 |(4).]#..I.4:.680| 00000750: 3A 8B 20 58 24 B2 52 24 20 89 37 33 30 00 7A 23 |:. X$.R$ .730.z#| 00000760: 94 02 99 48 24 28 31 29 3B 4E 24 28 32 29 3B 4E |...H$(1);N$(2);N| 00000770: 24 28 33 29 3B 4E 24 28 34 29 00 83 23 9E 02 89 |$(3);N$(4)..#...| 00000780: 35 39 30 00 99 23 A8 02 A1 20 58 24 3A 8B 20 58 |590..#... X$:. X| 00000790: 24 B2 22 22 20 89 36 38 30 00 B7 23 B2 02 8B 20 |$."" .680..#... | 000007A0: 58 24 B2 5A 24 20 A7 20 99 20 43 55 24 3B 43 55 |X$.Z$ . . CU$;CU| 000007B0: 24 3B 43 55 24 3A 8E 00 C6 23 BC 02 8B 58 24 B2 |$;CU$:...#...X$.| 000007C0: 52 24 20 A7 20 8E 00 F5 23 C6 02 99 22 93 22 3A |R$ . ...#...".":| 000007D0: 99 A3 31 30 29 22 12 20 50 52 45 53 53 20 43 55 |..10)". PRESS CU| 000007E0: 52 53 4F 52 20 52 49 47 48 54 20 4F 52 20 52 45 |RSOR RIGHT OR RE| 000007F0: 54 55 52 4E 22 00 0B 24 D0 02 81 20 59 B2 31 A4 |TURN"..$... Y.1.| 00000800: 33 30 30 30 3A 82 3A 89 35 31 30 00 24 24 DA 02 |3000:.:.510.$$..| 00000810: 91 20 49 20 89 37 34 30 2C 37 36 30 2C 37 38 30 |. I .740,760,780| 00000820: 2C 38 30 30 00 38 24 E4 02 8D 38 33 30 3A 8B 20 |,800.8$...830:. | 00000830: 47 B2 31 20 89 35 31 30 00 41 24 EE 02 89 37 34 |G.1 .510.A$...74| 00000840: 30 00 56 24 F8 02 8D 31 33 34 30 3A 8B 20 47 B2 |0.V$...1340:. G.| 00000850: 31 20 89 35 31 30 00 5F 24 02 03 89 37 36 30 00 |1 .510._$...760.| 00000860: 74 24 0C 03 8D 31 38 33 30 3A 8B 20 47 B2 31 20 |t$...1830:. G.1 | 00000870: 89 35 31 30 00 7D 24 16 03 89 37 38 30 00 8E 24 |.510.}$...780..$| 00000880: 20 03 54 41 B2 B5 28 4C 4C AD 32 29 AB 35 00 B5 | .TA..(LL.2).5..| 00000890: 24 2A 03 A0 35 3A 99 22 93 22 3A 99 3A 99 3A 99 |$*..5:.".":.:.:.| 000008A0: 3A 99 3A 99 A3 54 41 29 22 2A 2A 2A 45 4E 44 2A |:.:..TA)"***END*| 000008B0: 2A 2A 22 3A 80 00 C6 24 34 03 8F 20 53 54 59 4C |**":...$4.. STYL| 000008C0: 45 20 4D 45 4E 55 00 E1 24 3E 03 99 3A 54 54 B2 |E MENU..$>..:TT.| 000008D0: 30 3A 99 22 9C 22 3A 99 43 55 24 3A 8D 32 33 38 |0:.".":.CU$:.238| 000008E0: 30 00 ED 24 48 03 99 20 50 24 28 31 29 00 07 25 |0..$H.. P$(1)..%| 000008F0: 52 03 81 20 4B B2 32 20 A4 20 4A 31 3A 99 20 48 |R.. K.2 . J1:. H| 00000900: 50 24 28 4B 29 3A 82 00 1C 25 5C 03 8F 20 53 54 |P$(K):...%\.. ST| 00000910: 59 4C 45 20 53 45 4C 45 43 54 4F 52 00 31 25 66 |YLE SELECTOR.1%f| 00000920: 03 81 20 4B B2 31 20 A4 20 4A 31 3A 8D 32 33 33 |.. K.1 . J1:.233| 00000930: 30 00 43 25 70 03 8B 20 58 24 B2 43 44 24 20 89 |0.C%p.. X$.CD$ .| 00000940: 39 30 30 00 4C 25 7A 03 89 39 36 30 00 67 25 84 |900.L%z..960.g%.| 00000950: 03 99 C7 28 31 39 29 3A 99 3A 99 3A 99 3A 8B 4B |...(19):.:.:.:.K| 00000960: B2 31 20 89 39 32 30 00 7C 25 8E 03 81 49 B2 31 |.1 .920.|%...I.1| 00000970: A4 4B AB 31 3A 99 43 44 24 3B 3A 82 00 8C 25 98 |.K.1:.CD$;:...%.| 00000980: 03 8B 20 4B B2 4A 31 20 89 39 34 30 00 A6 25 A2 |.. K.J1 .940..%.| 00000990: 03 99 48 50 24 28 4B 29 3A 99 50 24 28 4B AA 31 |..HP$(K):.P$(K.1| 000009A0: 29 3A 89 39 35 30 00 CC 25 AC 03 99 20 48 50 24 |):.950..%... HP$| 000009B0: 28 4B 29 3A 99 C7 28 31 39 29 3A 99 3A 99 3A 99 |(K):..(19):.:.:.| 000009C0: 3A 99 50 24 28 31 29 3A 89 38 37 30 00 D2 25 B6 |:.P$(1):.870..%.| 000009D0: 03 82 00 F0 25 C0 03 9F 35 2C 34 2C 53 3A 8F 20 |....%...5,4,S:. | 000009E0: 54 52 41 4E 53 50 41 52 45 4E 54 20 4D 4F 44 45 |TRANSPARENT MODE| 000009F0: 00 35 26 CA 03 91 20 4B 20 8D 20 39 39 30 2C 31 |.5&... K . 990,1| 00000A00: 30 30 30 2C 31 30 33 30 2C 31 30 36 30 2C 31 30 |000,1030,1060,10| 00000A10: 39 30 2C 31 31 32 30 2C 31 31 35 30 2C 31 31 38 |90,1120,1150,118| 00000A20: 30 2C 31 32 31 30 2C 31 32 34 30 2C 31 32 37 30 |0,1210,1240,1270| 00000A30: 2C 31 33 30 30 00 43 26 D4 03 A0 35 3A 99 22 93 |,1300.C&...5:.".| 00000A40: 22 3A 8E 00 50 26 DE 03 47 B2 31 3A 89 39 38 30 |":..P&..G.1:.980| 00000A50: 00 76 26 E8 03 41 24 28 32 29 B2 22 45 4C 49 54 |.v&..A$(2)."ELIT| 00000A60: 45 2C 20 22 3A 8F 20 50 49 43 41 20 49 53 20 44 |E, ":. PICA IS D| 00000A70: 45 46 41 55 4C 54 00 83 26 F2 03 98 35 2C 43 24 |EFAULT..&...5,C$| 00000A80: 22 4D 22 00 89 26 FC 03 8E 00 9F 26 06 04 41 24 |"M"..&.....&..A$| 00000A90: 28 33 29 B2 22 49 54 41 4C 49 43 53 2C 20 22 00 |(3)."ITALICS, ".| 00000AA0: AD 26 10 04 98 35 2C 43 24 3B 22 34 22 00 B3 26 |.&...5,C$;"4"..&| 00000AB0: 1A 04 8E 00 CB 26 24 04 41 24 28 34 29 B2 22 43 |.....&$.A$(4)."C| 00000AC0: 4F 4E 44 45 4E 53 45 44 2C 20 22 00 D8 26 2E 04 |ONDENSED, "..&..| 00000AD0: 98 35 2C C7 28 31 35 29 00 DE 26 38 04 8E 00 F9 |.5,.(15)..&8....| 00000AE0: 26 42 04 41 24 28 35 29 B2 22 50 52 4F 50 4F 52 |&B.A$(5)."PROPOR| 00000AF0: 54 49 4F 4E 41 4C 2C 20 22 00 0F 27 4C 04 98 35 |TIONAL, "..'L..5| 00000B00: 2C 43 24 3B C7 28 31 31 32 29 3B C7 28 31 29 00 |,C$;.(112);.(1).| 00000B10: 15 27 56 04 8E 00 2C 27 60 04 41 24 28 36 29 B2 |.'V...,'`.A$(6).| 00000B20: 22 45 58 50 41 4E 44 45 44 2C 20 22 00 3A 27 6A |"EXPANDED, ".:'j| 00000B30: 04 98 35 2C 43 24 22 57 31 22 00 40 27 74 04 8E |..5,C$"W1".@'t..| 00000B40: 00 59 27 7E 04 41 24 28 37 29 B2 22 45 4D 50 48 |.Y'~.A$(7)."EMPH| 00000B50: 41 53 49 5A 45 44 2C 20 22 00 66 27 88 04 98 35 |ASIZED, ".f'...5| 00000B60: 2C 43 24 22 45 22 00 6C 27 92 04 8E 00 83 27 9C |,C$"E".l'.....'.| 00000B70: 04 41 24 28 38 29 B2 22 42 4F 4C 44 46 41 43 45 |.A$(8)."BOLDFACE| 00000B80: 2C 20 22 00 90 27 A6 04 98 35 2C 43 24 22 47 22 |, "..'...5,C$"G"| 00000B90: 00 96 27 B0 04 8E 00 AF 27 BA 04 41 24 28 39 29 |..'.....'..A$(9)| 00000BA0: B2 22 53 55 42 53 43 52 49 50 54 53 2C 20 22 00 |."SUBSCRIPTS, ".| 00000BB0: BD 27 C4 04 98 35 2C 43 24 22 53 31 22 00 C3 27 |.'...5,C$"S1"..'| 00000BC0: CE 04 8E 00 DF 27 D8 04 41 24 28 31 30 29 B2 22 |.....'..A$(10)."| 00000BD0: 53 55 50 45 52 53 43 52 49 50 54 53 2C 20 22 00 |SUPERSCRIPTS, ".| 00000BE0: ED 27 E2 04 98 35 2C 43 24 22 53 30 22 00 F3 27 |.'...5,C$"S0"..'| 00000BF0: EC 04 8E 00 0E 28 F6 04 41 24 28 31 31 29 B2 22 |.....(..A$(11)."| 00000C00: 44 4F 55 42 4C 45 20 48 49 47 48 2C 20 22 00 24 |DOUBLE HIGH, ".$| 00000C10: 28 00 05 98 35 2C 43 24 3B C7 28 31 30 34 29 3B |(...5,C$;.(104);| 00000C20: C7 28 31 29 00 2A 28 0A 05 8E 00 43 28 14 05 41 |.(1).*(....C(..A| 00000C30: 24 28 31 32 29 B2 22 51 55 41 44 20 48 49 47 48 |$(12)."QUAD HIGH| 00000C40: 2C 20 22 00 59 28 1E 05 98 35 2C 43 24 3B C7 28 |, ".Y(...5,C$;.(| 00000C50: 31 30 34 29 3B C7 28 32 29 00 5F 28 28 05 8E 00 |104);.(2)._((...| 00000C60: 72 28 32 05 8F 20 4D 41 52 47 49 4E 53 20 4D 45 |r(2.. MARGINS ME| 00000C70: 4E 55 00 86 28 3C 05 54 54 B2 54 3A 99 22 9A 22 |NU..(<.TT.T:."."| 00000C80: 3A 8D 32 33 38 30 00 95 28 46 05 99 A3 54 54 29 |:.2380..(F...TT)| 00000C90: 4D 24 28 31 29 00 B2 28 50 05 81 20 4B B2 32 20 |M$(1)..(P.. K.2 | 00000CA0: A4 20 4A 32 3A 99 A3 54 54 29 48 4D 24 28 4B 29 |. J2:..TT)HM$(K)| 00000CB0: 3A 82 00 C9 28 5A 05 8F 20 4D 41 52 47 49 4E 53 |:...(Z.. MARGINS| 00000CC0: 20 53 45 4C 45 43 54 4F 52 00 DE 28 64 05 81 20 | SELECTOR..(d.. | 00000CD0: 4B B2 31 20 A4 20 4A 32 3A 8D 32 33 33 30 00 F2 |K.1 . J2:.2330..| 00000CE0: 28 6E 05 8B 20 58 24 B2 43 44 24 20 89 20 31 34 |(n.. X$.CD$ . 14| 00000CF0: 31 30 00 FC 28 78 05 89 31 34 38 30 00 18 29 82 |10..(x..1480..).| 00000D00: 05 99 C7 28 31 39 29 3A 99 3A 99 3A 99 3A 8B 4B |...(19):.:.:.:.K| 00000D10: B2 31 20 89 31 34 33 30 00 2D 29 8C 05 81 49 B2 |.1 .1430.-)...I.| 00000D20: 31 A4 4B AB 31 3A 99 43 44 24 3B 3A 82 00 3E 29 |1.K.1:.CD$;:..>)| 00000D30: 96 05 8B 20 4B B2 4A 32 20 89 31 34 36 30 00 61 |... K.J2 .1460.a| 00000D40: 29 A0 05 99 A3 54 54 29 48 4D 24 28 4B 29 3A 99 |)....TT)HM$(K):.| 00000D50: A3 54 54 29 4D 24 28 4B AA 31 29 3A 89 31 34 37 |.TT)M$(K.1):.147| 00000D60: 30 00 71 29 AA 05 99 A3 54 54 29 48 4D 24 28 4B |0.q)....TT)HM$(K| 00000D70: 29 00 9A 29 B4 05 99 C7 28 31 39 29 3A 99 20 43 |)..)....(19):. C| 00000D80: 44 24 3B 43 44 24 3B 43 44 24 3B A3 54 54 29 4D |D$;CD$;CD$;.TT)M| 00000D90: 24 28 31 29 3A 89 31 33 38 30 00 A0 29 BE 05 82 |$(1):.1380..)...| 00000DA0: 00 AB 29 C8 05 9F 35 2C 34 2C 53 00 DD 29 D2 05 |..)...5,4,S..)..| 00000DB0: 91 20 4B 20 8D 20 31 35 31 30 2C 31 35 33 30 2C |. K . 1510,1530,| 00000DC0: 31 35 37 30 2C 31 36 31 30 2C 31 36 35 30 2C 31 |1570,1610,1650,1| 00000DD0: 37 31 30 2C 31 37 35 30 2C 31 37 39 30 00 EF 29 |710,1750,1790..)| 00000DE0: DC 05 A0 35 3A 99 22 93 22 3A 99 3A 99 3A 8E 00 |...5:.".":.:.:..| 00000DF0: 05 2A E6 05 47 B2 31 3A 89 31 35 30 30 3A 8F 20 |.*..G.1:.1500:. | 00000E00: 42 4C 41 4E 4B 00 16 2A F0 05 8F 20 54 4F 50 20 |BLANK..*... TOP | 00000E10: 4D 41 52 47 49 4E 00 36 2A FA 05 8D 31 38 30 30 |MARGIN.6*...1800| 00000E20: 3A 99 A3 4C 29 3A 85 22 54 4F 50 20 4D 41 52 47 |:..L):."TOP MARG| 00000E30: 49 4E 22 3B 54 4D 00 63 2A 04 06 98 35 2C 43 24 |IN";TM.c*...5,C$| 00000E40: 3B C7 28 31 31 34 29 3B C7 28 54 4D 29 3B 3A 98 |;.(114);.(TM);:.| 00000E50: 35 2C C7 28 31 32 29 3A 8F 20 46 4F 52 4D 20 46 |5,.(12):. FORM F| 00000E60: 45 45 44 00 69 2A 0E 06 8E 00 7D 2A 18 06 8F 20 |EED.i*....}*... | 00000E70: 42 4F 54 54 4F 4D 20 4D 41 52 47 49 4E 00 A0 2A |BOTTOM MARGIN..*| 00000E80: 22 06 8D 31 38 30 30 3A 99 A3 4C 29 3A 85 22 42 |"..1800:..L):."B| 00000E90: 4F 54 54 4F 4D 20 4D 41 52 47 49 4E 22 3B 42 4D |OTTOM MARGIN";BM| 00000EA0: 00 B6 2A 2C 06 98 35 2C 43 24 3B C7 28 37 38 29 |..*,..5,C$;.(78)| 00000EB0: 3B C7 28 42 4D 29 00 BC 2A 36 06 8E 00 CE 2A 40 |;.(BM)..*6....*@| 00000EC0: 06 8F 20 4C 45 46 54 20 4D 41 52 47 49 4E 00 F1 |.. LEFT MARGIN..| 00000ED0: 2A 4A 06 8D 31 38 30 30 3A 99 A3 4C 29 3A 85 22 |*J..1800:..L):."| 00000EE0: 43 4F 4C 55 4D 4E 20 4E 55 4D 42 45 52 22 3B 4C |COLUMN NUMBER";L| 00000EF0: 4D 00 08 2B 54 06 98 35 2C 43 24 3B C7 28 31 30 |M..+T..5,C$;.(10| 00000F00: 38 29 3B C7 28 4C 4D 29 00 0E 2B 5E 06 8E 00 21 |8);.(LM)..+^...!| 00000F10: 2B 68 06 8F 20 52 49 47 48 54 20 4D 41 52 47 49 |+h.. RIGHT MARGI| 00000F20: 4E 00 3E 2B 72 06 9F 20 31 2C 34 3A 98 31 2C 43 |N.>+r.. 1,4:.1,C| 00000F30: 24 3B 22 52 22 3B C7 28 30 29 3A A0 20 31 00 59 |$;"R";.(0):. 1.Y| 00000F40: 2B 7C 06 8F 20 44 49 53 41 42 4C 45 20 52 49 47 |+|.. DISABLE RIG| 00000F50: 48 54 20 4D 41 52 47 49 4E 00 7C 2B 86 06 8D 31 |HT MARGIN.|+...1| 00000F60: 38 30 30 3A 99 A3 4C 29 3A 85 22 43 4F 4C 55 4D |800:..L):."COLUM| 00000F70: 4E 20 4E 55 4D 42 45 52 22 3B 52 4D 00 92 2B 90 |N NUMBER";RM..+.| 00000F80: 06 98 35 2C 43 24 3B C7 28 38 31 29 3B C7 28 52 |..5,C$;.(81);.(R| 00000F90: 4D 29 00 98 2B 9A 06 8E 00 B8 2B A4 06 8F 20 4C |M)..+.....+... L| 00000FA0: 49 4E 45 20 53 50 41 43 49 4E 47 20 4E 2F 32 31 |INE SPACING N/21| 00000FB0: 36 20 49 4E 43 48 45 53 00 EB 2B AE 06 8D 31 38 |6 INCHES..+...18| 00000FC0: 30 30 3A 85 22 4C 49 4E 45 20 53 50 41 43 49 4E |00:."LINE SPACIN| 00000FD0: 47 20 4E 2F 32 31 36 20 49 4E 43 48 45 53 20 2D |G N/216 INCHES -| 00000FE0: 20 45 4E 54 45 52 20 4E 22 3B 4E 00 00 2C B8 06 | ENTER N";N..,..| 00000FF0: 98 35 2C 43 24 3B C7 28 35 31 29 3B C7 28 4E 29 |.5,C$;.(51);.(N)| 00001000: 00 06 2C C2 06 8E 00 16 2C CC 06 8F 20 46 4F 52 |..,.....,... FOR| 00001010: 4D 20 46 45 45 44 00 49 2C D6 06 8D 31 38 30 30 |M FEED.I,...1800| 00001020: 3A 99 A3 32 30 29 3A 85 22 54 4F 54 41 4C 20 4D |:..20):."TOTAL M| 00001030: 41 52 47 49 4E 22 3B 54 4D 3A 98 35 2C 43 24 3B |ARGIN";TM:.5,C$;| 00001040: 22 4E 22 3B C7 28 54 4D 29 00 56 2C E0 06 98 35 |"N";.(TM).V,...5| 00001050: 2C C7 28 31 32 29 00 5C 2C EA 06 8E 00 8C 2C F4 |,.(12).\,.....,.| 00001060: 06 8F 20 41 44 44 20 4E 45 57 20 43 4F 4D 4D 41 |.. ADD NEW COMMA| 00001070: 4E 44 20 52 4F 55 54 49 4E 45 53 20 53 54 41 52 |ND ROUTINES STAR| 00001080: 54 49 4E 47 20 41 54 20 31 37 39 30 00 92 2C FE |TING AT 1790..,.| 00001090: 06 8F 00 B0 2C 08 07 99 22 13 22 3A 81 20 4A B2 |....,...".":. J.| 000010A0: 31 20 A4 20 4A 32 AB 31 3A 99 20 43 44 24 3A 82 |1 . J2.1:. CD$:.| 000010B0: 00 B6 2C 12 07 8E 00 C9 2C 1C 07 8F 20 55 54 49 |..,.....,... UTI| 000010C0: 4C 49 54 59 20 4D 45 4E 55 00 DF 2C 26 07 54 54 |LITY MENU..,&.TT| 000010D0: B2 32 AC 54 3A 99 22 1E 22 3A 8D 32 33 38 30 00 |.2.T:.".":.2380.| 000010E0: EE 2C 30 07 99 A3 54 54 29 47 24 28 31 29 00 0B |.,0...TT)G$(1)..| 000010F0: 2D 3A 07 81 20 4B B2 32 20 A4 20 4A 33 3A 99 A3 |-:.. K.2 . J3:..| 00001100: 54 54 29 48 47 24 28 4B 29 3A 82 00 22 2D 44 07 |TT)HG$(K):.."-D.| 00001110: 8F 20 55 54 49 4C 49 54 59 20 53 45 4C 45 43 54 |. UTILITY SELECT| 00001120: 4F 52 00 37 2D 4E 07 81 20 4B B2 31 20 A4 20 4A |OR.7-N.. K.1 . J| 00001130: 33 3A 8D 32 33 33 30 00 4B 2D 58 07 8B 20 58 24 |3:.2330.K-X.. X$| 00001140: B2 43 44 24 20 89 20 31 39 30 30 00 55 2D 62 07 |.CD$ . 1900.U-b.| 00001150: 89 31 39 37 30 00 71 2D 6C 07 99 C7 28 31 39 29 |.1970.q-l...(19)| 00001160: 3A 99 3A 99 3A 99 3A 8B 4B B2 31 20 89 31 39 32 |:.:.:.:.K.1 .192| 00001170: 30 00 86 2D 76 07 81 49 B2 31 A4 4B AB 31 3A 99 |0..-v..I.1.K.1:.| 00001180: 43 44 24 3B 3A 82 00 97 2D 80 07 8B 20 4B B2 4A |CD$;:...-... K.J| 00001190: 33 20 89 31 39 34 30 00 BA 2D 8A 07 99 A3 54 54 |3 .1940..-....TT| 000011A0: 29 48 47 24 28 4B 29 3A 99 A3 54 54 29 47 24 28 |)HG$(K):..TT)G$(| 000011B0: 4B AA 31 29 3A 89 31 39 36 30 00 CA 2D 94 07 99 |K.1):.1960..-...| 000011C0: A3 54 54 29 48 47 24 28 4B 29 00 EC 2D 9E 07 99 |.TT)HG$(K)..-...| 000011D0: C7 28 31 39 29 3A 99 3A 99 3A 99 3A 99 A3 54 54 |.(19):.:.:.:..TT| 000011E0: 29 47 24 28 31 29 3A 89 31 38 37 30 00 F2 2D A8 |)G$(1):.1870..-.| 000011F0: 07 82 00 FD 2D B2 07 9F 35 2C 34 2C 53 00 2A 2E |....-...5,4,S.*.| 00001200: BC 07 91 20 4B 20 8D 20 32 30 30 30 2C 32 30 32 |... K . 2000,202| 00001210: 30 2C 32 30 36 30 2C 32 30 39 30 2C 32 31 31 30 |0,2060,2090,2110| 00001220: 2C 32 31 38 30 2C 32 32 36 30 00 3C 2E C6 07 A0 |,2180,2260.<....| 00001230: 35 3A 99 22 93 22 3A 99 3A 99 3A 8E 00 4A 2E D0 |5:.".":.:.:..J..| 00001240: 07 47 B2 31 3A 89 31 39 39 30 00 5E 2E DA 07 8F |.G.1:.1990.^....| 00001250: 20 52 45 53 45 54 20 50 52 49 4E 54 45 52 00 6F | RESET PRINTER.o| 00001260: 2E E4 07 98 35 2C 43 24 3B C7 28 36 34 29 3B 00 |....5,C$;.(64);.| 00001270: 91 2E EE 07 81 20 4B B2 31 20 A4 20 31 32 3A 41 |..... K.1 . 12:A| 00001280: 24 28 4B 29 B2 22 22 3A 82 3A 8F 20 43 4C 45 41 |$(K)."":.:. CLEA| 00001290: 52 00 97 2E F8 07 8E 00 A8 2E 02 08 8F 20 53 4C |R............ SL| 000012A0: 41 53 48 20 5A 45 52 4F 00 BE 2E 0C 08 98 35 2C |ASH ZERO......5,| 000012B0: 43 24 3B C7 28 31 32 36 29 3B C7 28 31 29 00 C4 |C$;.(126);.(1)..| 000012C0: 2E 16 08 8E 00 E3 2E 20 08 8F 20 44 49 53 41 42 |....... .. DISAB| 000012D0: 4C 45 20 50 41 50 45 52 20 4F 55 54 20 53 49 47 |LE PAPER OUT SIG| 000012E0: 4E 41 4C 00 F3 2E 2A 08 98 35 2C 43 24 3B C7 28 |NAL...*..5,C$;.(| 000012F0: 35 36 29 00 F9 2E 34 08 8E 00 17 2F 3E 08 9F 34 |56)...4..../>..4| 00001300: 2C 34 3A 9D 34 3A 8F 20 53 41 4D 50 4C 45 20 50 |,4:.4:. SAMPLE P| 00001310: 52 49 4E 54 4F 55 54 00 36 2F 48 08 8B 20 41 24 |RINTOUT.6/H.. A$| 00001320: 28 32 29 B2 22 22 A7 20 41 24 28 32 29 B2 22 50 |(2)."". A$(2)."P| 00001330: 49 43 41 2C 20 22 00 47 2F 52 08 99 22 54 48 49 |ICA, ".G/R.."THI| 00001340: 53 20 49 53 20 22 3B 00 63 2F 5C 08 81 20 4B B2 |S IS ";.c/\.. K.| 00001350: 32 20 A4 20 31 32 3A 99 20 41 24 28 4B 29 3B 3A |2 . 12:. A$(K);:| 00001360: 82 3A 99 00 96 2F 66 08 99 22 54 48 45 20 51 55 |.:.../f.."THE QU| 00001370: 49 43 4B 20 42 52 4F 57 4E 20 46 4F 58 20 4A 55 |ICK BROWN FOX JU| 00001380: 4D 50 53 20 4F 56 45 52 20 54 48 45 20 4C 41 5A |MPS OVER THE LAZ| 00001390: 59 20 44 4F 47 2E 00 A0 2F 70 08 98 34 3A A0 34 |Y DOG.../p..4:.4| 000013A0: 00 A6 2F 7A 08 8E 00 C0 2F 84 08 8D 32 31 31 30 |../z..../...2110| 000013B0: 3A 8F 20 56 49 45 57 20 50 52 49 4E 54 4F 55 54 |:. VIEW PRINTOUT| 000013C0: 00 E2 2F 8E 08 98 35 2C 43 24 3B C7 28 37 34 29 |../...5,C$;.(74)| 000013D0: 3B C7 28 32 31 36 29 3A 8F 20 50 41 50 45 52 20 |;.(216):. PAPER | 000013E0: 55 50 00 F4 2F 98 08 8B 20 41 B2 31 32 38 20 89 |UP../... A.128 .| 000013F0: 32 32 32 30 00 0C 30 A2 08 81 20 4B B2 31 A4 20 |2220..0... K.1. | 00001400: 39 33 30 30 3A 82 3A 89 32 32 33 30 00 29 30 AC |9300:.:.2230.)0.| 00001410: 08 81 4B B2 31 A4 20 36 35 35 30 3A 82 3A 8F 20 |..K.1. 6550:.:. | 00001420: 31 32 38 20 44 45 4C 41 59 00 55 30 B6 08 98 35 |128 DELAY.U0...5| 00001430: 2C 43 24 3B C7 28 31 30 36 29 3B C7 28 32 31 36 |,C$;.(106);.(216| 00001440: 29 3A 8F 20 50 41 50 45 52 20 44 4F 57 4E 20 31 |):. PAPER DOWN 1| 00001450: 20 49 4E 43 48 00 5B 30 C0 08 8E 00 78 30 CA 08 | INCH.[0....x0..| 00001460: 8F 20 41 44 44 20 4E 45 57 20 43 4F 4D 4D 41 4E |. ADD NEW COMMAN| 00001470: 44 53 20 42 45 4C 4F 57 00 7E 30 D4 08 8F 00 8D |DS BELOW.~0.....| 00001480: 30 10 09 8F 20 53 45 4C 45 43 54 4F 52 00 A2 30 |0... SELECTOR..0| 00001490: 1A 09 A1 58 24 3A 8B 20 58 24 B2 22 22 89 32 33 |...X$:. X$."".23| 000014A0: 33 30 00 B6 30 24 09 8B 20 58 24 B2 52 24 20 A7 |30..0$.. X$.R$ .| 000014B0: 20 4A B2 4B 3A 8E 00 D4 30 2E 09 8B 20 58 24 B3 | J.K:...0... X$.| 000014C0: B1 43 44 24 20 AF 20 58 24 B3 B1 52 24 20 A7 20 |.CD$ . X$..R$ . | 000014D0: 32 33 33 30 00 DA 30 38 09 8E 00 E6 30 42 09 8F |2330..08....0B..| 000014E0: 20 4D 45 4E 55 53 00 FE 30 4C 09 99 C7 28 31 39 | MENUS..0L...(19| 000014F0: 29 3A 81 20 49 B2 31 A4 32 31 3A 99 3A 82 00 10 |):. I.1.21:.:...| 00001500: 31 56 09 8B 20 41 B2 31 32 38 20 89 32 34 31 30 |1V.. A.128 .2410| 00001510: 00 48 31 60 09 99 20 22 12 20 43 55 52 53 4F 52 |.H1`.. ". CURSOR| 00001520: 20 44 4E 20 54 4F 20 53 45 4C 45 43 54 2C 20 52 | DN TO SELECT, R| 00001530: 45 54 55 52 4E 20 54 4F 20 45 58 45 43 55 54 45 |ETURN TO EXECUTE| 00001540: 20 22 3A 89 32 34 33 30 00 80 31 6A 09 99 22 12 | ":.2430..1j..".| 00001550: 20 20 20 20 20 20 20 20 20 20 20 20 3C 43 55 52 | <CUR| 00001560: 53 4F 52 20 44 4F 57 4E 3E 20 54 4F 20 53 45 4C |SOR DOWN> TO SEL| 00001570: 45 43 54 20 20 20 20 20 20 20 20 20 20 20 22 3B |ECT ";| 00001580: 00 AB 31 74 09 99 22 12 20 3C 52 45 54 55 52 4E |..1t..". <RETURN| 00001590: 3E 20 54 4F 20 45 58 45 43 55 54 45 20 20 20 20 |> TO EXECUTE | 000015A0: 20 20 20 20 20 20 20 20 20 20 22 00 BA 31 7E 09 | "..1~.| 000015B0: 99 C7 28 31 39 29 3A 99 3A 99 00 D7 31 88 09 81 |..(19):.:...1...| 000015C0: 4B B2 31 20 A4 20 31 39 3A 99 A3 54 54 29 22 12 |K.1 . 19:..TT)".| 000015D0: 20 22 3B 3A 82 3A 99 00 DD 31 92 09 8E 00 00 00 | ";:.:...1......|
..-.... CONTROL YOUR PRINTER - WILLIAM M
CLEOD.5....50.G...ZZ$."PRINTER".^....15,
8,15,"S0:".ZZ$.P.(. 15:. ZZ$,8:....2.. P
$(13),HP$(13),A$(13),M$(11),HM$(11).S.<.
L.9:T.9:LL.39:A.B(215):. A.128 . L.19:T.
19:LL.79:.%...F.I.1:H$.".":N$.".":RM.80.
#.P.Z$.G(29):R$.G(13):C$.G(27):CU$.G(145
):CD$.G(17).?.Z.S.5: . TRANSPARENT MODE.
U.D..53280,0:.53281,0.M.N.. N$(I):. MAIN
MENU...X.. STYLE,MARGINS,UTILITY,QUIT..
.... END...... N$(I)."END" . K.I.1:.170.
....N$(I)." ".N$(I)."
":N$(I).H(N$(I),L)... .I.I.1:.110......I
.1.K.1.$...H$(I).H$.N$(I).N$.*.....:.H.K
.1:. STYLE.F.R.. P$(K)...... EXIT,ELITE,
ITALICS,CONDENSED,PROPORTIONAL,EXPANDED,
EMPHASIZED.G.... BOLDFACE,SUBSCRIPTS,SUP
ERSCRIPTS,DOUBLE HIGH,QUAD HIGH.Q.... EN
D...... P$(K)."END" . J1.K.1:.280.(...P$
(K)." ".P$(K)." ":P$(K).H(P
$(K),19).7...K.K.1:.210.F.... K.1 . J1._
.".HP$(K).H$.P$(K).N$:..Q.,.K.1:. MARGIN
S.}.6.. M$(K)...@.. EXIT,TOP MARGIN,BOTT
OM MARGIN,LEFT MARGIN,RIGHT MARGIN...J..
LINE SPACING N/216,FORM FEED...T.. END.
. ^..M$(K)."END". J2.K.1:.380.< H.M$(K).
" ".M$(K)." ":M$(K).H(M$(K)
,19).K R.K.K.1:.310.Z |.. K.1 . J2.S ..H
M$(K).H$.M$(K).N$:... ..K.1:. UTILITY..
... G$(K).G ... EXIT,RESET PRINTER,SLASH
ZERO,PAPER OUT SIG OFF.. ... SAMPLE PRI
NTOUT,PRINT AND VIEW.. ... END..!B..G$(K
)."END". J3.K.1:.480.K!L.G$(K)." ".G$(K)
." ":G$(K).H(G$(K),19).Z!V.
K.K.1:.410.I!... K.1 . J3..!..HG$(K).H$.
G$(K).N$:...!... MAIN MENU. !..G.0:.".."
..!... H$(1);N$(2);N$(3);N$(4).R!...K.1.
LL:.".";:...!...".":. I.1.21:.:...!&..A.
128.570.2"0..". CURSOR RT TO SELECT, RET
URN TO EXECUTE ":.".":.590.T":..".
<CURSOR RIGHT> TO SELECT
<RETURN>";.."D..". TO EXECUTE
"G(19):.:..."N.I.1:.680:. X$.R$ .730
.U"X..N$(1);H$(2);N$(3);N$(4).."B.I.2:.6
80:. X$.R$ .730..#L..N$(1);N$(2);H$(3);N
$(4).&#V.I.3:.680:. X$.R$ .730.C#...N$(1
);N$(2);N$(3);H$(4).]#..I.4:.680:. X$.R$
.730.Z#...H$(1);N$(2);N$(3);N$(4)..#...
590..#... X$:. X$."" .680..#... X$.Z$ .
. CU$;CU$;CU$:..F#...X$.R$ . ...#F..".":
..10)". PRESS CURSOR RIGHT OR RETURN"..$
P.. Y.1.3000:.:.510.$$Z.. I .740,760,780
,800.8$...830:. G.1 .510.A$...740.V$...1
340:. G.1 .510._$...760.T$...1830:. G.1
.510.}$...780..$ .TA..(LL.2).5..$*. 5:."
.":.:.:.:.:..TA)"***END***":..F$4.. STYL
E MENU..$>..:TT.0:.".":.CU$:.2380..$H..
P$(1)..%R.. K.2 . J1:. HP$(K):...%\.. ST
YLE SELECTOR.1%F.. K.1 . J1:.2330.C%P..
X$.CD$ .900.L%Z..960.G%...G(19):.:.:.:.K
.1 .920.|%...I.1.K.1:.CD$;:...%... K.J1
.940..%...HP$(K):.P$(K.1):.950.L%... HP$
(K):.G(19):.:.:.:.P$(1):.870.R%.....%...
5,4,S:. TRANSPARENT MODE.5&J.. K . 990,1
000,1030,1060,1090,1120,1150,1180,1210,1
240,1270,1300.C&T. 5:.".":..P&..G.1:.980
.V&..A$(2)."ELITE, ":. PICA IS DEFAULT..
&...5,C$"M"..&.....&..A$(3)."ITALICS, ".
.&...5,C$;"4"..&....K&$.A$(4)."CONDENSED
, ".X&...5,G(15)..&8....&B.A$(5)."PROPOR
TIONAL, "..'L..5,C$;G(112);G(1)..'V...,'
`.A$(6)."EXPANDED, ".:'J..5,C$"W1".@'T..
.Y'~.A$(7)."EMPHASIZED, ".F'...5,C$"E".L
'.....'..A$(8)."BOLDFACE, "..'...5,C$"G"
..'.....'..A$(9)."SUBSCRIPTS, "..'D..5,C
$"S1".C'N....'X.A$(10)."SUPERSCRIPTS, ".
.'...5,C$"S0"..'.....(..A$(11)."DOUBLE H
IGH, ".$(...5,C$;G(104);G(1).*(....C(..A
$(12)."QUAD HIGH, ".Y(...5,C$;G(104);G(2
)._((...R(2.. MARGINS MENU..(<.TT.T:."."
:.2380..(F...TT)M$(1)..(P.. K.2 . J2:..T
T)HM$(K):..I(Z.. MARGINS SELECTOR..(D..
K.1 . J2:.2330..(N.. X$.CD$ . 1410..(X..
1480..)...G(19):.:.:.:.K.1 .1430.-)...I.
1.K.1:.CD$;:..>)... K.J2 .1460.A) ...TT)
HM$(K):..TT)M$(K.1):.1470.Q)....TT)HM$(K
)..)...G(19):. CD$;CD$;CD$;.TT)M$(1):.13
80. ).....)H..5,4,S..)R.. K . 1510,1530,
1570,1610,1650,1710,1750,1790..).. 5:.".
":.:.:...*..G.1:.1500:. BLANK..*... TOP
MARGIN.6*...1800:..L):."TOP MARGIN";TM.C
*...5,C$;G(114);G(TM);:.5,G(12):. FORM F
EED.I*....}*... BOTTOM MARGIN. *"..1800:
..L):."BOTTOM MARGIN";BM..*,..5,C$;G(78)
;G(BM)..*6...N*@.. LEFT MARGIN..*J..1800
:..L):."COLUMN NUMBER";LM..+T..5,C$;G(10
8);G(LM)..+^...!+H.. RIGHT MARGIN.>+R..
1,4:.1,C$;"R";G(0): 1.Y+|.. DISABLE RIG
HT MARGIN.|+...1800:..L):."COLUMN NUMBER
";RM..+...5,C$;G(81);G(RM)..+.....+... L
INE SPACING N/216 INCHES..+...1800:."LIN
E SPACING N/216 INCHES - ENTER N";N..,..
.5,C$;G(51);G(N)..,B....,L.. FORM FEED.I
,V..1800:..20):."TOTAL MARGIN";TM:.5,C$;
"N";G(TM).V,...5,G(12).\,.....,... ADD N
EW COMMAND ROUTINES STARTING AT 1790..,.
....,...".":. J.1 . J2.1:. CD$:...,....I
,... UTILITY MENU..,&.TT.2.T:.".":.2380.
.,0...TT)G$(1)..-:.. K.2 . J3:..TT)HG$(K
):.."-D.. UTILITY SELECTOR.7-N.. K.1 . J
3:.2330.K-X.. X$.CD$ . 1900.U-B..1970.Q-
L..G(19):.:.:.:.K.1 .1920..-V..I.1.K.1:.
CD$;:...-... K.J3 .1940..-....TT)HG$(K):
..TT)G$(K.1):.1960.J-....TT)HG$(K)..-...
G(19):.:.:.:..TT)G$(1):.1870..-.....-...
5,4,S.*.... K . 2000,2020,2060,2090,2110
,2180,2260.<.F. 5:.".":.:.:..J.P.G.1:.19
90.^.Z.. RESET PRINTER.O....5,C$;G(64);.
..... K.1 . 12:A$(K)."":.:. CLEAR.......
..... SLASH ZERO......5,C$;G(126);G(1).D
....... .. DISABLE PAPER OUT SIGNAL...*.
.5,C$;G(56)...4..../>..4,4:.4:. SAMPLE P
RINTOUT.6/H.. A$(2)."". A$(2)."PICA, ".G
/R.."THIS IS ";.C/\.. K.2 . 12:. A$(K);:
.:.../F.."THE QUICK BROWN FOX JUMPS OVER
THE LAZY DOG.. /P..4: 4../Z..../...2110
:. VIEW PRINTOUT../...5,C$;G(74);G(216):
. PAPER UP../... A.128 .2220..0... K.1.
9300:.:.2230.)0...K.1. 6550:.:. 128 DELA
Y.U0...5,C$;G(106);G(216):. PAPER DOWN 1
INCH.[0....X0J.. ADD NEW COMMANDS BELOW
.~0T....0... SELECTOR..0...X$:. X$."".23
30..0$.. X$.R$ . J.K:..T0... X$..CD$ . X
$..R$ . 2330.Z08....0B.. MENUS..0L..G(19
):. I.1.21:.:...1V.. A.128 .2410.H1`.. "
. CURSOR DN TO SELECT, RETURN TO EXECUTE
":.2430..1J..". <CURSOR DOWN
> TO SELECT ";..1T..". <RETURN
> TO EXECUTE "..1~..G(19):.
:..W1...K.1 . 19:..TT)". ";:.:...1......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL