_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

T.WINDOW PRINT

FILE INFORMATION

FILENAME(S): T.WINDOW PRINT

FILE TYPE(S): PRG

FILE SIZE: 5.9K

FIRST SEEN: 2025-12-01 19:06:51

APPEARS ON: 1 disk(s)

FILE HASH

bd8475b2c727b5c72d11c17c3ea514dfef867c6b21a7e24ec3a1be2de63f4fda

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LOADSTAR 107 S 3 T.WINDOW PRINT PRG Icebreaker 6 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 00 80 0D 20 20 20 D7 20  C9 20 CE 20 C4 20 CF 20  |...   . . . . . |
00000010: D7 20 20 20 D0 20 D2 20  C9 20 CE 20 D4 20 20 20  |.   . . . . .   |
00000020: 27 20 39 20 33 0D 0D 20  20 20 20 20 20 20 20 20  |' 9 3..         |
00000030: 20 42 59 20 D3 43 4F 54  54 20 C5 2E 20 D2 45 53  | BY .COTT .. .ES|
00000040: 48 0D 0D 0D 20 20 20 20  C2 41 43 4B 20 4F 4E 20  |H...    .ACK ON |
00000050: CC CF C1 C4 D3 D4 C1 D2  20 23 38 36 20 57 45 20  |........ #86 WE |
00000060: 50 55 42 4C 49 53 48 45  44 0D 54 48 45 20 46 49  |PUBLISHED.THE FI|
00000070: 52 53 54 20 56 45 52 53  49 4F 4E 20 4F 46 20 D7  |RST VERSION OF .|
00000080: C9 CE C4 CF D7 D0 D2 C9  CE D4 2C 20 41 4E 0D CD  |.........., AN..|
00000090: CC 20 52 4F 55 54 49 4E  45 20 54 48 41 54 20 41  |. ROUTINE THAT A|
000000A0: 4C 4C 4F 57 53 20 54 48  45 20 55 53 45 52 20 54  |LLOWS THE USER T|
000000B0: 4F 0D 50 52 49 4E 54 20  41 20 50 52 4F 47 52 41  |O.PRINT A PROGRA|
000000C0: 4D 2D 44 45 46 49 4E 45  44 20 57 49 4E 44 4F 57  |M-DEFINED WINDOW|
000000D0: 20 4F 4E 20 41 0D 48 49  2D 52 45 53 20 53 43 52  | ON A.HI-RES SCR|
000000E0: 45 45 4E 2E 20 20 D4 48  45 20 4F 52 49 47 49 4E  |EEN.  .HE ORIGIN|
000000F0: 41 4C 20 50 52 4F 47 52  41 4D 0D 57 4F 55 4C 44  |AL PROGRAM.WOULD|
00000100: 20 4F 4E 4C 59 20 57 4F  52 4B 20 46 4F 52 20 37  | ONLY WORK FOR 7|
00000110: 2D 50 49 4E 20 50 52 49  4E 54 45 52 53 3A 0D C3  |-PIN PRINTERS:..|
00000120: 4F 4D 4D 4F 44 4F 52 45  20 31 35 32 35 53 20 41  |OMMODORE 1525S A|
00000130: 4E 44 20 54 48 4F 53 45  20 53 59 53 54 45 4D 53  |ND THOSE SYSTEMS|
00000140: 0D 54 48 41 54 20 45 4D  55 4C 41 54 45 20 54 48  |.THAT EMULATE TH|
00000150: 45 20 31 35 32 35 2E 0D  0D 20 20 20 20 CE 4F 57  |E 1525...    .OW|
00000160: 20 59 4F 55 20 43 41 4E  20 53 55 50 50 4F 52 54  | YOU CAN SUPPORT|
00000170: 20 48 49 2D 52 45 53 20  50 52 49 4E 54 45 52 0D  | HI-RES PRINTER.|
00000180: 44 55 4D 50 53 20 49 4E  20 59 4F 55 52 20 50 52  |DUMPS IN YOUR PR|
00000190: 4F 47 52 41 4D 53 20 46  4F 52 20 41 4C 4C 20 38  |OGRAMS FOR ALL 8|
000001A0: 2D 50 49 4E 0D C5 50 53  4F 4E 20 43 4F 4D 50 41  |-PIN..PSON COMPA|
000001B0: 54 49 42 4C 45 20 50 52  49 4E 54 45 52 53 20 41  |TIBLE PRINTERS A|
000001C0: 53 0D 57 45 4C 4C 20 41  53 20 54 48 45 20 4F 55  |S.WELL AS THE OU|
000001D0: 54 44 41 54 45 44 20 37  2D 50 49 4E 20 50 52 49  |TDATED 7-PIN PRI|
000001E0: 4E 54 45 52 53 2E 0D D7  C9 CE C4 CF D7 D0 D2 C9  |NTERS...........|
000001F0: CE D4 20 27 39 33 20 57  49 4C 4C 20 45 56 45 4E  |.. '93 WILL EVEN|
00000200: 20 57 4F 52 4B 20 4F 4E  20 32 34 0D 50 49 4E 20  | WORK ON 24.PIN |
00000210: 50 52 49 4E 54 45 52 53  20 28 49 4E 20 54 48 45  |PRINTERS (IN THE|
00000220: 49 52 20 44 45 46 41 55  4C 54 20 38 2D 50 49 4E  |IR DEFAULT 8-PIN|
00000230: 0D 4D 4F 44 45 53 29 2E  20 20 C1 4C 53 4F 2C 20  |.MODES).  .LSO, |
00000240: 57 48 49 4C 45 20 D7 C9  CE C4 CF D7 20 D0 D2 C9  |WHILE ...... ...|
00000250: CE D4 0D 44 4F 45 53 20  4E 4F 54 20 53 55 50 50  |...DOES NOT SUPP|
00000260: 4F 52 54 20 43 4F 4C 4F  52 2C 20 49 54 20 43 41  |ORT COLOR, IT CA|
00000270: 4E 20 50 52 49 4E 54 0D  4F 55 54 20 4D 55 4C 54  |N PRINT.OUT MULT|
00000280: 49 2D 43 4F 4C 4F 52 20  42 49 54 4D 41 50 53 20  |I-COLOR BITMAPS |
00000290: 28 49 46 20 59 4F 55 20  44 4F 4E 27 54 0D 4D 49  |(IF YOU DON'T.MI|
000002A0: 4E 44 20 53 4F 4D 45 20  46 55 5A 5A 49 4E 45 53  |ND SOME FUZZINES|
000002B0: 53 20 41 52 4F 55 4E 44  20 54 48 45 0D 45 44 47  |S AROUND THE.EDG|
000002C0: 45 53 29 2E 0D 0D 0D C8  CF D7 20 D4 CF 20 D5 D3  |ES)....... .. ..|
000002D0: C5 20 D7 C9 CE C4 CF D7  D0 D2 C9 CE D4 20 27 39  |. ........... '9|
000002E0: 33 0D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |3.--------------|
000002F0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 0D 0D 20 20  |------------..  |
00000300: 20 20 C3 48 4F 4F 53 45  20 4F 4E 45 20 4F 46 20  |  .HOOSE ONE OF |
00000310: 54 48 45 20 54 48 52 45  45 20 56 45 52 53 49 4F  |THE THREE VERSIO|
00000320: 4E 53 0D 4F 46 20 D7 D0  39 33 2E 20 20 24 C3 30  |NS.OF ..93.  $.0|
00000330: 30 30 20 49 53 20 57 48  45 52 45 20 4D 41 4E 59  |00 IS WHERE MANY|
00000340: 20 4F 54 48 45 52 0D CD  4C 20 52 4F 55 54 49 4E  | OTHER..L ROUTIN|
00000350: 45 53 20 52 45 53 49 44  45 2C 20 53 4F 20 59 4F  |ES RESIDE, SO YO|
00000360: 55 20 4D 41 59 20 57 41  4E 54 0D 54 4F 20 55 53  |U MAY WANT.TO US|
00000370: 45 20 D7 D0 39 33 20 24  39 C3 30 30 20 2D 2D 20  |E ..93 $9.00 -- |
00000380: 41 4E 44 20 4C 4F 57 45  52 20 54 48 45 20 54 4F  |AND LOWER THE TO|
00000390: 50 0D 4F 46 20 C2 C1 D3  C9 C3 20 54 4F 20 50 41  |P.OF ..... TO PA|
000003A0: 47 45 20 31 35 36 20 28  24 39 C3 30 30 20 4F 52  |GE 156 ($9.00 OR|
000003B0: 20 33 39 39 33 36 29 0D  2D 2D 20 4F 52 20 55 53  | 39936).-- OR US|
000003C0: 45 20 D7 D0 39 33 20 24  C3 C3 30 30 2C 20 57 48  |E ..93 $..00, WH|
000003D0: 49 43 48 20 52 45 53 49  44 45 53 0D 41 54 20 54  |ICH RESIDES.AT T|
000003E0: 48 45 20 54 4F 50 20 4F  46 20 54 48 45 20 24 C3  |HE TOP OF THE $.|
000003F0: 30 30 30 20 41 52 45 41  20 41 54 0D 24 C3 C3 30  |000 AREA AT.$..0|
00000400: 30 2E 0D 0D 20 20 20 20  CC 4F 41 44 20 D7 D0 39  |0...    .OAD ..9|
00000410: 33 20 57 49 54 48 20 4F  55 52 20 54 52 55 53 54  |3 WITH OUR TRUST|
00000420: 59 0D 52 45 4C 4F 43 41  54 41 42 4C 45 20 C2 CC  |Y.RELOCATABLE ..|
00000430: CF C1 C4 20 43 4F 4D 4D  41 4E 44 3A 0D 0D 20 31  |... COMMAND:.. 1|
00000440: 30 20 53 59 53 35 37 38  31 32 22 57 50 39 33 20  |0 SYS57812"WP93 |
00000450: 24 43 30 30 30 22 2C 44  56 2C 30 3A 0D 20 20 20  |$C000",DV,0:.   |
00000460: 20 50 4F 4B 45 37 38 30  2C 30 3A 50 4F 4B 45 37  | POKE780,0:POKE7|
00000470: 38 31 2C 30 3A 50 4F 4B  45 37 38 32 2C 31 39 32  |81,0:POKE782,192|
00000480: 3A 0D 20 20 20 20 53 59  53 36 35 34 39 33 0D 0D  |:.    SYS65493..|
00000490: 57 48 45 52 45 20 44 56  20 49 53 20 54 48 45 20  |WHERE DV IS THE |
000004A0: 44 45 56 49 43 45 20 4E  55 4D 42 45 52 20 46 4F  |DEVICE NUMBER FO|
000004B0: 55 4E 44 0D 45 41 52 4C  49 45 52 20 49 4E 3A 0D  |UND.EARLIER IN:.|
000004C0: 0D 20 35 20 44 56 3D 50  45 45 4B 28 31 38 36 29  |. 5 DV=PEEK(186)|
000004D0: 3A 49 46 44 56 3C 38 54  48 45 4E 44 56 3D 38 0D  |:IFDV<8THENDV=8.|
000004E0: 0D 20 20 20 20 D4 48 45  20 46 4F 4C 4C 4F 57 49  |.    .HE FOLLOWI|
000004F0: 4E 47 20 49 4E 53 54 52  55 43 54 49 4F 4E 53 20  |NG INSTRUCTIONS |
00000500: 41 53 53 55 4D 45 0D 59  4F 55 20 41 52 45 20 55  |ASSUME.YOU ARE U|
00000510: 53 49 4E 47 20 D7 D0 39  33 20 24 C3 30 30 30 20  |SING ..93 $.000 |
00000520: 28 41 54 20 34 39 31 35  32 29 2E 0D D7 49 54 48  |(AT 49152)...ITH|
00000530: 20 D7 C9 CE C4 CF D7 D0  D2 C9 CE D4 20 27 39 33  | ........... '93|
00000540: 20 59 4F 55 20 43 41 4E  20 53 45 54 20 54 48 45  | YOU CAN SET THE|
00000550: 0D 44 49 4D 45 4E 53 49  4F 4E 53 20 4F 46 20 41  |.DIMENSIONS OF A|
00000560: 20 57 49 4E 44 4F 57 20  28 52 45 43 54 41 4E 47  | WINDOW (RECTANG|
00000570: 4C 45 29 20 4F 4E 0D 54  48 45 20 53 43 52 45 45  |LE) ON.THE SCREE|
00000580: 4E 20 41 4E 44 20 4F 4E  4C 59 20 54 48 45 20 42  |N AND ONLY THE B|
00000590: 49 54 4D 41 50 20 49 4E  53 49 44 45 0D 54 48 45  |ITMAP INSIDE.THE|
000005A0: 20 52 45 43 54 41 4E 47  4C 45 20 57 49 4C 4C 20  | RECTANGLE WILL |
000005B0: 42 45 20 50 52 49 4E 54  45 44 2E 20 20 CF 46 0D  |BE PRINTED.  .F.|
000005C0: 43 4F 55 52 53 45 2C 20  49 46 20 59 4F 55 20 53  |COURSE, IF YOU S|
000005D0: 45 54 20 54 48 45 20 57  49 4E 44 4F 57 20 54 4F  |ET THE WINDOW TO|
000005E0: 20 54 48 45 0D 53 41 4D  45 20 53 49 5A 45 20 41  | THE.SAME SIZE A|
000005F0: 53 20 54 48 45 20 57 48  4F 4C 45 20 53 43 52 45  |S THE WHOLE SCRE|
00000600: 45 4E 20 28 30 2C 30 20  54 4F 0D 33 39 2C 32 34  |EN (0,0 TO.39,24|
00000610: 29 20 54 48 45 20 57 48  4F 4C 45 20 53 43 52 45  |) THE WHOLE SCRE|
00000620: 45 4E 20 57 49 4C 4C 20  42 45 0D 50 52 49 4E 54  |EN WILL BE.PRINT|
00000630: 45 44 2E 0D 0D 20 D0 D2  C9 CE D4 C9 CE C7 20 CF  |ED... ........ .|
00000640: CE 20 38 2D C2 C9 D4 20  28 C5 D0 D3 CF CE 29 20  |. 8-... (.....) |
00000650: D0 D2 C9 CE D4 C5 D2 D3  0D 20 2D 2D 2D 2D 2D 2D  |......... ------|
00000660: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000670: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 0D 0D 20 20  |------------..  |
00000680: 20 20 C9 46 20 59 4F 55  20 57 41 4E 54 20 54 4F  |  .F YOU WANT TO|
00000690: 20 50 52 49 4E 54 20 54  4F 20 41 4E 20 38 2D 50  | PRINT TO AN 8-P|
000006A0: 49 4E 0D 50 52 49 4E 54  45 52 20 28 54 48 49 53  |IN.PRINTER (THIS|
000006B0: 20 49 4E 43 4C 55 44 45  53 20 4D 4F 44 45 52 4E  | INCLUDES MODERN|
000006C0: 20 42 55 42 42 4C 45 0D  4A 45 54 53 2C 20 49 4E  | BUBBLE.JETS, IN|
000006D0: 4B 20 4A 45 54 53 2C 20  53 4F 4D 45 20 4C 41 53  |K JETS, SOME LAS|
000006E0: 45 52 20 50 52 49 4E 54  45 52 53 0D 41 4E 44 20  |ER PRINTERS.AND |
000006F0: 42 41 53 49 43 41 4C 4C  59 20 41 4E 59 20 50 52  |BASICALLY ANY PR|
00000700: 49 4E 54 45 52 20 54 48  41 54 0D 45 4D 55 4C 41  |INTER THAT.EMULA|
00000710: 54 45 53 20 41 4E 20 C5  50 53 4F 4E 29 20 55 53  |TES AN .PSON) US|
00000720: 45 20 54 48 45 20 46 4F  4C 4C 4F 57 49 4E 47 0D  |E THE FOLLOWING.|
00000730: D3 D9 D3 3A 0D 0D 20 53  59 53 34 39 31 35 32 2C  |...:.. SYS49152,|
00000740: 44 56 2C 53 41 2C 4C 46  2C 58 2C 59 2C 58 58 2C  |DV,SA,LF,X,Y,XX,|
00000750: 59 59 2C 4C 4F 43 2C 44  45 4E 2C 0D 33 36 2C 36  |YY,LOC,DEN,.36,6|
00000760: 35 2C 38 2C 54 41 42 0D  0D 20 57 48 45 52 45 3A  |5,8,TAB.. WHERE:|
00000770: 0D 0D 20 C4 D6 20 2D 20  44 45 56 49 43 45 20 4E  |.. .. - DEVICE N|
00000780: 55 4D 42 45 52 20 4F 46  20 50 52 49 4E 54 45 52  |UMBER OF PRINTER|
00000790: 0D 0D 20 D3 C1 20 2D 20  53 45 43 4F 4E 44 41 52  |.. .. - SECONDAR|
000007A0: 59 20 41 44 44 52 45 53  53 2E 20 20 D9 4F 55 20  |Y ADDRESS.  .OU |
000007B0: 52 45 41 4C 4C 59 0D 53  48 4F 55 4C 44 20 4F 46  |REALLY.SHOULD OF|
000007C0: 46 45 52 20 59 4F 55 52  20 55 53 45 52 20 41 20  |FER YOUR USER A |
000007D0: 43 48 41 4E 43 45 20 54  4F 0D 43 48 41 4E 47 45  |CHANCE TO.CHANGE|
000007E0: 20 54 48 49 53 20 50 41  52 41 4D 45 54 45 52 2E  | THIS PARAMETER.|
000007F0: 20 20 35 20 49 53 20 55  53 55 41 4C 4C 59 0D 41  |  5 IS USUALLY.A|
00000800: 20 47 4F 4F 44 20 53 45  43 4F 4E 44 41 52 59 20  | GOOD SECONDARY |
00000810: 41 44 44 52 45 53 53 20  28 46 4F 52 20 41 0D 44  |ADDRESS (FOR A.D|
00000820: 45 46 41 55 4C 54 29 2C  20 42 55 54 20 53 4F 4D  |EFAULT), BUT SOM|
00000830: 45 20 49 4E 54 45 52 46  41 43 45 53 20 52 45 51  |E INTERFACES REQ|
00000840: 55 49 52 45 0D 41 20 36  2C 20 4F 52 20 53 4F 4D  |UIRE.A 6, OR SOM|
00000850: 45 20 4F 54 48 45 52 20  4E 55 4D 42 45 52 2E 0D  |E OTHER NUMBER..|
00000860: 0D 20 CC C6 20 2D 20 31  20 53 45 4E 44 53 20 41  |. .. - 1 SENDS A|
00000870: 20 4C 49 4E 45 46 45 45  44 20 41 46 54 45 52 20  | LINEFEED AFTER |
00000880: 45 41 43 48 0D 4C 49 4E  45 2E 20 20 30 20 44 4F  |EACH.LINE.  0 DO|
00000890: 45 53 4E 27 54 2E 20 20  C9 46 20 59 4F 55 52 20  |ESN'T.  .F YOUR |
000008A0: 50 52 49 4E 54 4F 55 54  0D 49 53 20 53 4B 49 50  |PRINTOUT.IS SKIP|
000008B0: 50 49 4E 47 20 4C 49 4E  45 53 2C 20 4F 52 20 49  |PING LINES, OR I|
000008C0: 53 20 50 52 49 4E 54 49  4E 47 0D 45 56 45 52 59  |S PRINTING.EVERY|
000008D0: 54 48 49 4E 47 20 4F 4E  20 4F 4E 45 20 4C 49 4E  |THING ON ONE LIN|
000008E0: 45 2C 20 43 48 41 4E 47  45 20 54 48 49 53 0D 50  |E, CHANGE THIS.P|
000008F0: 41 52 41 4D 45 54 45 52  2E 0D 0D 20 D8 20 2D 20  |ARAMETER... . - |
00000900: C2 45 47 49 4E 4E 49 4E  47 20 58 20 43 4F 4F 52  |.EGINNING X COOR|
00000910: 44 49 4E 41 54 45 2C 20  30 2D 33 39 2C 20 CE CF  |DINATE, 0-39, ..|
00000920: D4 0D 30 2D 33 32 30 21  20 20 D4 48 45 20 4E 55  |..0-320!  .HE NU|
00000930: 4D 42 45 52 20 59 4F 55  20 45 4E 54 45 52 20 48  |MBER YOU ENTER H|
00000940: 45 52 45 20 57 49 4C 4C  0D 42 45 20 4D 55 4C 54  |ERE WILL.BE MULT|
00000950: 49 50 4C 49 45 44 20 42  59 20 38 2E 0D 0D 20 D9  |IPLIED BY 8... .|
00000960: 20 2D 20 C2 45 47 49 4E  4E 49 4E 47 20 59 20 43  | - .EGINNING Y C|
00000970: 4F 4F 52 44 49 4E 41 54  45 2C 20 30 2D 32 34 2E  |OORDINATE, 0-24.|
00000980: 0D 0D 20 D8 D8 20 2D 20  C5 4E 44 49 4E 47 20 58  |.. .. - .NDING X|
00000990: 20 43 4F 4F 52 44 49 4E  41 54 45 2C 20 30 2D 32  | COORDINATE, 0-2|
000009A0: 34 0D 0D 20 D9 D9 20 2D  20 C5 4E 44 49 4E 47 20  |4.. .. - .NDING |
000009B0: 59 20 43 4F 4F 52 44 49  4E 41 54 45 2C 20 30 2D  |Y COORDINATE, 0-|
000009C0: 32 34 0D 0D 20 CC CF C3  20 2D 20 CC 4F 43 41 54  |24.. ... - .OCAT|
000009D0: 49 4F 4E 20 4F 46 20 54  48 45 20 42 49 54 4D 41  |ION OF THE BITMA|
000009E0: 50 2E 20 20 D0 41 47 45  0D 4E 55 4D 42 45 52 20  |P.  .AGE.NUMBER |
000009F0: 4F 4E 4C 59 2E 20 20 D4  48 49 53 20 4D 41 59 20  |ONLY.  .HIS MAY |
00000A00: 4E 4F 54 0D 4E 45 43 45  53 53 41 52 49 4C 59 20  |NOT.NECESSARILY |
00000A10: 42 45 20 54 48 45 20 CC  CF C1 C4 20 41 44 44 52  |BE THE .... ADDR|
00000A20: 45 53 53 20 53 49 4E 43  45 0D 43 4F 4C 4F 52 20  |ESS SINCE.COLOR |
00000A30: 4D 45 4D 4F 52 59 20 4D  41 59 20 43 4F 4D 45 20  |MEMORY MAY COME |
00000A40: 46 49 52 53 54 2C 20 41  53 20 49 4E 0D C4 CF CF  |FIRST, AS IN....|
00000A50: C4 CC C5 20 46 49 4C 45  53 2E 20 20 D4 48 45 20  |... FILES.  .HE |
00000A60: 42 49 54 20 4D 41 50 20  4D 55 53 54 20 53 54 41  |BIT MAP MUST STA|
00000A70: 52 54 0D 41 54 20 54 48  45 20 42 45 47 49 4E 4E  |RT.AT THE BEGINN|
00000A80: 49 4E 47 20 4F 46 20 41  20 42 41 4E 4B 20 4F 52  |ING OF A BANK OR|
00000A90: 20 48 41 4C 46 57 41 59  0D 54 48 52 4F 55 47 48  | HALFWAY.THROUGH|
00000AA0: 20 49 54 2E 20 20 D4 48  45 52 45 46 4F 52 45 20  | IT.  .HEREFORE |
00000AB0: 49 46 20 54 48 45 20 4C  4F 41 44 0D 41 44 44 52  |IF THE LOAD.ADDR|
00000AC0: 45 53 53 20 4F 46 20 54  48 45 20 50 49 43 54 55  |ESS OF THE PICTU|
00000AD0: 52 45 20 49 53 20 24 33  C3 30 30 20 28 50 41 47  |RE IS $3.00 (PAG|
00000AE0: 45 0D 36 30 29 20 54 48  45 20 42 49 54 4D 41 50  |E.60) THE BITMAP|
00000AF0: 20 57 49 4C 4C 20 53 54  41 52 54 20 41 54 20 24  | WILL START AT $|
00000B00: 34 30 30 30 0D 28 50 41  47 45 20 36 34 29 2E 20  |4000.(PAGE 64). |
00000B10: 20 D4 48 45 20 50 41 47  45 20 4E 55 4D 42 45 52  | .HE PAGE NUMBER|
00000B20: 20 57 49 4C 4C 0D 41 4C  57 41 59 53 20 42 45 20  | WILL.ALWAYS BE |
00000B30: 45 56 45 4E 4C 59 20 44  49 56 49 53 49 42 4C 45  |EVENLY DIVISIBLE|
00000B40: 20 42 59 20 33 32 2E 0D  0D 20 C4 C5 CE 20 2D 20  | BY 32... ... - |
00000B50: C4 45 4E 53 49 54 59 20  53 45 54 54 49 4E 47 2E  |.ENSITY SETTING.|
00000B60: 20 20 D5 53 45 20 37 35  0D 46 4F 52 20 36 30 20  |  .SE 75.FOR 60 |
00000B70: C4 D0 C9 2C 20 37 36 20  46 4F 52 20 31 32 30 20  |..., 76 FOR 120 |
00000B80: C4 D0 C9 20 41 4E 44 20  39 30 20 46 4F 52 0D 32  |... AND 90 FOR.2|
00000B90: 34 30 20 C4 D0 C9 2E 20  20 36 30 20 49 53 20 53  |40 ....  60 IS S|
00000BA0: 54 41 4E 44 41 52 44 2E  20 20 C9 20 54 45 4E 44  |TANDARD.  . TEND|
00000BB0: 20 54 4F 0D 54 48 49 4E  4B 20 4F 46 20 49 54 20  | TO.THINK OF IT |
00000BC0: 41 53 20 45 58 50 41 4E  44 45 44 2E 0D 0D 20 33  |AS EXPANDED... 3|
00000BD0: 35 2C 36 35 2C 38 20 2D  20 41 52 45 20 50 41 52  |5,65,8 - ARE PAR|
00000BE0: 41 4D 45 54 45 52 53 20  54 48 41 54 20 44 4F 4E  |AMETERS THAT DON|
00000BF0: 27 54 0D 52 45 41 4C 4C  59 20 4E 45 45 44 20 41  |'T.REALLY NEED A|
00000C00: 4E 59 20 43 48 41 4E 47  49 4E 47 2C 20 53 4F 20  |NY CHANGING, SO |
00000C10: 4A 55 53 54 0D 45 4E 54  45 52 20 54 48 45 53 45  |JUST.ENTER THESE|
00000C20: 20 4E 55 4D 42 45 52 53  20 48 45 52 45 2E 20 20  | NUMBERS HERE.  |
00000C30: 33 35 20 49 53 20 54 48  45 0D 48 4F 52 49 5A 4F  |35 IS THE.HORIZO|
00000C40: 4E 54 41 4C 20 54 41 42  20 43 4F 4D 4D 41 4E 44  |NTAL TAB COMMAND|
00000C50: 2E 20 20 36 35 20 49 53  20 54 48 45 20 53 45 54  |.  65 IS THE SET|
00000C60: 0D 4C 49 4E 45 46 45 45  44 20 43 4F 4D 4D 41 4E  |.LINEFEED COMMAN|
00000C70: 44 2E 20 20 38 20 49 53  20 54 48 45 20 4E 55 4D  |D.  8 IS THE NUM|
00000C80: 42 45 52 20 4F 46 0D 50  49 58 45 4C 20 4C 49 4E  |BER OF.PIXEL LIN|
00000C90: 45 53 20 46 4F 52 20 4C  49 4E 45 20 46 45 45 44  |ES FOR LINE FEED|
00000CA0: 2E 0D 0D 20 D4 C1 C2 20  2D 20 57 49 4C 4C 20 4D  |... ... - WILL M|
00000CB0: 4F 56 45 20 59 4F 55 52  20 50 49 43 20 54 4F 20  |OVE YOUR PIC TO |
00000CC0: 54 48 45 0D 52 49 47 48  54 20 42 59 20 4E 2F 36  |THE.RIGHT BY N/6|
00000CD0: 30 54 48 53 20 4F 46 20  41 4E 20 49 4E 43 48 2E  |0THS OF AN INCH.|
00000CE0: 20 20 CE CF D4 C5 3A 0D  54 48 45 20 54 41 42 20  |  ....:.THE TAB |
00000CF0: 46 55 4E 43 54 49 4F 4E  20 49 53 20 44 49 46 46  |FUNCTION IS DIFF|
00000D00: 45 52 45 4E 54 20 46 52  4F 4D 0D 50 52 49 4E 54  |ERENT FROM.PRINT|
00000D10: 45 52 20 54 4F 20 50 52  49 4E 54 45 52 2E 20 20  |ER TO PRINTER.  |
00000D20: D4 52 59 20 50 55 54 54  49 4E 47 20 41 0D 4E 55  |.RY PUTTING A.NU|
00000D30: 4D 42 45 52 20 48 45 52  45 20 41 4E 44 20 53 45  |MBER HERE AND SE|
00000D40: 45 20 49 46 20 49 54 20  57 4F 52 4B 53 2E 20 20  |E IF IT WORKS.  |
00000D50: C9 46 0D 49 54 20 4A 55  53 54 20 50 52 49 4E 54  |.F.IT JUST PRINT|
00000D60: 53 20 41 20 43 48 41 52  41 43 54 45 52 20 49 4E  |S A CHARACTER IN|
00000D70: 20 54 48 45 0D 46 49 52  53 54 20 43 4F 4C 55 4D  | THE.FIRST COLUM|
00000D80: 4E 20 57 49 54 48 4F 55  54 20 54 41 42 42 49 4E  |N WITHOUT TABBIN|
00000D90: 47 2C 20 49 54 0D 57 4F  4E 27 54 20 57 4F 52 4B  |G, IT.WON'T WORK|
00000DA0: 20 4F 4E 20 59 4F 55 52  20 50 52 49 4E 54 45 52  | ON YOUR PRINTER|
00000DB0: 2C 20 53 4F 20 4A 55 53  54 0D 45 4E 54 45 52 20  |, SO JUST.ENTER |
00000DC0: 41 20 30 20 46 4F 52 20  54 48 49 53 20 50 41 52  |A 0 FOR THIS PAR|
00000DD0: 41 4D 45 54 45 52 2E 0D  0D 20 20 20 20 C9 46 20  |AMETER...    .F |
00000DE0: 59 4F 55 20 50 4C 41 4E  20 54 4F 20 43 4F 4D 50  |YOU PLAN TO COMP|
00000DF0: 49 4C 45 20 59 4F 55 52  0D 50 52 4F 47 52 41 4D  |ILE YOUR.PROGRAM|
00000E00: 2C 20 49 54 20 57 49 4C  4C 20 50 52 4F 42 41 42  |, IT WILL PROBAB|
00000E10: 4C 59 20 43 48 4F 4B 45  20 4F 4E 0D 54 48 45 20  |LY CHOKE ON.THE |
00000E20: D3 D9 D3 20 43 4F 4D 4D  41 4E 44 2E 20 20 C1 4C  |... COMMAND.  .L|
00000E30: 53 4F 2C 20 49 46 20 59  4F 55 20 57 41 4E 54 0D  |SO, IF YOU WANT.|
00000E40: 54 4F 20 43 41 4C 4C 20  54 48 49 53 20 52 4F 55  |TO CALL THIS ROU|
00000E50: 54 49 4E 45 20 46 52 4F  4D 20 4D 41 43 48 49 4E  |TINE FROM MACHIN|
00000E60: 45 0D 4C 41 4E 47 55 41  47 45 2C 20 59 4F 55 20  |E.LANGUAGE, YOU |
00000E70: 43 41 4E 27 54 20 55 53  45 20 54 48 45 20 D3 D9  |CAN'T USE THE ..|
00000E80: D3 20 57 49 54 48 0D 50  41 52 41 4D 45 54 45 52  |. WITH.PARAMETER|
00000E90: 53 2E 20 20 D4 48 45 52  45 20 49 53 20 41 20 57  |S.  .HERE IS A W|
00000EA0: 41 59 20 41 52 4F 55 4E  44 0D 49 54 2C 20 48 4F  |AY AROUND.IT, HO|
00000EB0: 57 45 56 45 52 2E 20 20  C9 4E 53 54 45 41 44 20  |WEVER.  .NSTEAD |
00000EC0: 4F 46 20 55 53 49 4E 47  20 54 48 45 20 D3 D9 D3  |OF USING THE ...|
00000ED0: 0D 43 4F 4D 4D 41 4E 44  2C 20 D0 CF CB C5 20 54  |.COMMAND, .... T|
00000EE0: 48 45 20 50 41 52 41 4D  45 54 45 52 53 20 49 4E  |HE PARAMETERS IN|
00000EF0: 54 4F 0D 4C 4F 43 41 54  49 4F 4E 53 20 24 C3 30  |TO.LOCATIONS $.0|
00000F00: 36 33 2D 24 C3 30 37 30  20 28 34 39 32 35 31 2D  |63-$.070 (49251-|
00000F10: 34 39 32 36 34 29 0D 49  4E 20 54 48 45 20 4F 52  |49264).IN THE OR|
00000F20: 44 45 52 20 54 48 45 59  20 41 50 50 45 41 52 20  |DER THEY APPEAR |
00000F30: 49 4E 20 54 48 45 20 D3  D9 D3 0D 4C 49 4E 45 2E  |IN THE ....LINE.|
00000F40: 20 20 C1 4C 4C 20 50 41  52 41 4D 45 54 45 52 53  |  .LL PARAMETERS|
00000F50: 20 41 52 45 20 53 49 4E  47 4C 45 20 42 59 54 45  | ARE SINGLE BYTE|
00000F60: 0D 45 58 43 45 50 54 20  D4 C1 C2 2C 20 57 48 49  |.EXCEPT ..., WHI|
00000F70: 43 48 20 49 53 20 45 4E  54 45 52 45 44 20 49 4E  |CH IS ENTERED IN|
00000F80: 20 48 49 2F 4C 4F 0D 46  4F 52 4D 41 54 2E 20 20  | HI/LO.FORMAT.  |
00000F90: C1 46 54 45 52 20 D0 CF  CB C5 49 4E 47 2C 20 D3  |.FTER ....ING, .|
00000FA0: D9 D3 20 4F 52 20 CA D3  D2 20 54 4F 0D 34 39 32  |.. OR ... TO.492|
00000FB0: 36 35 2E 0D 0D 0D 20 31  35 32 35 20 D7 C9 CE C4  |65.... 1525 ....|
00000FC0: CF D7 20 D0 D2 C9 CE D4  0D 20 2D 2D 2D 2D 2D 2D  |.. ...... ------|
00000FD0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 0D 0D 20 20 20  |-----------..   |
00000FE0: 20 D4 48 49 53 20 49 53  20 46 4F 52 20 54 48 4F  | .HIS IS FOR THO|
00000FF0: 53 45 20 4F 4C 44 45 52  20 C3 4F 4D 4D 4F 44 4F  |SE OLDER .OMMODO|
00001000: 52 45 0D 50 52 49 4E 54  45 52 53 20 4F 46 20 54  |RE.PRINTERS OF T|
00001010: 48 45 20 37 2D 50 49 4E  20 42 52 45 45 44 2E 20  |HE 7-PIN BREED. |
00001020: 20 C9 46 20 59 4F 55 52  0D 50 52 49 4E 54 45 52  | .F YOUR.PRINTER|
00001030: 20 44 4F 45 53 4E 27 54  20 43 4C 41 49 4D 20 53  | DOESN'T CLAIM S|
00001040: 4F 4D 45 20 53 4F 52 54  20 4F 46 0D 45 4D 55 4C  |OME SORT OF.EMUL|
00001050: 41 54 49 4F 4E 20 4D 4F  44 45 2C 20 57 48 45 54  |ATION MODE, WHET|
00001060: 48 45 52 20 C5 50 53 4F  4E 2C 20 C9 C2 CD 2C 0D  |HER .PSON, ...,.|
00001070: C3 C1 CE CF CE 20 4F 52  20 57 48 41 54 45 56 45  |..... OR WHATEVE|
00001080: 52 2C 20 49 54 27 53 20  50 52 4F 42 41 42 4C 59  |R, IT'S PROBABLY|
00001090: 20 41 0D C3 4F 4D 4D 4F  44 4F 52 45 20 50 52 49  | A..OMMODORE PRI|
000010A0: 4E 54 45 52 20 2D 2D 20  45 53 50 45 43 49 41 4C  |NTER -- ESPECIAL|
000010B0: 4C 59 20 49 46 0D 49 54  27 53 20 41 20 C3 4F 4D  |LY IF.IT'S A .OM|
000010C0: 4D 4F 44 4F 52 45 20 42  52 41 4E 44 20 50 52 49  |MODORE BRAND PRI|
000010D0: 4E 54 45 52 2E 0D CE 4F  54 45 3A 20 54 48 45 20  |NTER...OTE: THE |
000010E0: 4E 45 57 45 52 20 C3 4F  4D 4D 4F 44 4F 52 45 20  |NEWER .OMMODORE |
000010F0: 50 52 49 4E 54 45 52 53  0D 41 52 45 20 4D 4F 53  |PRINTERS.ARE MOS|
00001100: 54 20 4C 49 4B 45 4C 59  20 C5 50 53 4F 4E 2D 45  |T LIKELY .PSON-E|
00001110: 4D 55 4C 41 54 49 4E 47  2E 0D 0D 20 20 20 20 D4  |MULATING...    .|
00001120: 48 49 53 20 49 53 20 45  53 53 45 4E 54 49 41 4C  |HIS IS ESSENTIAL|
00001130: 4C 59 20 54 48 45 20 53  41 4D 45 0D D7 C9 CE C4  |LY THE SAME.....|
00001140: CF D7 20 D0 D2 C9 CE D4  20 50 55 42 4C 49 53 48  |.. ..... PUBLISH|
00001150: 45 44 20 4F 4E 20 CC CF  C1 C4 D3 D4 C1 D2 0D 23  |ED ON .........#|
00001160: 38 36 2E 20 20 C9 4E 53  54 45 41 44 20 4F 46 20  |86.  .NSTEAD OF |
00001170: D0 CF CB C5 49 4E 47 20  54 48 45 0D 50 41 52 41  |....ING THE.PARA|
00001180: 4D 45 54 45 52 53 2C 20  48 4F 57 45 56 45 52 2C  |METERS, HOWEVER,|
00001190: 20 59 4F 55 20 47 45 54  20 41 20 D3 D9 D3 0D 4C  | YOU GET A ....L|
000011A0: 49 4E 45 3A 0D 0D 20 D3  D9 D3 34 39 31 35 35 2C  |INE:.. ...49155,|
000011B0: 44 56 2C 53 41 2C 4C 46  2C 58 2C 59 2C 58 58 2C  |DV,SA,LF,X,Y,XX,|
000011C0: 59 59 2C 4C 4F 43 20 50  41 47 45 0D 0D 20 20 20  |YY,LOC PAGE..   |
000011D0: 20 C1 47 41 49 4E 2C 20  C4 D6 20 49 53 20 54 48  | .GAIN, .. IS TH|
000011E0: 45 20 44 45 56 49 43 45  20 4E 55 4D 42 45 52 20  |E DEVICE NUMBER |
000011F0: 4F 46 0D 54 48 45 20 50  52 49 4E 54 45 52 2C 20  |OF.THE PRINTER, |
00001200: D3 C1 20 54 48 45 20 53  45 43 4F 4E 44 41 52 59  |.. THE SECONDARY|
00001210: 0D 41 44 44 52 45 53 53  2C 20 CC C6 20 41 20 4C  |.ADDRESS, .. A L|
00001220: 49 4E 45 46 45 45 44 20  46 4C 41 47 2E 0D 0D 20  |INEFEED FLAG... |
00001230: 20 20 20 D4 48 45 20 D8  20 41 4E 44 20 D9 20 43  |   .HE . AND . C|
00001240: 4F 4F 52 44 49 4E 41 54  45 53 20 41 52 45 0D 48  |OORDINATES ARE.H|
00001250: 41 4E 44 4C 45 44 20 49  4E 20 45 58 41 43 54 4C  |ANDLED IN EXACTL|
00001260: 59 20 54 48 45 20 53 41  4D 45 20 57 41 59 20 41  |Y THE SAME WAY A|
00001270: 53 0D 54 48 45 20 C5 50  53 4F 4E 20 D7 C9 CE C4  |S.THE .PSON ....|
00001280: CF D7 D0 D2 C9 CE D4 2E  0D 0D 20 20 20 20 CC CF  |..........    ..|
00001290: C3 20 D0 C1 C7 C5 20 49  53 20 54 48 45 20 50 41  |. .... IS THE PA|
000012A0: 47 45 20 49 4E 20 4D 45  4D 4F 52 59 0D 57 48 45  |GE IN MEMORY.WHE|
000012B0: 52 45 20 54 48 45 20 42  49 54 4D 41 50 20 49 53  |RE THE BITMAP IS|
000012C0: 20 4C 4F 43 41 54 45 44  2E 20 20 C1 47 41 49 4E  | LOCATED.  .GAIN|
000012D0: 2C 0D 54 48 49 53 20 49  53 20 4E 4F 54 20 4E 45  |,.THIS IS NOT NE|
000012E0: 43 45 53 53 41 52 49 4C  59 20 54 48 45 20 4C 4F  |CESSARILY THE LO|
000012F0: 41 44 0D 41 44 44 52 45  53 53 2E 20 20 D3 4F 4D  |AD.ADDRESS.  .OM|
00001300: 45 54 49 4D 45 53 20 43  4F 4C 4F 52 20 4D 45 4D  |ETIMES COLOR MEM|
00001310: 4F 52 59 20 4D 41 59 0D  42 45 20 4C 4F 41 44 45  |ORY MAY.BE LOADE|
00001320: 44 20 41 48 45 41 44 20  4F 46 20 54 48 45 20 42  |D AHEAD OF THE B|
00001330: 49 54 4D 41 50 20 49 4E  0D C4 CF CF C4 CC C5 20  |ITMAP IN....... |
00001340: 54 59 50 45 20 50 49 43  53 2C 20 50 4C 41 43 49  |TYPE PICS, PLACI|
00001350: 4E 47 20 54 48 45 20 42  49 54 4D 41 50 0D 46 4F  |NG THE BITMAP.FO|
00001360: 55 52 20 50 41 47 45 53  20 42 45 48 49 4E 44 2E  |UR PAGES BEHIND.|
00001370: 0D 0D 20 20 20 20 C9 46  20 59 4F 55 27 52 45 20  |..    .F YOU'RE |
00001380: 47 4F 49 4E 47 20 54 4F  20 43 41 4C 4C 20 54 48  |GOING TO CALL TH|
00001390: 49 53 0D 52 4F 55 54 49  4E 45 20 56 49 41 20 CD  |IS.ROUTINE VIA .|
000013A0: CC 20 4F 52 20 46 52 4F  4D 20 41 20 43 4F 4D 50  |. OR FROM A COMP|
000013B0: 49 4C 45 44 0D 50 52 4F  47 52 41 4D 2C 20 D0 CF  |ILED.PROGRAM, ..|
000013C0: CB C5 20 54 48 45 20 50  41 52 41 4D 45 54 45 52  |.. THE PARAMETER|
000013D0: 53 20 54 4F 0D 24 C3 32  30 33 2D 24 C3 32 31 30  |S TO.$.203-$.210|
000013E0: 20 28 34 39 36 36 37 2D  34 39 36 38 30 29 2E 20  | (49667-49680). |
000013F0: 20 D4 48 45 4E 20 D3 D9  D3 0D 4F 52 20 CA D3 D2  | .HEN ....OR ...|
00001400: 20 54 4F 20 34 39 36 38  31 2E 0D 0D 0D 20 C2 CF  | TO 49681.... ..|
00001410: D4 D4 CF CD 20 CC C9 CE  C5 0D 20 2D 2D 2D 2D 2D  |.... ..... -----|
00001420: 2D 2D 2D 2D 2D 2D 0D 0D  20 20 20 20 C9 46 20 59  |------..    .F Y|
00001430: 4F 55 20 41 52 45 20 41  20 47 52 41 50 48 49 43  |OU ARE A GRAPHIC|
00001440: 53 20 42 55 46 46 20 41  4E 44 0D 4C 49 4B 45 20  |S BUFF AND.LIKE |
00001450: 54 4F 20 50 52 49 4E 54  20 4F 55 54 20 54 48 49  |TO PRINT OUT THI|
00001460: 4E 47 53 20 59 4F 55 20  53 45 45 20 4F 4E 0D 59  |NGS YOU SEE ON.Y|
00001470: 4F 55 52 20 53 43 52 45  45 4E 2C 20 59 4F 55 52  |OUR SCREEN, YOUR|
00001480: 20 42 45 53 54 20 42 45  54 20 49 53 20 54 4F 20  | BEST BET IS TO |
00001490: 47 45 54 0D 41 20 43 41  52 54 52 49 44 47 45 2D  |GET.A CARTRIDGE-|
000014A0: 42 41 53 45 44 20 50 52  4F 44 55 43 54 20 4C 49  |BASED PRODUCT LI|
000014B0: 4B 45 20 D3 55 50 45 52  0D D3 4E 41 50 53 48 4F  |KE .UPER..NAPSHO|
000014C0: 54 20 D6 35 20 4F 52 20  C5 58 50 4C 4F 44 45 21  |T .5 OR .XPLODE!|
000014D0: 20 20 D4 48 45 4E 20 59  4F 55 0D 44 4F 4E 27 54  |  .HEN YOU.DON'T|
000014E0: 20 48 41 56 45 20 54 4F  20 57 4F 52 52 59 20 41  | HAVE TO WORRY A|
000014F0: 42 4F 55 54 20 57 48 45  54 48 45 52 20 54 48 45  |BOUT WHETHER THE|
00001500: 0D 53 4F 46 54 57 41 52  45 20 41 4C 4C 4F 57 53  |.SOFTWARE ALLOWS|
00001510: 20 46 4F 52 20 44 55 4D  50 49 4E 47 20 53 43 52  | FOR DUMPING SCR|
00001520: 45 45 4E 53 0D 54 4F 20  54 48 45 20 50 52 49 4E  |EENS.TO THE PRIN|
00001530: 54 45 52 20 4F 52 20 4E  4F 54 2E 0D 0D 20 20 20  |TER OR NOT...   |
00001540: 20 C2 55 54 20 53 4F 4D  45 54 49 4D 45 53 20 59  | .UT SOMETIMES Y|
00001550: 4F 55 2C 20 41 53 20 41  0D 50 52 4F 47 52 41 4D  |OU, AS A.PROGRAM|
00001560: 4D 45 52 2C 20 57 49 4C  4C 20 57 41 4E 54 20 59  |MER, WILL WANT Y|
00001570: 4F 55 52 20 50 52 4F 47  52 41 4D 20 54 4F 0D 41  |OUR PROGRAM TO.A|
00001580: 4C 4C 4F 57 20 41 4E 59  4F 4E 45 20 54 4F 20 50  |LLOW ANYONE TO P|
00001590: 52 49 4E 54 20 41 20 48  49 2D 52 45 53 0D 53 43  |RINT A HI-RES.SC|
000015A0: 52 45 45 4E 2E 20 20 CF  52 20 4D 41 59 42 45 20  |REEN.  .R MAYBE |
000015B0: 59 4F 55 20 57 41 4E 54  20 54 4F 20 41 4C 4C 4F  |YOU WANT TO ALLO|
000015C0: 57 0D 54 48 45 20 55 53  45 52 20 54 4F 20 50 52  |W.THE USER TO PR|
000015D0: 49 4E 54 20 4F 4E 4C 59  20 41 20 50 4F 52 54 49  |INT ONLY A PORTI|
000015E0: 4F 4E 20 4F 46 20 41 0D  48 49 2D 52 45 53 20 53  |ON OF A.HI-RES S|
000015F0: 43 52 45 45 4E 2E 20 20  C9 4E 20 54 48 45 53 45  |CREEN.  .N THESE|
00001600: 20 53 49 54 55 41 54 49  4F 4E 53 2C 0D D7 C9 CE  | SITUATIONS,....|
00001610: C4 CF D7 D0 D2 C9 CE D4  20 27 39 33 20 49 53 20  |........ '93 IS |
00001620: 54 48 45 20 53 4F 4C 55  54 49 4F 4E 2E 0D 0D 20  |THE SOLUTION... |
00001630: 20 20 20 D9 4F 55 52 20  50 52 4F 47 52 41 4D 20  |   .OUR PROGRAM |
00001640: 57 49 4C 4C 20 41 53 4B  20 54 48 45 20 55 53 45  |WILL ASK THE USE|
00001650: 52 20 54 4F 0D 53 45 4C  45 43 54 20 57 48 49 43  |R TO.SELECT WHIC|
00001660: 48 20 54 59 50 45 20 4F  46 20 50 52 49 4E 54 45  |H TYPE OF PRINTE|
00001670: 52 20 48 45 20 48 41 53  0D 28 37 2D 50 49 4E 20  |R HE HAS.(7-PIN |
00001680: 4F 52 20 38 2D 50 49 4E  29 20 41 4E 44 20 54 48  |OR 8-PIN) AND TH|
00001690: 45 4E 20 D3 D9 D3 20 57  49 54 48 0D 54 48 45 20  |EN ... WITH.THE |
000016A0: 50 52 4F 50 45 52 20 50  41 52 41 4D 45 54 45 52  |PROPER PARAMETER|
000016B0: 53 2E 20 20 C6 45 4E 44  45 52 0D 49 4E 53 54 41  |S.  .ENDER.INSTA|
000016C0: 4C 4C 45 44 20 D7 D0 39  33 20 24 C3 30 30 30 20  |LLED ..93 $.000 |
000016D0: 49 4E 20 D4 C9 D4 CC C5  20 D3 C3 D2 C5 C5 CE 0D  |IN ..... .......|
000016E0: D6 C9 C5 D7 C5 D2 20 4F  4E 20 D3 49 44 45 20 CF  |...... ON .IDE .|
000016F0: 4E 45 20 53 4F 20 4E 4F  57 20 59 4F 55 20 43 41  |NE SO NOW YOU CA|
00001700: 4E 0D 50 52 49 4E 54 20  4F 55 54 20 4F 55 52 20  |N.PRINT OUT OUR |
00001710: 4E 49 46 54 59 20 54 49  54 4C 45 20 53 43 52 45  |NIFTY TITLE SCRE|
00001720: 45 4E 2E 0D C3 48 45 43  4B 20 4F 55 54 20 54 48  |EN...HECK OUT TH|
00001730: 45 20 53 4D 41 4C 4C 20  50 52 4F 47 52 41 4D 20  |E SMALL PROGRAM |
00001740: 22 54 53 0D 56 49 45 57  45 52 22 20 54 4F 20 53  |"TS.VIEWER" TO S|
00001750: 45 45 20 48 4F 57 20 45  41 53 59 20 49 54 20 49  |EE HOW EASY IT I|
00001760: 53 20 54 4F 20 55 53 45  0D D7 C9 CE C4 CF D7 D0  |S TO USE........|
00001770: D2 C9 CE D4 20 27 39 33  2E 0D 0D CA CC CA 0D 20  |.... '93....... |
00001780: 20 20 20 20 20 20 2A 2A  2A 2A 20 D2 45 54 55 52  |      **** .ETUR|
00001790: 4E 20 2D 20 CD 45 4E 55  20 2A 2A 2A 2A 0D        |N - .ENU ****.  |
...   W I N D O W   P R I N T   ' 9 3.. 
         BY SCOTT E. RESH...    BACK ON 
