Advantech PCA-6008VG, Руководство пользователя

Страница: 81 / 96

67 PCA-6008VG User Manual
Appendix B
P
rogramming
the
G
PIO
MOV AH,01H ;
INT 21H ;
ENDM ;
;------------------------------------------------------------
;------------------------------------------------------------
PRINT MACRO String
mov dx,offset string
MOV AH,09H
INT 21H
ENDM
;------------------------------------------------------------
.MODEL SMALL
.386
.DATA
MSG_1 db 0ah,0dh,"GP10-13 Output/GP14-17 Input .....$ "
MSG_2 db 0ah,0dh,"GP10-13 Input /GP14-17 Output .....$ "
MSG_3 db "Test OK! $ ",0ah,0dh
.CODE
BEGIN: MOV AX,@DATA
MOV DS,AX
MOV DX,2Eh ; Enter the Extended Function
MOV AL,87h ; Mode, Interruptible Double-Write
OUT DX,AL ;
OUT DX,AL ;
MOV AL,2Ah ; Set Configuration Regsister
MOV DX,2Eh ;
OUT DX,AL ;-Index
MOV DX,2Fh ;
IN AL,DX ;;Read CR-2A, Set Bit[7:2]=1
OR AL,0FCh ;;Write Back CR-2A
MOV DX,2Fh ;;
OUT DX,AL ;;-Data
Logic_Dev_Sel 7
mov dx,2eh ;Logic Device 7 CR-F0(GPIO 10-17)
mov al,0f0h ;
out dx,al ;-Index (F0)
mov dx,2fh ;
mov al,0f0h ; 1=GPI/0=GPO GPIO[7:4]=GPI
out dx,al ;-Data(F0) GPIO[3:0]=GPO
Print MSG_1
MTEST1 05h ;05h=0101B
Print MSG_3
AnyKey
mov dx,2eh ;Logic Device 7 CR-F0(GPIO 10-17)