实验四:8255 控制交通灯实验.doc
文本预览下载声明
实验四 8255控制交通灯实验
1、编写程序:使用8255的PA0..2、PA4..6控制LED指示灯,实现交通灯功能。
2、连接线路验证8255的功能,熟悉它的使用方法。
.MODEL TINY
COM_ADD EQU 0F003H
PA_ADD EQU 0F000H
PB_ADD EQU 0F001H
PC_ADD EQU 0F002H
.STACK 100
.DATA
LED_Data DB ;???÷?ìμ?£???±±oìμ?
DB ;???÷?ìμ?éá??£???±±oìμ?
DB ;???÷??μ?áá£???±±oìμ?
DB ;???÷oìμ?£???±±?ìμ?
DB ;???÷oìμ?£???±±?ìμ?éá??
DB ;???÷oìμ?£???±±??μ?áá
.CODE
START: MOV AX,@DATA
MOV DS,AX
NOP
MOV DX,COM_ADD
MOV AL,80H
OUT DX,AL
MOV DX,PA_Add
MOV AL,0FFH
OUT DX,AL
LEA BX,LED_Data
START1:
MOV AL,0
XLAT
OUT DX,AL
Call DL5S
MOV CX,6
START2:
MOV AL,1
XLAT
OUT DX,AL
CALL DL500mS
MOV AL,0
XLAT
OUT DX,AL
Call DL500ms
Loop Start2
MOV AL,2
XLAT
OUT DX,AL
Call DL3S
MOV DAL,3
XLAT
OUT DX,AL
Call DL5S
MOV CX,6
START3:
MOV AL,4
XLAT
OUT DX,AL
CALL DL500ms
MOV AL,3
XLAT
OUT DX,AL
CALL DL500ms
LOOP START3
MOV AL,5 ;???÷oìμ?£???±±??μ?áá
XLAT
OUT DX,AL
CALL DL3S
JMP START1
DL500ms PROC NEAR
PUSH CX
MOV CX,60000
DL500ms1: LOOP DL500ms1
POP CX
RET
DL500ms ENDP
DL3S PROC NEAR
PUSH CX
MOV CX,6
DL3S1: CALL DL500ms
LOOP DL3S1
POP CX
RET
ENDP
DL5S PROC NEAR
PUSH CX
MOV CX,10
DL5S1: CALL DL500ms
LOOP DL5S1
POP CX
RET
ENDP
END START
显示全部