【正文】 4 位取“ 1” CPL A ；取反，無(wú)鍵按下則全 0 JZ KEY1 ；為 0跳到 KEY1 執(zhí)行，不為 0，調(diào)用 KEY LCALL KEY ；調(diào)用鍵盤處理子程序 KEY1: ORG 0100H MOV R0， 40H ；設(shè)立數(shù)據(jù)存儲(chǔ)區(qū)指針 MOV R2， 02H ； 2 路計(jì)數(shù)值 SETB IT1 ；邊沿觸發(fā)方式 SETB EA ； CPU 開(kāi)中斷 SETB EX1 ；允許外部中斷 1中斷 MOV DPTR, 0000H ；送入口地址并指向 IN0 LCALL WD ；調(diào)用溫度數(shù)據(jù)采集子程序 MOV B,40H ；將存在 40H 中的入口溫度值放入 B 中 CLR C SUBB B,41H ；將 40H 中存儲(chǔ)的入口溫度與 41H 中的出口溫度做差 MOV 42H,B ；結(jié)果存入 42H中 ORG 000BH ； T0中斷 入口 LJMP INT ；轉(zhuǎn)至 INT處 MOV TMOD,01H ； T0 工作于方式 1 MOV TH1， 00H ；設(shè)置計(jì)數(shù)初值 MOV TL1， 00H SETB EA ； CPU 開(kāi)中斷 SETB ET0 ；允許 T0中斷 內(nèi)蒙古工業(yè)大學(xué)畢業(yè)論文 23 SETB TR0 ；啟動(dòng) T0 定時(shí) MOV 70H,00H ；將初值送入 70H 單元中 HALT: SJMP $ ；暫停，等待中斷 INT: LCALL LIUL ； 調(diào)用脈沖數(shù)據(jù)采集子程序 MOV A,42H MOV B,70H。 MUL AB ； MOV 71H,B。 MOV 72H,A。 LCALL B2BCD ；調(diào)用 16位二進(jìn)制數(shù)轉(zhuǎn)化為四位 BCD 子程序 LCALL DIR ；調(diào)用顯示器子程序 SJMP MAIN 鍵盤子程序設(shè)計(jì) 本設(shè)計(jì)主要考慮是利用鍵盤的行掃描的方法來(lái)實(shí)現(xiàn)對(duì)按鍵的掃描和確定。按照?qǐng)D42的程序框架步驟能較快的識(shí)別并且判斷出是否有鍵盤按下，確定被按鍵的功能。 內(nèi)蒙古工業(yè)大學(xué)畢業(yè)論文 24 圖 42 鍵盤掃描子程序 子程序如下： KEY： LCALL KS1 。檢查有閉合鍵否 JNZ LK1 ； A 非 0，有鍵閉合則轉(zhuǎn) LJMP LK8 ；無(wú)鍵閉合則返回 LK1： LCALL DIR ；有鍵閉合，則延時(shí) 12ms LCALL DIR ；消抖 LCALL KS1 ；再次檢查有鍵閉合否 JNZ LK2 ；有鍵閉合則轉(zhuǎn) LJMP LK8 ；無(wú)鍵閉合則返回 LK2: MOV R3， 00H ；行號(hào)初值送 R3 MOV R2， 0EH 。行掃描初值送 R2 LK3: MOV DPTR, 8002H 。指向 8155 口 B Y Y N 8155 初始化 有鍵閉合？ 延時(shí) 12ms，清除閉合抖動(dòng) 逐行掃描鍵盤 找到閉合鍵？ 執(zhí)行其他程序 N Y 形成鍵值 鍵以釋放？ N 延時(shí) 12秒，消除釋放抖動(dòng) 鍵盤控制 內(nèi)蒙古工業(yè)大學(xué)畢業(yè)論文 25 MOV A, R2 ；行掃描值送 A MOVX @DPTR,A ；掃描一行 INC DPTR ；指向 8155 口 C MOVX A,@DPTR ；讀入列值 ANL A,0FH ；保留低 4位 MOV R4， A ；暫存列值 CJNE A,0FH,LK4 ；列值非全 1則轉(zhuǎn) MOV A,R2 ；行掃描值送 A JNB ， LK8 ；已掃到最后一行則轉(zhuǎn) RL A ；未掃完，則移至下一行 MOV R2, A ；行值存入 R2中 INC R3 ；行號(hào)加 1 SJMP LK3 ；轉(zhuǎn)至掃描下一行 LK4: MOV A,R3 ；行號(hào)送入 A ADD A,R3 。行號(hào)乘 2 MOV R5,A ；暫存 ADD A,R5 ；行號(hào)乘 4 MOV R5,A ；存入 R5 中 MOV A,R4 ；列值送入 A LK5： RRC A 。右移一位 JNC LK6 ；該位為 0 則轉(zhuǎn) INC R5 ；列號(hào)加 1 SJMP LK5 ；列號(hào)未判完繼續(xù) LK6： PUSH R5 ；保護(hù)鍵值 LK7： LCALL DIR ；掃描一遍顯示器 LCALL KS1 ；發(fā)全掃描信號(hào) JNZ LK7 ；鍵未釋放則等待 LCALL DIR ；鍵已釋放 LCALL DIR ；延時(shí) 12ms，消抖 POP A ；鍵值存入 A中 KND: RET ；返主 內(nèi)蒙古工業(yè)大學(xué)畢業(yè)論文 26 LK8： MOV A,FFH ；無(wú)閉合鍵標(biāo)志 FFH 存入 A中 RET ；返主 溫度采集子程序設(shè)計(jì) 溫度采集流程圖設(shè)計(jì) 本文的溫度采集流程的實(shí)現(xiàn)功能主要是以順序執(zhí)行的方式，實(shí)現(xiàn)兩個(gè)口入水溫度和出水溫度的測(cè)量和計(jì)算。具體的操作如圖 43所示。 圖 43 溫度采集子程序流 程圖 溫度采集子程序 ORG 0013H WEND： LOOP: MOVX @DPTR, A ； 啟動(dòng) A/D 轉(zhuǎn)換 HERE: SJMP HERE 。等待中斷 MOVX A, @DPTR ；采樣數(shù)據(jù) MOVX @R0 , A ；存數(shù) Y N 開(kāi)通 IN0 通道 啟動(dòng) A/D 轉(zhuǎn)換 測(cè)得入水溫度 開(kāi)通 IN1 通道 啟動(dòng) A/D 轉(zhuǎn)換 測(cè)得出水溫度 轉(zhuǎn)換是否完成？ 算出溫差 內(nèi)蒙古工業(yè)大學(xué)畢業(yè)論文 27 INC DPTR 。指向下一個(gè)模擬通道 (一共用了兩個(gè)通道 ) INC R0 。指向數(shù)據(jù)存儲(chǔ)區(qū)下一個(gè)單元 DJNZ R2， INT1 。2 路未轉(zhuǎn)換完，則繼續(xù) CLR EA ；已經(jīng)轉(zhuǎn)換完，則關(guān)中斷 CLR EX1 ；禁止外部中斷 1中斷 RETI INT1： MOVX @DPTR, A RETI 16 位二進(jìn)制轉(zhuǎn)換到 BCD 碼得程序模塊 程序流程框架 本模塊的作用是把 16位的二進(jìn)制數(shù)轉(zhuǎn)換成 BCD 碼，從而便于 LED 輸出數(shù)值。 圖 44 16 位二進(jìn)制轉(zhuǎn)換到 BCD 碼 運(yùn)行程序 開(kāi)始 將數(shù)據(jù)整體左移一位且存儲(chǔ) 將進(jìn)位與存放十位、個(gè)位的寄存器R4 進(jìn)行相加，且 十進(jìn)制調(diào)整 程序初始化 返回 將進(jìn)位與存放千位、百位的寄存器R5 進(jìn)行相加，且十進(jìn)制調(diào)整 R6=0 內(nèi)蒙古工業(yè)大學(xué)畢業(yè)論文 28 B2BCD： MOV R3,72H MOV R2,71H CLR A MOV R4 , A MOV R5 , A ；清除寄存器，方便存儲(chǔ)數(shù)據(jù) MOV R6 , 10H ； 設(shè)循環(huán)指針 LP0∶ CLR C ；左移一位 , 移入 C MOV A, R2 RLC A MOV R2 , A MOV A, R3 RLC A MOV R3 , A ；整體移動(dòng) 16 位二進(jìn)制數(shù) MOV A, R4 ADDC A,R4 DA A MOV R4 , A MOV A, R5 ADDC A, R5 DA A MOV R5 , A DJNZ R6, LP0