Addi-Data ADDINUM PA 1500, Техническое описание, Страница: 34 / 80

Functions of the board PA 1500
Example with the DEBUG program under DOS:
c:> DEBUG (CR)
- i 390 (CR) (* Read the inputs 1-8
*)
00 (* All the inputs are on logic "0" *)
- i 391 (CR) (* Read the inputs 9-16 *)
00 (* All the inputs are on logic "0" *)
- q (* Quit the DEBUG program *)
EXAMPLE in BASIC:
A = INP(&H390) ; (* Read the inputs 1-8*)
B = INP(&H391) ; (* Read the inputs 9-16*)
(* Test input 4 *)
IF (A and &H08) THEN PRINT" INPUT4 = 1" ELSE
PRINT" INPUT4= 0 "
Did you select the 16-bit data bus access? (Jumper J3 is set)
One address is available in the I/O address range:
Base +0 for the inputs 1-16
Example in ASSEMBLER
......
MOV DX, 390
; Base address on 0390H
IN AX, DX ; Read the inputs 1 to 16
.......
Example in Pascal
Function Read_Inputs ( w_Base : WORD ) : WORD ;
begin (* Read the inputs in the 16-bit data bus width w_Basis := $390 *)
Read_Inputs := portw[ w_Base ];
end;
9.3.2 Special input functions
Interrupt
The inputs 1 to 14 can generate an interrupt.
Inputs 1 to 8: It is possible to declare an OR or AND event to
generate an interrupt.
Inputs 9 to 14: It is possible to declare an OR event to generate
an interrupt.
Inputs 15 & 16: are not interruptible and are not used in events.
See Boards settings
34