LOADSTAR #86 WE PUBLISHED.THE FIRST VERS
ION OF WINDOWPRINT, AN.ML ROUTINE THAT A
LLOWS THE USER TO.PRINT A PROGRAM-DEFINE
D WINDOW ON A.HI-RES SCREEN.  THE ORIGIN
AL PROGRAM.WOULD ONLY WORK FOR 7-PIN PRI
NTERS:.COMMODORE 1525S AND THOSE SYSTEMS
.THAT EMULATE THE 1525...    NOW YOU CAN
 SUPPORT HI-RES PRINTER.DUMPS IN YOUR PR
OGRAMS FOR ALL 8-PIN.EPSON COMPATIBLE PR
INTERS AS.WELL AS THE OUTDATED 7-PIN PRI
NTERS..WINDOWPRINT '93 WILL EVEN WORK ON
 24.PIN PRINTERS (IN THEIR DEFAULT 8-PIN
.MODES).  ALSO, WHILE WINDOW PRINT.DOES 
NOT SUPPORT COLOR, IT CAN PRINT.OUT MULT
I-COLOR BITMAPS (IF YOU DON'T.MIND SOME 
FUZZINESS AROUND THE.EDGES)....HOW TO US
E WINDOWPRINT '93.----------------------
----..    CHOOSE ONE OF THE THREE VERSIO
NS.OF WP93.  $C000 IS WHERE MANY OTHER.M
L ROUTINES RESIDE, SO YOU MAY WANT.TO US
E WP93 $9C00 -- AND LOWER THE TOP.OF BAS
IC TO PAGE 156 ($9C00 OR 39936).-- OR US
E WP93 $CC00, WHICH RESIDES.AT THE TOP O
F THE $C000 AREA AT.$CC00...    LOAD WP9
3 WITH OUR TRUSTY.RELOCATABLE BLOAD COMM
AND:.. 10 SYS57812"WP93 $C000",DV,0:.   
 POKE780,0:POKE781,0:POKE782,192:.    SY
