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

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

PCA-6008VG User Manual 66
B.1 Sample Code
;------------------------------------------------------------
; MTEST1 _M_HL=05 GP10-13=GPO GP14-17=GPI
; _M_HL=50 GP10-13=GPI GP14-17=GPO
;------------------------------------------------------------
MTEST1 MACRO _M_HL
LOCAL _M_Begin,_M_END,_M_LOP1
_M_Begin:
MOV DX,2Eh ; 2E/2F=F1/05 (CR-F1)
MOV AL,0F1h ; =F1/50 (CR-F1)
OUT DX,AL ;-Index
MOV DX,2Fh ;
MOV al,_M_HL ;AL<--05/50
OUT DX,AL ;-Data
MOV DX,2Fh ;
IN AL,DX ;-Data
cmp al,55h ;
jz _M_LOP1 ;
jmp _M_Begin ;
_M_LOP1:
MOV DX,2Fh ;
MOV AL,_M_HL ;AL<-05/50
SHL AL,1 ;05/50 -->0A/A0
OUT DX,AL ;-Data
MOV DX,2Fh ;
IN AL,DX ;-Data
cmp al,0AAh ;
jz _M_END ;
jmp _M_Begin ;
_M_END:
ENDM
;------------------------------------------------------------
; Logic_Dev_Sel
;------------------------------------------------------------
Logic_Dev_Sel MACRO Log_Dev
MOV DX,2Eh ;
MOV AL,07h ; Point To Logical Device Number Reg.
OUT DX,AL ;
MOV DX,2Fh ;
MOV AL,Log_Dev ; Select Logical Device Number 7
OUT DX,AL ; (GAME/MIDI/GPIO Port)
ENDM ;
;------------------------------------------------------------
;------------------------------------------------------------
AnyKey MACRO ;