PRINTER.SETUP
FILE INFORMATION
FILENAME(S): PRINTER.SETUP
FILE TYPE(S): PRG
FILE SIZE: 4.5K
FIRST SEEN: 2025-10-19 22:48:44
APPEARS ON: 3 disk(s)
FILE HASH
8140d0d01389eee9d6dbc7b0c33c019bc6223e495ab0217af717baa7e5b37bbf
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DCMR PROGRAM | PRINTER.SETUP | PRG | Radd Maxx | 20 | 2 | DOWNLOAD FILE |
| DISK FILER | PRINTER.SETUP | PRG | Radd Maxx | 20 | 3 | DOWNLOAD FILE |
| DISK FILER | PRINTER.SETUP | PRG | Radd Maxx | 20 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 F2 03 81 49 B2 30 A4 37 31 3A 97 34 |..#....I.0.71:.4|
00000010: 39 38 30 38 AA 49 2C 30 3A 82 3A 97 34 39 38 34 |9808.I,0:.:.4984|
00000020: 30 2C 34 00 30 08 4C 04 9F 31 35 2C 38 2C 31 35 |0,4.0.L..15,8,15|
00000030: 00 3C 08 51 04 86 20 43 28 31 35 29 00 54 08 56 |.<.Q.. C(15).T.V|
00000040: 04 97 35 33 32 38 30 2C 31 34 3A 97 35 33 32 38 |..53280,14:.5328|
00000050: 31 2C 31 35 00 83 08 60 04 99 22 93 97 20 20 20 |1,15...`..".. |
00000060: 20 20 12 44 49 53 4B 20 43 41 54 41 4C 4F 47 20 | .DISK CATALOG |
00000070: 4D 41 4E 41 47 45 52 2F 52 45 50 4F 52 54 45 52 |MANAGER/REPORTER|
00000080: 92 11 22 00 9E 08 6A 04 99 20 A6 31 33 29 3B 22 |.."...j.. .13);"|
00000090: 50 52 49 4E 54 45 52 20 53 45 54 55 50 22 00 B9 |PRINTER SETUP"..|
000000A0: 08 6F 04 8D 31 31 30 30 30 3A 8F 20 4C 4F 41 44 |.o..11000:. LOAD|
000000B0: 20 41 20 46 49 4C 45 20 3F 00 CF 08 74 04 44 24 | A FILE ?...t.D$|
000000C0: B2 C7 28 C2 28 34 39 38 34 30 29 AA 34 38 29 00 |..(.(49840).48).|
000000D0: F7 08 7E 04 99 20 22 11 44 45 56 49 43 45 20 41 |..~.. ".DEVICE A|
000000E0: 44 44 52 20 49 53 20 20 20 22 3B 44 24 3B 22 9D |DDR IS ";D$;".|
000000F0: 9D 9D 22 3B 3A 85 44 00 0A 09 88 04 8B 44 B3 30 |..";:.D......D.0|
00000100: B0 44 B1 39 20 A7 31 31 35 30 00 17 09 92 04 97 |.D.9 .1150......|
00000110: 34 39 38 34 30 2C 44 00 3D 09 B0 04 53 24 B2 C4 |49840,D.=...S$..|
00000120: 28 C2 28 34 39 38 34 31 29 29 3A 53 24 B2 CA 28 |(.(49841)):S$..(|
00000130: 53 24 2C 32 2C C3 28 53 24 29 AB 31 29 00 76 09 |S$,2,.(S$).1).v.|
00000140: BA 04 99 22 11 53 45 43 4F 4E 44 41 52 59 20 41 |...".SECONDARY A|
00000150: 44 44 52 20 49 53 20 20 20 22 3B 53 24 3B 3A 81 |DDR IS ";S$;:.|
00000160: 49 B2 30 A4 31 AA C3 28 53 24 29 3A 99 22 9D 22 |I.0.1..(S$):."."|
00000170: 3B 3A 82 3A 85 53 00 89 09 C4 04 8B 53 B3 30 B0 |;:.:.S......S.0.|
00000180: 53 B1 39 35 A7 31 32 31 30 00 96 09 CE 04 97 34 |S.95.1210......4|
00000190: 39 38 34 31 2C 53 00 B5 09 14 05 41 24 B2 22 4E |9841,S.....A$."N|
000001A0: 22 3A 8B C2 28 34 39 38 34 32 29 B2 31 30 A7 41 |":..(49842).10.A|
000001B0: 24 B2 22 59 22 00 DD 09 19 05 99 22 11 53 45 4E |$."Y"......".SEN|
000001C0: 44 20 4C 49 4E 45 20 46 45 45 44 20 41 46 54 45 |D LINE FEED AFTE|
000001D0: 52 20 52 45 54 55 52 4E 20 46 4F 52 22 00 08 0A |R RETURN FOR"...|
000001E0: 1B 05 99 22 20 20 45 41 43 48 20 50 52 49 4E 54 |..." EACH PRINT|
000001F0: 20 4C 49 4E 45 20 28 59 2F 4E 29 20 20 20 22 41 | LINE (Y/N) "A|
00000200: 24 3B 22 9D 9D 9D 22 3B 00 27 0A 1E 05 85 41 24 |$;"...";.'....A$|
00000210: 3A 8B 41 24 B2 22 4E 22 A7 97 34 39 38 34 32 2C |:.A$."N"..49842,|
00000220: 30 3A 89 31 34 30 30 00 43 0A 28 05 8B 41 24 B2 |0:.1400.C.(..A$.|
00000230: 22 59 22 A7 97 34 39 38 34 32 2C 31 30 3A 89 31 |"Y"..49842,10:.1|
00000240: 34 30 30 00 4D 0A 32 05 89 31 33 30 30 00 77 0A |400.M.2..1300.w.|
00000250: 78 05 99 22 11 59 4F 55 20 4D 41 59 20 4E 4F 57 |x..".YOU MAY NOW|
00000260: 20 45 53 54 41 42 4C 49 53 48 20 46 52 4F 4D 20 | ESTABLISH FROM |
00000270: 30 20 54 4F 20 34 22 00 A1 0A 82 05 99 22 50 52 |0 TO 4"......"PR|
00000280: 49 4E 54 45 52 20 53 45 54 55 50 20 53 45 51 55 |INTER SETUP SEQU|
00000290: 45 4E 43 45 53 2E 20 20 57 48 45 4E 20 54 48 45 |ENCES. WHEN THE|
000002A0: 22 00 CE 0A 8C 05 99 22 50 52 49 4E 54 20 20 46 |"......"PRINT F|
000002B0: 55 4E 43 54 49 4F 4E 20 49 53 20 53 45 4C 45 43 |UNCTION IS SELEC|
000002C0: 54 45 44 2C 20 59 4F 55 20 57 49 4C 4C 22 00 FC |TED, YOU WILL"..|
000002D0: 0A 96 05 99 22 42 45 20 47 49 56 45 4E 20 54 48 |...."BE GIVEN TH|
000002E0: 45 20 4F 50 50 4F 52 54 55 4E 49 54 59 20 54 4F |E OPPORTUNITY TO|
000002F0: 20 53 45 4E 44 20 54 48 45 53 45 22 00 2A 0B A0 | SEND THESE".*..|
00000300: 05 99 22 50 52 49 4E 54 45 52 20 53 45 54 55 50 |.."PRINTER SETUP|
00000310: 20 43 48 41 52 41 43 54 45 52 53 20 42 45 46 4F | CHARACTERS BEFO|
00000320: 52 45 20 52 45 50 4F 52 54 22 00 42 0B AA 05 99 |RE REPORT".B....|
00000330: 22 50 52 49 4E 54 49 4E 47 20 42 45 47 49 4E 53 |"PRINTING BEGINS|
00000340: 2E 22 00 6F 0B B4 05 99 22 11 41 20 43 4F 55 50 |.".o....".A COUP|
00000350: 4C 45 20 4F 46 20 49 44 45 41 53 20 4F 4E 20 48 |LE OF IDEAS ON H|
00000360: 4F 57 20 54 48 45 53 45 20 4D 49 47 48 54 22 00 |OW THESE MIGHT".|
00000370: 7F 0B BE 05 99 22 42 45 20 55 53 45 44 3A 22 00 |....."BE USED:".|
00000380: A4 0B C8 05 99 22 11 20 20 20 31 29 20 20 43 48 |.....". 1) CH|
00000390: 41 4E 47 45 20 43 48 41 52 41 43 54 45 52 20 53 |ANGE CHARACTER S|
000003A0: 45 54 53 22 00 C6 0B D2 05 99 22 20 20 20 32 29 |ETS"......" 2)|
000003B0: 20 20 43 48 41 4E 47 45 20 4C 49 4E 45 20 53 50 | CHANGE LINE SP|
000003C0: 41 43 49 4E 47 22 00 F3 0B DC 05 99 22 11 46 4F |ACING"......".FO|
000003D0: 52 20 45 41 43 48 20 4F 46 20 54 48 45 20 34 20 |R EACH OF THE 4 |
000003E0: 53 45 51 55 45 4E 43 45 53 2C 20 55 50 20 54 4F |SEQUENCES, UP TO|
000003F0: 20 38 22 00 1F 0C E6 05 99 22 43 48 41 52 41 43 | 8"......"CHARAC|
00000400: 54 45 52 53 20 43 41 4E 20 42 45 20 44 45 46 49 |TERS CAN BE DEFI|
00000410: 4E 45 44 2E 20 20 46 55 52 54 48 45 52 2C 22 00 |NED. FURTHER,".|
00000420: 4D 0C F0 05 99 22 46 4F 52 20 41 4E 59 20 4F 4E |M...."FOR ANY ON|
00000430: 45 20 53 45 51 55 45 4E 43 45 2C 20 4D 55 4C 54 |E SEQUENCE, MULT|
00000440: 49 50 4C 45 20 50 52 49 4E 54 45 52 22 00 73 0C |IPLE PRINTER".s.|
00000450: FA 05 99 22 43 4F 4D 4D 41 4E 44 53 20 4D 41 59 |..."COMMANDS MAY|
00000460: 20 42 45 20 45 53 54 41 42 4C 49 53 48 45 44 20 | BE ESTABLISHED |
00000470: 42 59 22 00 97 0C 04 06 99 22 45 4E 54 45 52 49 |BY"......"ENTERI|
00000480: 4E 47 20 54 48 45 4D 20 43 4F 4E 53 45 43 55 54 |NG THEM CONSECUT|
00000490: 49 56 45 4C 59 2E 22 00 C0 0C 0E 06 99 22 11 50 |IVELY."......".P|
000004A0: 52 49 4E 54 45 52 20 53 45 54 55 50 20 53 45 51 |RINTER SETUP SEQ|
000004B0: 55 45 4E 43 45 20 54 4F 20 44 45 46 49 4E 45 22 |UENCE TO DEFINE"|
000004C0: 00 E1 0C 18 06 99 22 20 20 28 31 2D 34 3B 20 30 |......" (1-4; 0|
000004D0: 20 54 4F 20 45 4E 44 29 20 20 20 30 9D 9D 9D 22 | TO END) 0..."|
000004E0: 3B 00 F2 0C 22 06 85 41 3A 8B 41 B2 30 A7 31 37 |;..."..A:.A.0.17|
000004F0: 30 30 00 0A 0D 2C 06 8B 41 B2 31 A7 41 44 B2 34 |00...,..A.1.AD.4|
00000500: 39 38 30 38 3A 89 31 36 33 30 00 22 0D 36 06 8B |9808:.1630.".6..|
00000510: 41 B2 32 A7 41 44 B2 34 39 38 31 36 3A 89 31 36 |A.2.AD.49816:.16|
00000520: 33 30 00 3A 0D 40 06 8B 41 B2 33 A7 41 44 B2 34 |30.:.@..A.3.AD.4|
00000530: 39 38 32 34 3A 89 31 36 33 30 00 52 0D 4A 06 8B |9824:.1630.R.J..|
00000540: 41 B2 34 A7 41 44 B2 34 39 38 33 32 3A 89 31 36 |A.4.AD.49832:.16|
00000550: 33 30 00 5C 0D 54 06 89 31 35 35 30 00 90 0D 5E |30.\.T..1550...^|
00000560: 06 4D 58 B2 37 3A 8D 39 30 30 30 3A 8D 39 31 30 |.MX.7:.9000:.910|
00000570: 30 3A 99 22 20 20 22 3B 41 24 3A 99 22 91 22 3B |0:." ";A$:.".";|
00000580: 3A 8B C3 28 41 24 29 B1 33 39 A7 99 22 91 22 3B |:..(A$).39..".";|
00000590: 00 B0 0D 68 06 4C B2 C3 28 41 24 29 3A 85 41 24 |...h.L..(A$):.A$|
000005A0: 3A 8B C3 28 41 24 29 B2 4C AB 32 A7 31 36 36 30 |:..(A$).L.2.1660|
000005B0: 00 CA 0D 72 06 99 22 2E 2E 2E 54 52 59 20 41 47 |...r.."...TRY AG|
000005C0: 41 49 4E 22 3A 89 31 36 33 30 00 DF 0D 7C 06 8D |AIN":.1630...|..|
000005D0: 39 32 30 30 3A 8B 45 52 B2 31 A7 31 36 35 30 00 |9200:.ER.1.1650.|
000005E0: EF 0D 86 06 99 22 4F 4B 22 3A 89 31 35 35 30 00 |....."OK":.1550.|
000005F0: 1E 0E A4 06 99 22 93 11 11 49 46 20 59 4F 55 20 |....."...IF YOU |
00000600: 44 45 53 49 52 45 20 54 4F 20 50 52 49 4E 54 20 |DESIRE TO PRINT |
00000610: 36 20 43 4F 4C 55 4D 4E 53 20 50 45 52 22 00 46 |6 COLUMNS PER".F|
00000620: 0E AE 06 99 22 50 41 47 45 2C 20 59 4F 55 20 57 |...."PAGE, YOU W|
00000630: 49 4C 4C 20 4E 45 45 44 20 54 4F 20 45 53 54 41 |ILL NEED TO ESTA|
00000640: 42 4C 49 53 48 22 00 6F 0E B8 06 99 22 50 52 49 |BLISH".o...."PRI|
00000650: 4E 54 45 52 20 53 45 54 55 50 20 53 45 51 55 45 |NTER SETUP SEQUE|
00000660: 4E 43 45 53 20 54 48 41 54 20 57 49 4C 4C 22 00 |NCES THAT WILL".|
00000670: 9A 0E C2 06 99 22 41 43 54 49 56 41 54 45 20 41 |....."ACTIVATE A|
00000680: 4E 44 20 43 41 4E 43 45 4C 20 43 4F 4E 44 45 4E |ND CANCEL CONDEN|
00000690: 53 45 44 20 50 52 49 4E 54 22 00 C6 0E CC 06 99 |SED PRINT"......|
000006A0: 22 46 4F 52 4D 41 54 20 28 31 33 36 20 43 4F 4C |"FORMAT (136 COL|
000006B0: 55 4D 4E 53 20 50 45 52 20 50 52 49 4E 54 20 4C |UMNS PER PRINT L|
000006C0: 49 4E 45 29 2E 22 00 E2 0E D6 06 99 22 54 48 45 |INE)."......"THE|
000006D0: 20 57 41 59 20 49 54 20 57 4F 52 4B 53 20 49 53 | WAY IT WORKS IS|
000006E0: 3A 22 00 0A 0F E0 06 99 22 11 20 20 20 31 29 20 |:"......". 1) |
000006F0: 20 42 45 46 4F 52 45 20 45 41 43 48 20 48 45 41 | BEFORE EACH HEA|
00000700: 44 49 4E 47 20 4C 49 4E 45 22 00 38 0F EA 06 99 |DING LINE".8....|
00000710: 22 20 20 20 20 20 20 20 28 49 4E 43 4C 55 44 49 |" (INCLUDI|
00000720: 4E 47 20 54 48 45 20 31 53 54 29 2C 20 54 48 45 |NG THE 1ST), THE|
00000730: 20 43 41 4E 43 45 4C 22 00 67 0F F4 06 99 22 20 | CANCEL".g...." |
00000740: 20 20 20 20 20 20 43 4F 4E 44 45 4E 53 45 44 20 | CONDENSED |
00000750: 53 45 54 55 50 20 53 45 51 55 45 4E 43 45 20 57 |SETUP SEQUENCE W|
00000760: 49 4C 4C 20 42 45 22 00 7C 0F FE 06 99 22 20 20 |ILL BE".|...." |
00000770: 20 20 20 20 20 53 45 4E 54 2E 11 22 00 A7 0F 08 | SENT.."....|
00000780: 07 99 22 20 20 20 32 29 20 20 41 46 54 45 52 20 |.." 2) AFTER |
00000790: 45 41 43 48 20 48 45 41 44 49 4E 47 20 4C 49 4E |EACH HEADING LIN|
000007A0: 45 2C 20 54 48 45 22 00 CF 0F 12 07 99 22 20 20 |E, THE"......" |
000007B0: 20 20 20 20 20 41 43 54 49 56 41 54 45 20 43 4F | ACTIVATE CO|
000007C0: 4E 44 45 4E 53 45 44 20 53 45 54 55 50 20 22 00 |NDENSED SETUP ".|
000007D0: F5 0F 1C 07 99 22 20 20 20 20 20 20 20 53 45 51 |....." SEQ|
000007E0: 55 45 4E 43 45 20 57 49 4C 4C 20 42 45 20 53 45 |UENCE WILL BE SE|
000007F0: 4E 54 2E 11 22 00 24 10 26 07 99 22 11 11 11 11 |NT..".$.&.."....|
00000800: 11 11 20 20 20 20 20 20 20 2E 2E 2E 41 4E 59 20 |.. ...ANY |
00000810: 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E |KEY TO CONTINUE.|
00000820: 2E 2E 22 3B 00 3E 10 30 07 41 24 B2 22 22 3A A1 |..";.>.0.A$."":.|
00000830: 41 24 3A 8B 41 24 B2 22 22 A7 31 38 34 30 00 4B |A$:.A$."".1840.K|
00000840: 10 3A 07 99 22 91 91 91 91 91 22 00 6A 10 6C 07 |.:..".....".j.l.|
00000850: 4D 58 B2 31 35 3A 41 44 B2 34 39 38 34 38 3A 8D |MX.15:AD.49848:.|
00000860: 39 30 30 30 3A 8D 39 31 30 30 00 AA 10 76 07 99 |9000:.9100...v..|
00000870: 22 11 45 4E 54 45 52 20 41 43 54 49 56 41 54 45 |".ENTER ACTIVATE|
00000880: 20 43 4F 4E 44 45 4E 53 45 44 20 53 45 54 55 50 | CONDENSED SETUP|
00000890: 20 53 45 51 55 45 4E 43 45 11 22 3A 99 22 20 20 | SEQUENCE.":." |
000008A0: 22 3B 41 24 3A 99 22 91 22 3B 00 BE 10 80 07 8B |";A$:.".";......|
000008B0: C3 28 41 24 29 B1 33 39 A7 99 22 91 22 3B 00 DE |.(A$).39..".";..|
000008C0: 10 8A 07 4C B2 C3 28 41 24 29 3A 85 41 24 3A 8B |...L..(A$):.A$:.|
000008D0: C3 28 41 24 29 B2 4C AB 32 A7 31 39 35 30 00 F8 |.(A$).L.2.1950..|
000008E0: 10 94 07 99 22 2E 2E 2E 54 52 59 20 41 47 41 49 |...."...TRY AGAI|
000008F0: 4E 22 3A 89 31 39 30 30 00 0D 11 9E 07 8D 39 32 |N":.1900......92|
00000900: 30 30 3A 8B 45 52 B2 31 A7 31 39 34 30 00 17 11 |00:.ER.1.1940...|
00000910: A8 07 99 22 4F 4B 22 00 36 11 D0 07 4D 58 B2 31 |..."OK".6...MX.1|
00000920: 35 3A 41 44 B2 34 39 38 36 34 3A 8D 39 30 30 30 |5:AD.49864:.9000|
00000930: 3A 8D 39 31 30 30 00 74 11 DA 07 99 22 11 45 4E |:.9100.t....".EN|
00000940: 54 45 52 20 43 41 4E 43 45 4C 20 43 4F 4E 44 45 |TER CANCEL CONDE|
00000950: 4E 53 45 44 20 53 45 54 55 50 20 53 45 51 55 45 |NSED SETUP SEQUE|
00000960: 4E 43 45 11 22 3A 99 22 20 20 22 3B 41 24 3A 99 |NCE.":." ";A$:.|
00000970: 22 91 22 3B 00 89 11 E4 07 8B 20 C3 28 41 24 29 |".";...... .(A$)|
00000980: B1 33 39 A7 99 22 91 22 3B 00 A9 11 EE 07 4C B2 |.39..".";.....L.|
00000990: C3 28 41 24 29 3A 85 41 24 3A 8B C3 28 41 24 29 |.(A$):.A$:..(A$)|
000009A0: B2 4C AB 32 A7 32 30 35 30 00 C3 11 F8 07 99 22 |.L.2.2050......"|
000009B0: 2E 2E 2E 54 52 59 20 41 47 41 49 4E 22 3A 89 32 |...TRY AGAIN":.2|
000009C0: 30 30 30 00 D8 11 02 08 8D 39 32 30 30 3A 8B 45 |000......9200:.E|
000009D0: 52 B2 31 A7 32 30 34 30 00 E2 11 0C 08 99 22 4F |R.1.2040......"O|
000009E0: 4B 22 00 0A 12 34 08 99 22 11 41 53 20 50 41 52 |K"...4..".AS PAR|
000009F0: 54 20 4F 46 20 54 48 49 53 20 53 41 56 45 20 4F |T OF THIS SAVE O|
00000A00: 50 45 52 41 54 49 4F 4E 2C 22 00 34 12 3E 08 99 |PERATION,".4.>..|
00000A10: 22 49 46 20 46 49 4C 45 20 27 50 52 49 4E 54 2E |"IF FILE 'PRINT.|
00000A20: 43 4F 4E 46 49 47 2E 4F 4C 44 27 20 45 58 49 53 |CONFIG.OLD' EXIS|
00000A30: 54 53 2C 22 00 51 12 48 08 99 22 49 54 20 57 49 |TS,".Q.H.."IT WI|
00000A40: 4C 4C 20 42 45 20 53 43 52 41 54 43 48 45 44 2E |LL BE SCRATCHED.|
00000A50: 22 00 7D 12 52 08 99 22 54 48 45 20 43 55 52 52 |".}.R.."THE CURR|
00000A60: 45 4E 54 20 27 50 52 49 4E 54 45 52 2E 43 4F 4E |ENT 'PRINTER.CON|
00000A70: 46 49 47 27 20 57 49 4C 4C 20 42 45 22 00 AC 12 |FIG' WILL BE"...|
00000A80: 5C 08 99 22 52 45 4E 41 4D 45 44 20 54 4F 20 27 |\.."RENAMED TO '|
00000A90: 50 52 49 4E 54 2E 43 4F 4E 46 49 47 2E 4F 4C 44 |PRINT.CONFIG.OLD|
00000AA0: 27 2C 20 41 4E 44 20 54 48 45 4E 22 00 D4 12 66 |', AND THEN"...f|
00000AB0: 08 99 22 54 48 45 20 4E 45 57 20 50 52 49 4E 54 |.."THE NEW PRINT|
00000AC0: 45 52 20 53 45 54 55 50 20 50 41 52 41 4D 45 54 |ER SETUP PARAMET|
00000AD0: 45 52 53 22 00 FF 12 70 08 99 22 57 49 4C 4C 20 |ERS"...p.."WILL |
00000AE0: 42 45 20 53 41 56 45 44 20 41 53 20 27 50 52 49 |BE SAVED AS 'PRI|
00000AF0: 4E 54 45 52 2E 43 4F 4E 46 49 47 27 2E 11 22 00 |NTER.CONFIG'..".|
00000B00: 2E 13 7A 08 99 22 11 44 4F 20 59 4F 55 20 57 49 |..z..".DO YOU WI|
00000B10: 53 48 20 54 4F 20 53 41 56 45 20 54 48 49 53 20 |SH TO SAVE THIS |
00000B20: 43 4F 4E 46 49 47 55 52 41 54 49 4F 4E 22 00 5C |CONFIGURATION".\|
00000B30: 13 84 08 99 20 22 41 53 20 27 50 52 49 4E 54 45 |.... "AS 'PRINTE|
00000B40: 52 2E 43 4F 4E 46 49 47 27 20 28 59 2F 4E 29 20 |R.CONFIG' (Y/N) |
00000B50: 20 20 59 9D 9D 9D 22 3B 3A 85 41 24 00 6D 13 8E | Y...";:.A$.m..|
00000B60: 08 8B 41 24 B2 22 4E 22 A7 32 33 30 30 00 7F 13 |..A$."N".2300...|
00000B70: 98 08 8B 41 24 B3 B1 22 59 22 A7 32 31 37 30 00 |...A$.."Y".2170.|
00000B80: AA 13 A2 08 A0 31 35 3A 9F 31 35 2C 38 2C 31 35 |.....15:.15,8,15|
00000B90: 2C 22 53 30 3A 50 52 49 4E 54 2E 43 4F 4E 46 49 |,"S0:PRINT.CONFI|
00000BA0: 47 2E 4F 4C 44 22 3A A0 31 35 00 ED 13 AC 08 9F |G.OLD":.15......|
00000BB0: 31 35 2C 38 2C 31 35 2C 22 52 30 3A 50 52 49 4E |15,8,15,"R0:PRIN|
00000BC0: 54 2E 43 4F 4E 46 49 47 2E 4F 4C 44 3D 50 52 49 |T.CONFIG.OLD=PRI|
00000BD0: 4E 54 45 52 2E 43 4F 4E 46 49 47 22 3A A0 31 35 |NTER.CONFIG":.15|
00000BE0: 3A 9F 31 35 2C 38 2C 31 35 2C 22 49 22 00 0B 14 |:.15,8,15,"I"...|
00000BF0: B6 08 4E 24 B2 22 50 52 49 4E 54 45 52 2E 43 4F |..N$."PRINTER.CO|
00000C00: 4E 46 49 47 22 3A 89 32 35 30 30 00 37 14 FC 08 |NFIG":.2500.7...|
00000C10: 99 22 11 44 4F 20 59 4F 55 20 57 49 53 48 20 54 |.".DO YOU WISH T|
00000C20: 4F 20 53 41 56 45 20 41 53 20 41 4E 20 41 4C 54 |O SAVE AS AN ALT|
00000C30: 45 52 4E 41 54 45 22 00 60 14 06 09 99 22 50 52 |ERNATE".`...."PR|
00000C40: 49 4E 54 45 52 20 43 4F 4E 46 49 47 55 52 41 54 |INTER CONFIGURAT|
00000C50: 49 4F 4E 20 28 43 46 47 2E 29 20 46 49 4C 45 22 |ION (CFG.) FILE"|
00000C60: 00 79 14 10 09 99 22 28 59 2F 4E 29 20 20 20 4E |.y...."(Y/N) N|
00000C70: 9D 9D 9D 22 3B 3A 85 41 24 00 9B 14 1A 09 8B 41 |...";:.A$......A|
00000C80: 24 B2 22 4E 22 A7 99 22 11 2E 2E 2E 41 42 4F 52 |$."N".."....ABOR|
00000C90: 54 45 44 11 22 3A A0 31 35 3A 80 00 AD 14 24 09 |TED.":.15:....$.|
00000CA0: 8B 41 24 B3 B1 22 59 22 A7 32 33 30 30 00 D5 14 |.A$.."Y".2300...|
00000CB0: 2E 09 99 22 45 4E 54 45 52 20 43 4F 4E 46 49 47 |..."ENTER CONFIG|
00000CC0: 55 52 41 54 49 4F 4E 20 4E 41 4D 45 20 54 4F 20 |URATION NAME TO |
00000CD0: 53 41 56 45 22 00 ED 14 38 09 85 22 20 20 20 43 |SAVE"...8.." C|
00000CE0: 46 47 2E 9D 9D 9D 9D 9D 9D 22 3B 4E 24 00 F7 14 |FG.......";N$...|
00000CF0: 42 09 89 32 35 30 30 00 08 15 C4 09 98 31 35 2C |B..2500......15,|
00000D00: 22 53 30 3A 22 3B 4E 24 00 1D 15 C9 09 9F 38 2C |"S0:";N$......8,|
00000D10: 38 2C 38 2C 4E 24 AA 22 2C 50 2C 57 22 00 33 15 |8,8,N$.",P,W".3.|
00000D20: CE 09 98 38 2C C7 28 31 34 34 29 3B C7 28 31 39 |...8,.(144);.(19|
00000D30: 34 29 3B 00 53 15 D8 09 81 49 B2 30 A4 37 31 3A |4);.S....I.0.71:|
00000D40: 98 38 2C C7 28 C2 28 34 39 38 30 38 AA 49 29 29 |.8,.(.(49808.I))|
00000D50: 3B 3A 82 00 75 15 E2 09 A0 38 3A A0 31 35 3A 99 |;:..u....8:.15:.|
00000D60: 22 11 46 49 4E 49 53 48 45 44 20 53 41 56 49 4E |".FINISHED SAVIN|
00000D70: 47 11 22 3A 80 00 AD 15 28 23 41 24 B2 C7 28 33 |G.":....(#A$..(3|
00000D80: 34 29 3A 81 49 B2 30 A4 4D 58 3A 43 28 49 29 B2 |4):.I.0.MX:C(I).|
00000D90: C2 28 41 44 AA 49 29 3A 41 31 24 B2 C4 28 43 28 |.(AD.I):A1$..(C(|
00000DA0: 49 29 29 3A 41 31 B2 C3 28 41 31 24 29 00 DF 15 |I)):A1..(A1$)...|
00000DB0: 32 23 41 24 B2 41 24 AA C9 28 22 30 30 22 AA CA |2#A$.A$..("00"..|
00000DC0: 28 41 31 24 2C 32 2C 41 31 AB 31 29 2C 33 29 3A |(A1$,2,A1.1),3):|
00000DD0: 8B 49 B3 4D 58 A7 41 24 B2 41 24 AA 22 2C 22 00 |.I.MX.A$.A$.",".|
00000DE0: F3 15 3C 23 82 3A 41 24 B2 41 24 AA C7 28 33 34 |..<#.:A$.A$..(34|
00000DF0: 29 3A 8E 00 22 16 8C 23 99 22 11 4F 56 45 52 54 |):.."..#.".OVERT|
00000E00: 59 50 45 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E |YPE THE FOLLOWIN|
00000E10: 47 20 43 48 52 24 28 4E 4E 4E 29 20 43 4F 44 45 |G CHR$(NNN) CODE|
00000E20: 53 22 00 4C 16 96 23 99 22 57 49 54 48 20 54 48 |S".L..#."WITH TH|
00000E30: 45 20 44 45 43 49 4D 41 4C 20 45 51 55 49 56 41 |E DECIMAL EQUIVA|
00000E40: 4C 45 4E 54 20 4F 46 20 54 48 45 22 00 79 16 A0 |LENT OF THE".y..|
00000E50: 23 99 22 43 48 41 52 41 43 54 45 52 53 20 42 45 |#."CHARACTERS BE|
00000E60: 49 4E 47 20 53 45 4E 54 20 54 4F 20 54 48 45 20 |ING SENT TO THE |
00000E70: 50 52 49 4E 54 45 52 2E 22 00 A7 16 AA 23 99 22 |PRINTER."....#."|
00000E80: 53 45 54 20 52 49 47 48 54 20 4D 4F 53 54 20 55 |SET RIGHT MOST U|
00000E90: 4E 55 53 45 44 20 43 48 41 52 41 43 54 45 52 20 |NUSED CHARACTER |
00000EA0: 56 41 4C 55 45 53 22 00 B9 16 B4 23 99 22 54 4F |VALUES"....#."TO|
00000EB0: 20 30 30 30 2E 11 22 3A 8E 00 EA 16 F0 23 45 52 | 000..":.....#ER|
00000EC0: B2 30 3A 41 32 B2 31 3A 81 49 B2 30 A4 4D 58 3A |.0:A2.1:.I.0.MX:|
00000ED0: 43 28 49 29 B2 C5 28 CA 28 41 24 2C 41 32 2C 33 |C(I)..(.(A$,A2,3|
00000EE0: 29 29 3A 41 32 B2 41 32 AA 34 00 04 17 FA 23 8B |)):A2.A2.4....#.|
00000EF0: 43 28 49 29 B3 30 B0 43 28 49 29 B1 32 35 35 A7 |C(I).0.C(I).255.|
00000F00: 45 52 B2 31 00 12 17 04 24 82 3A 8B 45 52 B2 31 |ER.1....$.:.ER.1|
00000F10: A7 8E 00 38 17 0E 24 41 32 B2 30 3A 81 49 B2 4D |...8..$A2.0:.I.M|
00000F20: 58 A4 30 A9 AB 31 3A 8B 41 32 B2 31 AF 43 28 49 |X.0..1:.A2.1.C(I|
00000F30: 29 B2 30 A7 45 52 B2 31 00 4A 17 18 24 8B 43 28 |).0.ER.1.J..$.C(|
00000F40: 49 29 B3 B1 30 A7 41 32 B2 31 00 58 17 22 24 82 |I)..0.A2.1.X."$.|
00000F50: 3A 8B 45 52 B2 31 A7 8E 00 74 17 2C 24 81 49 B2 |:.ER.1...t.,$.I.|
00000F60: 30 A4 4D 58 3A 97 20 41 44 AA 49 2C 43 28 49 29 |0.MX:. AD.I,C(I)|
00000F70: 3A 82 3A 8E 00 89 17 10 27 84 31 35 2C 45 4E 2C |:.:.....'.15,EN,|
00000F80: 45 4D 24 2C 45 54 2C 45 53 00 95 17 1A 27 8B 45 |EM$,ET,ES....'.E|
00000F90: 4E B2 30 A7 8E 00 B2 17 24 27 99 22 45 52 52 4F |N.0.....$'."ERRO|
00000FA0: 52 20 23 20 22 3B 45 4E 2C 45 4D 24 2C 45 54 3B |R # ";EN,EM$,ET;|
00000FB0: 45 53 00 C0 17 2E 27 98 31 35 2C 22 49 22 3A 8E |ES....'.15,"I":.|
00000FC0: 00 E8 17 F8 2A 99 22 11 44 4F 20 59 4F 55 20 57 |....*.".DO YOU W|
00000FD0: 49 53 48 20 54 4F 20 4C 4F 41 44 20 54 48 45 20 |ISH TO LOAD THE |
00000FE0: 43 55 52 52 45 4E 54 22 00 28 18 02 2B 99 22 20 |CURRENT".(..+." |
00000FF0: 20 20 27 50 52 49 4E 54 45 52 2E 43 4F 4E 46 49 | 'PRINTER.CONFI|
00001000: 47 27 20 46 49 4C 45 20 28 59 2F 4E 29 20 20 20 |G' FILE (Y/N) |
00001010: 4E 9D 9D 9D 22 3B 3A 85 41 24 3A 8B 41 24 B2 22 |N...";:.A$:.A$."|
00001020: 4E 22 A7 31 31 31 30 30 00 3B 18 0C 2B 8B 41 24 |N".11100.;..+.A$|
00001030: B3 B1 22 59 22 A7 31 31 30 30 30 00 5C 18 16 2B |.."Y".11000.\..+|
00001040: 4E 24 B2 22 50 52 49 4E 54 45 52 2E 43 4F 4E 46 |N$."PRINTER.CONF|
00001050: 49 47 22 3A 8D 31 31 35 30 30 3A 8E 00 85 18 5C |IG":.11500:....\|
00001060: 2B 99 22 11 44 4F 20 59 4F 55 20 57 49 53 48 20 |+.".DO YOU WISH |
00001070: 54 4F 20 4C 4F 41 44 20 41 4E 20 41 4C 54 45 52 |TO LOAD AN ALTER|
00001080: 4E 41 54 45 22 00 B1 18 66 2B 99 22 20 20 20 50 |NATE"...f+." P|
00001090: 52 49 4E 54 45 52 20 43 4F 4E 46 49 47 55 52 41 |RINTER CONFIGURA|
000010A0: 54 49 4F 4E 20 28 43 46 47 2E 29 20 46 49 4C 45 |TION (CFG.) FILE|
000010B0: 22 00 CD 18 70 2B 99 22 20 20 20 28 59 2F 4E 29 |"...p+." (Y/N)|
000010C0: 20 20 20 4E 9D 9D 9D 22 3B 3A 85 41 24 00 DB 18 | N...";:.A$...|
000010D0: 7A 2B 8B 41 24 B2 22 4E 22 A7 8E 00 EE 18 84 2B |z+.A$."N"......+|
000010E0: 8B 41 24 B3 B1 22 59 22 A7 31 31 31 30 30 00 2D |.A$.."Y".11100.-|
000010F0: 19 8E 2B 99 22 11 45 4E 54 45 52 20 43 4F 4E 46 |..+.".ENTER CONF|
00001100: 49 47 55 52 41 54 49 4F 4E 20 4E 41 4D 45 20 54 |IGURATION NAME T|
00001110: 4F 20 4C 4F 41 44 22 3A 99 22 20 20 20 43 46 47 |O LOAD":." CFG|
00001120: 2E 9D 9D 9D 9D 9D 9D 22 3B 3A 85 4E 24 00 3A 19 |.......";:.N$.:.|
00001130: 98 2B 8D 31 31 35 30 30 3A 8E 00 62 19 EC 2C 9F |.+.11500:..b..,.|
00001140: 38 2C 38 2C 38 2C 4E 24 AA 22 2C 50 2C 52 22 3A |8,8,8,N$.",P,R":|
00001150: 8D 31 30 30 30 30 3A 8B 45 4E B3 B1 30 A7 A0 38 |.10000:.EN..0..8|
00001160: 3A 8E 00 91 19 F6 2C A1 23 38 2C 41 24 3A A1 23 |:.....,.#8,A$:.#|
00001170: 38 2C 41 31 24 3A 8B 41 24 B2 C7 28 31 34 34 29 |8,A1$:.A$..(144)|
00001180: AF 41 31 24 B2 C7 28 31 39 34 29 A7 31 31 35 33 |.A1$..(194).1153|
00001190: 30 00 B5 19 00 2D 99 22 11 46 49 4C 45 20 22 3B |0....-.".FILE ";|
000011A0: 4E 24 3B 22 20 49 53 20 49 4E 56 41 4C 49 44 22 |N$;" IS INVALID"|
000011B0: 3A A0 38 3A 8E 00 DC 19 0A 2D 81 49 B2 30 A4 37 |:.8:.....-.I.0.7|
000011C0: 31 3A A1 23 38 2C 41 24 3A 41 B2 30 3A 8B 41 24 |1:.#8,A$:A.0:.A$|
000011D0: B3 B1 22 22 A7 41 B2 C6 28 41 24 29 00 F2 19 14 |.."".A..(A$)....|
000011E0: 2D 97 34 39 38 30 38 AA 49 2C 41 3A 82 3A A0 38 |-.49808.I,A:.:.8|
000011F0: 3A 8E 00 00 00 |:.... |
..#....I.0.71:.49808.I,0:.:.49840,4.0.L.
.15,8,15.<.Q.. C(15).T.V..53280,14:.5328
1,15...`..".. .DISK CATALOG MANAGER/
REPORTER.."...J.. .13);"PRINTER SETUP"..
.O..11000:. LOAD A FILE ?.O.T.D$.G(B(498
40).48)...~.. ".DEVICE ADDR IS ";D$;".
..";:.D......D.0.D.9 .1150......49840,D.
=...S$.D(B(49841)):S$.J(S$,2,C(S$).1).V.
...".SECONDARY ADDR IS ";S$;:.I.0.1.C(
S$):.".";:.:.S...D..S.0.S.95.1210...N..4
9841,S.....A$."N":.B(49842).10.A$."Y"...
...".SEND LINE FEED AFTER RETURN FOR"...
..." EACH PRINT LINE (Y/N) "A$;"...";
.'....A$:.A$."N"..49842,0:.1400.C.(..A$.
"Y"..49842,10:.1400.M.2..1300.W.X..".YOU
MAY NOW ESTABLISH FROM 0 TO 4"......"PR
INTER SETUP SEQUENCES. WHEN THE".N...."
PRINT FUNCTION IS SELECTED, YOU WILL"..
...."BE GIVEN THE OPPORTUNITY TO SEND TH
ESE".*. .."PRINTER SETUP CHARACTERS BEFO
RE REPORT".B...."PRINTING BEGINS.".O....
".A COUPLE OF IDEAS ON HOW THESE MIGHT".
...."BE USED:"...H..". 1) CHANGE CHA
RACTER SETS".F.R.." 2) CHANGE LINE SP
ACING"......".FOR EACH OF THE 4 SEQUENCE
S, UP TO 8"......"CHARACTERS CAN BE DEFI
NED. FURTHER,".M...."FOR ANY ONE SEQUEN
CE, MULTIPLE PRINTER".S...."COMMANDS MAY
BE ESTABLISHED BY"......"ENTERING THEM
CONSECUTIVELY."......".PRINTER SETUP SEQ
UENCE TO DEFINE"......" (1-4; 0 TO END)
0...";..."..A:.A.0.1700...,..A.1.AD.4
9808:.1630.".6..A.2.AD.49816:.1630.:.@..
A.3.AD.49824:.1630.R.J..A.4.AD.49832:.16
30.\.T..1550...^.MX.7:.9000:.9100:." ";
A$:.".";:.C(A$).39..".";...H.L.C(A$):.A$
:.C(A$).L.2.1660.J.R.."...TRY AGAIN":.16
30...|..9200:.ER.1.1650......"OK":.1550.
....."...IF YOU DESIRE TO PRINT 6 COLUMN
S PER".F...."PAGE, YOU WILL NEED TO ESTA
BLISH".O...."PRINTER SETUP SEQUENCES THA
T WILL"...B.."ACTIVATE AND CANCEL CONDEN
SED PRINT".F.L.."FORMAT (136 COLUMNS PER
PRINT LINE)."...V.."THE WAY IT WORKS IS
:"......". 1) BEFORE EACH HEADING LIN
E".8...." (INCLUDING THE 1ST), THE
CANCEL".G...." CONDENSED SETUP SE
QUENCE WILL BE".|...." SENT.."....
.." 2) AFTER EACH HEADING LINE, THE".
O...." ACTIVATE CONDENSED SETUP ".
....." SEQUENCE WILL BE SENT..".$.
&.."...... ...ANY KEY TO CONTINUE.
..";.>.0.A$."":.A$:.A$."".1840.K.:.."...
..".J.L.MX.15:AD.49848:.9000:.9100...V..
".ENTER ACTIVATE CONDENSED SETUP SEQUENC
E.":." ";A$:.".";......C(A$).39..".";..
...L.C(A$):.A$:.C(A$).L.2.1950......"...
TRY AGAIN":.1900......9200:.ER.1.1940...
..."OK".6.P.MX.15:AD.49864:.9000:.9100.T
.Z..".ENTER CANCEL CONDENSED SETUP SEQUE
NCE.":." ";A$:.".";...... C(A$).39.."."
;.....L.C(A$):.A$:.C(A$).L.2.2050.C...."
...TRY AGAIN":.2000.X....9200:.ER.1.2040
......"OK"...4..".AS PART OF THIS SAVE O
PERATION,".4.>.."IF FILE 'PRINT.CONFIG.O
LD' EXISTS,".Q.H.."IT WILL BE SCRATCHED.
".}.R.."THE CURRENT 'PRINTER.CONFIG' WIL
L BE"...\.."RENAMED TO 'PRINT.CONFIG.OLD
', AND THEN".T.F.."THE NEW PRINTER SETUP
PARAMETERS"...P.."WILL BE SAVED AS 'PRI
NTER.CONFIG'.."...Z..".DO YOU WISH TO SA
VE THIS CONFIGURATION".\.... "AS 'PRINTE
R.CONFIG' (Y/N) Y...";:.A$.M....A$."N"
.2300.....A$.."Y".2170..... 15:.15,8,15
,"S0:PRINT.CONFIG.OLD": 15......15,8,15,
"R0:PRINT.CONFIG.OLD=PRINTER.CONFIG": 15
:.15,8,15,"I".....N$."PRINTER.CONFIG":.2
500.7....".DO YOU WISH TO SAVE AS AN ALT
ERNATE".`...."PRINTER CONFIGURATION (CFG
.) FILE".Y...."(Y/N) N...";:.A$......A
$."N".."....ABORTED.": 15:....$..A$.."Y"
.2300.U...."ENTER CONFIGURATION NAME TO
SAVE"...8.." CFG.......";N$...B..2500.
..D..15,"S0:";N$...I..8,8,8,N$.",P,W".3.
N..8,G(144);G(194);.S.X..I.0.71:.8,G(B(4
9808.I));:..U... 8: 15:.".FINISHED SAVIN
G.":....(#A$.G(34):.I.0.MX:C(I).B(AD.I):
A1$.D(C(I)):A1.C(A1$)...2#A$.A$.I("00".J
(A1$,2,A1.1),3):.I.MX.A$.A$.","...<#.:A$
.A$.G(34):.."..#.".OVERTYPE THE FOLLOWIN
G CHR$(NNN) CODES".L..#."WITH THE DECIMA
L EQUIVALENT OF THE".Y. #."CHARACTERS BE
ING SENT TO THE PRINTER."....#."SET RIGH
T MOST UNUSED CHARACTER VALUES"....#."TO
000..":.....#ER.0:A2.1:.I.0.MX:C(I).E(J
(A$,A2,3)):A2.A2.4....#.C(I).0.C(I).255.
ER.1....$.:.ER.1...8..$A2.0:.I.MX.0..1:.
A2.1.C(I).0.ER.1.J..$.C(I)..0.A2.1.X."$.
:.ER.1...T.,$.I.0.MX:. AD.I,C(I):.:.....
'.15,EN,EM$,ET,ES....'.EN.0.....$'."ERRO
R # ";EN,EM$,ET;ES....'.15,"I":.....*.".
DO YOU WISH TO LOAD THE CURRENT".(..+."
'PRINTER.CONFIG' FILE (Y/N) N...";:.
A$:.A$."N".11100.;..+.A$.."Y".11000.\..+
N$."PRINTER.CONFIG":.11500:....\+.".DO Y
OU WISH TO LOAD AN ALTERNATE"...F+." P
RINTER CONFIGURATION (CFG.) FILE".M.P+."
(Y/N) N...";:.A$...Z+.A$."N"......+
.A$.."Y".11100.-..+.".ENTER CONFIGURATIO
N NAME TO LOAD":." CFG.......";:.N$.:.
.+.11500:..B..,.8,8,8,N$.",P,R":.10000:.
EN..0. 8:.....,.#8,A$:.#8,A1$:.A$.G(144)
.A1$.G(194).11530....-.".FILE ";N$;" IS
INVALID": 8:.....-.I.0.71:.#8,A$:A.0:.A$
.."".A.F(A$)....-.49808.I,A:.: 8:....
> CLICK IMAGE PREVIEW FOR FULL MODAL