S65493..WHERE DV IS THE DEVICE NUMBER FO
UND.EARLIER IN:.. 5 DV=PEEK(186):IFDV<8T
HENDV=8..    THE FOLLOWING INSTRUCTIONS 
ASSUME.YOU ARE USING WP93 $C000 (AT 4915
2)..WITH WINDOWPRINT '93 YOU CAN SET THE
.DIMENSIONS OF A WINDOW (RECTANGLE) ON.T
HE SCREEN AND ONLY THE BITMAP INSIDE.THE
 RECTANGLE WILL BE PRINTED.  OF.COURSE, 
IF YOU SET THE WINDOW TO THE.SAME SIZE A
S THE WHOLE SCREEN (0,0 TO.39,24) THE WH
OLE SCREEN WILL BE.PRINTED... PRINTING O
N 8-BIT (EPSON) PRINTERS. --------------
--------------------..    IF YOU WANT TO
 PRINT TO AN 8-PIN.PRINTER (THIS INCLUDE
S MODERN BUBBLE.JETS, INK JETS, SOME LAS
ER PRINTERS.AND BASICALLY ANY PRINTER TH
AT.EMULATES AN EPSON) USE THE FOLLOWING.
SYS:.. SYS49152,DV,SA,LF,X,Y,XX,YY,LOC,D
EN,.36,65,8,TAB.. WHERE:.. DV - DEVICE N
UMBER OF PRINTER.. SA - SECONDARY ADDRES
S.  YOU REALLY.SHOULD OFFER YOUR USER A 
CHANCE TO.CHANGE THIS PARAMETER.  5 IS U
SUALLY.A GOOD SECONDARY ADDRESS (FOR A.D
EFAULT), BUT SOME INTERFACES REQUIRE.A 6
, OR SOME OTHER NUMBER... LF - 1 SENDS A
 LINEFEED AFTER EACH.LINE.  0 DOESN'T.  
