PRINTER.SETUP

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 33 34 30 00  43 0A 28 05 8B 41 24 B2  |0:.1340.C.(..A$.|
00000230: 22 59 22 A7 97 34 39 38  34 32 2C 31 30 3A 89 31  |"Y"..49842,10:.1|
00000240: 33 34 30 00 4D 0A 32 05  89 31 33 30 30 00 79 0A  |340.M.2..1300.y.|
00000250: 3C 05 99 22 11 11 42 45  4C 4F 57 20 59 4F 55 20  |<.."..BELOW YOU |
00000260: 57 49 4C 4C 20 42 45 20  44 45 46 49 4E 49 4E 47  |WILL BE DEFINING|
00000270: 20 50 52 49 4E 54 45 52  22 00 A8 0A 41 05 99 22  | PRINTER"...A.."|
00000280: 53 45 54 55 50 20 53 45  51 55 45 4E 43 45 53 2E  |SETUP SEQUENCES.|
00000290: 20 20 54 45 52 4D 49 4E  41 54 45 20 41 4C 4C 20  |  TERMINATE ALL |
000002A0: 43 4F 4E 54 52 4F 4C 22  00 D3 0A 46 05 99 22 53  |CONTROL"...F.."S|
000002B0: 45 51 55 45 4E 43 45 53  20 57 49 54 48 20 41 20  |EQUENCES WITH A |
000002C0: 43 48 41 52 41 43 54 45  52 20 56 41 4C 55 45 20  |CHARACTER VALUE |
000002D0: 4F 46 22 00 FF 0A 4B 05  99 22 59 4F 55 52 20 43  |OF"...K.."YOUR C|
000002E0: 48 4F 49 43 45 2C 20 42  55 54 20 54 48 49 53 20  |HOICE, BUT THIS |
000002F0: 56 41 4C 55 45 20 4D 55  53 54 20 4E 4F 54 22 00  |VALUE MUST NOT".|
00000300: 2D 0B 50 05 99 22 42 45  20 55 53 45 44 20 41 53  |-.P.."BE USED AS|
00000310: 20 50 41 52 54 20 4F 46  20 41 4E 59 20 50 52 49  | PART OF ANY PRI|
00000320: 4E 54 45 52 20 43 4F 4E  54 52 4F 4C 22 00 3E 0B  |NTER CONTROL".>.|
00000330: 55 05 99 22 53 45 51 55  45 4E 43 45 2E 22 00 69  |U.."SEQUENCE.".i|
00000340: 0B 5A 05 99 22 55 4E 4C  45 53 53 20 59 4F 55 20  |.Z.."UNLESS YOU |
00000350: 4E 45 45 44 20 54 4F 20  53 45 4E 44 20 41 20 43  |NEED TO SEND A C|
00000360: 48 52 24 28 30 30 30 29  22 00 93 0B 5F 05 99 22  |HR$(000)"..._.."|
00000370: 43 48 41 52 41 43 54 45  52 20 56 41 4C 55 45 20  |CHARACTER VALUE |
00000380: 57 49 54 48 49 4E 20 41  4E 59 20 4F 46 20 59 4F  |WITHIN ANY OF YO|
00000390: 55 52 22 00 BD 0B 64 05  99 22 50 52 49 4E 54 45  |UR"...d.."PRINTE|
000003A0: 52 20 43 4F 4E 54 52 4F  4C 20 53 45 51 55 45 4E  |R CONTROL SEQUEN|
000003B0: 43 45 53 2C 20 55 53 45  20 54 48 45 22 00 E8 0B  |CES, USE THE"...|
000003C0: 69 05 99 22 53 55 47 47  45 53 54 45 44 20 54 45  |i.."SUGGESTED TE|
000003D0: 52 4D 49 4E 41 54 49 4E  47 20 56 41 4C 55 45 20  |RMINATING VALUE |
000003E0: 4F 46 20 30 30 30 2E 22  00 20 0C 6E 05 99 22 11  |OF 000.". .n..".|
000003F0: 11 50 52 49 4E 54 45 52  20 43 4F 4E 54 52 4F 4C  |.PRINTER CONTROL|
00000400: 20 53 45 51 55 45 4E 43  45 20 54 45 52 4D 49 4E  | SEQUENCE TERMIN|
00000410: 41 54 4F 52 22 3A 54 B2  C2 28 34 39 38 34 33 29  |ATOR":T..(49843)|
00000420: 00 4F 0C 70 05 54 24 B2  C9 28 22 30 30 30 22 AA  |.O.p.T$..("000".|
00000430: CA 28 C4 28 54 29 2C 32  29 2C 33 29 3A 99 22 20  |.(.(T),2),3):." |
00000440: 20 20 22 3B 54 24 3B 22  9D 9D 9D 9D 9D 22 3B 00  |  ";T$;".....";.|
00000450: 6A 0C 71 05 54 B2 30 3A  85 54 3A 8B 54 B3 30 B0  |j.q.T.0:.T:.T.0.|
00000460: 54 B1 32 35 35 A7 31 33  39 30 00 86 0C 72 05 54  |T.255.1390...r.T|
00000470: 24 B2 C9 28 22 30 30 30  22 AA CA 28 C4 28 54 29  |$..("000"..(.(T)|
00000480: 2C 32 29 2C 33 29 00 93  0C 73 05 97 34 39 38 34  |,2),3)...s..4984|
00000490: 33 2C 54 00 BD 0C 78 05  99 22 11 59 4F 55 20 4D  |3,T...x..".YOU M|
000004A0: 41 59 20 4E 4F 57 20 45  53 54 41 42 4C 49 53 48  |AY NOW ESTABLISH|
000004B0: 20 46 52 4F 4D 20 30 20  54 4F 20 34 22 00 E7 0C  | FROM 0 TO 4"...|
000004C0: 82 05 99 22 50 52 49 4E  54 45 52 20 53 45 54 55  |..."PRINTER SETU|
000004D0: 50 20 53 45 51 55 45 4E  43 45 53 2E 20 20 57 48  |P SEQUENCES.  WH|
000004E0: 45 4E 20 54 48 45 22 00  14 0D 8C 05 99 22 50 52  |EN THE"......"PR|
000004F0: 49 4E 54 20 20 46 55 4E  43 54 49 4F 4E 20 49 53  |INT  FUNCTION IS|
00000500: 20 53 45 4C 45 43 54 45  44 2C 20 59 4F 55 20 57  | SELECTED, YOU W|
00000510: 49 4C 4C 22 00 42 0D 96  05 99 22 42 45 20 47 49  |ILL".B...."BE GI|
00000520: 56 45 4E 20 54 48 45 20  4F 50 50 4F 52 54 55 4E  |VEN THE OPPORTUN|
00000530: 49 54 59 20 54 4F 20 53  45 4E 44 20 54 48 45 53  |ITY TO SEND THES|
00000540: 45 22 00 70 0D A0 05 99  22 50 52 49 4E 54 45 52  |E".p...."PRINTER|
00000550: 20 53 45 54 55 50 20 43  48 41 52 41 43 54 45 52  | SETUP CHARACTER|
00000560: 53 20 42 45 46 4F 52 45  20 52 45 50 4F 52 54 22  |S BEFORE REPORT"|
00000570: 00 88 0D AA 05 99 22 50  52 49 4E 54 49 4E 47 20  |......"PRINTING |
00000580: 42 45 47 49 4E 53 2E 22  00 B5 0D B4 05 99 22 11  |BEGINS."......".|
00000590: 41 20 43 4F 55 50 4C 45  20 4F 46 20 49 44 45 41  |A COUPLE OF IDEA|
000005A0: 53 20 4F 4E 20 48 4F 57  20 54 48 45 53 45 20 4D  |S ON HOW THESE M|
000005B0: 49 47 48 54 22 00 C5 0D  BE 05 99 22 42 45 20 55  |IGHT"......"BE U|
000005C0: 53 45 44 3A 22 00 EA 0D  C8 05 99 22 11 20 20 20  |SED:"......".   |
000005D0: 31 29 20 20 43 48 41 4E  47 45 20 43 48 41 52 41  |1)  CHANGE CHARA|
000005E0: 43 54 45 52 20 53 45 54  53 22 00 0C 0E D2 05 99  |CTER SETS"......|
000005F0: 22 20 20 20 32 29 20 20  43 48 41 4E 47 45 20 4C  |"   2)  CHANGE L|
00000600: 49 4E 45 20 53 50 41 43  49 4E 47 22 00 39 0E DC  |INE SPACING".9..|
00000610: 05 99 22 11 46 4F 52 20  45 41 43 48 20 4F 46 20  |..".FOR EACH OF |
00000620: 54 48 45 20 34 20 53 45  51 55 45 4E 43 45 53 2C  |THE 4 SEQUENCES,|
00000630: 20 55 50 20 54 4F 20 38  22 00 65 0E E6 05 99 22  | UP TO 8".e...."|
00000640: 43 48 41 52 41 43 54 45  52 53 20 43 41 4E 20 42  |CHARACTERS CAN B|
00000650: 45 20 44 45 46 49 4E 45  44 2E 20 20 46 55 52 54  |E DEFINED.  FURT|
00000660: 48 45 52 2C 22 00 93 0E  F0 05 99 22 46 4F 52 20  |HER,"......"FOR |
00000670: 41 4E 59 20 4F 4E 45 20  53 45 51 55 45 4E 43 45  |ANY ONE SEQUENCE|
00000680: 2C 20 4D 55 4C 54 49 50  4C 45 20 50 52 49 4E 54  |, MULTIPLE PRINT|
00000690: 45 52 22 00 B9 0E FA 05  99 22 43 4F 4D 4D 41 4E  |ER"......"COMMAN|
000006A0: 44 53 20 4D 41 59 20 42  45 20 45 53 54 41 42 4C  |DS MAY BE ESTABL|
000006B0: 49 53 48 45 44 20 42 59  22 00 DD 0E 04 06 99 22  |ISHED BY"......"|
000006C0: 45 4E 54 45 52 49 4E 47  20 54 48 45 4D 20 43 4F  |ENTERING THEM CO|
000006D0: 4E 53 45 43 55 54 49 56  45 4C 59 2E 22 00 06 0F  |NSECUTIVELY."...|
000006E0: 0E 06 99 22 11 50 52 49  4E 54 45 52 20 53 45 54  |...".PRINTER SET|
000006F0: 55 50 20 53 45 51 55 45  4E 43 45 20 54 4F 20 44  |UP SEQUENCE TO D|
00000700: 45 46 49 4E 45 22 00 27  0F 18 06 99 22 20 20 28  |EFINE".'...."  (|
00000710: 31 2D 34 3B 20 30 20 54  4F 20 45 4E 44 29 20 20  |1-4; 0 TO END)  |
00000720: 20 30 9D 9D 9D 22 3B 00  38 0F 22 06 85 41 3A 8B  | 0...";.8."..A:.|
00000730: 41 B2 30 A7 31 37 30 30  00 50 0F 2C 06 8B 41 B2  |A.0.1700.P.,..A.|
00000740: 31 A7 41 44 B2 34 39 38  30 38 3A 89 31 36 33 30  |1.AD.49808:.1630|
00000750: 00 68 0F 36 06 8B 41 B2  32 A7 41 44 B2 34 39 38  |.h.6..A.2.AD.498|
00000760: 31 36 3A 89 31 36 33 30  00 80 0F 40 06 8B 41 B2  |16:.1630...@..A.|
00000770: 33 A7 41 44 B2 34 39 38  32 34 3A 89 31 36 33 30  |3.AD.49824:.1630|
00000780: 00 98 0F 4A 06 8B 41 B2  34 A7 41 44 B2 34 39 38  |...J..A.4.AD.498|
00000790: 33 32 3A 89 31 36 33 30  00 A2 0F 54 06 89 31 35  |32:.1630...T..15|
000007A0: 35 30 00 D6 0F 5E 06 4D  58 B2 37 3A 8D 39 30 30  |50...^.MX.7:.900|
000007B0: 30 3A 8D 39 31 30 30 3A  99 22 20 20 22 3B 41 24  |0:.9100:."  ";A$|
000007C0: 3A 99 22 91 22 3B 3A 8B  C3 28 41 24 29 B1 33 39  |:.".";:..(A$).39|
000007D0: A7 99 22 91 22 3B 00 F6  0F 68 06 4C B2 C3 28 41  |..".";...h.L..(A|
000007E0: 24 29 3A 85 41 24 3A 8B  C3 28 41 24 29 B2 4C AB  |$):.A$:..(A$).L.|
000007F0: 32 A7 31 36 36 30 00 10  10 72 06 99 22 2E 2E 2E  |2.1660...r.."...|
00000800: 54 52 59 20 41 47 41 49  4E 22 3A 89 31 36 33 30  |TRY AGAIN":.1630|
00000810: 00 25 10 7C 06 8D 39 32  30 30 3A 8B 45 52 B2 31  |.%.|..9200:.ER.1|
00000820: A7 31 36 35 30 00 35 10  86 06 99 22 4F 4B 22 3A  |.1650.5...."OK":|
00000830: 89 31 35 35 30 00 64 10  A4 06 99 22 93 11 11 49  |.1550.d...."...I|
00000840: 46 20 59 4F 55 20 44 45  53 49 52 45 20 54 4F 20  |F YOU DESIRE TO |
00000850: 50 52 49 4E 54 20 36 20  43 4F 4C 55 4D 4E 53 20  |PRINT 6 COLUMNS |
00000860: 50 45 52 22 00 8C 10 AE  06 99 22 50 41 47 45 2C  |PER"......"PAGE,|
00000870: 20 59 4F 55 20 57 49 4C  4C 20 4E 45 45 44 20 54  | YOU WILL NEED T|
00000880: 4F 20 45 53 54 41 42 4C  49 53 48 22 00 B5 10 B8  |O ESTABLISH"....|
00000890: 06 99 22 50 52 49 4E 54  45 52 20 53 45 54 55 50  |.."PRINTER SETUP|
000008A0: 20 53 45 51 55 45 4E 43  45 53 20 54 48 41 54 20  | SEQUENCES THAT |
000008B0: 57 49 4C 4C 22 00 E0 10  C2 06 99 22 41 43 54 49  |WILL"......"ACTI|
000008C0: 56 41 54 45 20 41 4E 44  20 43 41 4E 43 45 4C 20  |VATE AND CANCEL |
000008D0: 43 4F 4E 44 45 4E 53 45  44 20 50 52 49 4E 54 22  |CONDENSED PRINT"|
000008E0: 00 0C 11 CC 06 99 22 46  4F 52 4D 41 54 20 28 31  |......"FORMAT (1|
000008F0: 33 36 20 43 4F 4C 55 4D  4E 53 20 50 45 52 20 50  |36 COLUMNS PER P|
00000900: 52 49 4E 54 20 4C 49 4E  45 29 2E 22 00 28 11 D6  |RINT LINE).".(..|
00000910: 06 99 22 54 48 45 20 57  41 59 20 49 54 20 57 4F  |.."THE WAY IT WO|
00000920: 52 4B 53 20 49 53 3A 22  00 50 11 E0 06 99 22 11  |RKS IS:".P....".|
00000930: 20 20 20 31 29 20 20 42  45 46 4F 52 45 20 45 41  |   1)  BEFORE EA|
00000940: 43 48 20 48 45 41 44 49  4E 47 20 4C 49 4E 45 22  |CH HEADING LINE"|
00000950: 00 7E 11 EA 06 99 22 20  20 20 20 20 20 20 28 49  |.~...."       (I|
00000960: 4E 43 4C 55 44 49 4E 47  20 54 48 45 20 31 53 54  |NCLUDING THE 1ST|
00000970: 29 2C 20 54 48 45 20 43  41 4E 43 45 4C 22 00 AD  |), THE CANCEL"..|
00000980: 11 F4 06 99 22 20 20 20  20 20 20 20 43 4F 4E 44  |...."       COND|
00000990: 45 4E 53 45 44 20 53 45  54 55 50 20 53 45 51 55  |ENSED SETUP SEQU|
000009A0: 45 4E 43 45 20 57 49 4C  4C 20 42 45 22 00 C2 11  |ENCE WILL BE"...|
000009B0: FE 06 99 22 20 20 20 20  20 20 20 53 45 4E 54 2E  |..."       SENT.|
000009C0: 11 22 00 ED 11 08 07 99  22 20 20 20 32 29 20 20  |."......"   2)  |
000009D0: 41 46 54 45 52 20 45 41  43 48 20 48 45 41 44 49  |AFTER EACH HEADI|
000009E0: 4E 47 20 4C 49 4E 45 2C  20 54 48 45 22 00 15 12  |NG LINE, THE"...|
000009F0: 12 07 99 22 20 20 20 20  20 20 20 41 43 54 49 56  |..."       ACTIV|
00000A00: 41 54 45 20 43 4F 4E 44  45 4E 53 45 44 20 53 45  |ATE CONDENSED SE|
00000A10: 54 55 50 20 22 00 3B 12  1C 07 99 22 20 20 20 20  |TUP ".;...."    |
00000A20: 20 20 20 53 45 51 55 45  4E 43 45 20 57 49 4C 4C  |   SEQUENCE WILL|
00000A30: 20 42 45 20 53 45 4E 54  2E 11 22 00 6A 12 26 07  | BE SENT..".j.&.|
00000A40: 99 22 11 11 11 11 11 11  20 20 20 20 20 20 20 2E  |."......       .|
00000A50: 2E 2E 41 4E 59 20 4B 45  59 20 54 4F 20 43 4F 4E  |..ANY KEY TO CON|
00000A60: 54 49 4E 55 45 2E 2E 2E  22 3B 00 84 12 30 07 41  |TINUE...";...0.A|
00000A70: 24 B2 22 22 3A A1 41 24  3A 8B 41 24 B2 22 22 A7  |$."":.A$:.A$."".|
00000A80: 31 38 34 30 00 91 12 3A  07 99 22 91 91 91 91 91  |1840...:..".....|
00000A90: 22 00 B0 12 6C 07 4D 58  B2 31 35 3A 41 44 B2 34  |"...l.MX.15:AD.4|
00000AA0: 39 38 34 38 3A 8D 39 30  30 30 3A 8D 39 31 30 30  |9848:.9000:.9100|
00000AB0: 00 F0 12 76 07 99 22 11  45 4E 54 45 52 20 41 43  |...v..".ENTER AC|
00000AC0: 54 49 56 41 54 45 20 43  4F 4E 44 45 4E 53 45 44  |TIVATE CONDENSED|
00000AD0: 20 53 45 54 55 50 20 53  45 51 55 45 4E 43 45 11  | SETUP SEQUENCE.|
00000AE0: 22 3A 99 22 20 20 22 3B  41 24 3A 99 22 91 22 3B  |":."  ";A$:.".";|
00000AF0: 00 04 13 80 07 8B C3 28  41 24 29 B1 33 39 A7 99  |.......(A$).39..|
00000B00: 22 91 22 3B 00 24 13 8A  07 4C B2 C3 28 41 24 29  |".";.$...L..(A$)|
00000B10: 3A 85 41 24 3A 8B C3 28  41 24 29 B2 4C AB 32 A7  |:.A$:..(A$).L.2.|
00000B20: 31 39 35 30 00 3E 13 94  07 99 22 2E 2E 2E 54 52  |1950.>...."...TR|
00000B30: 59 20 41 47 41 49 4E 22  3A 89 31 39 30 30 00 53  |Y AGAIN":.1900.S|
00000B40: 13 9E 07 8D 39 32 30 30  3A 8B 45 52 B2 31 A7 31  |....9200:.ER.1.1|
00000B50: 39 34 30 00 5D 13 A8 07  99 22 4F 4B 22 00 7C 13  |940.]...."OK".|.|
00000B60: D0 07 4D 58 B2 31 35 3A  41 44 B2 34 39 38 36 34  |..MX.15:AD.49864|
00000B70: 3A 8D 39 30 30 30 3A 8D  39 31 30 30 00 BA 13 DA  |:.9000:.9100....|
00000B80: 07 99 22 11 45 4E 54 45  52 20 43 41 4E 43 45 4C  |..".ENTER CANCEL|
00000B90: 20 43 4F 4E 44 45 4E 53  45 44 20 53 45 54 55 50  | CONDENSED SETUP|
00000BA0: 20 53 45 51 55 45 4E 43  45 11 22 3A 99 22 20 20  | SEQUENCE.":."  |
00000BB0: 22 3B 41 24 3A 99 22 91  22 3B 00 CF 13 E4 07 8B  |";A$:.".";......|
00000BC0: 20 C3 28 41 24 29 B1 33  39 A7 99 22 91 22 3B 00  | .(A$).39..".";.|
00000BD0: EF 13 EE 07 4C B2 C3 28  41 24 29 3A 85 41 24 3A  |....L..(A$):.A$:|
00000BE0: 8B C3 28 41 24 29 B2 4C  AB 32 A7 32 30 35 30 00  |..(A$).L.2.2050.|
00000BF0: 09 14 F8 07 99 22 2E 2E  2E 54 52 59 20 41 47 41  |....."...TRY AGA|
00000C00: 49 4E 22 3A 89 32 30 30  30 00 1E 14 02 08 8D 39  |IN":.2000......9|
00000C10: 32 30 30 3A 8B 45 52 B2  31 A7 32 30 34 30 00 28  |200:.ER.1.2040.(|
00000C20: 14 0C 08 99 22 4F 4B 22  00 50 14 34 08 99 22 11  |...."OK".P.4..".|
00000C30: 41 53 20 50 41 52 54 20  4F 46 20 54 48 49 53 20  |AS PART OF THIS |
00000C40: 53 41 56 45 20 4F 50 45  52 41 54 49 4F 4E 2C 22  |SAVE OPERATION,"|
00000C50: 00 7A 14 3E 08 99 22 49  46 20 46 49 4C 45 20 27  |.z.>.."IF FILE '|
00000C60: 50 52 49 4E 54 2E 43 4F  4E 46 49 47 2E 4F 4C 44  |PRINT.CONFIG.OLD|
00000C70: 27 20 45 58 49 53 54 53  2C 22 00 97 14 48 08 99  |' EXISTS,"...H..|
00000C80: 22 49 54 20 57 49 4C 4C  20 42 45 20 53 43 52 41  |"IT WILL BE SCRA|
00000C90: 54 43 48 45 44 2E 22 00  C3 14 52 08 99 22 54 48  |TCHED."...R.."TH|
00000CA0: 45 20 43 55 52 52 45 4E  54 20 27 50 52 49 4E 54  |E CURRENT 'PRINT|
00000CB0: 45 52 2E 43 4F 4E 46 49  47 27 20 57 49 4C 4C 20  |ER.CONFIG' WILL |
00000CC0: 42 45 22 00 F2 14 5C 08  99 22 52 45 4E 41 4D 45  |BE"...\.."RENAME|
00000CD0: 44 20 54 4F 20 27 50 52  49 4E 54 2E 43 4F 4E 46  |D TO 'PRINT.CONF|
00000CE0: 49 47 2E 4F 4C 44 27 2C  20 41 4E 44 20 54 48 45  |IG.OLD', AND THE|
00000CF0: 4E 22 00 1A 15 66 08 99  22 54 48 45 20 4E 45 57  |N"...f.."THE NEW|
00000D00: 20 50 52 49 4E 54 45 52  20 53 45 54 55 50 20 50  | PRINTER SETUP P|
00000D10: 41 52 41 4D 45 54 45 52  53 22 00 45 15 70 08 99  |ARAMETERS".E.p..|
00000D20: 22 57 49 4C 4C 20 42 45  20 53 41 56 45 44 20 41  |"WILL BE SAVED A|
00000D30: 53 20 27 50 52 49 4E 54  45 52 2E 43 4F 4E 46 49  |S 'PRINTER.CONFI|
00000D40: 47 27 2E 11 22 00 74 15  7A 08 99 22 11 44 4F 20  |G'..".t.z..".DO |
00000D50: 59 4F 55 20 57 49 53 48  20 54 4F 20 53 41 56 45  |YOU WISH TO SAVE|
00000D60: 20 54 48 49 53 20 43 4F  4E 46 49 47 55 52 41 54  | THIS CONFIGURAT|
00000D70: 49 4F 4E 22 00 A2 15 84  08 99 20 22 41 53 20 27  |ION"...... "AS '|
00000D80: 50 52 49 4E 54 45 52 2E  43 4F 4E 46 49 47 27 20  |PRINTER.CONFIG' |
00000D90: 28 59 2F 4E 29 20 20 20  59 9D 9D 9D 22 3B 3A 85  |(Y/N)   Y...";:.|
00000DA0: 41 24 00 B3 15 8E 08 8B  41 24 B2 22 4E 22 A7 32  |A$......A$."N".2|
00000DB0: 33 30 30 00 C5 15 98 08  8B 41 24 B3 B1 22 59 22  |300......A$.."Y"|
00000DC0: A7 32 31 37 30 00 F0 15  A2 08 A0 31 35 3A 9F 31  |.2170......15:.1|
00000DD0: 35 2C 38 2C 31 35 2C 22  53 30 3A 50 52 49 4E 54  |5,8,15,"S0:PRINT|
00000DE0: 2E 43 4F 4E 46 49 47 2E  4F 4C 44 22 3A A0 31 35  |.CONFIG.OLD":.15|
00000DF0: 00 33 16 AC 08 9F 31 35  2C 38 2C 31 35 2C 22 52  |.3....15,8,15,"R|
00000E00: 30 3A 50 52 49 4E 54 2E  43 4F 4E 46 49 47 2E 4F  |0:PRINT.CONFIG.O|
00000E10: 4C 44 3D 50 52 49 4E 54  45 52 2E 43 4F 4E 46 49  |LD=PRINTER.CONFI|
00000E20: 47 22 3A A0 31 35 3A 9F  31 35 2C 38 2C 31 35 2C  |G":.15:.15,8,15,|
00000E30: 22 49 22 00 51 16 B6 08  4E 24 B2 22 50 52 49 4E  |"I".Q...N$."PRIN|
00000E40: 54 45 52 2E 43 4F 4E 46  49 47 22 3A 89 32 35 30  |TER.CONFIG":.250|
00000E50: 30 00 7D 16 FC 08 99 22  11 44 4F 20 59 4F 55 20  |0.}....".DO YOU |
00000E60: 57 49 53 48 20 54 4F 20  53 41 56 45 20 41 53 20  |WISH TO SAVE AS |
00000E70: 41 4E 20 41 4C 54 45 52  4E 41 54 45 22 00 A6 16  |AN ALTERNATE"...|
00000E80: 06 09 99 22 50 52 49 4E  54 45 52 20 43 4F 4E 46  |..."PRINTER CONF|
00000E90: 49 47 55 52 41 54 49 4F  4E 20 28 43 46 47 2E 29  |IGURATION (CFG.)|
00000EA0: 20 46 49 4C 45 22 00 BF  16 10 09 99 22 28 59 2F  | FILE"......"(Y/|
00000EB0: 4E 29 20 20 20 4E 9D 9D  9D 22 3B 3A 85 41 24 00  |N)   N...";:.A$.|
00000EC0: E1 16 1A 09 8B 41 24 B2  22 4E 22 A7 99 22 11 2E  |.....A$."N".."..|
00000ED0: 2E 2E 41 42 4F 52 54 45  44 11 22 3A A0 31 35 3A  |..ABORTED.":.15:|
00000EE0: 80 00 F3 16 24 09 8B 41  24 B3 B1 22 59 22 A7 32  |....$..A$.."Y".2|
00000EF0: 33 30 30 00 1B 17 2E 09  99 22 45 4E 54 45 52 20  |300......"ENTER |
00000F00: 43 4F 4E 46 49 47 55 52  41 54 49 4F 4E 20 4E 41  |CONFIGURATION NA|
00000F10: 4D 45 20 54 4F 20 53 41  56 45 22 00 33 17 38 09  |ME TO SAVE".3.8.|
00000F20: 85 22 20 20 20 43 46 47  2E 9D 9D 9D 9D 9D 9D 22  |."   CFG......."|
00000F30: 3B 4E 24 00 3D 17 42 09  89 32 35 30 30 00 4E 17  |;N$.=.B..2500.N.|
00000F40: C4 09 98 31 35 2C 22 53  30 3A 22 3B 4E 24 00 63  |...15,"S0:";N$.c|
00000F50: 17 C9 09 9F 38 2C 38 2C  38 2C 4E 24 AA 22 2C 50  |....8,8,8,N$.",P|
00000F60: 2C 57 22 00 79 17 CE 09  98 38 2C C7 28 31 34 34  |,W".y....8,.(144|
00000F70: 29 3B C7 28 31 39 34 29  3B 00 99 17 D8 09 81 49  |);.(194);......I|
00000F80: B2 30 A4 37 31 3A 98 38  2C C7 28 C2 28 34 39 38  |.0.71:.8,.(.(498|
00000F90: 30 38 AA 49 29 29 3B 3A  82 00 BB 17 E2 09 A0 38  |08.I));:.......8|
00000FA0: 3A A0 31 35 3A 99 22 11  46 49 4E 49 53 48 45 44  |:.15:.".FINISHED|
00000FB0: 20 53 41 56 49 4E 47 11  22 3A 80 00 F3 17 28 23  | SAVING.":....(#|
00000FC0: 41 24 B2 C7 28 33 34 29  3A 81 49 B2 30 A4 4D 58  |A$..(34):.I.0.MX|
00000FD0: 3A 43 28 49 29 B2 C2 28  41 44 AA 49 29 3A 41 31  |:C(I)..(AD.I):A1|
00000FE0: 24 B2 C4 28 43 28 49 29  29 3A 41 31 B2 C3 28 41  |$..(C(I)):A1..(A|
00000FF0: 31 24 29 00 25 18 32 23  41 24 B2 41 24 AA C9 28  |1$).%.2#A$.A$..(|
00001000: 22 30 30 22 AA CA 28 41  31 24 2C 32 2C 41 31 AB  |"00"..(A1$,2,A1.|
00001010: 31 29 2C 33 29 3A 8B 49  B3 4D 58 A7 41 24 B2 41  |1),3):.I.MX.A$.A|
00001020: 24 AA 22 2C 22 00 39 18  3C 23 82 3A 41 24 B2 41  |$.",".9.<#.:A$.A|
00001030: 24 AA C7 28 33 34 29 3A  8E 00 68 18 8C 23 99 22  |$..(34):..h..#."|
00001040: 11 4F 56 45 52 54 59 50  45 20 54 48 45 20 46 4F  |.OVERTYPE THE FO|
00001050: 4C 4C 4F 57 49 4E 47 20  43 48 52 24 28 4E 4E 4E  |LLOWING CHR$(NNN|
00001060: 29 20 43 4F 44 45 53 22  00 92 18 96 23 99 22 57  |) CODES"....#."W|
00001070: 49 54 48 20 54 48 45 20  44 45 43 49 4D 41 4C 20  |ITH THE DECIMAL |
00001080: 45 51 55 49 56 41 4C 45  4E 54 20 4F 46 20 54 48  |EQUIVALENT OF TH|
00001090: 45 22 00 BF 18 A0 23 99  22 43 48 41 52 41 43 54  |E"....#."CHARACT|
000010A0: 45 52 53 20 42 45 49 4E  47 20 53 45 4E 54 20 54  |ERS BEING SENT T|
000010B0: 4F 20 54 48 45 20 50 52  49 4E 54 45 52 2E 22 00  |O THE PRINTER.".|
000010C0: E9 18 AA 23 99 22 46 4F  4C 4C 4F 57 20 54 48 45  |...#."FOLLOW THE|
000010D0: 20 4C 41 53 54 20 4F 55  54 42 4F 55 4E 44 20 43  | LAST OUTBOUND C|
000010E0: 48 41 52 41 43 54 45 52  22 00 16 19 AC 23 99 22  |HARACTER"....#."|
000010F0: 57 49 54 48 20 54 48 45  20 54 45 52 4D 49 4E 41  |WITH THE TERMINA|
00001100: 54 4F 52 20 43 48 41 52  41 43 54 45 52 20 22 3B  |TOR CHARACTER ";|
00001110: 54 24 3B 22 3B 22 00 43  19 AF 23 99 22 53 45 54  |T$;";".C..#."SET|
00001120: 20 52 45 4D 41 49 4E 49  4E 47 20 55 4E 55 53 45  | REMAINING UNUSE|
00001130: 44 20 43 48 41 52 41 43  54 45 52 20 56 41 4C 55  |D CHARACTER VALU|
00001140: 45 53 22 00 55 19 B4 23  99 22 54 4F 20 30 30 30  |ES".U..#."TO 000|
00001150: 2E 11 22 3A 8E 00 86 19  F0 23 45 52 B2 30 3A 41  |..":.....#ER.0:A|
00001160: 32 B2 31 3A 81 49 B2 30  A4 4D 58 3A 43 28 49 29  |2.1:.I.0.MX:C(I)|
00001170: B2 C5 28 CA 28 41 24 2C  41 32 2C 33 29 29 3A 41  |..(.(A$,A2,3)):A|
00001180: 32 B2 41 32 AA 34 00 A0  19 FA 23 8B 43 28 49 29  |2.A2.4....#.C(I)|
00001190: B3 30 B0 43 28 49 29 B1  32 35 35 A7 45 52 B2 31  |.0.C(I).255.ER.1|
000011A0: 00 AE 19 04 24 82 3A 8B  45 52 B2 31 A7 8E 00 C3  |....$.:.ER.1....|
000011B0: 19 0E 24 49 B2 30 3A 8B  43 28 30 29 B2 30 A7 39  |..$I.0:.C(0).0.9|
000011C0: 32 35 31 00 D4 19 11 24  8B 43 28 49 29 B2 54 A7  |251....$.C(I).T.|
000011D0: 39 32 35 31 00 EB 19 14  24 49 B2 49 AA 31 3A 8B  |9251....$I.I.1:.|
000011E0: 49 B3 4D 58 AA 31 A7 39  32 33 33 00 1C 1A 17 24  |I.MX.1.9233....$|
000011F0: 99 22 11 54 45 52 4D 49  4E 41 54 4F 52 20 43 48  |.".TERMINATOR CH|
00001200: 41 52 41 43 54 45 52 20  22 3B 54 24 3B 22 20 4E  |ARACTER ";T$;" N|
00001210: 4F 54 20 46 4F 55 4E 44  2E 2E 2E 22 00 48 1A 1A  |OT FOUND...".H..|
00001220: 24 99 22 2E 2E 2E 41 4C  4C 20 43 48 41 52 41 43  |$."...ALL CHARAC|
00001230: 54 45 52 53 20 42 45 49  4E 47 20 53 45 4E 54 20  |TERS BEING SENT |
00001240: 28 59 2F 4E 29 20 22 3B  00 65 1A 1B 24 41 24 B2  |(Y/N) ";.e..$A$.|
00001250: 22 22 3A 85 41 24 3A 8B  41 24 B2 22 4E 22 A7 45  |"":.A$:.A$."N".E|
00001260: 52 B2 31 3A 8E 00 76 1A  1D 24 8B 41 24 B2 22 59  |R.1:..v..$.A$."Y|
00001270: 22 A7 39 32 36 30 00 81  1A 20 24 89 20 39 32 33  |".9260... $. 923|
00001280: 39 00 96 1A 23 24 49 B2  49 AA 31 3A 8B 49 B1 4D  |9...#$I.I.1:.I.M|
00001290: 58 A7 39 32 36 30 00 A7  1A 26 24 8B 43 28 49 29  |X.9260...&$.C(I)|
000012A0: B2 30 A7 39 32 35 31 00  B2 1A 29 24 45 52 B2 31  |.0.9251...)$ER.1|
000012B0: 3A 8E 00 CE 1A 2C 24 81  49 B2 30 A4 4D 58 3A 97  |:....,$.I.0.MX:.|
000012C0: 20 41 44 AA 49 2C 43 28  49 29 3A 82 3A 8E 00 E3  | AD.I,C(I):.:...|
000012D0: 1A 10 27 84 31 35 2C 45  4E 2C 45 4D 24 2C 45 54  |..'.15,EN,EM$,ET|
000012E0: 2C 45 53 00 EF 1A 1A 27  8B 45 4E B2 30 A7 8E 00  |,ES....'.EN.0...|
000012F0: 0C 1B 24 27 99 22 45 52  52 4F 52 20 23 20 22 3B  |..$'."ERROR # ";|
00001300: 45 4E 2C 45 4D 24 2C 45  54 3B 45 53 00 1A 1B 2E  |EN,EM$,ET;ES....|
00001310: 27 98 31 35 2C 22 49 22  3A 8E 00 42 1B F8 2A 99  |'.15,"I":..B..*.|
00001320: 22 11 44 4F 20 59 4F 55  20 57 49 53 48 20 54 4F  |".DO YOU WISH TO|
00001330: 20 4C 4F 41 44 20 54 48  45 20 43 55 52 52 45 4E  | LOAD THE CURREN|
00001340: 54 22 00 82 1B 02 2B 99  22 20 20 20 27 50 52 49  |T"....+."   'PRI|
00001350: 4E 54 45 52 2E 43 4F 4E  46 49 47 27 20 46 49 4C  |NTER.CONFIG' FIL|
00001360: 45 20 28 59 2F 4E 29 20  20 20 4E 9D 9D 9D 22 3B  |E (Y/N)   N...";|
00001370: 3A 85 41 24 3A 8B 41 24  B2 22 4E 22 A7 31 31 31  |:.A$:.A$."N".111|
00001380: 30 30 00 95 1B 0C 2B 8B  41 24 B3 B1 22 59 22 A7  |00....+.A$.."Y".|
00001390: 31 31 30 30 30 00 B6 1B  16 2B 4E 24 B2 22 50 52  |11000....+N$."PR|
000013A0: 49 4E 54 45 52 2E 43 4F  4E 46 49 47 22 3A 8D 31  |INTER.CONFIG":.1|
000013B0: 31 35 30 30 3A 8E 00 DF  1B 5C 2B 99 22 11 44 4F  |1500:....\+.".DO|
000013C0: 20 59 4F 55 20 57 49 53  48 20 54 4F 20 4C 4F 41  | YOU WISH TO LOA|
000013D0: 44 20 41 4E 20 41 4C 54  45 52 4E 41 54 45 22 00  |D AN ALTERNATE".|
000013E0: 0B 1C 66 2B 99 22 20 20  20 50 52 49 4E 54 45 52  |..f+."   PRINTER|
000013F0: 20 43 4F 4E 46 49 47 55  52 41 54 49 4F 4E 20 28  | CONFIGURATION (|
00001400: 43 46 47 2E 29 20 46 49  4C 45 22 00 27 1C 70 2B  |CFG.) FILE".'.p+|
00001410: 99 22 20 20 20 28 59 2F  4E 29 20 20 20 4E 9D 9D  |."   (Y/N)   N..|
00001420: 9D 22 3B 3A 85 41 24 00  35 1C 7A 2B 8B 41 24 B2  |.";:.A$.5.z+.A$.|
00001430: 22 4E 22 A7 8E 00 48 1C  84 2B 8B 41 24 B3 B1 22  |"N"...H..+.A$.."|
00001440: 59 22 A7 31 31 31 30 30  00 87 1C 8E 2B 99 22 11  |Y".11100....+.".|
00001450: 45 4E 54 45 52 20 43 4F  4E 46 49 47 55 52 41 54  |ENTER CONFIGURAT|
00001460: 49 4F 4E 20 4E 41 4D 45  20 54 4F 20 4C 4F 41 44  |ION NAME TO LOAD|
00001470: 22 3A 99 22 20 20 20 43  46 47 2E 9D 9D 9D 9D 9D  |":."   CFG......|
00001480: 9D 22 3B 3A 85 4E 24 00  94 1C 98 2B 8D 31 31 35  |.";:.N$....+.115|
00001490: 30 30 3A 8E 00 BC 1C EC  2C 9F 38 2C 38 2C 38 2C  |00:.....,.8,8,8,|
000014A0: 4E 24 AA 22 2C 50 2C 52  22 3A 8D 31 30 30 30 30  |N$.",P,R":.10000|
000014B0: 3A 8B 45 4E B3 B1 30 A7  A0 38 3A 8E 00 EB 1C F6  |:.EN..0..8:.....|
000014C0: 2C A1 23 38 2C 41 24 3A  A1 23 38 2C 41 31 24 3A  |,.#8,A$:.#8,A1$:|
000014D0: 8B 41 24 B2 C7 28 31 34  34 29 AF 41 31 24 B2 C7  |.A$..(144).A1$..|
000014E0: 28 31 39 34 29 A7 31 31  35 33 30 00 0F 1D 00 2D  |(194).11530....-|
000014F0: 99 22 11 46 49 4C 45 20  22 3B 4E 24 3B 22 20 49  |.".FILE ";N$;" I|
00001500: 53 20 49 4E 56 41 4C 49  44 22 3A A0 38 3A 8E 00  |S INVALID":.8:..|
00001510: 36 1D 0A 2D 81 49 B2 30  A4 37 31 3A A1 23 38 2C  |6..-.I.0.71:.#8,|
00001520: 41 24 3A 41 B2 30 3A 8B  41 24 B3 B1 22 22 A7 41  |A$:A.0:.A$.."".A|
00001530: B2 C6 28 41 24 29 00 4C  1D 14 2D 97 34 39 38 30  |..(A$).L..-.4980|
00001540: 38 AA 49 2C 41 3A 82 3A  A0 38 3A 8E 00 00 00     |8.I,A:.:.8:.... |

