现代计算机接口实验 （三）8255实验
;8255cs 288H~28BH
;pc7凹
;pB7~pB0-L7~L0
;pa7~pa0-k7~k0
;
;
DATA SEGMENT
PA EQU 288H
PB EQU 289H
PC EQU 28AH
CTL55 EQU 28BH
LTABLE DB 10 DUP(?)
DATA ENDS
STACK1 SEGMENT PARA STACK
DW 20H DUP(0)
STACK1 ENDS
CSEG SEGMENT
ASSUME CS:CSEG,DS:DATA
START:
MOV AX,DATA
MOV DS,AX
MOV CX,10
MOV SI,0
MOV DX,CTL55
MOV AL,10011000B
OUT DX,AL
WAT:
MOV DX,PC ;读C口
IN AL,DX
AND AL,80H ;检测PC7
JNZ WAT
MOV DX,PA ;PC7=0，读A口
IN AL,DX
MOV DX,PB ;送B口
OUT DX,AL
MOV LTABLE[SI],AL;将读取的开关值存放到内存单元TABLE中
INC SI
WAT1:
MOV DX,PC ;读C口
IN AL,DX
AND AL,80H ;检测PC7
JZ WAT1
LOOP WAT
MOV AH,4CH
INT 21H
CSEG ENDS
END START
2、A 口工作在方式0 输入方式，接8 个开关，B 口工作在方式0 输出方式，接
8 个LED， PC0 接产生1s脉冲的8253， 8253 输入负脉冲时，读一次A 口，同时在B 口显示。
;8255cs 288H~28BH
;8253cs-280H~283H
;CLK0-2MHZ ; CLK1-OUT0; OUT1-PC0;
;pB7~pB0-L7~L0
;pa7~pa0-k7~k0
;
;
DATA SEGMENT
T0 EQU 280H ;T0--CTL为计数器0--控制寄存器的地址
T1 EQU 281H
T2 EQU 282H
CTL1 EQU 283H
PA EQU 288H
PB EQU 289H
PC EQU 28AH
CTL55 EQU 28BH
LTABLE DB 10 DUP(?)
DATA ENDS
STACK1 SEGMENT PARA STACK
DW 20H DUP(0)
STACK1 ENDS
CSEG SEGMENT
ASSUME CS:CSEG,DS:DATA
START:
MOV AX,DATA
MOV DS,AX
MOV DX,CTL55
MOV AL,10010001B;PC上输出PC下输入
OUT DX,AL
CALL Init_8253
WAT:
MOV DX,PC ;读C口
IN AL,DX
AND AL,01H ;检测PC0
JNZ WAT
MOV DX,PA ;PC7=0，读A口
IN AL,DX
MOV DX,PB ;送B口
OUT DX,AL
WAT1:
MOV DX,PC ;读C口
IN AL,DX
AND AL,01H ;检测PC0
JZ WAT1
JMP WAT
MOV AH,4CH
INT 21H;初始化8253
Init_8253 PROC
PUSH DX
PUSH AX
;/*8253产生1s的连续方波
MOV DX,CTL1
MOV AL,00100101B ;选择通道0，写入高字节，方式2，用BCD码
OUT DX,AL
MOV DX,T0
MOV AL,20H
OUT DX,AL
MOV DX,CTL1
MOV AL,01100111B ;选择通道1，写入高字节，方式3，用BCD码
OUT DX,AL
MOV DX,T1
MOV AL,10H
OUT DX,AL
;8253产生1S的连续方波*/
POP AX
POP DX
RET
Init_8253 ENDP
CSEG ENDS
END START
3、A 口工作在方式0，输入，接8 个开关，B 口工作在方式0，输出，接八段
显示器;由8253 产生1S 的脉冲，PC7 接该脉冲，来个脉冲将读取A 口，显示在
屏幕上，同时;显示在八段显示器上，PC0,PC1 作为位码信号。
;8253cs-280H~283H
;8255cs288H~28BH
;8255pa7pa0-k7-k0;pb6~b0-gfedcba
;CLK0-2MHZ ; CLK1-OUT0; OUT1-PC7;PC0-S0;PC1-S1;
;
DATA SEGMENT
T0 EQU 280H ;T0--CTL为计数器0--控制寄存器的地址
T1 EQU 281H
T2 EQU 282H
CTL1 EQU 283H
PA EQU 288H
PB EQU 289H
PC EQU 28AH
CTL EQU 28BH
LTABLE DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H
DB 7FH,6FH,77H,7CH,39H,5EH,79H,71H
;存储0~F的段码
DAT DB 21H
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA
;主程序
START:
MOV AX,DATA
MOV DS,AX
CALL Init_8253
CALL Init_8255
AGAIN:
CALL READ_PA
CALL DISP_DAT
JMP AGAIN
MOV AH,4CH
INT 21H
;数码显示字符程序
LED_1 PROC
LEA SI,LTABLE
ADD SI,BX
MOV AL,[SI]
AND AL,7FH ;最高位设为0，以不显示小数点
MOV DX,PB
OUT DX,AL
RET
LED_1 ENDP
LED_S PROC
PUSH CX
PUSH BX;保存
MOV DX,PC ;熄位码
MOV AL,0H
OUT DX,AL;数码管熄灭
MOV BH,0
AND BL,0FH ;显示低四位~8421~0-F
CALL LED_1
MOV DX,PC ;选择低四位，即PC0置为1
MOV AL,1H
OUT DX,AL
MOV DX,PC ;熄位码
MOV AL,0H
OUT DX,AL;数码管熄灭
POP BX;调回保存的数，备用
PUSH BX;重新保存
MOV BH,0
MOV CL,4
SHR BL,CL
AND BL,0FH ;显示高四位
CALL LED_1
MOV DX,PC ;选择高四位，即PC1置为1
MOV AL,02H
OUT DX,AL
MOV DX,PC ;熄位码
MOV AL,0H
OUT DX,AL
POP BX
POP CX
RET
LED_S ENDP
;读取A口数据
READ_PA PROC
PUSH DX
PUSH AX
LOOP_CHECK:
MOV BH,0
MOV BL,DAT
CALL LED_S
MOV DX,PC ;8255 C口读入
IN AL,DX
TEST AL,80H ;判断1s脉冲
JNZ LOOP_CHECK
MOV DX, PA
IN AL,DX
MOV DAT,AL
POP AX
POP DX
RET
READ_PA ENDP
;电脑终端显示字符程序
DISP_DAT PROC
PUSH DX
PUSH AX
PUSH CX
MOV AL,DAT
MOV CL,4
SHR AL,CL
AND AL,0FH
CMP AL,0AH;和10比较
JC S1;BCD码 修正 ;〈10直接S1
ADD AL,7H;>9 要+7，用于进位
S1:
ADD AL,30H;加上0的ASCII码
MOV DL,AL ;高四位显示在屏幕上
MOV AH,02H
INT 21H
MOV AL,DAT
AND AL,0FH
CMP AL,0AH
JC S2
ADD AL,7H
S2:
ADD AL,30H
MOV DL,AL ;低四位显示在屏幕上
MOV AH,02H
INT 21H
MOV DL,' ' ;显示空格
MOV AH,02H
INT 21H
POP CX
POP AX
POP DX
RET
DISP_DAT ENDP
;初始化8253
Init_8253 PROC
PUSH DX
PUSH AX
;/*8253产生1s的连续方波
MOV DX,CTL1
MOV AL,00100101B ;选择通道0，写入高字节，方式2，用BCD码
OUT DX,AL
MOV DX,T0
MOV AL,20H
OUT DX,AL
;
MOV DX,CTL1
MOV AL,01100111B ;选择通道1，写入高字节，方式3，用BCD码
OUT DX,AL
MOV DX,T1
MOV AL,10H
OUT DX,AL
;8253产生1S的连续方波*/
POP AX
POP DX
RET
Init_8253 ENDP
;初始化8255
Init_8255 PROC
PUSH DX
PUSH AX
MOV DX,CTL ;8255方式字控制字控制；10011000
MOV AL,98H
OUT DX,AL
POP AX
POP DX
RET
Init_8255 ENDP
CODE ENDS
END START
4、A 口工作在方式0 输入方式，接4 个开关，B 口工作在方式0 输出方式，
接1 个七段显示器，PC7 接单脉冲发生器，输入负脉冲时，读一次A 口，同时
在B 口显示，读16 次结束。
;8253cs-280H~283H
;8255cs288H~28BH
;8255pa3pa0-k3-k0;pb6~b0-gfedcba
;8255PC7-凹,PC0-S1;
;
DATA SEGMENT
T0 EQU 280H ;T0--CTL为计数器0--控制寄存器的地址
T1 EQU 281H
T2 EQU 282H
CTL1 EQU 283H
PA EQU 288H
PB EQU 289H
PC EQU 28AH
CTL EQU 28BH
LTABLE DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H
DB 7FH,6FH,77H,7CH,39H,5EH,79H,71H
;存储0~F的段码
DAT DB 21H
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA
;主程序
START:
MOV AX,DATA
MOV DS,AX
MOV CX,16
CALL Init_8255
AGAIN:
CALL READ_PA
CALL DISP_DAT
LOOP AGAIN
MOV AH,4CH
INT 21H
;数码显示字符程序
LED_1 PROC
LEA SI,LTABLE
ADD SI,BX
MOV AL,[SI]
AND AL,7FH ;最高位设为0，以不显示小数点
MOV DX,PB
OUT DX,AL
RET
LED_1 ENDP
LED_S PROC
PUSH CX
PUSH BX;保存
MOV DX,PC ;熄位码
MOV AL,0H
OUT DX,AL;数码管熄灭
MOV BH,0
AND BL,0FH ;显示低四位~8421~0-F
CALL LED_1
MOV DX,PC ;选择低四位，即PC0置为1
MOV AL,1H
OUT DX,AL
MOV DX,PC ;熄位码
MOV AL,0H
OUT DX,AL;数码管熄灭
; POP BX;调回保存的数，备用
; PUSH BX;重新保存
POP BX
POP CX
RET
LED_S ENDP
;读取A口数据
READ_PA PROC
PUSH DX
PUSH AX
PUSH CX
LOOP_CHECK:
MOV BH,0
MOV BL,DAT
CALL LED_S
MOV DX,PC ;8255 C口读入
IN AL,DX
TEST AL,80H ;判断PC7
JNZ LOOP_CHECK
MOV DX,PA
IN AL,DX
MOV DAT,AL
LOOP_C:
MOV BH,0
MOV BL,DAT
CALL LED_S
MOV DX,PC ;8255 C口读入
IN AL,DX
TEST AL,80H ;判断PC7
JZ LOOP_C
POP CX
POP AX
POP DX
RET
READ_PA ENDP
;电脑终端显示字符程序
DISP_DAT PROC
PUSH DX
PUSH AX
PUSH CX
MOV AL,DAT
MOV CL,4
SHR AL,CL
AND AL,0FH
CMP AL,0AH;和10比较
JC S1;BCD码 修正 ;〈10直接S1
ADD AL,7H;>9 要+7，用于进位
S1:
ADD AL,30H;加上0的ASCII码
MOV DL,AL ;高四位显示在屏幕上
MOV AH,02H
INT 21H
MOV AL,DAT;DFFGGFG
AND AL,0FH
CMP AL,0AH
JC S2
ADD AL,7H
S2:
ADD AL,30H
MOV DL,AL ;低四位显示在屏幕上
MOV AH,02H
INT 21H
MOV DL,' ' ;显示空格
MOV AH,02H
INT 21H
POP CX
POP AX
POP DX
RET
DISP_DAT ENDP
;初始化8255
Init_8255 PROC
PUSH DX
PUSH AX
MOV DX,CTL ;8255方式字控制字控制；10011000
MOV AL,98H
OUT DX,AL
POP AX
POP DX
RET
Init_8255 ENDP
CODE ENDS
END START