IF YOUR PRINTOUT.IS SKIPPING LINES, OR I
S PRINTING.EVERYTHING ON ONE LINE, CHANG
E THIS.PARAMETER... X - BEGINNING X COOR
DINATE, 0-39, NOT.0-320!  THE NUMBER YOU
 ENTER HERE WILL.BE MULTIPLIED BY 8... Y
 - BEGINNING Y COORDINATE, 0-24... XX - 
ENDING X COORDINATE, 0-24.. YY - ENDING 
Y COORDINATE, 0-24.. LOC - LOCATION OF T
HE BITMAP.  PAGE.NUMBER ONLY.  THIS MAY 
NOT.NECESSARILY BE THE LOAD ADDRESS SINC
E.COLOR MEMORY MAY COME FIRST, AS IN.DOO
DLE FILES.  THE BIT MAP MUST START.AT TH
E BEGINNING OF A BANK OR HALFWAY.THROUGH
 IT.  THEREFORE IF THE LOAD.ADDRESS OF T
HE PICTURE IS $3C00 (PAGE.60) THE BITMAP
 WILL START AT $4000.(PAGE 64).  THE PAG
E NUMBER WILL.ALWAYS BE EVENLY DIVISIBLE
 BY 32... DEN - DENSITY SETTING.  USE 75
