+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Calculators (and very old HP Computers) (/forum-3.html)
+--- Forum: General Forum (/forum-4.html)
+--- Thread: Two Questions About 80-Col HP-IL Video (/thread-21905.html)
Two Questions About 80-Col HP-IL Video - toml_12953 - 06-18-2024 10:36 AM
I was lucky enough to grab an HP-92198 80-Column Interface on eBay for my HP-71B. On reading the manual, however, I have a couple questions.
1. I'm trying to find the best way to print a word in reverse video. I've written a function which works but I'd like to know if there's a better, faster way:
Code:
DEF FNR$(X$)
FOR I9=1 TO LEN(X$)
X$[I9,I9]=CHR$(NUM(X$[I9,I9])+128)
NEXT I9
FNR$=X$
END DEF2. The manual says the result of the memory test can be found in the status word but I don't see a way to read the status word. What am I missing?
RE: Two Questions About 80-Col HP-IL Video - J-F Garnier - 06-18-2024 12:11 PM
Your code looks fine.
A small improvement, replace
X$[I9,I9]=CHR$(NUM(X$[I9,I9])+128)
with
X$[I9,I9]=CHR$(BINIOR(NUM(X$[I9,I9]),128))
in case X$ already holds a character >= 128
If you want to be faster, you can use the HGL$ function, present in the LEX3421 from the Data Acquisition Pac.
A standalone HGLLEX file is described here (slides 5, 6).
The name HGL$ (Highlight) comes from the equivalent function of the HP Series 80.
J-F
RE: Two Questions About 80-Col HP-IL Video - toml_12953 - 06-18-2024 02:06 PM
(06-18-2024 12:11 PM)J-F Garnier Wrote: Your code looks fine.
A small improvement, replace
X$[I9,I9]=CHR$(NUM(X$[I9,I9])+128)
with
X$[I9,I9]=CHR$(BINIOR(NUM(X$[I9,I9]),128))
in case X$ already holds a character >= 128
If you want to be faster, you can use the HGL$ function, present in the LEX3421 from the Data Acquisition Pac.
A standalone HGLLEX file is described here (slides 5, 6).
The name HGL$ (Highlight) comes from the equivalent function of the HP Series 80.
J-F
Thanks! I'll use BINIOR but I have no way of getting LEX files to the 71.
RE: Two Questions About 80-Col HP-IL Video - Dave Frederickson - 06-19-2024 02:06 AM
(06-18-2024 02:06 PM)toml_12953 Wrote: ... I have no way of getting LEX files to the 71.
In the old days we used a BASIC program that would create the LEX file from a HEX dump.
The listing for MAKELEX can be found here:
https://www.hpmuseum.org/cgi-sys/cgiwrap/hpmuseum/archv011.cgi?read=29678
RE: Two Questions About 80-Col HP-IL Video - ThomasF - 06-19-2024 01:08 PM
(06-18-2024 02:06 PM)toml_12953 Wrote: Thanks! I'll use BINIOR but I have no way of getting LEX files to the 71.
Hi Tom,
Just as Dave suggested, there is the MAKELEX way of entering LEX-files without any additional accessories.
Check e.g. page 120 in the book HP-71 Basic Made Easy.
The code for HGLLEX is provided below - with the disclaimer that I have not tested it myself!
Cheers,
Thomas
Code:
HGLLEX ID#FE 84 bytes
000: 8474 C4C4 5485 0202 F6
001: 802E 0000 0000 0000 E2
002: 9A00 0EF1 0100 0000 D5
003: F710 0000 0000 0000 A7
004: 0810 00F7 8474 C442 DD
005: 101F F841 2A4E 94AC 5E
006: 18FC 09E0 04AC 0AC2 DA
007: 9785 0B46 17F9 4E44 FE
008: 1371 3510 8AF0 8F83 FC
009: DB08 1CBF 0BF0 BF03 71
010: 1081 C117 1A5C 4F01 87
011: 4B0E 6E14 95CE 1181 B2
012: 358D C32F 0 14