【導(dǎo)讀】在實(shí)時(shí)檢測(cè)和自動(dòng)控制的單片機(jī)應(yīng)用系統(tǒng)中，單片機(jī)往往作為一個(gè)核心部件。來使用，僅單片機(jī)方面知識(shí)是不夠的，還應(yīng)根據(jù)具體硬件結(jié)構(gòu)軟硬件結(jié)合，加以完善。十字路口車輛穿梭，行人熙攘，車行車道，人行人道，有條不紊。靠的就是交通信號(hào)燈的自動(dòng)指揮系統(tǒng)。交通信號(hào)燈控制方式很多。燈控制器，實(shí)現(xiàn)了能根據(jù)實(shí)際車流量通過8051芯片的P1口設(shè)置紅、綠燈燃亮?xí)r間的功能；可通過雙位數(shù)碼管顯示。本系統(tǒng)實(shí)用性強(qiáng)、操作簡(jiǎn)單、擴(kuò)展功能強(qiáng)。

　　

【正文】 L DELAY AJMP AGAIN RED: MOV A,P1 ANL A,7FH 。 置 0 MOV R7,00H 。R7 清零 MOV R7,A 。存入東西方向紅燈初始時(shí)間 MOV R3,A LCALL DISP1 LCALL DELAY 徐州工程學(xué)院畢業(yè) 論文 20 AJMP AGAIN 。 N0: SETB TR0 。啟動(dòng) T0 計(jì)時(shí)器 MOV 76H,R7 。紅燈時(shí)間存入 76H N00: MOV A,76H 。東西方向禁止，南北方向通行 MOV R3,A MOV DPTR,0000H 。置 8255A 口，東西方向紅燈亮，南北方向綠燈亮 MOV A,0DDH MOVX @DPTR, A N01: JB ,B0 N02: SETB CJNE R3,00H,N01 。比較 R3 中的值是否為 0，不為 0 轉(zhuǎn)到當(dāng)前指令處執(zhí)行 。黃燈閃爍 5 秒程序 N1: SETB MOV R3,05H MOV DPTR,0000H 。置 8255A 口，東西，南北方向黃燈亮 MOV A,0D4H MOVX @DPTR,A N11: MOV R4,00H N12: CJNE R4,7DH,$ 。黃燈持續(xù)亮 秒 N13: MOV DPTR,0000H 。 置 8255A 口，南北 方向黃燈滅 MOV A,0DDH MOVX @DPTR,A N14: MOV R4,00H CJNE R4,7DH,$ 。黃燈持續(xù)滅 秒 CJNE R3,00H,N1 。閃爍時(shí)間達(dá) 5 秒則退出 。 N2: MOV R7,00H MOV A,R0 。東西通行，南北禁止 MOV R3,A MOV DPTR,0000H 。 置 8255A 口，東西方向綠燈亮，南 北方向紅燈亮 MOV A,0EBH MOVX @DPTR,A N21: JB ,T03 N22: CJNE R3,00H,N21 。黃燈閃爍 5 秒程序 N3: MOV R3,05H 徐州工程學(xué)院畢業(yè) 論文 21 MOV DPTR,0000H 。置 8255A 口，東西，南北方向黃燈亮 MOV A,0E2H MOVX @DPTR,A N31: MOV R4,00H CJNE R4,7DH,$ 。黃燈持續(xù)亮 秒 N32: MOV DPTR,0000H 。 置 8255A 口，南北方向黃燈滅 MOV A,0EBH MOVX @DPTR,A N33: MOV R4,00H CJNE R4,7DH,$ 。黃燈持續(xù)滅 秒 CJNE R3,00H,N3 。閃爍時(shí)間達(dá) 5 秒則退出 SJMP N00 。闖紅燈報(bào)警程序 B0: MOV R2,03H 。報(bào)警持續(xù)時(shí)間 3 秒 B01: MOV A,R3 JZ N1 。若倒計(jì)時(shí)完畢，不再報(bào)警 CLR 。報(bào)警 CJNE R2,00H,B01 。判斷 3 秒是否結(jié)束 SJMP N02 。1 秒延時(shí)子程序 N7: RETI T0_INT:MOV TL0,9AH 。給定時(shí)器 T0 送定時(shí) 10ms 的初值 MOV TH0,0F1H INC R4 INC R5 CJNE R5,0FAH,T01 。判斷延時(shí)是否夠一秒，不夠則調(diào)用顯示子程序 MOV R5,00H 。R5 清零 DEC R3 。倒計(jì)時(shí)初值減一 DEC R2 。報(bào)警初值減一 T01: ACALL DISP 。調(diào)用顯示子程序 RETI 。中斷返回 。顯示子程序 DISP: JNB ,T02 DISP1: MOV B,0AH MOV A,R3 。R3 中值二轉(zhuǎn)十顯示轉(zhuǎn)換 DIV AB MOV 79H,A MOV 7AH,B 徐州工程學(xué)院畢業(yè) 論文 22 DIS: MOV A,79H 。顯示十位 MOV DPTR,TAB MOVC A,@A+DPTR MOV DPTR,0002H MOVX @DPTR,A MOV DPTR,0001H MOV A,0F7H MOVX @DPTR,A LCALL DELAY DS2: MOV A,7AH 。顯示個(gè)位 MOV DPTR,TAB MOVC A,@A+DPTR MOV DPTR,0002H MOVX @DPTR,A MOV DPTR,0001H MOV A,0FBH MOVX @DPTR,A RET 。東西方向車流量檢測(cè)程序 T03: MOV A,R3 SUBB A,00H 。若綠燈倒計(jì)時(shí)完畢，不再檢測(cè)車流量 JZ N3 JB ,T03 INC R7 CJNE R7,64H,E1 MOV R7,00H 。中斷到 100 次則清零 E1: SJMP N22 。東西方向車流量顯示程序 T02: MOV B,0AH MOV A,R7 。R7 中值 二轉(zhuǎn)十顯示轉(zhuǎn)換 DIV AB MOV 79H,A MOV 7AH,B DIS3: MOV A,79H 。顯示十位 MOV DPTR,TAB MOVC A,@A+DPTR MOV DPTR,0002H MOVX @DPTR,A 徐州工程學(xué)院畢業(yè) 論文 23 MOV DPTR,0001H MOV A,0F7H MOVX @DPTR,A LCALL DELAY DS4: MOV A,7AH 。顯示個(gè)位 MOV DPTR,TAB MOVC A,@A+DPTR MOV DPTR,0002H MOVX @DPTR,A MOV DPTR,0001H MOV A,0FBH MOVX @DPTR,A LJMP N7 。延時(shí) 4MS 子程序 DELAY: MOV R1,0AH LOOP: MOV R6,64H NOP LOOP1: DJNZ R6,LOOP1 DJNZ R1,LOOP RET 。字符表 TAB: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH END 附 錄 2 交通燈硬件線路圖 徐州工程學(xué)院畢業(yè) 論文 24 P1_0 (TIM2)2P1_1 (TIM2EX)3P1_24P1_35P1_46P1_5 (MOSI)7P1_6 (MISO)8P1_7 (SCK)9RESET10P3_0 (RXD)11P3_1 (TXD)13P3_2 (INT0)14P3_3 (INT1)15P3_4 (TIM0)16P3_5 (TIM1)17P3_6 ( WR )18P3_7 ( RD )19X2 (OUT)20X1 (IN)21GND22P2_0 (A8)24P2_1 (A9)25P2_2 (A10)26P2_3 (A11)27P2_4 (A12)28P2_5 (A13)29P2_6 (A14)30P2_7 (A15)31PSEN32ALE / PROG33VPP / EA35P0_7 (AD7)36P0_6 (AD6)37P0_5 (AD5)38P0_4 (AD4)39P0_3 (AD3)40P0_2 (AD2)41P0_1 (AD1)42P0_0 (AD0)43VCC44NC12NC23NC34NC1AT89S5224JIwhite black5V1230pF30pFS122uF5VS21 2 3 4 5 6 7 816 15 14 13 12 11 109123456781615141312111091 2 3 4 5 6 7 816 15 14 13 12 11 1095VD27O15O39GND10O515D38O412O719D03D718D514O02D413D14VCC20D617OE1O26LE11O616SN74LS373N5VRED1GREEN2YELLOW2RED2YELLOW1GREEN1A11A26f2g3e4d5c8DP7b9a10f2g3e4d5c8DP7b9a101OE11A121A241A361A48GND101Y4121Y3141Y2161Y118VCC202Y432Y352Y272Y192A1112A2132A3152A4172OE195V5V31 2 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 2040 39 38 37 36 35 34 33 32 31 30 29 28 27 26 25 24 23 22 21PA3 PA2 PA1 PA0 RD CS GND A1 A0 PC7 PC6 PC5 PC4 PC0 PC1 PC2 PC3 PB0 PB1 PB2PB3PB4PB5PB6PB7VccD7D6D5D4D3D2D1D0RESETWRPA7PA6PA5PA482555VA11A26RED5VVC