DATA SEGMENT
POT_A EQU 30H
POT_B EQU 32H
POT_C EQU 34H
POT_K EQU 36H
O_82530 EQU 10H
O_82531 EQU 12H
O_82532 EQU 14H
O_8253K EQU 16H
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA
START:
MAIN PROC FAR
CLI
MOV AL,80H ;8255
OUT POT_K,AL
;8253初始化
MOV AL,00100111B
OUT O_8253K,AL
MOV AL,01100111B
OUT O_8253K,AL
MOV AL,2H
OUT O_82530,AL
OUT O_82531,AL
;写中断向量表
XOR AX,AX
MOV DS,AX
MOV AX,OFFSET MY_INT
MOV DS:[60H*4],AX
MOV AX,SEG MY_INT
MOV DS:[60H*4+2],AX
MOV AL,0FFH
WHILE1:
STI
JMP WHILE1
MAIN endp
MY_INT PROC
OUT POT_A,AL
NOT AL
IRET
MY_INT endp
CODE ENDS
END START