..#....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:.1340.C.(..A$.
"Y"..49842,10:.1340.M.2..1300.Y.<.."..BE
LOW YOU WILL BE DEFINING PRINTER"...A.."
SETUP SEQUENCES.  TERMINATE ALL CONTROL"
.S.F.."SEQUENCES WITH A CHARACTER VALUE 
OF"...K.."YOUR CHOICE, BUT THIS VALUE MU
ST NOT".-.P.."BE USED AS PART OF ANY PRI
NTER CONTROL".>.U.."SEQUENCE.".I.Z.."UNL
ESS YOU NEED TO SEND A CHR$(000)"..._.."
CHARACTER VALUE WITHIN ANY OF YOUR"...D.
."PRINTER CONTROL SEQUENCES, USE THE"...
I.."SUGGESTED TERMINATING VALUE OF 000."
. .N.."..PRINTER CONTROL SEQUENCE TERMIN
ATOR":T.B(49843).O.P.T$.I("000".J(D(T),2
),3):."   ";T$;".....";.J.Q.T.0:.T:.T.0.
T.255.1390...R.T$.I("000".J(D(T),2),3)..
.S..49843,T...X..".YOU MAY NOW ESTABLISH
 FROM 0 TO 4"......"PRINTER SETUP SEQUEN
CES.  WHEN THE"......"PRINT  FUNCTION IS
 SELECTED, YOU WILL".B...."BE GIVEN THE 