.FOR 60 DPI, 76 FOR 120 DPI AND 90 FOR.2
40 DPI.  60 IS STANDARD.  I TEND TO.THIN
K OF IT AS EXPANDED... 35,65,8 - ARE PAR
AMETERS THAT DON'T.REALLY NEED ANY CHANG
ING, SO JUST.ENTER THESE NUMBERS HERE.  
35 IS THE.HORIZONTAL TAB COMMAND.  65 IS
 THE SET.LINEFEED COMMAND.  8 IS THE NUM
BER OF.PIXEL LINES FOR LINE FEED... TAB 
- WILL MOVE YOUR PIC TO THE.RIGHT BY N/6
0THS OF AN INCH.  NOTE:.THE TAB FUNCTION
 IS DIFFERENT FROM.PRINTER TO PRINTER.  
TRY PUTTING A.NUMBER HERE AND SEE IF IT 
WORKS.  IF.IT JUST PRINTS A CHARACTER IN
 THE.FIRST COLUMN WITHOUT TABBING, IT.WO
N'T WORK ON YOUR PRINTER, SO JUST.ENTER 
A 0 FOR THIS PARAMETER...    IF YOU PLAN
 TO COMPILE YOUR.PROGRAM, IT WILL PROBAB
LY CHOKE ON.THE SYS COMMAND.  ALSO, IF Y
OU WANT.TO CALL THIS ROUTINE FROM MACHIN
E.LANGUAGE, YOU CAN'T USE THE SYS WITH.P
ARAMETERS.  THERE IS A WAY AROUND.IT, HO
WEVER.  INSTEAD OF USING THE SYS.COMMAND
, POKE THE PARAMETERS INTO.LOCATIONS $C0
63-$C070 (49251-49264).IN THE ORDER THEY
 APPEAR IN THE SYS.LINE.  ALL PARAMETERS
 ARE SINGLE BYTE.EXCEPT TAB, WHICH IS EN
