8255接口实验.docVIP

实验一 双色灯实验 D1 EQU 10H 定义延时时间参数 D2 EQU 200H 定义延时时间参数 DATA SEGMENT PB DB ? DATA ENDS STACK SEGMENT STACK STA DW 50 DUP(?) TOP EQU LENGTH STA STACK ENDS CODE SEGMENT ASSUME CS:CODE,DS:DATA START: PUSH CS POP DS MOV DX,203H 设置A口为工作方式0，全输出， MOV AL,80H ; 203H为控制口地址 OUT DX,AL MOV DX,200H MOV AL,00 ;清LED，LED灯全灭 OUT DX,AL MOV DX,200H MOV AL,0F0H ;全红（状态0） OUT DX,AL MOV BX,7fH 设置延时参数 CALL DLY 调用延时程序 BG: MOV AL OUT DX,AL ;南北绿亮,东西红亮（状态1） MOV BX,D2 CALL DLY 延时一段时间 MOV CX,03H 置循环次数：3次 XH1: AND AL,0F5H ;南北绿灭，东西红亮（状态2） OUT DX,AL MOV BX,D1 CALL DLY 延时一段时间 OR AL,0aH ; 南北绿亮，东西红亮（状态2） OUT DX,AL MOV BX,D1 CALL DLY 延时一段时间 LOOP XH1 OR AL,0a0H ;南北黄亮，东西红亮（状态2） OUT DX,AL MOV BX,D1 延时一段时间 CALL DLY MOV BX,D1 再延时一段时间 CALL DLY MOV AL ;南北红亮,东西绿亮（状态3） OUT DX,AL MOV BX,D2 CALL DLY 延时一段时间 MOV CX,03 置循环次数：3次 XH2: AND AL,0FaH 南北红亮,东西绿灭（状态4） OUT DX,AL MOV BX,D1 CALL DLY 延时一段时间 OR AL,05H 南北红亮,东西绿亮（状态4） OUT DX,AL MOV BX,D1 CALL DLY 延时一段时间 LOOP XH2 OR AL,50H 南北红亮,东西黄亮（状态4） OUT DX,AL MOV BX,D1 CALL DLY 延时一段时间 MOV BX,D1 CALL DLY 再延时一段时间 JMP BG 转状态1 DLY PROC NEAR 延时子程序 PUSH CX DDD: MOV CX,2ffH C