OPPORTUNITY TO SEND THESE".P. .."PRINTER
 SETUP CHARACTERS BEFORE REPORT"......"P
RINTING BEGINS."......".A COUPLE OF IDEA
S ON HOW THESE MIGHT".E...."BE USED:"...
H..".   1)  CHANGE CHARACTER SETS"...R..
"   2)  CHANGE LINE SPACING".9....".FOR 
EACH OF THE 4 SEQUENCES, UP TO 8".E...."
CHARACTERS CAN BE DEFINED.  FURTHER,"...
..."FOR ANY ONE SEQUENCE, MULTIPLE PRINT
ER"......"COMMANDS MAY BE ESTABLISHED BY
"......"ENTERING THEM CONSECUTIVELY."...
...".PRINTER SETUP SEQUENCE TO DEFINE".'
...."  (1-4; 0 TO END)   0...";.8."..A:.
A.0.1700.P.,..A.1.AD.49808:.1630.H.6..A.
2.AD.49816:.1630...@..A.3.AD.49824:.1630
...J..A.4.AD.49832:.1630...T..1550.V.^.M
X.7:.9000:.9100:."  ";A$:.".";:.C(A$).39
..".";...H.L.C(A$):.A$:.C(A$).L.2.1660..
.R.."...TRY AGAIN":.1630.%.|..9200:.ER.1
.1650.5...."OK":.1550.D...."...IF YOU DE
SIRE TO PRINT 6 COLUMNS PER"......"PAGE,
 YOU WILL NEED TO ESTABLISH"......"PRINT