TERED IN HI/LO.FORMAT.  AFTER POKEING, S
YS OR JSR TO.49265.... 1525 WINDOW PRINT
. -----------------..    THIS IS FOR THO
SE OLDER COMMODORE.PRINTERS OF THE 7-PIN
 BREED.  IF YOUR.PRINTER DOESN'T CLAIM S
OME SORT OF.EMULATION MODE, WHETHER EPSO
N, IBM,.CANON OR WHATEVER, IT'S PROBABLY
 A.COMMODORE PRINTER -- ESPECIALLY IF.IT
'S A COMMODORE BRAND PRINTER..NOTE: THE 
NEWER COMMODORE PRINTERS.ARE MOST LIKELY
 EPSON-EMULATING...    THIS IS ESSENTIAL
LY THE SAME.WINDOW PRINT PUBLISHED ON LO
ADSTAR.#86.  INSTEAD OF POKEING THE.PARA
METERS, HOWEVER, YOU GET A SYS.LINE:.. S
YS49155,DV,SA,LF,X,Y,XX,YY,LOC PAGE..   
 AGAIN, DV IS THE DEVICE NUMBER OF.THE P
RINTER, SA THE SECONDARY.ADDRESS, LF A L
INEFEED FLAG...    THE X AND Y COORDINAT
ES ARE.HANDLED IN EXACTLY THE SAME WAY A
S.THE EPSON WINDOWPRINT...    LOC PAGE I
S THE PAGE IN MEMORY.WHERE THE BITMAP IS
 LOCATED.  AGAIN,.THIS IS NOT NECESSARIL
