畢業論文-智能型溫度測量儀設計-資料下載頁

　　

【正文】 SJMP KEY27 KEY2C:CJNE R6,09H,KEY2D SJMP KEY27 KEY2D:INC R6 SJMP KEY2B KEY30:JB ,KEY31 ； K3鍵功能程序 ， K3釋放轉 K3鍵處理 ACALL DIS00 ；延時等 K3釋放 SJMP KEY30 KEY31:PUSH PSW MOV PSW,10H ；工作寄存器換為 2組 CJNE R7,00H,KEY32 ；已按過功能鍵，允許預置溫度 SJMP KEY36 ；未按過功能鍵，不允許預置溫度，該鍵無效 KEY32:CJNE R7,01H,KEY33 CJNE R4,01H,KEY36 ；百位不是 1，不允許減 1操作 DEC R4 ；百位是 1，百位減 1，送顯緩區 MOV 2FH,R4 AJMP KEY36 KEY33:CJNE R7,02H,KEY3A JB F0,KEY39 CJNE R4,00H,KEY37 CJNE R5,00H,KEY38 SETB F0 ；置負號 MOV 2FH,0DH ；千位顯示負號 KEY34:INC R5 KEY35:MOV 30H,R5 KEY36:POP PSW RET KEY37:CJNE R5,05H,KEY38 開封大學機電工程學院電子信息工程技術專業畢業論文 30 圖 310（ K3 鍵處理 流程圖） 開封大學機電工程學院電子信息工程技術專業畢業論文 31 圖 311（ K4 鍵處理流程圖） SJMP KEY36 KEY38:DEC R5 SJMP KEY35 KEY39:CJNE R5,05H,KEY34 SJMP KEY36 KEY3A:JNB F0,KEY3D CJNE R6,09H,KEY3B SJMP KEY36 KEY3B:INC R6 KEY3C:MOV 31H,R6 SJMP KEY36 KEY3D:CJNE R6,00H,KEY3E SJMP KEY36 KEY3E:DEC R6 SJMP KEY3C KEY40:JB ,KEY41 ； K4鍵功能程序 ACALL DIS00 ；延時等 K4釋放 SJMP KEY40 KEY41:PUSH PSW MOV PSW,10H ；選 2組寄存器 CJNE R7,00H,KEY42 ；允許 K4操作 ? 開封大學機電工程學院電子信息工程技術專業畢業論文 32 MOV IE,00H ；關中斷 INC R6 ；按鍵次數計數 CJNE R6,01H,KEY44 ；第 1次按下 K4 MOV 32H,0AH ；顯示“ ” MOV 31H,37H MOV 30H,36H MOV A,35H JB ,KEY43 MOV 2FH,35H KEY42:POP PSW RET KEY43:MOV 2FH,0DH ；顯示負號 SJMP KEY42 KEY44:CJNE R6,02H,KEY45 ；第 2次按下 K4 MOV 32H,0BH ；顯示預置下限溫度“ ” MOV 31H,3AH MOV 30H,39H MOV A,38H JB ,KEY43 MOV 2FH,38H SJMP KEY42 KEY45:MOV IE,81H ；開中斷 MOV R6,00H ；按鍵次數清零 SJMP KEY42 開封大學機電工程學院電子信息工程技術專業畢業論文 33 8 、 A/D 中斷服務程序： A/D中斷服務程序首先保護現場，讀 A/D轉換結果，由于 A/D結果是有符號數且計算工作量較大，需要進行數字濾波、去零漂和判斷測溫值是否超過預置溫度的上、下限等操作，即求和、取平均、求差和大小比較等運算，為便于計算，將 A/D輸出的 BCD 碼，變換為二進制補碼，所有運算均以二進制補碼的形式進行。考慮到 零漂變化緩慢，每 4分鐘檢測并更新一次零漂值，因為完成一次 A/D 轉換約需 ， 4 次 A/D 轉換完成一次測溫，完成 240 次測溫約需 4 分鐘，故僅需檢測測溫次數是否到 240 次，即可知道是否該測新的零漂值。 A/D中斷服務程序流程圖如附圖 312所示。 圖 312（ A/D 中斷程序流程圖） 開封大學機電工程學院電子信息工程技術專業畢業論文 34 A/D 中斷服務 源 程序 : ORG 03B0H INT00:PUSH A ；保護現場 PUSH PSW MOV PSW,08H ；選 1組寄存器 INT01:MOV A,P1 ； 讀 A/D JNB ,INT01 ；等千位選通信號 JB ,INT02 ；查符號 1正 0負 SETB F0 ；負數， F0置 1 SJMP INT03 INT02:CLR F0 ；正數， F0置 0 INT03:JB ,INT04 ； =0，千位 =1 SETB ；千位數置 1 SJMP INT05 INT04:CLR ；千位數置 0 INT05:MOV A,P1 JNB ,INT05 ；等百位選通信號 DS2 MOV R0,20H XCHD A,@R0 ；存百位數 INT06:MOV A,P1 JNB ,INT06 ；等十位選通信號 DS3 SWAP A ；十位 BCD碼換入 A高半字節 INC R0 ；指向 21H單元 MOV @R0,A ；存十位數 INT07:MOV A,P1 JNB ,INT07 ；等個位選通信號 DS4 XCHD A,@R0 ；存個位數 MOV R2,20H ； A/D存 R2R3 MOV R3,21H ACALL BCDH0 ；轉換為 B制數 CLR A ；加上符號 MOV C,F0 MOV ,C ORL A,R2 MOV R2,A ACALL QBM00 ；求補碼 MOV 20H,R2 ；補碼存 20H21H MOV 21H,R3 MOV A,21H ；求和存 22H23H ADD A,23H MOV 23H,A MOV A,20H ADDC A,22H MOV 22H,A DJNZ 45H,INT0A ；中斷計數 MOV 45H,4 JB ,INT09 CLR C 開封大學機電工程學院電子信息工程技術專業畢業論文 35 MOV A,23H ；去零漂存 22H、 23H SUBB A,34H MOV 23H,A MOV A,22H SUBB A,33H MOV 22H,A CLR ；清除符號位 MOV R5,2 INT08:CLR C ；除以 4取平均 MOV A,22H ；高位除以 2 RRC A MOV 22H,A MOV A,23H ；低位除以 2 RRC A MOV 23H,A DJNZ R5,INT08 MOV C,F0 ；符號位加在 MOV ,C MOV R0,23H ；指向測溫值低字節 MOV R1,3EH ；指向預置下限溫度低字節 ACALL BJDX0 JB ,INT0B MOV R0,3CH ；指向預置上限溫度低字節 MOV R1,23H ；指向測溫值低字節 ACALL BJDX0 JB ,INT0C MOV R2,22H ；求測溫值的原碼 MOV R3,23H ACALL QBM00 MOV 22H,R2 CLR ；清除原碼符號位，將測溫值變為無符號數 MOV R2,22H ACALL HBCD0 ；測溫值轉換為壓縮 BCD碼 MOV 26H,R5 ；測溫值 (壓縮 BCD 碼 )送 26H27H MOV 27H,R6 MOV @R0,26H ；指向測溫值高位 MOV @R1,2FH ；指向顯緩區千位 ACALL SXH00 ；壓縮 BCD碼變分離 BCD碼后送顯緩區 DJNZ 46H,INT0A SETB ；置測零漂標志 CLR ；電子開關 K5接調零狀態 INT09:MOV 33H,22H ；存零漂值 MOV 34H,23H MOV 46H,240 ；置測零漂計數初值 CLR ；置測溫度標志 SETB ； K5接測溫狀態 INT0A:POP PSW ；恢復現場 POP A 開封大學機電工程學院電子信息工程技術專業畢業論文 36 RETI INT0B:SETB ；置超測溫下限標志 SJMP INT0A INT0C:SETB ；置超測溫上限標志 SJMP INT0A 雙字節 BCD 碼整數轉換為雙字節二進制原碼子程序 （ BCD 碼和轉換結果均在 1 組 R R3 中， BCD 碼的符號在 F0 中） ORG 05B0H BCDH0:MOV A,R3 ；低字節變二進制 ACALL BCDH1 MOV R3,A MOV A,R2 ；高字節變二進制 ACALL BCDH1 MOV B,100 ；擴大 100倍 MUL AB ADD A,R3 ；和低字節按二 進制相加 MOV R3,A CLR A ADDC A,B MOV C,F0 ；符號加在 R2最高位 MOV ,C MOV R2,A RET BCDH1:MOV B,10 ；分離十位和個位 DIV AB