8086系统 8255并行 交通灯控制程序(汇编程序代码+详细注释内容).docVIP

DATAS SEGMENT ;此处输入数据段代码 CONADD EQU 21BH ;控制寄存器端口地址 BADD EQU 219H ;B口地址 CADD EQU 21AH ;C口地址 DATAS ENDS STACKS SEGMENT ;此处输入堆栈段代码 STACKS ENDS CODES SEGMENT ASSUME CS:CODES,DS:DATAS,SS:STACKS START: MOV AX,DATAS MOV DS,AX ;此处输入代码段代码 ;ORG 2000H ;定义起始地址 XOR CH,CH XOR AH,AH MOV AL,80H ;1 00 0 0 0 0 0B方式0，输出 MOV DX,CONADD ;写控制字 OUT DX,AL MOV AL ;东西方向全红 （接高四位） MOV DX,BADD ;DX保存Bd口地址 OUT DX,AL MOV AL ;南北方向全红 MOV DX,CADD OUT DX,AL CALL DELAY1 ;延时 S: MOV AL,1101111B MOV DX,BADD ;东西方向 绿灯亮，起始状态 OUT DX,AL MOV AL ;南北方向红灯亮 MOV DX,CADD OUT DX,AL CALL DELAY2 ;长延时 MOV CX,0005H ;黄灯闪5次 Y1: MOV AL MOV DX,BADD OUT DX,AL MOV AL MOV DX,CADD OUT DX,AL ;黄灯亮 CALL DELAY3 MOV AL MOV DX,BADD OUT DX,AL MOV AL MOV DX,CADD OUT DX,AL ;黄灯灭 CALL DELAY3 LOOP Y1 MOV AL MOV DX,BADD OUT DX,AL MOV AL MOV DX,CADD ;东西红灯，南北绿灯 OUT DX,AL CALL DELAY2 ;长延时 MOV CX,0005H ;黄灯闪5次 Y2: MOV AL MOV DX,BADD OUT DX,AL MOV AL MOV DX,CADD OUT DX,AL CALL DELAY2 MOV AL MOV DX,BADD OUT DX,AL MOV AL MOV DX,CADD OUT DX,AL CALL DELAY2 LOOP Y2 MOV AH,1;待定，有键按下退出 INT 16H JZ S MOV AH,4CH INT 21H ;回到起始状态，不断循环 DELAY1 PROC NEAR ;短延时子过程 PUSH CX ;CX入栈保护（保护外循环次数） MOV CX,08