交通灯测试程序1.doc

CODE SEGMENTASSUME CS:CODEORG 32F0HP8255: MOV AL, 88H MOV DX, 0FFDBH OUT DX, AL ;控制字送控制器地址 P11: MOV AL, 0B6H MOV DX, 0FFD8H OUT DX, AL MOV AL, 0DH MOV DX, 0FFD9H OUT DX, AL ;红灯全亮 CALL DELAY1 ;调用延时程序MOV AL, 6DH MOV DX, 0FFD8H OUT DX, AL MOV AL, 0BH MOV DX, 0FFD9H OUT DX, AL ;绿灯全亮 CALL DELAY1 ;调用延时程序 JMP P11 ;跳回,重复DELAY1: PUSH AX PUSH CX MOV CX, 0030H DELY2: CALL DELAY2 LOOP DELY2 POP CX POP AX RET ;延时子程序DELAY1DELAY2: PUSH CX MOV CX, 8000H LOOP $ POP CX RET ;延时子程序DELAY2CODEENDSENDP8255 CODE SEGMENTASSUME CS:CODEORG 32F0HP8255: MOV AL, 88H MOV DX, 0FFDBH OUT DX, AL ;控制字送控制器地址 P11: MOV AL, 0B6H MOV DX, 0FFD8H OUT DX, AL MOV AL, 0DH MOV DX, 0FFD9H OUT DX, AL ;红灯全亮 CALL DELAY1 ;调用延时程序 P20: MOV AL, 0AEH MOV DX, 0FFD8H OUT DX, AL MOV AL, 0BH MOV DX, 0FFD9H OUT DX, AL ;13GREEN CALL DELAY1 MOV AL, 0BEH MOV DX, 0FFD8H OUT DX, AL MOV AL, 0FH MOV DX, 0FFD9H OUT DX, AL ;13 DOWN GREEN CALL DELAY2 MOV CX, 08H YELLOWF: MOV AL, 09EH MOV DX, 0FFD8H OUT DX, AL MOV AL, 07H MOV DX, 0FFD9H OUT DX, AL ;13 YELLOW CALL DELAY2 MOV AL, 0BEH MOV DX, 0FFD8H OUT DX, AL MOV AL, 0FH MOV DX, 0FFD9H OUT DX, AL CALL DELAY2 LOOP YELLOWF MOV AL, 0B6H MOV DX, 0FFD8H OUT DX, AL MOV AL, 0DH MOV DX, 0FFD9H OUT DX, AL ;红灯全亮 CALL DELAY1 MOV AL, 075H MOV DX, 0FFD8H OUT DX, AL MOV AL, 0DH MOV DX, 0FFD9H OUT DX, AL ;24GREEN CALL DELAY1 MOV AL, 0F7H MOV DX, 0FFD8H OUT DX, AL MOV AL, 0DH MOV DX, 0FFD9H OUT DX, AL ;24GREEN DOWN CALL DELAY2 MOV CX,08H YELLOWS: MOV AL, 0F3H MOV DX, 0FFD8H OUT DX, AL MOV AL, 0CH MOV DX, 0FFD9H OUT DX, AL ;24 YELLOW CALL DELAY2 MOV AL, 0F7H MOV DX, 0FFD8H OUT DX, AL MOV AL, 0DH MOV DX, 0FFD9H OUT DX, AL ;24 YELLOW CALL DELAY2 LOOP YELLOWS JMP P11 DELAY1: PUSH AX PUSH CX MOV CX, 0030H DELY2: CALL DELAY2 LOOP DELY2 POP CX POP AX RE