ER SETUP SEQUENCES THAT WILL"...B.."ACTI
VATE AND CANCEL CONDENSED PRINT"...L.."F
ORMAT (136 COLUMNS PER PRINT LINE).".(.V
.."THE WAY IT WORKS IS:".P....".   1)  B
EFORE EACH HEADING LINE".~...."       (I
NCLUDING THE 1ST), THE CANCEL"......"   
    CONDENSED SETUP SEQUENCE WILL BE".B.
..."       SENT.."......"   2)  AFTER EA
CH HEADING LINE, THE"......"       ACTIV
ATE CONDENSED SETUP ".;...."       SEQUE
NCE WILL BE SENT..".J.&.."......       .
..ANY KEY TO CONTINUE...";...0.A$."":.A$
:.A$."".1840...:.."....."...L.MX.15:AD.4
9848:.9000:.9100...V..".ENTER ACTIVATE C
ONDENSED SETUP SEQUENCE.":."  ";A$:.".";
......C(A$).39..".";.$...L.C(A$):.A$:.C(
A$).L.2.1950.>...."...TRY AGAIN":.1900.S
....9200:.ER.1.1940.]...."OK".|.P.MX.15:
AD.49864:.9000:.9100...Z..".ENTER CANCEL
 CONDENSED SETUP SEQUENCE.":."  ";A$:.".
