【正文】 A,6EH 。取當前進程碼 CJNE A,01H,GX1 。當前狀態(tài)是否為常態(tài)？ CJNE R7,9,GX 。判斷是否該顯示時間？ LCALL CTIME 。調用時間拆字子程序 LJMP GX4 。返回 GX:LCALL CWENDU 。否，則調用溫度拆字子程序 SJMP GX4 。返回 GX1:CJNE A,02H,GX4 。判斷是否為02進程 MOV 37H,15 。送F的字符到左邊第一個數碼管 MOV 36H,16 。送字符所在的字段碼表的位置 MOV 34H,19 。熄滅34H單元所對應的數碼管 MOV 31H,19 。熄滅35H單元所對應的數碼管 GX4:RET CTIME:MOV R0,3AH 。時間拆字子程序。秒、分、時單元首地址(秒單元) MOV R1,30H 。顯示緩沖單元首地址(對應于最右位) CTIME1:MOV A,@R0 。取當前BCD碼 ANL A,0FH 。保留低4位（個位） MOV @R1,A 。送顯緩當前個位單元 INC R1 。指向顯緩十位單元 MOV A,@R0 。再取當前BCD碼 ANL A,0F0H 。保留高4位（十位） SWAP A 。交換到低4位 MOV @R1,A 。送顯緩當前十位單元 INC R1 。指向顯緩下一個個位單元 INC R1 。 INC R0 。指向下一個時間BCD碼單元 CJNE R0,3DH,CTIME1 。未完繼續(xù) MOV 32H,16 MOV 35H,16 RET CWENDU:MOV 37H,6DH 。溫度拆字子程序。當前路次值放入37H中 MOV 30H,21 。溫度C顯示位 MOV 31H,20 。符號176。顯示位 MOV 36H,19 ?？崭? MOV A,34H 。十位參數過濾 JNB ,W1 。最高位是否為1？ MOV 35H,10H 。是，顯示號 LJMP W3 W1:MOV 35H,19 。否，改為滅掉 W3:CLR 。最高位清零 JNZ W2 。累加器A非零跳轉是否為零十位是否零？ MOV 34H,19 。十位為零，滅掉 LJMP W4 W2:MOV 34H,A ?；卮? W4:RET DISP:MOV R6,6EH 。取當前進程碼 MOV R0,30H 。顯示更新子程序。顯示緩沖單元首地址 MOV R3,01H 。字位碼初值（從最右位起） MOV A,R3 DISP1:MOV DPTR,0FEFDH 。 8255B口（字位碼輸出口） MOVX @DPTR,A 。 輸出當前字位碼 MOV A,@R0 。 取當前位顯示數據碼 ADD A,TABNET1 。 加TAB與NEXTPC差址 MOVC A,@A+PC 。 查表得相應字段碼 NET1:CJNE R0,33H,NET 。是否轉到33H單元？ CJNE R6,01,NET 。是，在判斷是否是狀態(tài)01H？ ANL A,7FH 。是，個位增加小數點 NET:MOV DPTR,0FEFCH 。 8255A口（字段碼輸出口） MOVX @DPTR,A 。 輸出字段碼 LCALL D1MS 。 保持顯示1毫秒 INC R0 。 指向下一顯示緩沖單元 MOV A,R3 。 取出字位碼 JB ,DISP2 。 判已顯示到最左位否 RL A 。 未完,字位碼左移1位 MOV R3,A 。 回存新字位碼 LJMP DISP1 。 轉下一位的顯示驅動 DISP2:RET TAB:DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H 。0~9 顯示字段碼表 DB 88H,83H,0C6H,0A1H,86H,8EH,0BFH,89H,00H,0FFH 。AF,,H,全亮,全滅 DB 9CH,0C6H,0A4H,92H 。176。,C度39。SDONGJIE:JB ,DONE1 。凍結判斷子程序。判PB0下降沿 JNB ,DONE1 CPL F0 。取反標志位 DONE1:RET 。判斷完成，返回QIEHUAN:JB ,DONE1 。凍結判斷子程序。判PB1下降沿 JNB ,DONE1 INC 6DH 。路次按18加一 MOV A,6DH 。判斷當前的路次值是否到達第九路？？ CJNE A,10,DONE1 。 MOV 6DH,1 。是，置為第一路 RET 。返回 ZDXUNX:JB F0,BACK1 。自動巡顯節(jié)拍控制子程序。檢測當前的凍結位 MOV A,3EH 。非凍結狀態(tài) CJNE A,3FH,BACK 。判斷節(jié)拍值是否已到？ MOV 3EH,0 。已到，中斷次數計數單元清零 INC 6DH 。路次加一 LCALL WDNM 。調用AD轉化為溫度內碼的子程序 LCALL NEI2BCD 。調用T內碼轉BCD碼子程序 MOV A,6DH 。判斷是否已到第九路?? CJNE A,10,BACK 。 MOV 6DH,1 。置為第一路 BACK:RET 。返回 BACK1:LCALL WDNM 。凍結狀態(tài)。調用AD值轉化為溫度內碼的子程序 LCALL NEI2BCD 。調用T內碼轉BCD碼子程序 RET KEY:MOV A,81H 。鍵盤掃描子程序 MOV DPTR,0FEFFH MOVX @DPTR,A 。C口先初始化為高4位輸出驅鍵行線、低4位輸入鍵列線 MOV DPTR,0FEFEH 。鍵盤行線(高4位)輸出驅動全39。039。 MOV A,00H MOVX @DPTR,A MOVX A,@DPTR 。輸入鍵盤列線電平(低4位) MOV 67H,A MOV A,88H 。C口改初始化為高4位輸入驅鍵行線、低4位輸出驅鍵列線 MOV DPTR,0FEFFH MOVX @DPTR,A MOV DPTR,0FEFEH 。鍵盤列線(低4位)輸出驅動全39。039。 MOV A,00H MOVX @DPTR,A MOVX A,@DPTR 。輸入鍵盤行線電平(高4位) ANL 67H,0FH 。列線電平值保留所在的低4位 ANL A,0F0H 。行線電平值保留所在的高4位 ORL 67H,A 。兩次輸入的列線、行線電平組合成8位行列碼 MOV 66H,00H 。鍵號初值為00H MOV R5,10H 。將進行16個鍵碼查表 MOV DPTR,KEY_N 。鍵碼表首地址 KY:MOV A,00H MOVC A,@A+DPTR 。查表讀取鍵碼表中當前位置鍵碼 CJNE A,67H,NK 。與8位行列碼比較，不同則轉NK查下一個 SJMP KN 。相同則轉KN根據已獲取的鍵號進行相應處理 NK:INC 66H 。鍵號加1 INC DPTR 。指向鍵值表下一個位置 DJNZ R5,KY 。未查完，繼續(xù) MOV 66H,0FFH 。查完，說明無按鍵或出現異常行列碼，存儲新的鍵號 KN:MOV 65H,64H 。已找到鍵號，存儲上一次的鍵號 MOV 64H,66H 。存儲新的鍵號 RET KEY_N:DB 0EEH,0EDH,0EBH,0E7H 。鍵碼K0,K1,K2,K3 DB 0DEH,0DDH,0DBH,0D7H 。鍵碼K4,K5,K6,K7 DB 0BEH,0BDH,0BBH,0B7H 。鍵碼K8,K9,K10,K11 DB 7EH,7DH,7BH,77H 。鍵碼K12,K13,K14,K15 SDJP:MOV A,64H 。設定節(jié)拍子程序 CJNE A,0FFH,KBACK 。 MOV A,65H 。 CJNE A,0FFH,KBACK1 。 LJMP KBACK 。 KBACK1:CJNE A,10,KBACK2 。是否是按鍵F? MOV 33H,19 MOV 32H,19 MOV 30H,19 MOV 35H,19 MOV 6EH,02H 。修改進程碼 SETB 。 MOV R7,A 。把A的值暫時存放在R7中 MOV A,24H 。取超時操作的設定的單元 CJNE A,23H,KBACK2 。不等的時候直接返回 MOV A,R7 。回存A的值 MOV 23H,00H 。23H單元清零 MOV 6EH,01H 。修改進程碼 CLR LJMP KBACK 。 KBACK2:CJNE A,11,KBACK3 。是否是按鍵S？ MOV 30H,22 。顯示S字符 。修改進程碼 KBACK3:CJNE A,12,KBACK4 。是否是按鍵C？ MOV 6EH,01H 。修改進程碼 CLR 。 LJMP KBACK JNB ,KBACK 。沒按下F鍵的時候直接返回 KBACK4:CJNE A,0,KBACK5 。是否是按鍵0？ MOV 35H,0 KBACK5:CJNE A,1,KBACK6 。是否是按鍵1？ MOV 35H,1 KBACK6:CJNE A,2,KBACK7 。是否是按鍵2？ MOV 35H,2 KBACK7:CJNE A,3,KBACK8 。是否是按鍵3？ MOV 35H,3 KBACK8:CJNE A,4,KBACK9 。是否是按鍵4？ MOV 35H,4 KBACK9:CJNE A,5,KBACK10 。是否是按鍵5？ MOV 35H,5 KBACK10:CJNE A,6,KBACK11 。是否是按鍵6？ MOV 35H,6 KBACK11:CJNE A,7,KBACK12 。是否是按鍵7？ MOV 35H,7 KBACK12:CJNE A,8,KBACK13 。是否是按鍵8？ MOV 35H,8 KBACK13:CJNE A,9,KBACK 。是否是按鍵9？ MOV 35H,9 KBACK:RET CAIJIWD:MOV DPH,0FBH 。寫外部數據指針高8位采用8路溫度滾存。 MOV DPL,69H 。讀取外部數據指針低八位 MOVX A,@DPTR 。讀取上一次AD轉換的結果 MOV 68H,A 。暫存結果 MOV A,DPL 。數據指針低八位放入累加器中，AD數據存儲地址 SUBB A,0F7H 。減去F7H MOV B,4 。再乘以4 MUL AB 。 ADD A,3EH 。再加上3EH MOV R0,A 。R0指向寫數據的首地址 MOV A,@R0 。讀取該單元的數據 INC R0 。指針加一 MOV @R0,A 。在該單元放入前個單元的數據 DEC R0 。指針連續(xù)后退兩次 DEC R0 。 MOV A,@R0 。讀取該單元的數據 INC R0 。指針加一 MOV @R0,A 。在該單元放入前個單元的數據 DEC R0 。指針連續(xù)后退兩次 DEC R0 。 MOV A,@R0 。讀取該單元的數據 INC R0 。指針加一 MOV @R0,A 。在該單元放入前個單元的數據 DEC R0 。指針后退一次 MOV A,68H 。讀取最新的數據 MOV @R0,A 。在該單元放入最新的數據 INC DPL 。數據指針低八位加一，準備轉換下一路 MOV A,DPL 。 MOV 69H,A 。存儲數據指針低八位 CJNE A,00H,AD1 。判斷八路是否全部轉換過？？ MOV DPL,0F8H 。是，重新從