【正文】 MOV R3 ， 0AIH MOV R4 ， 00H MOV R1 ， 76H MOV R7 ， 04H 。 讀出 24c02 操作 LCALL EEPR 24 LCALL OSC_ENABLE 。 初始化 1302 時鐘啟動操作 LCALL WRIT_ENABLE 。 初始化 1302 允許數(shù)據(jù)輸入 LCALL R_MANY 。 調(diào) 1302 多字節(jié)讀出程序 SETB TR0 KGXS： LCALL R_MANY *******按鍵掃描程序 ******* JB XSJ ， XSBZ LCALL YS10MS JB XSJ， XSBZ 。 判斷顯示開關鍵 CPL 30H 。 顯示標志位 MOV 7BH ， 75H MOV 7AH ， 74H LCALL XS XSBZ： JB30H ， PDGX 。 判斷標志位 SETB TR1 JB GNJ ， PDGX 。 判斷功能鍵 LCALL YS10MS JB GNJ , PDGX INC 73H ； 功能鍵標志位加 1 MOV A , 1 , POTS。 ； 調(diào)時鐘時 CLR TSZ JB JYJ , PDGX LCALL TS10MS JB JYJ , PDGX 。 加一鍵 INC 75H 。1302 ； 1302 時加一 MOV A , 75H CJNE A , 2 , PDTS MOV 75H ， 0 ； 判斷是否調(diào)到 24 時 PDTS： CJNE A , 2 , POTF JB JYJ , PDTF LCALL YS10MS JB JYJ , PDTF INC 74H 。 1302 分加一 MOV A , 74H CJNE A , 60 ， PDTF MOV 74H ,0 PDTF： CJNE A , 3 ,PDGS SETB TSZ CLR TGLD LCALL W_MANY 。 存 1302 時、分 JB JYJ , PDGS LCALL YS 10MS JB JYJ , PDGS INC 79H 。 關路燈時加一 25 MOV A , 24 , PDGS MOV 79H ， 0 PDGS： CJNE A , 4 , PDKS JB JYJ , PDKS LCALL YS10MS JB JYJ PDKS INC 78H 。 關路燈分加一 CJNE A ,60 , PDKS MOV 78H , 0 PDKS： CJNE A , 5 , PDKF SETB TGLD CLR TKLD JB JYJ PDKF LCALL YS10MS JB JYJ , PDKF INC 77H 。 開路燈時加一 MOV A , 77H CJNE A ,24 , PDKF MOV 77H , 0 PDKF： CJNE A , 6 , PDJS JB JYJ , PDJS LCALL YS10MS JB JYJ , PDJS INC 76H 。 開路燈分加一 MOV A , 76H CJNE A ,60 , PDJS MOV 76H ,0 PDJS： CJNE A , 7 , PDGX MOV 73H ,0 MOV R3 , 0A0H MOV R4 , 00H MOV R1 , 76H MOV R7 , 04H LCALL EEPW 。 向 24c02 存內(nèi)容 SETB TKLD SETB TR0 PDGX ： JB 30H , KGXS CLR TR1 *******中斷 T0 服務程序 ******* T0INT： PUSH PSW PUSH ACC MOV 7H0 , 0D8H MOV TL0 , 0F0H JB RETTT ； 判斷光線強弱 26 JB 32H , WSKD ； 判斷是否已開燈 CLR 31H S ETB 32H WSKD： JB 31H , YSC 。 輸出標志位 MOV A , 75H CJNE A , 79H , KLD 。 比較關燈時間點 MOV 74H CJNE A , 78H , KLD 。 比較關燈分時間點 GLD： SETB 。 關燈 SETB 31H AJMP RETT YSC： MOV A , 75H CJNE A , 77H , GLD MOV A , 74H CJNE A , 76 好， GLD CLR 31H KLD： CLR AJMP RETT RETT： SETB CLR 32H RETT： POP ACC POP PSW RETI *******中斷 T1 服務程序 ********* T1INTPUSH PSW PUSH ACC MOV 7H1, 0D8H MOV TL1 , 0F0H INC 70H MOV A ,70H CJNE A , 30 , FRET MOV A , 73 H CJNE A ,0 , SZSS MOV 7BH , 75H MOV 7AH , 74H AJMP FRET SZSS： CJNE A , 1 , SZSF JB 33H , SSSZ MOV 7BH , 75H MOV 7AH , 74H AJMP FRET SSSZ： MOV 7BH , 0FFH MOV 74H , 74H CPL 33H 27 AJMP FRET SZSF： CJNE A , 2 ， GDSS JB 33H , SFSZ MOV 7BH , 75H MOV 7AH , 74H AJMP FRET SFSZ ： : MOV 7BH , 75H MOV 7AH , 0FFH CPL 33H AJMP FRET GDSS： CJNE A , 3 ,GDSF JB 33H SSGD MOV 7BH , 79H MOV 7AH , 78H AJMP FRET SSGD： MOV 7BH , 0FFH MOV 7AH ,7BH CPL FRET AJMP FRET GDSF： CJNE A , 4 , KDSS JB 33H DFGD MOV 7BH , 79H MOV 7AH , 78H AJMP FRET SFGD： MOV 7BH , 79H MOV 7AH , 0FFH CPL 33H AJMP FRET KDSS： CJNE A , 5 ,KDSF JB 33H ,SSKD MOV 7BH , 77H MOV 7AH , 76H AJMP FRET SSKD： MOV 7BH , 0FFH MOV 7AH , 76H AJMP FRET KDSF： CJNE A , 6 ,FRET JB 33H , SFKD MOV 7BH , 77H MOV 7AH , 76H