【正文】 命令字 MOV DPTR,0 。DPTR 指向狀態(tài)口WAIT1: MOVX A,@DPTR 。查詢當前狀態(tài) JB ,WAIT1 。清除RAM未結束則等待 MOV DPTR,100H MOV A,2AH MOVX @DPTR,A 。對CLK進行10分頻得到100KHZ CLR A MOVX @DPTR,A 。置8位顯示左入編碼掃描雙鍵互鎖 SETB 。禁止訪問7279 RETDISP1: MOV R2,4 。4位顯示 MOV R0,ADRES3 。取顯示代碼首址 MOV DPTR,100H MOV A,90H 。從0單元寫段碼，地址自動加1 CLR 。選通7279 MOVX @DPTR,A 。向7279送寫顯示RAM命令LOOP1:MOV A,@R0 。讀顯示代碼 INC R0 MOV @A+DPTR 。轉換成字型碼 MOV DPTR,0 MOVX @DPTR,A 。送出顯示 DJNZ R2,LOOP1 。4個字符未顯示完則繼續(xù) SETB 。禁止訪問7279ADRES5: DB 3FH,06H,5BH,4FH,66H,7DH,07H DB 7FH,6FH,77H,7CH RETKEY2: CLR MOV DPTR,PORT+1 MOV A,0D1H MOVX @DPTR,AWREP: LCALL DISP1 MOV DPTR,PORT+1 MOVX A,07H JZ WREPKEYN: MOV DPTR,PORT MOVX A,@DPTR MOV R1,A ANL A,07H MOV R2,A MOV A,R1 ANL A,38H RR A RR A RR A MOV R3,A CJNE R3,00H,LINE1 MOV A,R2 LJMP QUITLINE1:CJNE R3,01H,LINE2 MOV A,R2 ADD A,04H LJMP QUITLINE2: MOV A,R2 ADD A,08HQUIT: RETREADAD: MOV DPTR, ADPORT+LU1 CLR A MOVX @DPTR, A 。 START A/D MOV A, 80 DJNZ ACC, $ 。 DELAY MOVX A, @DPTR MOV B,A MOV A,0FFH CLR C SUBB A,B RETREADTEMP: MOV R1, 0 MOV R2, 0 MOV R0, 16RLOOP: CALL READAD ADD A, R2 MOV R2, A JNC GN1 INC R1GN1: DJNZ R0, RLOOP MOV A, R2 SWAP A ANL A, 0FH XCH A, R1 SWAP A ANL A, 0F0H ORL A, R1 。A = R1R2/16 MOV B, (HIGHTEMPLOWTEMP) MUL AB MOV A, B 。 /256 ADD A, LOWTEMP MOV CURTEMP, A RETSPEC: MOV BE,00H MOV BE+1,00H LCALL KEY2 ANL A,0FH MOV BE,ASPEC1: LCALL KEY2 。獲取鍵值 ANL A,0FH 。取低四位 MOV R2,A MOV BE+1,A LCALL DISP1 。顯示更新數(shù)據(jù) MOV A,BE SWAP A MOV BE,A MOV A,BE+1 ORL A,BE MOV BE,A LCALL HD 。調用1016進制轉換程序 MOV A,R2 CJNE A,0CH,SPEC MOV A,BE RETSTART: MOV SP,60H MOV A,00H LCALL INIT7279 SETB EX0 。允許INT0中斷 SETB IT0 。INT0為邊沿觸發(fā) SETB EA 。開中斷 HIGIO: 。最大最小溫度值設定子程序 LCALL DISP1 LCALL KEY2 CJNE A,0AH,MIN 。輸入是A則轉最大值輸入設定 LCALL SPEC MOV BE,A LJMP ENDRMIN: CJNE A,0BH,LU1 。輸入是B則轉最小值輸入設定 LCALL SPEC MOV BE+1,A LJMP ENDRLU1: CJNE A,01H,LU2 。是1則顯示1路溫度 MOV LU,01H LCALL COMP1LU2: CJNE A,02H,LU3 。是2則顯示2路溫度 MOV LU,02H LCALL COMP1LU3: CJNE A,03H,LU4 。是3則顯示3路溫度 MOV LU,03H LCALL COMP1LU4: CJNE A,04H,LU5 。是4則顯示4路溫度 MOV LU,04H LCALL COMP1LU5: CJNE A,05H,LU6 。是5則顯示5路溫度 MOV LU,05H LCALL COMP1LU6: CJNE A,06H,LU7 。是6則顯示6路溫度 MOV LU,06H LCALL COMP1LU7: CJNE A,07H,LU8 。是7則顯示7路溫度 MOV LU,07H LCALL COMP1LU8: CJNE A,08H,HIGIO 。是8則顯示8路溫度 MOV LU,08H LCALL COMP1 LJMP ENDRCOMP: CLR C SUBB A,B JC ALARM 。CY=1 JZ ALARM 。相減為0 RETALARM: PUSH PSW PUSH A 。報警，接P1口，輸出模擬 MOV A,01H MOV ,A 。是否有問題？ MOV R4,60 。延時XX： CALL DELAYY DJNZ R4,XX CLR POP A POP PSW RETIDELAYY: MOV R6,0DELAY1: MOV R7,0DELAY2: DJNZ R7,DELAY2 DJNZ R6,DELAY1 RETCOMP1: LCALL READTEMP MOV A,CURTEMP MOV B,BE LCALL COMP MOV B,CURTEMP MOV A,BE+1 LCALL COMP MOV ADRES3,CURTEMP LCALL DISP1 SJMP ENDR RETHD: MOV A,BE MOV B,0AH MUL AB MOV R1,BE+1 ADD A,R1 MOV B,10H DIV AB ANL A,0FH SWAP A MOV BE+1,B ANL BE+1,0FH MOV R1,00H ORL A,BE+1 RETENDR: LJMP HIGIO 。返回，繼續(xù)顯示 END插圖索引圖1 總體設計框圖 4圖2 溫度采集及調理電路 6圖3 89C51和ADC0809的連接 7圖4 鍵盤及顯示電路原理圖 9圖5 主程序流程圖 10圖6 顯示子程序（DISP1）流程圖 11圖7 比較程序流程圖 11圖8 十十六進制轉換子程序流程圖 12圖9 鍵中斷處理顯示子程序KEY2 12圖10 溫度比較子程序（COMP1） 13圖11 報警中斷子程序 13圖12 鍵值處理子程序流程圖（SPEC） 14圖13 溫度采樣及處理子程序（READTEMP、READAD