Home » Archimedes archive » Zipped Apps » 1st Word Plus » WP/HPDeskJet/HPInfo
WP/HPDeskJet/HPInfo
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Archimedes archive » Zipped Apps » 1st Word Plus |
Filename: | WP/HPDeskJet/HPInfo |
Read OK: | ✔ |
File size: | 076B bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
Hewlett Packard Deskjet ScreenDump Module This is an Archimedes module and is a screen dump for the Hewlett Packard Deskjet printer, made with the excellent ABC compiler. To use it, the RMAsize must be configured for at least 4 and then one does: *RMLOAD HPDeskJet The commands to dump any graphics screen (Modes 0 to 20, except the text modes) are: Straight dump: *DeskJet Dump with colours inverted: *DeskJet I Dump with small size: *DeskJet S Dump inverted and small: *DeskJet I S The dumps are all shaded to represent the luminance of the colours on the screen. The ABC compiler gave a fivefold speed increase over BASIC, well worth it. So the raw BASIC program is NOT included, far too slow and embarrassing. I have appended some MODE 18/20 screen dumps done with this module to the Deskjet. (MODEs 18 or 20 were used to show that a very high definition is obtainable on the printer.) Warnings: 1. The normal dump leaves out the right hand 6% of the screen, being in 75, 150 or 300 dots per inch, depending on screen mode. The Small dump copies the whole screen, being in 100 dots per inch. 2. The 256 colour modes are translated to 7 shades only. There are not enough dots to give more shades per pixel per colour. 3. The 256 colour modes and the 16 colour modes with 640 pixels width take ages! This is mostly because they are in 300 dots per inch to give the resolution of the shades per pixel. When I feel determined enough I may try to put the dump into proper machine code to see if that speeds things up.
00000000 48 65 77 6c 65 74 74 20 50 61 63 6b 61 72 64 20 |Hewlett Packard | 00000010 44 65 73 6b 6a 65 74 20 53 63 72 65 65 6e 44 75 |Deskjet ScreenDu| 00000020 6d 70 20 4d 6f 64 75 6c 65 0a 0a 20 20 20 20 20 |mp Module.. | 00000030 20 20 20 20 20 54 68 69 73 20 20 69 73 20 61 6e | This is an| 00000040 20 41 72 63 68 69 6d 65 64 65 73 20 6d 6f 64 75 | Archimedes modu| 00000050 6c 65 20 61 6e 64 20 69 73 20 61 20 73 63 72 65 |le and is a scre| 00000060 65 6e 20 64 75 6d 70 20 20 66 6f 72 20 0a 20 20 |en dump for . | 00000070 20 20 20 74 68 65 20 48 65 77 6c 65 74 74 20 50 | the Hewlett P| 00000080 61 63 6b 61 72 64 20 44 65 73 6b 6a 65 74 20 70 |ackard Deskjet p| 00000090 72 69 6e 74 65 72 2c 20 6d 61 64 65 20 77 69 74 |rinter, made wit| 000000a0 68 20 74 68 65 20 65 78 63 65 6c 6c 65 6e 74 20 |h the excellent | 000000b0 0a 20 20 20 20 20 41 42 43 20 63 6f 6d 70 69 6c |. ABC compil| 000000c0 65 72 2e 20 20 54 6f 20 75 73 65 20 69 74 2c 20 |er. To use it, | 000000d0 74 68 65 20 52 4d 41 73 69 7a 65 20 6d 75 73 74 |the RMAsize must| 000000e0 20 62 65 20 63 6f 6e 66 69 67 75 72 65 64 20 66 | be configured f| 000000f0 6f 72 20 0a 20 20 20 20 20 61 74 20 6c 65 61 73 |or . at leas| 00000100 74 20 34 20 61 6e 64 20 74 68 65 6e 20 6f 6e 65 |t 4 and then one| 00000110 20 64 6f 65 73 3a 0a 20 20 20 20 20 20 20 20 20 | does:. | 00000120 20 2a 52 4d 4c 4f 41 44 20 48 50 44 65 73 6b 4a | *RMLOAD HPDeskJ| 00000130 65 74 0a 20 20 20 20 20 54 68 65 20 20 63 6f 6d |et. The com| 00000140 6d 61 6e 64 73 20 20 74 6f 20 64 75 6d 70 20 61 |mands to dump a| 00000150 6e 79 20 67 72 61 70 68 69 63 73 20 73 63 72 65 |ny graphics scre| 00000160 65 6e 20 28 4d 6f 64 65 73 20 30 20 20 74 6f 20 |en (Modes 0 to | 00000170 20 32 30 2c 20 0a 20 20 20 20 20 65 78 63 65 70 | 20, . excep| 00000180 74 20 74 68 65 20 74 65 78 74 20 6d 6f 64 65 73 |t the text modes| 00000190 29 20 61 72 65 3a 0a 0a 20 20 20 20 20 20 20 20 |) are:.. | 000001a0 20 20 20 20 20 20 20 53 74 72 61 69 67 68 74 20 | Straight | 000001b0 64 75 6d 70 3a 20 20 20 20 20 20 20 20 20 20 20 |dump: | 000001c0 20 20 20 2a 44 65 73 6b 4a 65 74 0a 20 20 20 20 | *DeskJet. | 000001d0 20 20 20 20 20 20 20 20 20 20 20 44 75 6d 70 20 | Dump | 000001e0 77 69 74 68 20 63 6f 6c 6f 75 72 73 20 69 6e 76 |with colours inv| 000001f0 65 72 74 65 64 3a 20 2a 44 65 73 6b 4a 65 74 20 |erted: *DeskJet | 00000200 49 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |I. | 00000210 20 44 75 6d 70 20 77 69 74 68 20 73 6d 61 6c 6c | Dump with small| 00000220 20 73 69 7a 65 3a 20 20 20 20 20 20 20 2a 44 65 | size: *De| 00000230 73 6b 4a 65 74 20 53 0a 20 20 20 20 20 20 20 20 |skJet S. | 00000240 20 20 20 20 20 20 20 44 75 6d 70 20 69 6e 76 65 | Dump inve| 00000250 72 74 65 64 20 61 6e 64 20 73 6d 61 6c 6c 3a 20 |rted and small: | 00000260 20 20 20 2a 44 65 73 6b 4a 65 74 20 49 20 53 0a | *DeskJet I S.| 00000270 0a 20 20 20 20 20 54 68 65 20 20 64 75 6d 70 73 |. The dumps| 00000280 20 61 72 65 20 61 6c 6c 20 73 68 61 64 65 64 20 | are all shaded | 00000290 74 6f 20 72 65 70 72 65 73 65 6e 74 20 74 68 65 |to represent the| 000002a0 20 6c 75 6d 69 6e 61 6e 63 65 20 6f 66 20 20 74 | luminance of t| 000002b0 68 65 20 0a 20 20 20 20 20 63 6f 6c 6f 75 72 73 |he . colours| 000002c0 20 6f 6e 20 74 68 65 20 73 63 72 65 65 6e 2e 0a | on the screen..| 000002d0 0a 20 20 20 20 20 54 68 65 20 41 42 43 20 63 6f |. The ABC co| 000002e0 6d 70 69 6c 65 72 20 67 61 76 65 20 61 20 66 69 |mpiler gave a fi| 000002f0 76 65 66 6f 6c 64 20 73 70 65 65 64 20 69 6e 63 |vefold speed inc| 00000300 72 65 61 73 65 20 6f 76 65 72 20 20 42 41 53 49 |rease over BASI| 00000310 43 2c 20 0a 20 20 20 20 20 77 65 6c 6c 20 20 77 |C, . well w| 00000320 6f 72 74 68 20 69 74 2e 20 20 20 53 6f 20 74 68 |orth it. So th| 00000330 65 20 72 61 77 20 42 41 53 49 43 20 70 72 6f 67 |e raw BASIC prog| 00000340 72 61 6d 20 69 73 20 4e 4f 54 20 20 69 6e 63 6c |ram is NOT incl| 00000350 75 64 65 64 2c 20 0a 20 20 20 20 20 66 61 72 20 |uded, . far | 00000360 74 6f 6f 20 73 6c 6f 77 20 61 6e 64 20 65 6d 62 |too slow and emb| 00000370 61 72 72 61 73 73 69 6e 67 2e 0a 0a 20 20 20 20 |arrassing... | 00000380 20 49 20 68 61 76 65 20 61 70 70 65 6e 64 65 64 | I have appended| 00000390 20 73 6f 6d 65 20 4d 4f 44 45 20 31 38 2f 32 30 | some MODE 18/20| 000003a0 20 73 63 72 65 65 6e 20 64 75 6d 70 73 20 64 6f | screen dumps do| 000003b0 6e 65 20 77 69 74 68 20 20 74 68 69 73 20 0a 20 |ne with this . | 000003c0 20 20 20 20 6d 6f 64 75 6c 65 20 20 74 6f 20 74 | module to t| 000003d0 68 65 20 44 65 73 6b 6a 65 74 2e 20 20 20 28 4d |he Deskjet. (M| 000003e0 4f 44 45 73 20 31 38 20 6f 72 20 32 30 20 77 65 |ODEs 18 or 20 we| 000003f0 72 65 20 75 73 65 64 20 74 6f 20 20 73 68 6f 77 |re used to show| 00000400 20 0a 20 20 20 20 20 74 68 61 74 20 61 20 76 65 | . that a ve| 00000410 72 79 20 68 69 67 68 20 64 65 66 69 6e 69 74 69 |ry high definiti| 00000420 6f 6e 20 69 73 20 6f 62 74 61 69 6e 61 62 6c 65 |on is obtainable| 00000430 20 6f 6e 20 74 68 65 20 70 72 69 6e 74 65 72 2e | on the printer.| 00000440 29 0a 0a 20 20 20 20 20 57 61 72 6e 69 6e 67 73 |).. Warnings| 00000450 3a 0a 0a 20 20 20 20 20 20 20 20 20 20 31 2e 20 |:.. 1. | 00000460 20 54 68 65 20 6e 6f 72 6d 61 6c 20 64 75 6d 70 | The normal dump| 00000470 20 6c 65 61 76 65 73 20 6f 75 74 20 74 68 65 20 | leaves out the | 00000480 72 69 67 68 74 20 68 61 6e 64 20 36 25 20 6f 66 |right hand 6% of| 00000490 20 74 68 65 20 0a 20 20 20 20 20 20 20 20 20 20 | the . | 000004a0 73 63 72 65 65 6e 2c 20 20 62 65 69 6e 67 20 20 |screen, being | 000004b0 69 6e 20 20 37 35 2c 20 20 31 35 30 20 20 6f 72 |in 75, 150 or| 000004c0 20 20 33 30 30 20 20 64 6f 74 73 20 20 70 65 72 | 300 dots per| 000004d0 20 20 69 6e 63 68 2c 20 0a 20 20 20 20 20 20 20 | inch, . | 000004e0 20 20 20 64 65 70 65 6e 64 69 6e 67 20 20 6f 6e | depending on| 000004f0 20 73 63 72 65 65 6e 20 6d 6f 64 65 2e 20 20 20 | screen mode. | 00000500 54 68 65 20 53 6d 61 6c 6c 20 64 75 6d 70 20 63 |The Small dump c| 00000510 6f 70 69 65 73 20 20 74 68 65 20 0a 20 20 20 20 |opies the . | 00000520 20 20 20 20 20 20 77 68 6f 6c 65 20 73 63 72 65 | whole scre| 00000530 65 6e 2c 20 62 65 69 6e 67 20 69 6e 20 31 30 30 |en, being in 100| 00000540 20 64 6f 74 73 20 70 65 72 20 69 6e 63 68 2e 0a | dots per inch..| 00000550 0a 20 20 20 20 20 20 20 20 20 20 32 2e 20 20 54 |. 2. T| 00000560 68 65 20 20 32 35 36 20 20 63 6f 6c 6f 75 72 20 |he 256 colour | 00000570 6d 6f 64 65 73 20 61 72 65 20 74 72 61 6e 73 6c |modes are transl| 00000580 61 74 65 64 20 74 6f 20 20 37 20 20 73 68 61 64 |ated to 7 shad| 00000590 65 73 20 0a 20 20 20 20 20 20 20 20 20 20 6f 6e |es . on| 000005a0 6c 79 2e 20 20 20 54 68 65 72 65 20 20 61 72 65 |ly. There are| 000005b0 20 6e 6f 74 20 65 6e 6f 75 67 68 20 64 6f 74 73 | not enough dots| 000005c0 20 74 6f 20 67 69 76 65 20 6d 6f 72 65 20 20 73 | to give more s| 000005d0 68 61 64 65 73 20 0a 20 20 20 20 20 20 20 20 20 |hades . | 000005e0 20 70 65 72 20 70 69 78 65 6c 20 70 65 72 20 63 | per pixel per c| 000005f0 6f 6c 6f 75 72 2e 0a 0a 20 20 20 20 20 20 20 20 |olour... | 00000600 20 20 33 2e 20 20 54 68 65 20 20 32 35 36 20 63 | 3. The 256 c| 00000610 6f 6c 6f 75 72 20 6d 6f 64 65 73 20 61 6e 64 20 |olour modes and | 00000620 74 68 65 20 31 36 20 63 6f 6c 6f 75 72 20 6d 6f |the 16 colour mo| 00000630 64 65 73 20 20 77 69 74 68 20 0a 20 20 20 20 20 |des with . | 00000640 20 20 20 20 20 36 34 30 20 20 70 69 78 65 6c 73 | 640 pixels| 00000650 20 77 69 64 74 68 20 74 61 6b 65 20 61 67 65 73 | width take ages| 00000660 21 20 20 20 54 68 69 73 20 69 73 20 20 6d 6f 73 |! This is mos| 00000670 74 6c 79 20 20 62 65 63 61 75 73 65 20 0a 20 20 |tly because . | 00000680 20 20 20 20 20 20 20 20 74 68 65 79 20 61 72 65 | they are| 00000690 20 69 6e 20 33 30 30 20 64 6f 74 73 20 70 65 72 | in 300 dots per| 000006a0 20 69 6e 63 68 20 74 6f 20 67 69 76 65 20 74 68 | inch to give th| 000006b0 65 20 72 65 73 6f 6c 75 74 69 6f 6e 20 6f 66 20 |e resolution of | 000006c0 0a 20 20 20 20 20 20 20 20 20 20 74 68 65 20 73 |. the s| 000006d0 68 61 64 65 73 20 70 65 72 20 70 69 78 65 6c 2e |hades per pixel.| 000006e0 20 20 20 57 68 65 6e 20 49 20 66 65 65 6c 20 64 | When I feel d| 000006f0 65 74 65 72 6d 69 6e 65 64 20 65 6e 6f 75 67 68 |etermined enough| 00000700 20 49 20 0a 20 20 20 20 20 20 20 20 20 20 6d 61 | I . ma| 00000710 79 20 74 72 79 20 74 6f 20 70 75 74 20 74 68 65 |y try to put the| 00000720 20 64 75 6d 70 20 69 6e 74 6f 20 70 72 6f 70 65 | dump into prope| 00000730 72 20 6d 61 63 68 69 6e 65 20 63 6f 64 65 20 74 |r machine code t| 00000740 6f 20 73 65 65 20 0a 20 20 20 20 20 20 20 20 20 |o see . | 00000750 20 69 66 20 74 68 61 74 20 73 70 65 65 64 73 20 | if that speeds | 00000760 74 68 69 6e 67 73 20 75 70 2e 0a |things up..| 0000076b