00000000: 20 05 9D 05 3E 06 00 0A 1F 00 20 44 45 4C 45 54 | ...>..... DELET|
00000010: 45 20 22 30 3A 44 55 4D 50 53 43 52 45 45 4E 2E |E "0:DUMPSCREEN.|
00000020: 31 35 32 35 22 00 14 22 00 20 20 42 59 20 43 41 |1525"..". BY CA|
00000030: 50 54 41 49 4E 20 43 4F 4D 41 4C 20 41 4E 44 20 |PTAIN COMAL AND |
00000040: 46 52 49 45 4E 44 53 00 1E 20 00 20 53 41 56 45 |FRIENDS.. . SAVE|
00000050: 20 20 20 22 40 30 3A 44 55 4D 50 53 43 52 45 45 | "@0:DUMPSCREE|
00000060: 4E 2E 31 35 32 35 22 00 28 04 00 00 32 1E 00 20 |N.1525".(...2.. |
00000070: 54 48 49 53 20 49 53 20 41 20 53 4C 49 47 48 54 |THIS IS A SLIGHT|
00000080: 4C 59 20 46 41 53 54 45 52 00 3C 20 00 20 56 45 |LY FASTER.< . VE|
00000090: 52 53 49 4F 4E 20 4F 46 20 54 48 45 20 53 41 4D |RSION OF THE SAM|
000000A0: 45 20 50 52 4F 47 52 41 4D 00 46 21 00 20 54 48 |E PROGRAM.F!. TH|
000000B0: 41 54 20 41 50 50 45 41 52 45 44 20 4F 4E 20 43 |AT APPEARED ON C|
000000C0: 4F 4D 41 4C 20 54 4F 44 41 59 00 50 23 00 20 44 |OMAL TODAY.P#. D|
000000D0: 49 53 4B 20 23 20 34 2E 20 54 48 49 53 20 49 53 |ISK # 4. THIS IS|
000000E0: 20 41 20 54 52 55 45 20 38 20 42 49 54 00 5A 24 | A TRUE 8 BIT.Z$|
000000F0: 00 20 53 43 52 45 45 4E 20 44 55 4D 50 20 46 4F |. SCREEN DUMP FO|
00000100: 52 20 54 48 45 20 31 35 31 35 2C 20 31 35 32 35 |R THE 1515, 1525|
00000110: 2C 00 64 1F 00 20 41 4E 44 20 38 30 31 20 50 52 |,.d.. AND 801 PR|
00000120: 49 4E 54 45 52 53 2E 20 49 54 20 54 41 4B 45 53 |INTERS. IT TAKES|
00000130: 00 6E 21 00 20 32 31 20 4D 49 4E 55 54 45 53 20 |.n!. 21 MINUTES |
00000140: 54 4F 20 50 52 49 4E 54 20 41 20 48 49 2D 52 45 |TO PRINT A HI-RE|
00000150: 53 00 78 21 00 20 53 43 52 45 45 4E 2E 20 54 48 |S.x!. SCREEN. TH|
00000160: 49 53 20 49 53 20 41 4E 20 41 4C 4C 2D 43 4F 4D |IS IS AN ALL-COM|
00000170: 41 4C 00 82 0D 00 20 50 52 4F 47 52 41 4D 2E 00 |AL.... PROGRAM..|
00000180: 8C 04 00 00 96 0D 70 02 FA 8C 02 74 03 72 04 7C |......p....t.r.||
00000190: 00 A0 16 07 05 45 3A 08 06 01 90 50 21 00 00 D8 |.....E:....P!...|
000001A0: 02 00 10 26 3B 42 00 AA 09 08 0D 02 00 00 3B 00 |...&;B........;.|
000001B0: B4 09 08 0E 02 01 3F 3B 00 BE 09 08 0F 02 00 00 |......?;........|
000001C0: 3B 00 C8 09 08 10 02 00 C1 3B 00 D2 09 08 16 02 |;........;......|
000001D0: 00 06 3B 00 DC 09 08 17 02 00 00 3B 00 E6 0A 08 |..;........;....|
000001E0: 18 02 00 01 21 3B 00 F0 0A 08 19 02 00 07 21 3B |....!;........!;|
000001F0: 00 FA 07 02 00 00 46 01 04 0A BD 03 03 4C 50 3A |......F......LP:|
00000200: BE 01 0E 0B 5F 02 00 08 4B 65 66 61 01 18 11 83 |...._...Kefa....|
00000210: 07 10 8C 05 10 84 05 0F 85 05 19 86 87 01 22 10 |..............".|
00000220: 5F 02 00 1B 4B 02 00 10 4B 28 65 66 61 01 2C 0E |_...K...K(efa.,.|
00000230: 5F 04 04 02 01 00 25 4B 65 66 61 01 36 0E 5F 04 |_.....%Kefa.6._.|
00000240: 04 02 01 00 26 4B 65 66 61 01 40 0E 83 08 FE 8B |....&Kefa.@.....|
00000250: 05 0D 84 05 0E 85 87 01 4A 17 08 09 02 00 80 3B |........J......;|
00000260: 00 20 47 52 41 50 48 49 43 20 44 41 54 41 01 54 |. GRAPHIC DATA.T|
00000270: 11 83 0A ED 8B 05 16 84 05 17 85 05 18 86 87 01 |................|
00000280: 5E 1E 68 05 06 05 08 05 07 02 00 06 27 05 0A 29 |^.h.........'..)|
00000290: 55 FA 32 6A 08 09 02 00 02 05 0A 22 3E 01 68 07 |U.2j.......">.h.|
000002A0: 8B 0A BE 8B 01 72 0A 5F 05 09 4B 65 66 61 01 7C |.....r._..Kefa.||
000002B0: 07 8B 08 99 8B 01 86 0B 5F 02 00 0D 4B 65 66 61 |........_...Kefa|
000002C0: 01 90 07 8B 07 5C 8B 01 9A 20 00 20 47 45 54 20 |.....\... . GET |
000002D0: 42 4F 54 54 4F 4D 20 34 20 44 4F 54 53 20 4F 46 |BOTTOM 4 DOTS OF|
000002E0: 20 53 43 52 45 45 4E 01 A4 10 5F 02 00 1B 4B 02 | SCREEN..._...K.|
000002F0: 00 10 4B 28 65 66 61 01 AE 0E 5F 04 04 02 01 00 |..K(efa..._.....|
00000300: 25 4B 65 66 61 01 B8 0E 5F 04 04 02 01 00 26 4B |%Kefa..._.....&K|
00000310: 65 66 61 01 C2 0E 83 08 B8 8C 04 0D 84 04 0E 85 |efa.............|
00000320: 87 01 CC 09 08 09 02 00 80 3B 01 D6 12 83 0B A7 |.........;......|
00000330: 8C 02 00 03 84 05 17 85 05 18 86 87 01 E0 1B 68 |...............h|
00000340: 05 06 05 08 02 00 03 05 0B 29 55 FA 32 6A 08 09 |.........)U.2j..|
00000350: 02 00 02 05 0B 22 3E 01 EA 07 8B 0B 7A 8C 01 F4 |.....">.....z...|
00000360: 0A 5F 05 09 4B 65 66 61 01 FE 07 8B 08 63 8C 02 |._..Kefa.....c..|
00000370: 08 0B 5F 02 00 0D 4B 65 66 61 02 12 15 00 20 52 |.._...Kefa.... R|
00000380: 45 54 55 52 4E 20 54 4F 20 4E 4F 52 4D 41 4C 02 |ETURN TO NORMAL.|
00000390: 1C 06 04 05 46 02 26 0B 5F 02 00 0F 4B 65 60 61 |....F.&._...Ke`a|
000003A0: 02 30 0A BD 03 03 44 53 3A BE 02 3A 05 7D 02 02 |.0....DS:..:.}..|
000003B0: 44 04 00 02 4E 0D 97 F9 02 00 00 4B 33 99 F4 9A |D...N......K3...|
000003C0: 02 58 05 FF 19 02 62 33 5F 03 2A 93 11 11 54 55 |.X....b3_.*...TU|
000003D0: 52 4E 20 4F 4E 20 50 52 49 4E 54 45 52 2C 20 41 |RN ON PRINTER, A|
000003E0: 44 4A 55 53 54 20 50 41 50 45 52 20 41 4E 44 20 |DJUST PAPER AND |
000003F0: 50 52 45 53 53 65 60 61 02 6C 23 5F 03 1A 41 4E |PRESSe`a.l#_..AN|
00000400: 59 20 4B 45 59 20 54 4F 20 53 54 41 52 54 20 50 |Y KEY TO START P|
00000410: 52 49 4E 54 49 4E 47 2E 65 60 61 02 76 06 5F 60 |RINTING.e`a.v._`|
00000420: 61 02 80 2E 5F 03 25 54 48 49 53 20 54 41 4B 45 |a..._.%THIS TAKE|
00000430: 53 20 41 20 57 48 49 4C 45 20 2D 20 47 4F 20 45 |S A WHILE - GO E|
00000440: 41 54 20 53 4F 4D 45 54 48 49 4E 47 65 60 61 02 |AT SOMETHINGe`a.|
00000450: 8A 22 5F 03 19 41 4E 44 20 42 45 20 42 41 43 4B |."_..AND BE BACK|
00000460: 20 49 4E 20 32 31 20 4D 49 4E 55 54 45 53 65 60 | IN 21 MINUTESe`|
00000470: 61 02 94 0D 97 F9 02 00 00 4B 2D 99 F4 9A 02 9E |a........K-.....|
00000480: 08 07 11 04 12 3A 02 A8 07 FF 16 FF 18 02 B2 0F |.....:..........|
00000490: 7F 02 03 03 4C 50 3A 0F 02 00 00 13 02 BC 08 07 |....LP:.........|
000004A0: 13 04 12 3A 02 C6 10 07 14 04 13 04 11 29 47 02 |...:.........)G.|
000004B0: 0E 10 23 3A 02 D0 0A BD 03 03 44 53 3A BE 02 DA |..#:......DS:...|
000004C0: 06 5F 60 61 02 E4 1D 5F 04 14 64 67 03 10 4D 49 |._`a..._..dg..MI|
000004D0: 4E 55 54 45 53 20 54 4F 20 50 52 49 4E 54 65 60 |NUTES TO PRINTe`|
000004E0: 61 02 EE 04 9F 02 F8 04 00 03 02 09 E9 12 69 8E |a.............i.|
000004F0: 00 7C 03 0C 20 07 15 02 01 00 02 01 00 24 02 00 |.|.. ........$..|
00000500: A0 D8 24 02 01 00 02 00 A1 D8 24 27 02 00 A2 D8 |..$.......$'....|
00000510: 27 3A 03 16 07 EF 04 15 F2 03 20 05 EC 12 03 2A |':........ ....*|
00000520: 08 07 11 04 12 3A 00 00 00 00 00 14 D3 8A 00 00 |.....:..........|
00000530: 32 B2 8F 00 00 30 B9 8F 00 00 10 F7 AF 00 00 11 |2....0..........|
00000540: F5 AF 00 00 11 E3 AF 00 00 11 E1 AF 00 00 11 DF |................|
00000550: AF 00 00 11 DD AF 00 00 00 00 00 00 00 00 00 00 |................|
00000560: 00 00 11 F3 AF 00 00 11 F1 AF 00 00 11 EF AF 00 |................|
00000570: 00 11 ED AF 00 00 10 FC AF 00 00 15 39 8E 00 00 |............9...|
00000580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 11 |................|
00000590: EB AF 00 00 11 E9 AF 00 00 11 E7 AF 00 00 11 E5 |................|
000005A0: AF 00 00 03 53 45 51 0B 50 52 49 4E 54 53 43 52 |....SEQ.PRINTSCR|
000005B0: 45 45 4E 05 46 49 4C 45 27 06 4F 46 46 53 45 54 |EEN.FILE'.OFFSET|
000005C0: 01 5A 0B 42 41 43 4B 27 47 52 4F 55 4E 44 04 59 |.Z.BACK'GROUND.Y|
000005D0: 43 4F 52 04 58 43 4F 52 03 4F 55 54 03 4C 50 31 |COR.XCOR.OUT.LP1|
000005E0: 03 4C 50 32 05 4C 49 53 54 54 05 58 4C 45 46 54 |.LP2.LISTT.XLEFT|
000005F0: 06 58 52 49 47 48 54 07 59 42 4F 54 54 4F 4D 04 |.XRIGHT.YBOTTOM.|
00000600: 59 54 4F 50 0A 53 54 41 52 54 27 54 49 4D 45 07 |YTOP.START'TIME.|
00000610: 4A 49 46 46 49 45 53 08 45 4E 44 27 54 49 4D 45 |JIFFIES.END'TIME|
00000620: 09 54 4F 54 4C 27 54 49 4D 45 01 4A 03 53 49 58 |.TOTL'TIME.J.SIX|
00000630: 04 5A 45 52 4F 06 4D 49 4E 55 53 31 06 4D 49 4E |.ZERO.MINUS1.MIN|
00000640: 55 53 37 00 00 |US7.. |
...>..... DELETE "0:DUMPSCREEN.1525".."
. BY CAPTAIN COMAL AND FRIENDS.. . SAVE
"@0:DUMPSCREEN.1525".(...2.. THIS IS
A SLIGHTLY FASTER.< . VERSION OF THE SAM
E PROGRAM.F!. THAT APPEARED ON COMAL TOD
AY.P#. DISK # 4. THIS IS A TRUE 8 BIT.Z$
. SCREEN DUMP FOR THE 1515, 1525,.D.. AN
D 801 PRINTERS. IT TAKES.N!. 21 MINUTES
TO PRINT A HI-RES.X!. SCREEN. THIS IS AN
ALL-COMAL.... PROGRAM........P....T.R.|
. ...E:....P!..X...&;B........;.......?;
........;.H.....A;.R......;........;....
....!;........!;......F......LP:...._...
KEFA.................."._...K...K(EFA.,.
_.....%KEFA.6._.....&KEFA.@.............
J......;. GRAPHIC DATA.T................
^.H.........'..)U.2J.......">.H......R._
..KEFA.|........_...KEFA.....\... . GET
BOTTOM 4 DOTS OF SCREEN..._...K...K(EFA.
.._.....%KEFA..._.....&KEFA.B...........
..L......;.V...................H........
.)U.2J.......">.....Z...._..KEFA.....C..
.._...KEFA.... RETURN TO NORMAL.....F.&.
_...KE`A.0....DS:..:.}..D...N......K3...
.X....B3_.*...TURN ON PRINTER, ADJUST PA
PER AND PRESSE`A.L#_..ANY KEY TO START P
RINTING.E`A.V._`A..._.%THIS TAKES A WHIL
E - GO EAT SOMETHINGE`A.."_..AND BE BACK
IN 21 MINUTESE`A........K-..........:..
...........LP:............:.F.......)G.
..#:.P....DS:..Z._`A..._..DG..MINUTES TO
PRINTE`A.............I..|.. ........$..
X$......X$'...X':........ ....*.....:..
....S...2....0..........................
........................................
....9...................................
....SEQ.PRINTSCREEN.FILE'.OFFSET.Z.BACK'
GROUND.YCOR.XCOR.OUT.LP1.LP2.LISTT.XLEFT
.XRIGHT.YBOTTOM.YTOP.START'TIME.JIFFIES.
END'TIME.TOTL'TIME.J.SIX.ZERO.MINUS1.MIN
US7..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL