智能溫度顯示儀(單片機(jī)匯編程序有注釋)

1、;* ;智能溫度顯示儀程序清單 ;程序文件名為： TEMP_DIS.ASM ;* ;=寄存器定義= STATUS EQU 03H ;定義狀態(tài)寄存器地址 PORTA EQU 05H ;定義端口RA的數(shù)據(jù)寄存器地址 PORTB EQU 06H ;定義端口RB的數(shù)據(jù)寄存器地址 PORTC EQU 07H ;定義端口RC的數(shù)據(jù)寄存器地址 TRISA EQU 85H ;定義端口RA的方向控制寄存器地址 TRISB EQU 86H ;定義端口RB的方向控制寄存器地址 TRISC EQU 87H ;定義端口RC的方向控制寄存器地址 OPTION_REG EQU 80H ;定義選項(xiàng)寄存器地址 INTCON E

2、QU 0BH ;定義中斷控制寄存器地址 TMR0 EQU 01H ;定義TMR0寄存器地址 PIR1 EQU 0CH ;定義第一外設(shè)中斷標(biāo)志寄存器地址 ADRESH EQU 1EH ;定義ADC結(jié)果寄存器高字節(jié)地址 ADCON0 EQU 1FH ;定義ADC控制寄存器0地址 ADCON1 EQU 9FH ;定義ADC控制寄存器1地址 T1CON EQU 10H ;定義TMR1控制寄存器地址 TMR1L EQU 0EH ;定義TMR1低字節(jié)地址 TMR1H EQU 0FH ;定義TMR1高字節(jié)地址 ;=變量聲明= ADR EQU 20H ;存放標(biāo)度變換結(jié)果 ADR_deci EQU 21H ;存

3、放標(biāo)度變換小數(shù)部分進(jìn)位 ADR_int EQU 22H ;存放標(biāo)度變換整數(shù)部分 TEMP1 EQU 23H ;暫存寄存器1 TEMP2 EQU 24H ;暫存寄存器2 BCD_count EQU 25H ;存放BCD碼轉(zhuǎn)換計(jì)數(shù) DISP_count EQU 26H ;數(shù)碼管顯示移位計(jì)數(shù) TMR1_count EQU 27H ;15秒中斷外循環(huán)計(jì)數(shù)值 MAX EQU 28H ;報(bào)警上限值 MIN EQU 29H ;報(bào)警下限值 MAX?_temp EQU 30H ;報(bào)警上限值暫存寄存器 MIN_temp EQU 31H ;報(bào)警下限值暫存寄存器 DISP_dig EQU 32H ;顯示位寄存器 DI

4、SP_seg EQU 33H ;顯示段寄存器 TRY EQU 34H TRY1 EQU 35H ;=常量聲明= TMR1LB EQU 0DCH ;定義TMR1低字節(jié)寄存器初始值 （定時(shí)500毫秒） TMR1HB EQU 0BH ;定義TMR1高字節(jié)寄存器初始值 ;*復(fù)位矢量和中斷矢量* ; ORG 000H NOP GOTO MAIN ORG 004H ;*TMR1中斷服務(wù)程序* TMR1_int BCF PIR1,0 ;清中斷溢出標(biāo)志位 BCF T1CON,0 ;關(guān)閉TMR1定時(shí)器 MOVLW TMR1LB ;500ms定時(shí)初值 MOVWF TMR1L MOVLW TMR1HB MOVWF

5、TMR1H DECFSZ TMR1_count,1 ;外循環(huán)數(shù)減到零？ R ETFIE ;否，中斷返回 GOTO AGAIN ;是，轉(zhuǎn)至正常顯示 ;*主程序* MAIN CALL INITIAL ;調(diào)用初始化子程 AGAIN BTFSC PORTB,0 ; K1鍵是否按 GOTO NEXT1 ;否，轉(zhuǎn)檢測(cè)K2 CALL Change_Max ;是，調(diào)上限修改子程序 NEXT1 BTFSC PORTB,1 ;K2鍵是否按下 GOTO NEXT2 ;否，轉(zhuǎn)采樣子程序 ; CALL DELAY10 ;是，調(diào)10ms延時(shí)子程序，消除抖動(dòng)影響 ; BTFSC PORTB,1 ;再次檢測(cè)K2鍵是否按下 ;

6、 GOTO NEXT2 ;否，轉(zhuǎn)采樣子程序 CALL Change_Min ;是，調(diào)下限修改子程序 NEXT2 CALL AD_trans ;調(diào)采樣轉(zhuǎn)換子程序 ;=判斷溫度是否為100= MOVF ADR,0 SUBLW 0FEH BTFSC STATUS,0 ;采樣結(jié)果大于0FEH（對(duì)應(yīng)100）? CALL BCD_trans ;否，調(diào)標(biāo)度轉(zhuǎn)換子程序 BSF PORTA,3 ;是，點(diǎn)亮上限報(bào)警燈 MOVLW 01H MOVWF DISP_dig ;數(shù)碼管第一位顯示 MOVLW 00H MOVWF DISP_seg ;數(shù)碼管第一位顯示數(shù)值 CALL Display ;調(diào)顯示子程序顯示這一位（個(gè)

7、位） MOVLW 02H MOVWF DISP_dig MOVLW 00H MOVWF DISP_seg CALL Display ;顯示十位 MOVLW 03H MOVWF DISP_dig MOVLW 01H MOVWF DISP_seg CALL Display ;顯示百位 MOVLW 04H MOVWF DISP_dig MOVLW 00H MOVWF DISP_seg CALL Display ;顯示最高位 ;=上下限報(bào)警及數(shù)據(jù)顯示= MOVF MAX,0 SUBWF ADR,0 ;采樣結(jié)果是否大于上限值 BTFSS STATUS,0 GOTO NEXT3 ;否;轉(zhuǎn)NEXT2 BSF

8、 PORTA,3 ;是;點(diǎn)亮上限報(bào)警燈 GOTO NEXT5 NEXT3 MOVF ADR,0 SUBWF MIN,0 ;采樣結(jié)果是否低于下限值 BTFSS STATUS,0 GOTO NEXT4 ;否，轉(zhuǎn)NEXT3 BSF PORTA,5 ;是，點(diǎn)亮下限報(bào)警燈 GOTO NEXT5 NEXT4 BCF PORTA,3 ;熄滅上限報(bào)警燈 BCF PORTA,5 ;熄滅下限報(bào)警燈 NEXT5 MOVLW 01H BCF BCD_count,0 MOVWF DISP_dig ;顯示個(gè)位 MOVF ADR,0 ANDLW 0FH ;顯示ADR中低四位值（BCD碼的個(gè)位值） MOVWF DISP_se

9、g MOVLW 0AH MOVWF TRY MOVF DISP_seg,0 MOVWF TRY1 MOVF TRY,0 SUBWF TRY1,0 BTFSC STATUS,0 GOTO FAY MOVLW 0AH MOVWF TRY MOVF TRY,0 SUBWF DISP_seg,0 MOVWF DISP_seg MOVF BCD_count ADDLW 01H FAY CALL Display SWAPF ADR,0 MOVWF DISP_seg ;顯示ADR中高四位值（BCD碼的十位值） MOVF BCD_count ADDWF DISP_seg,1 MOVF DISP_seg,0 A

10、NDLW 0FH MOVF DISP_seg,1 MOVLW 02H MOVWF DISP_dig CALL Display ;顯示十位 MOVLW 03H MOVWF DISP_dig MOVLW 00H MOVWF DISP_seg CALL Display ;顯示百位 MOVLW 04H MOVWF DISP_dig MOVLW 00H MOVWF DISP_seg CALL Display ;顯示最高位 CALL DELAY30 ;延時(shí) CALL DELAY30 CALL DELAY30 GOTO AGAIN ;*延時(shí)10ms子程序* DELAY10 BCF INTCON,2 ;TMR

11、0溢出標(biāo)志位清零 MOVLW 0B2H MOVWF TMR0 ;裝入初值，啟動(dòng)計(jì)時(shí) L1 BTFSS INTCON,2 ;定時(shí)溢出？ GOTO L1 ;否，循環(huán)檢測(cè)標(biāo)志位 RETURN ;是，返回 ;*延時(shí)30ms子程序* DELAY30 BCF INTCON,2 ;TMR0溢出標(biāo)志位清零 MOVLW 16H MOVWF TMR0 ;賦初值，啟動(dòng)計(jì)時(shí) L2 BTFSS INTCON,2 ;檢測(cè)溢出標(biāo)志位 GOTO L2 RETURN ;*初始化子程序* INITIAL ;=輸入輸出口初始化= BSF STATUS,5 MOVLW 01H MOVWF TRISA ;置RA0輸入，RA4、RA5輸

12、出 MOVLW 17H MOVWF TRISB ;置RB輸入方式 MOVLW 00H MOVWF TRISC ;置RC輸出方式 MOVLW 07H MOVWF OPTION_REG ;TMR0初始化，預(yù)設(shè)分頻比1:256 ;=TMR1初始化= BSF PIR1,0 ;開放TMR1中斷使能位6 BCF STATUS,5 MOVLW 34H ;設(shè)置分頻比為1:8 MOVWF T1CON MOVLW 0C0H ;開放總中斷和外設(shè)中斷使能位 MOVWF INTCON MOVLW TMR1LB ;TMR1低字節(jié)賦初值 MOVWF TMR1L MOVLW TMR1HB ;TMR1高字節(jié)賦初值 MOVWF

13、TMR1H MOVLW 1EH ;TMR1中斷30次則自動(dòng)跳出上下限值修改 MOVWF TMR1_count MOVLW 60H ;報(bào)警上限賦初值 MOVWF MAX MOVLW 20H ;報(bào)警下限賦初值 MOVWF MIN ;=7219初始化= MOVLW 0CH MOVWF DISP_dig ;選中寄存器SHUTDOWN，其地址為0CH MOVLW 01H MOVWF DISP_seg ;寄存器SHUTDOWN賦初值 CALL Display ;設(shè)為正常顯示狀態(tài) MOVLW 0FH MOVWF DISP_dig ;選中寄存器DISPLAY TEST，其地址為0FH MOVLW 00H MO

14、VWF DISP_seg ;寄存器DISPLAY TEST賦初值 CALL Display ;設(shè)為正常顯示狀態(tài) MOVLW 0BH MOVWF DISP_dig ;選中寄存器SCAN LIMIT，其地址為0BH MOVLW 03H MOVWF DISP_seg ;寄存器SCAN LIMIT賦初值 CALL Display ;點(diǎn)亮0-3四個(gè)數(shù)碼管 MOVLW 09H MOVWF DISP_dig ;選中寄存器DECODE MODE，其地址為09H MOVLW 0FFH MOVWF DISP_seg ;寄存器DECODE MODE賦初值 CALL Display ;選B碼譯碼方式 MOVLW 0A

15、H MOVWF DISP_dig ;選中寄存器INTENSITY，其地址為0AH MOVLW 0FH MOVWF DISP_seg ;寄存器INTENSITY賦初值 CALL Display ;顯示亮度選擇最亮 RETURN ;*A/D轉(zhuǎn)換子程序* AD_trans BSF STATUS,5 MOVLW 0EH MOVWF ADCON1 ;設(shè)RA0為模擬輸入，采樣結(jié)果左對(duì)齊 BCF STATUS,5 MOVLW 41H MOVWF ADCON0 ;選擇A/D轉(zhuǎn)換時(shí)鐘，選擇采樣通道0，開 ;采樣允許位 BSF ADCON0,2 ;采樣開始 LOOP_AD NOP BTFSC ADCON0,2 ;

16、采樣結(jié)束？ GOTO LOOP_AD ;否，轉(zhuǎn)LOOP_AD MOVF ADRESH,0 ;是，讀取采樣結(jié)果 MOVWF ADR RETURN ;*標(biāo)度變換轉(zhuǎn)換子程序* BCD_trans ;=小數(shù)進(jìn)位部分處理= MOVF ADR,0 MOVWF TEMP1 MOVWF TEMP2 RLF TEMP1,1 RLF TEMP1,1 RLF TEMP1,1 MOVF TEMP1,0 MOVWF TEMP2 ;采樣結(jié)果左移3位送TEMP2 RLF TEMP1,1 ;采樣結(jié)果左移4位送TEMP1 MOVLW 30H ANDWF TEMP1,1 ;左移4位結(jié)果屏蔽高2位和低4位 MOVLW 38H AN

17、DWF TEMP2,1 ;左移3位結(jié)果屏蔽高2位和低3位 MOVF TEMP2,0 ADDWF TEMP1,1 MOV F ADR,0 MOVWF TEMP2 MOVLW 3FH ANDWF TEMP2,1 ;采樣結(jié)果屏蔽高2位 MOVF TEMP2,0 ADDWF TEMP1,0 MOVWF ADR_deci ;=整數(shù)部分處理= MOVF ADR,0 MOVWF TEMP1 MOVWF TEMP2 RRF TEMP1,1 RRF TEMP1,1 ;采樣結(jié)果右移2位送TEMP1 MOVLW 3FH ANDWF TEMP1,1 ;屏蔽高2位 RRF TEMP2,1 RRF TEMP2,1 RRF

18、 TEMP2,1 ;采樣結(jié)果右移3位送TEMP2 MOVLW 1FH ANDWF TEMP2,1 ;屏蔽高3位 MOVF TEMP2,0 ADDWF TEMP1,1 MOVF ADR,0 MOVWF TEMP2 RRF TEMP2,1 RRF TEMP2,1 RRF TEMP2,1 RRF TEMP2,1 RRF TEMP2,1 RRF TEMP2,1 ;采樣結(jié)果右移6位送TEMP2 MOVLW 03H ANDWF TEMP2,1 ;屏蔽高6位 MOVF TEMP2,0 ADDWF TEMP1,0 MOVWF ADR ;ADDWF ADR_deci,0 ;MOVWF ADR RETURN ;*

19、上限修改子程序* Change_Max MOVLW 01H MOVWF DISP_dig MOVF MAX,0 MOVWF DISP_seg CALL Display ;顯示上限值個(gè)位 MOVLW 02H MOVWF DISP_dig MOVF MAX,0 MOVWF DISP_seg SWAPF DISP_seg,1 CALL Display ;顯示上限值十位 MOVLW 03H MOVWF DISP_dig MOVLW 00H MOVWF DISP_seg CALL Display ;顯示上限值百位 MOVLW 04H MOVWF DISP_dig MOVLW 0CH MOVWF DISP

20、_seg CALL Display ;最高位顯示H MOVF MAX,0 MOVWF MAX?_temp LOP1 BTFSS PORTB,0 ;K1鍵松開？ GOTO LOP1 ;否，循環(huán)檢測(cè) ;CALL DELAY10 ;是，延時(shí)10ms ;BTFSS PORTB,0 ;再次檢測(cè)K1鍵是否松開？ ;GOTO LOP1 ;否，循環(huán)檢測(cè) ;BSF T1CON,0 ;是，TMR1開始計(jì)數(shù)，15s定時(shí)中斷開始 ; MOVLW 1EH ;TMR1中斷30次則自動(dòng)跳出上下限值修改 ; MOVWF TMR1_count LOP2 BTFSC PORTB,2 ;K3鍵按下？ GOTO LOP2_K4 ;否

21、，檢測(cè)K4鍵 ;CALL DELAY10 ;是，延時(shí)10ms ;BTFSC PORTB,2 ;再次檢測(cè)K3鍵是否按下？ ;GOTO LOP2_K4 ;否，檢測(cè)K4鍵 GOTO LOP3 ;是，開始修改上限值十位 LOP2_K4 BTFSC PORTB,4 ;K4鍵按下？ GOTO LOP2_K1 ;否，檢測(cè)K1 ;CALL DELAY10 ;是，延時(shí)10ms ; BTFSC PORTB,4 ;再次檢測(cè)K4鍵是否按下？ ; GOTO LOP2_K1 ;否，檢測(cè)K1 GOTO LOP4 ;是，開始修改上限值個(gè)位 LOP2_K1 BTFSC PORTB,0 ;K1鍵按下？ GOTO LOP2 ;否，

22、檢測(cè)K3 ; CALL DELAY10 ;是，延時(shí)10ms ;BTFSC PORTB,0 ;再次檢測(cè)K1鍵是否按下？ ;GOTO LOP2 ;否，檢測(cè)K3 BCF T1CON,0 ;關(guān)TMR1計(jì)數(shù)器，禁止中斷 MOVF MAX?_temp,0 ;保存修改后的上限值 MOVWF MAX CALL DELAY30 CALL DELAY30 CALL DELAY30 GOTO NEXT1 ;跳出上下限修改 LOP3 ; BSF T1CON,0 ;TMR1開始計(jì)數(shù)，15ms定時(shí)中斷開始 ; MOVLW 1EH ;TMR1中斷30次則自動(dòng)跳出上下限值修改 ; MOVWF TMR1_count CALL

23、DELAY30 CALL DELAY30 CALL DELAY30 CALL DELAY30 MOVLW 10H ADDWF MAX?_temp,1 ;十位值加1 MOVF MAX?_temp,0 SUBLW 99H ;是否超出溫度測(cè)量范圍 BTFSC STATUS,0 GOTO LOP5 ;否，則轉(zhuǎn)顯示 MOVF MIN,0 ;是，則把下限值賦給上限值 MOVWF MAX?_temp GOTO LOP5 ;轉(zhuǎn)顯示 LOP4 BSF T1CON,0 ;TMR1開始計(jì)數(shù)，15ms定時(shí)中斷開始 MOVLW 1EH ;TMR1中斷30次則自動(dòng)跳出上下限值修改 MOVWF TMR1_count CAL

24、L DELAY30 CALL DELAY30 CALL DELAY30 CALL DELAY30 MOVLW 01H ADDWF MAX?_temp,1 ;個(gè)位值加1 MOVF MAX?_temp,0 ANDLW 0FH SUBLW 09H BTFSC STATUS,0 ;個(gè)位值是否大于9 GOTO LOP5 ;否，轉(zhuǎn)顯示 MOVLW 0F0H ;是，個(gè)位值清零 ANDWF MAX?_temp,1 MOVF MIN,0 SUBWF MAX?_temp,0 ;上限值是否低于下限值 BTFSC STATUS,0 GOTO LOP5 ;否，轉(zhuǎn)顯示 MOVF MIN,0 ;是，則把下限值賦給上限值 M

25、OVWF MAX?_temp GOTO LOP5 ;轉(zhuǎn)顯示 LOP5 MOVLW 01H MOVWF DISP_dig MOVF MAX?_temp,0 MOVWF DISP_seg CALL Display ;顯示個(gè)位 MOVLW 02H MOVWF DISP_dig MOVF MAX?_temp,0 MOVWF DISP_seg SWAPF DISP_seg,1 CALL Display ;顯示十位 GOTO LOP2 RETURN ;*下限修改子程序* Change_Min MOVLW 01H MOVWF DISP_dig MOVF MIN,0 MOVWF DISP_seg CALL D