";.O.... C(A$).39..".";.....L.C(A$):.A$:
.C(A$).L.2.2050......"...TRY AGAIN":.200
0......9200:.ER.1.2040.(...."OK".P.4..".
AS PART OF THIS SAVE OPERATION,".Z.>.."I
F FILE 'PRINT.CONFIG.OLD' EXISTS,"...H..
"IT WILL BE SCRATCHED.".C.R.."THE CURREN
T 'PRINTER.CONFIG' WILL BE"...\.."RENAME
D TO 'PRINT.CONFIG.OLD', AND THEN"...F..
"THE NEW PRINTER SETUP PARAMETERS".E.P..
"WILL BE SAVED AS 'PRINTER.CONFIG'..".T.
Z..".DO YOU WISH TO SAVE THIS CONFIGURAT
ION"...... "AS 'PRINTER.CONFIG' (Y/N)   
Y...";:.A$......A$."N".2300.E....A$.."Y"
.2170..... 15:.15,8,15,"S0:PRINT.CONFIG.
OLD": 15.3....15,8,15,"R0:PRINT.CONFIG.O
LD=PRINTER.CONFIG": 15:.15,8,15,"I".Q...
N$."PRINTER.CONFIG":.2500.}....".DO YOU 
WISH TO SAVE AS AN ALTERNATE"......"PRIN
TER CONFIGURATION (CFG.) FILE"......"(Y/
N)   N...";:.A$......A$."N".."....ABORTE
D.": 15:....$..A$.."Y".2300......"ENTER 
CONFIGURATION NAME TO SAVE".3.8.."   CFG
.......";N$.=.B..2500.N.D..15,"S0:";N$.C
.I..8,8,8,N$.",P,W".Y.N..8,G(144);G(194)
;...X..I.0.71:.8,G(B(49808.I));:...... 8
: 15:.".FINISHED SAVING.":....(#A$.G(34)
:.I.0.MX:C(I).B(AD.I):A1$.D(C(I)):A1.C(A
1$).%.2#A$.A$.I("00".J(A1$,2,A1.1),3):.I
.MX.A$.A$.",".9.<#.:A$.A$.G(34):..H..#."
.OVERTYPE THE FOLLOWING CHR$(NNN) CODES"
....#."WITH THE DECIMAL EQUIVALENT OF TH
E"... #."CHARACTERS BEING SENT TO THE PR
INTER."....#."FOLLOW THE LAST OUTBOUND C
HARACTER"....#."WITH THE TERMINATOR CHAR
ACTER ";T$;";".C..#."SET REMAINING UNUSE
D CHARACTER VALUES".U..#."TO 000..":....
.#ER.0:A2.1:.I.0.MX:C(I).E(J(A$,A2,3)):A
2.A2.4. ..#.C(I).0.C(I).255.ER.1....$.:.
ER.1...C..$I.0:.C(0).0.9251.T..$.C(I).T.
9251....$I.I.1:.I.MX.1.9233....$.".TERMI
NATOR CHARACTER ";T$;" NOT FOUND...".H..
$."...ALL CHARACTERS BEING SENT (Y/N) ";
.E..$A$."":.A$:.A$."N".ER.1:..V..$.A$."Y
".9260... $. 9239...#$I.I.1:.I.MX.9260..
.&$.C(I).0.9251...)$ER.1:..N.,$.I.0.MX:.
 AD.I,C(I):.:.....'.15,EN,EM$,ET,ES....'
.EN.0.....$'."ERROR # ";EN,EM$,ET;ES....
'.15,"I":..B..*.".DO YOU WISH TO LOAD TH
E CURRENT"....+."   'PRINTER.CONFIG' FIL
E (Y/N)   N...";:.A$:.A$."N".11100....+.
A$.."Y".11000....+N$."PRINTER.CONFIG":.1
1500:....\+.".DO YOU WISH TO LOAD AN ALT
ERNATE"...F+."   PRINTER CONFIGURATION (
CFG.) FILE".'.P+."   (Y/N)   N...";:.A$.
5.Z+.A$."N"...H..+.A$.."Y".11100....+.".
ENTER CONFIGURATION NAME TO LOAD":."   C
FG.......";:.N$....+.11500:.....,.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:..6..-.I.0
.71:.#8,A$:A.0:.A$.."".A.F(A$).L..-.4980
8.I,A:.: 8:....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL