Post Reply 
smaller HP 82166A with 32-pin connector
04-08-2020, 12:25 PM (This post was last modified: 04-08-2020 12:31 PM by KimH.)
Post: #7
RE: smaller HP 82166A with 32-pin connector
Thanks J-F,

I actually use the address as you suggest.

I admit, that I am struggling with the logic of R0 to R3. I get most of it, but not all.

As G. Friedman suggest, the documentation and examples from HP were not exactly the best he had seen.

I saw a reference to Christoph's book HP41 - Input-Output Board and the TOC - looked like what I needed. Can't find it anywhere to buy. Maybe someone here would know how to get the book or how to get in touch with Mr. Klug (means clever in German Wink)

Here are the 2 pieces I use for my experiment - retyped.

The listener stops at line 20 and move no further

Code:

1 !LISTENER
2 RESTOREIO
5 A=DEVADDR(“%64“)
6 ! FROM CONTROL THE WORLD P178 – LOOKS CORRECT 
7 SEND UNT UNL MTA LISTEN A DDL 0 DATA 226,16,24 UNT UNL
10 FOR I=1 TO 10
20 ENTER :A ;B$
25 DISP B$
30 NEXT I 

1 !TALKER (sends CHARS - seemingly)
2 RESTOREIO
3 ENDLINE””
5 A=DEVADDR(“%64“)
9 ! FROM CONTROL THE WORLD p33 – LOOKS CORRECT
10 SEND UNT UNL MTA LISTEN A DDL 0 DATA 74,16,208 UNT UNL
20 FOR I=1 TO 63
25 X$=CHR$(I+64)
30 OUTPUT :A ;X$
31 DISP I; X$
40 NEXT I

(04-08-2020 10:57 AM)J-F Garnier Wrote:  
(04-08-2020 10:06 AM)KimH Wrote:  I send Characters to Module 1 and want to read them from Module 2 - ENTER :LOOP ; X$ - nothing happens it gets stuck.

First of all, you must use addresses in OUTPUT and ENTER statements, not just :LOOP.

Please post you complete test sequence, so we can evaluate it.

J-F
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
RE: smaller HP 82166A with 32-pin connector - KimH - 04-08-2020 12:25 PM



User(s) browsing this thread: 1 Guest(s)