【正文】 V A, 80H 。給8255賦初值，8255工作于方式0 MOVX @DPTR, A。設(shè)定初值A(chǔ)GAIN: JB ,N0 。判斷是否要設(shè)定東西方向紅綠燈時間的。初值， 則跳轉(zhuǎn) MOV A,P1 JB ,RED 。，若為1則設(shè)定紅燈時間。否則設(shè)定綠燈時間 MOV R0,A 。存入東西方向綠燈初始時間值 MOV R3,A LCALL DISP1 。調(diào)東西方向時間顯示子程序 AJMP AGAINRED: MOV A,P1 ANL A,7FH MOV R1,A 。存入東西方向紅燈初始時間值 MOV R3,A LCALL DISP1 AJMP AGAIN。東西方向紅燈倒計時顯示，南北方向綠燈倒計時顯示N0: SETB TR0 。啟動T0定時器 MOV 66H,R1 。東西方向紅燈時間存入66H中，也是南北方向綠燈時間MOV 67H,R0。東西方向綠燈時間存入67H中，也是南北方向紅燈時間MOV 68H,00H 。 68H單元清零，用來記錄車流量CLR 08H 。通過檢測位地址08H來判斷外部中斷是用來報警還。是用來檢測車流量 MOV R3,66H N01: LCALL DISP1 。東西方向數(shù)碼管顯示紅燈時間 LCALL DISP2 。 南北方向數(shù)碼管顯示綠燈時間 MOV DPTR,0000H 。置8255A口，東西方向紅燈亮，南北方向綠燈亮 MOV A,0EEH MOVX @DPTR, A CJNE R3,00H,N01 。比較R3中的值是否為0，不為0轉(zhuǎn)到N01處執(zhí)行。黃燈閃爍5秒SETB LCALL F0 。調(diào)黃燈閃爍5s子程序。東西方向綠燈倒計時顯示，南北方向紅燈倒計時顯示 SETB 08H MOV 68H,00H 。 68H單元清零MOV R3,67HN1: L CALL DISP1 。東西方向數(shù)碼管顯示綠燈時間 LCALL DISP2。 南北方向數(shù)碼管顯示紅燈時間 MOV DPTR,0000H 。置8255A口，東西方向綠燈亮，南北方向紅燈亮 MOV A,0F5H MOVX @DPTR, A CJNE R3,00H,N1 。判斷倒計時是否結(jié)束。黃燈閃爍5秒 SETB LCALL F0 。調(diào)黃燈閃爍5s子程序 LJMP AGAIN 。反復(fù)循環(huán)執(zhí)行。主程序完,以下為子程序。1S中斷子程序T0_INT: INC R4 。R4每50ms加1 MOV TH0,3CH 。重裝定時器T0初值 MOV TL0,0B0H DJNZ 65H,NEXT 。判斷計時是否到1s，不到轉(zhuǎn)NEXTMOV 65H,14H ?；謴?fù)65H存儲器中的值DEC R3 。倒計時初值減1DEC R2 。報警初值減1LCALL DISP1 。調(diào)時間顯示子程序LCALL DISP2NEXT: RETI。 東西路口紅外對管檢測中斷程序B0: JB 08H,B01LCALL D0 。調(diào)用報警子程序SJMP B02B01: LCALL E0 。調(diào)用車流量與顯示子程序B02: RETI。 南北路口紅外對管檢測中斷程序C0: JB 08H,C01LCALL E0 。調(diào)用車流量與顯示子程序SJMP C02C01: LCALL D0 。調(diào)用報警子程序C02: RETI。東西方向時間顯示子程序DISP1: MOV B,0AH MOV A,R3 。R3中值二轉(zhuǎn)十顯示轉(zhuǎn)換 DIV AB MOV 68H,A MOV 69H,BDS1: MOV A,68H 。顯示十位 MOV DPTR,TAB MOV A,@A+DPTR MOV DPTR,0002H MOVX @DPTR,A MOV DPTR,0001H MOV A,02H MOVX @DPTR,A LCALL DELAYDS2: MOV A,69H 。顯示個位 MOV DPTR,TAB MOV A,@A+DPTR MOV DPTR,0002H MOVX @DPTR,A MOV DPTR,0001H MOV A,01H MOVX @DPTR,ALCALL DELAY RET。南北方向時間顯示子程序DISP1: MOV B,0AH MOV A,R3 。R3中值二轉(zhuǎn)十顯示轉(zhuǎn)換 DIV AB MOV 68H,A MOV 69H,BDS1: MOV A,68H 。顯示十位 MOV DPTR,TAB MOV A,@A+DPTR MOV DPTR,0002H MOVX @DPTR,A MOV DPTR,0001H MOV A,08H MOVX @DPTR,A LCALL DELAYDS2: MOV A,69H 。顯示個位 MOV DPTR,TAB MOV A,@A+DPTR MOV DPTR,0002H MOVX @DPTR,A MOV DPTR,0001H MOV A,04H MOVX @DPTR,ALCALL DELAY RET。黃燈閃爍5s子程序F0: MOV R3，05H 。賦5s初值F01: LCALL DISP1 LCALL DISP2MOV DPTR,0000H 。置8255A口，東西，南北方向黃燈亮 MOV A,0DBH MOVX @DPTR,A MOV R4,00H CJNE R4,0AH,$ 。MOV DPTR,0000H 。置8255A口，東西，南北方向黃燈滅 MOV A,0FFH MOVX @DPTR,AMOV R4,00H CJNE R4,0AH,$ 。CJNE R3,00H, F01 。閃爍時間達5秒則退出 RET。檢測車流量與顯示子程序E0:PUSH R3 。將R3壓入堆棧MOV A,R3JZ E04 。若綠燈倒計時完畢，不再檢測車流量INC 68H 。68H存入車流量CJNE 68H,64H,E01 。中斷100次則清零MOV 68H,00HAJMP E04E01:JB 08H,E02JNB E03 。是否顯示南北方向車流量AJMP E04E02:JNB ，E03 。是否顯示東西方向車流量AJMP E04E03:MOV R3,68HJB 08H,E030LCALL DISP2 。顯示東西方向車流量AJMP E04E030: LCALL DISP1 。顯示南北方向車流量E04: POP R3 。R3出棧RET。報警子程序D0: MOV R2,03H 。報警持續(xù)時間3秒D01: MOV A,R3 JZ D02 。若倒計時完畢，不再報警 CLR 。報警 CJNE R2,00H,D01 。判斷3秒是否結(jié)束 SETB D02: RET。1ms延時子程序DELAY: MOV R6，0FAH 。1ms延時預(yù)定值 DL1: NOP NOPDJNZ R6,DL1 。1ms延時循環(huán) RET 。字形表TAB:DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH END28