26、isplay ;顯示下限值個(gè)位 MOVLW 02H MOVWF DISP_dig MOVF MIN,0 MOVWF DISP_seg SWAPF DISP_seg,1 CALL Display ;顯示下限值十位 MOVLW 03H MOVWF DISP_dig MOVLW 00H MOVWF DISP_s eg CALL Display ;顯示下限值百位 MOVLW 04H MOVWF DISP_dig MOVLW 0DH MOVWF DISP_seg CALL Display ;最高位顯示L MOVF MIN,0 MOVWF MIN_temp LOP6 BTFSS PORTB,1 ;K2鍵松

27、開？ GOTO LOP6 ;否，循環(huán)檢測(cè) CALL DELAY10 ;是，延時(shí)10ms BTFSS PORTB,1 ;再次檢測(cè)K2是否松開 GOTO LOP6 ;否，循環(huán)檢測(cè) BSF T1CON,0 ;是，TMR1開始計(jì)數(shù)，15ms定時(shí)中斷開始 MOVLW 1EH ;TMR1中斷30次則自動(dòng)跳出上下限值修改 MOVWF TMR1_count LOP7 BTFSC PORTB,2 ;K3鍵是否按下？ GOTO LOP7_K4 ;否，檢測(cè)K4鍵 CALL DELAY10 ;是，延時(shí)10ms BTFSC PORTB,2 ;再次檢測(cè)K3鍵是否按下？ GOTO LOP7_K4 ;否，檢測(cè)K4鍵 GOTO

28、 LOP8 ;是，開始下限值十位修改 LOP7_K4 BTFSC PORTB,4 ;K4鍵是否按下？ GOTO LOP7_K2 ;否，檢測(cè)K2鍵 CALL DELAY10 ;是，延時(shí)10ms BTFSC PORTB,4 ;再次檢測(cè)K4鍵是否按下？ GOTO LOP7_K2 ;否，檢測(cè)K2鍵 GOTO LOP9 ;是，開始下限值個(gè)位修改 LOP7_K2 BTFSC PORTB,1 ;K2鍵是否按下？ GOTO LOP7 ;否，檢測(cè)K3鍵 CALL DELAY10 ;是，延時(shí)10ms BTFSC PORTB,1 ;再次檢測(cè)K2鍵是否按下？ GOTO LOP7 ;否，檢測(cè)K3鍵 BCF T1CON,

29、0 ;是，關(guān)TMR1計(jì)數(shù)器，禁止中斷 MOVF MIN_temp,0 MOVWF MIN ;保存修改后的下限值 CALL DELAY30 CALL DELAY30 CALL DELAY30 GOTO NEXT2 ;跳出上下限修改 LOP8 BSF T1CON,0 ;TMR1開始計(jì)數(shù)，15ms定時(shí)中斷開始 MOVLW 1EH ;TMR1中斷30次則自動(dòng)跳出上下限值修改 MOVWF TMR1_count CALL DELAY30 CALL DELAY30 CALL DELAY30 CALL DELAY30 MOVLW 10H ADDWF MIN_temp,1 ;下限十位值加1 MOVF MAX,0

30、 SUBWF MIN_temp,0 BTFSS STATUS,0 ;下限值比上限值大？ GOTO LOP10 ;否，轉(zhuǎn)顯示 MOVF MAX,0 ;是，則把上限值賦給下限值 MOVWF MIN_temp GOTO LOP10 ;轉(zhuǎn)顯示 LOP9 BSF T1CON,0 ;TMR1開始計(jì)數(shù)，15ms定時(shí)中斷開始 MOVLW 1EH ;TMR1中斷30次則自動(dòng)跳出上下限值修改 MOVWF TMR1_count CALL DELAY30 CALL DELAY30 CALL DELAY30 CALL DELAY30 MOVLW 01H ADDWF MIN_temp,1 ;個(gè)位值加1 MOVF MAX,0 SUBWF MIN_temp,0 BTFSC STATUS,0 ;下限值比上限值大？ GOTO LOP11 ;否，轉(zhuǎn)下一步 MOVF MAX,0 ;是，則把上限值賦給下限值 MOVWF MIN_temp GOTO LOP10 LOP11 MOVF MIN_temp,0 A