Y THE LOAD.ADDRESS.  SOMETIMES COLOR MEM
ORY MAY.BE LOADED AHEAD OF THE BITMAP IN
.DOODLE TYPE PICS, PLACING THE BITMAP.FO
UR PAGES BEHIND...    IF YOU'RE GOING TO
 CALL THIS.ROUTINE VIA ML OR FROM A COMP
ILED.PROGRAM, POKE THE PARAMETERS TO.$C2
03-$C210 (49667-49680).  THEN SYS.OR JSR
 TO 49681.... BOTTOM LINE. -----------..
    IF YOU ARE A GRAPHICS BUFF AND.LIKE 
TO PRINT OUT THINGS YOU SEE ON.YOUR SCRE
EN, YOUR BEST BET IS TO GET.A CARTRIDGE-
BASED PRODUCT LIKE SUPER.SNAPSHOT V5 OR 
EXPLODE!  THEN YOU.DON'T HAVE TO WORRY A
BOUT WHETHER THE.SOFTWARE ALLOWS FOR DUM
PING SCREENS.TO THE PRINTER OR NOT...   
 BUT SOMETIMES YOU, AS A.PROGRAMMER, WIL
L WANT YOUR PROGRAM TO.ALLOW ANYONE TO P
RINT A HI-RES.SCREEN.  OR MAYBE YOU WANT
 TO ALLOW.THE USER TO PRINT ONLY A PORTI
ON OF A.HI-RES SCREEN.  IN THESE SITUATI
ONS,.WINDOWPRINT '93 IS THE SOLUTION... 
   YOUR PROGRAM WILL ASK THE USER TO.SEL
ECT WHICH TYPE OF PRINTER HE HAS.(7-PIN 
OR 8-PIN) AND THEN SYS WITH.THE PROPER P
ARAMETERS.  FENDER.INSTALLED WP93 $C000 
IN TITLE SCREEN.VIEWER ON SIDE ONE SO NO
W YOU CAN.PRINT OUT OUR NIFTY TITLE SCRE
EN..CHECK OUT THE SMALL PROGRAM "TS.VIEW
ER" TO SEE HOW EASY IT IS TO USE.WINDOWP
RINT '93...JLJ.       **** RETURN - MENU
 ****.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL