基于單片機(jī)的溫度警報(bào)器-資料下載頁(yè)
2025-06-27 19:33本頁(yè)面
【正文】 LJMP INT_T1 START: MOV LED_0,00H MOV LED_1,00H MOV LED_2,00H MOV DPTR,TABLE MOV H_TEMP,153 MOV L_TEMP,77 MOV TMOD,12H MOV TH0,245 MOV TL0,0 MOV TH1,(655361000)/256 MOV TL1,(655361000)MOD 256 MOV IE,8aH CLR C SETB TR0 。為ADC0808提供時(shí)鐘WAIT: SETB H_ALM SETB L_ALM CLR ST SETB ST CLR ST 。啟動(dòng)轉(zhuǎn)換 JNB EOC,$ SETB OE MOV ADC,P1 。讀取AD轉(zhuǎn)換結(jié)果 CLR OE MOV A,ADC SUBB A,77 。判斷是否低于下限 JC LALM MOV A,H_TEMP MOV R0,ADC SUBB A,R0 。判斷是否高于上限 JC HALM CLR TR1 LJMP PROCLALM: 。低溫報(bào)警 CLR L_ALM SETB TR1 CLR FLAG LJMP PROCHALM: 。高溫報(bào)警 CLR H_ALM SETB TR1 SETB FLAG LJMP PROCPROC: MOV A,ADC 。數(shù)值轉(zhuǎn)換 MOV B,100 DIV AB MOV LED_2,A MOV A,B MOV B,10 DIV AB MOV LED_1,A MOV LED_0,B LCALL DISP SJMP WAITINT_T0: CPL CLOCK 。提供ADC0808時(shí)鐘 RETIINT_T1: MOV TH1,(655361000)/256 MOV TL1,(655361000)MOD 256 CPL SOUND INC TCNTA MOV A,TCNTA JB FLAG,I1 。判斷是高溫警報(bào)還是低溫警報(bào) CJNE A,30,RETUNE 。低溫警報(bào)聲 SJMP I2 I1: CJNE A,20,RETUNE 。高溫警報(bào)聲 I2: MOV TCNTA,0 INC TCNTB MOV A,TCNTB CJNE A,25,RETUNE MOV TCNTA,0 MOV TCNTB,0 LCALL DELAY2RETUNE: RETI DISP: MOV A,LED_0 。數(shù)碼顯示子程序 MOVC A,@A+DPTR CLR MOV P0,A LCALL DELAY SETB MOV A,LED_1 MOVC A,@A+DPTR CLR MOV P0,A LCALL DELAY SETB MOV A,LED_2 MOVC A,@A+DPTR CLR MOV P0,A LCALL DELAY SETB RETDELAY: MOV R6,10D1: MOV R7,250 DJNZ R7,$ DJNZ R6,D1 RETDELAY2: MOV R5,20D2: MOV R6,20D3: MOV R7,250 DJNZ R7,$ DJNZ R6,D3 DJNZ R5,D2 RETTABLE: DB 3FH,06H,5BH,4FH,66H DB 6DH,7DH,07H,7FH,6FH END
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1