【正文】 OUTT00: POP PSW ；恢復(fù)狀態(tài)字（出棧） POP ACC ；恢復(fù)累加器 SETB ET0 ；開放T0中斷 RETI ；中斷返回INT22: DEC TIME MOV A,TIME CJNE A,TIMED1,LOOP111 ； 判斷是否小于110秒LOOP111: JC LOOP221 ； 120110 MOV EW,66H ；I MOV SN,55H ；I LJMP OUTT01 ；120110 LOOP221: MOV A,TIME CJNE A,TIMED2,LOOP331 ； 判斷是否小于70秒 LOOP331: JC LOOP441 ； 11070 MOV EW,6AH ；I MOV SN,59H ；I LJMP OUTT01 ；11070 LOOP441: MOV A,TIME CJNE A,TIMED3,LOOP551 ； 判斷是否小于60秒 LOOP551: JC LOOP661 ； 7060 MOV 20H,EW CPL 04H CPL 00H MOV EW,20H ；I MOV SN,59H ；I LJMP OUTT01 ；7060LOOP661: MOV A,TIME CJNE A,TIMED4,LOOP771 ；判斷是否小于10秒LOOP771: JC LOOP881 ； 6010 MOV EW,99H ；I MOV SN,59H ；I LJMP OUTT01 ；6010LOOP881: MOV A,TIME JZ OUT881 MOV 20H,EW CPL 06H CPL 02H MOV EW,20H MOV 20H,SN CPL 02H MOV SN,20H ；I LJMP OUTT01 ；7060OUT881: MOV TIME,TIMED0 ；120秒初值 CPL SNEWFLAGOUTT01: LCALL TUNBCD POP PSW ；恢復(fù)狀態(tài)字（出棧） POP ACC ；恢復(fù)累加器 SETB ET0 ；開放T0中斷 RETI ；中斷返回； ***************************顯示程序****************************； ； 顯示數(shù)據(jù)在70H75H單元內(nèi)，用六位LED共陽數(shù)碼管顯示，P0口輸出段碼數(shù)據(jù)，P2口作； 掃描控制，每個LED數(shù)碼管亮1MS時間再逐位循環(huán)。 DISPLAY: MOV R1,70H ；指向顯示數(shù)據(jù)首址 MOV R5,0FEH ；掃描控制字初值 PLAY: MOV A,R5 ；掃描字放入A MOV SCAN,A ；從P2口輸出 MOV A,@R1 ；取顯示數(shù)據(jù)到A MOV DPTR,TAB ；取段碼表地址 MOVC A,@A+DPTR ；查顯示數(shù)據(jù)對應(yīng)段碼 MOV LEDOUT,A ；段碼放入P0口 LOOP6: LCALL DL1MS ；顯示1MS INC R1 ；指向下一地址 MOV A,R5 ；掃描控制字放入A JNB ,ENDOUT ；=0時一次顯示結(jié)束 RL A ；A中數(shù)據(jù)循環(huán)左移 MOV R5,A ；放回R5內(nèi) MOV LEDOUT,0FFH AJMP PLAY ；跳回PLAY循環(huán)ENDOUT: MOV LEDOUT,0FFH ；一次顯示結(jié)束，P2口復(fù)位 MOV SCAN,0FFH ；P0口復(fù)位 RET ；子程序返回 TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH,88H,0BFH；共陽段碼表 “0”，“1”，“2”，“3”,“4”，“5”，“6”，“7”，“8”，“9”，“不亮”，“A”，“”。 ******************************延時程序**************************。1MS延時程序，LED顯示程序用DL1MS: MOV R6,14H DL1: MOV R7,19H DL2: DJNZ R7,DL2 DJNZ R6,DL1 RET。10ms延時程序DL10MS: MOV R3,2GODL1: LCALL DLIMS DJNZ R3,GODL1 RET。300ms延時程序DL300MS: MOV R0,12GOON1: LCALL DL10MS DJNZ R5,GOON1 RET將TIME裝換為BCD碼存儲TUNBCD: PUSH ACC PUSH PSW PUSH B MOV A,TIME MOV B,100 DIV AB MOV 72H,A JNZ JJ0 MOV 72H,0AH ；最高位為零，不點亮JJ0: MOV A, B MOV B,10 DIV AB MOV 71H,A JNZ JJ1 MOV A,72H ；次高位為0，先看最高位是否為不亮 SUBB A,0AH JNZ JJ1 MOV 71H,0AH ；最高位不亮，次高位也不亮JJ1: MOV 70H,B POP B POP PSW POP ACC RET；11120車中斷程序；INT11: PUSH ACC PUSH PSW CLR EX1 CLR ET0 CLR TR0 CPL EX1FLAG LCALL DL1MS JNB EX1FALGEX1OVER MOV A,TIME CJNE A,21，GO11GO11： JC GO22 MOV TIMESFR,TIME ；保存道口數(shù)據(jù)GO22： MOV SN,055H ；全紅燈 MOV EW,055H LCALL DL10MS MOV TIME,20 MOV CONR5，20 LCALL TUNBCD SETB ET1 SETB TR1EX1OVER: LCALL DL10MS SETB EX1 POP PSW POP ACC RETI。車輛檢測中斷程序INT22: PUSH ACC PUSH PSW CLR ET0 CLR TR0 CLR TR0 CPL EX1FLAG LCALL DL1MS JNB EX1FALGEX1OVER MOV A,TIME CJNE A,21，GO33GO33： JC GO44 MOV TIMESFR,TIME ；保存道口數(shù)據(jù)GO44： MOV SN,055H ；全紅燈 MOV EW,055H LCALL DL10MS MOV TIME,20 MOV CONR5，20 LCALL TUNBCD SETB ET1 SETB TR1EX1OVER: LCALL DL10MS SETB EX1 POP PSW POP ACC