51单片机DS18B20温度控制报警程序(可设置温控范围) 作者： 时间：2016-11-30 来源：网络 加入技术交流群 扫码加入和技术大咖面对面交流海量资料库查询 收藏 <a href='https://ad.eepw.com.cn/www/delivery/ck.php?n=a635e61e&cb=INSERT_RANDOM_NUMBER_HERE' target='_blank'><img src='https://ad.eepw.com.cn/www/delivery/avw.php?zoneid=88&cb=INSERT_RANDOM_NUMBER_HERE&n=a635e61e' border='0' alt='' /></a> <a href='https://ad.eepw.com.cn/www/delivery/ck.php?n=a576c0a2&cb=INSERT_RANDOM_NUMBER_HERE' target='_blank'><img src='https://ad.eepw.com.cn/www/delivery/avw.php?zoneid=87&cb=INSERT_RANDOM_NUMBER_HERE&n=a576c0a2' border='0' alt='' /></a> ;--------------------------------------------;200ms对闪动标记取反一次;--------------------------------------------INT_T0:PUSH ACCPUSH PSWMOV TL0,TIMER_LMOV TH0,TIMER_HINC TIMER_COUNMOV A,TIMER_COUNCJNE A,#04H,INT_ENDMOV TIMER_COUN,#00HCPL FLAG2INT_END:POP PSWPOP ACCRETI;==========================================================;重新对 DS18B20 初始化;将设定的温度报警值写入 DS18B20;==========================================================RE_18B20:JB FLAG1,RE_18B20ARETRE_18B20A:CALL RESETMOV A,#0CCH ;跳过ROM匹配LCALL WRITEMOV A,#4EH ;写暂存寄存器LCALL WRITEMOV A,TEMP_TH ;TH(报警上限）LCALL WRITEMOV A,TEMP_TL ;TL(报警下限）LCALL WRITEMOV A,#7FH ;12位精确度LCALL WRITERET;====================================================;功能键扫描子程序;====================================================SCANKEY:;MOV P1,#0F0HJB K1,SCAN_K2CALL BEEP_BLSCAN_K1: CALL ALERT_TLCALL ALERT_PLAYJB K1,SCAN_K1CALL BEEP_BLSCAN_K11: CALL ALERT_THCALL ALERT_PLAYJB K1,SCAN_K11CALL BEEP_BLSCAN_K2: JB K2,SCAN_K3CALL BEEP_BLSCAN_K3: JB K3,SCAN_K4CALL BEEP_BLLCALL RESET_ALERTLCALL RE_18B20LCALL WRITE_E2SCAN_K4: JB K4,SCAN_ENDCALL BEEP_BLSCAN_END: RET;================================================;设置温度报警值;================================================RESET_ALERT:CALL ALERT_TLCALL ALERT_PLAYJNB K3,$ ;K3为位移键SETB TR0RESET_TL:CALL ALERT_PLAYJNB FLAG2,R_TL01mov 75H,7fh ;送入熄灭符mov 76H,7fhCALL ALERT_PLAYJMP R_TL02R_TL01: CALL ALERT_TLmov 75h,7Eh ;送设定值mov 76h,7DhCALL ALERT_PLAY ;显示设定值R_TL02: JNB K1,K011AJNB K2,K011BJNB K3,RESET_THJMP RESET_TLK011A:INC TEMP_TLMOV A,TEMP_TLCJNE A,#120,K012A ;没有到设定上限值，转MOV TEMP_TL,#0K012A: CALL TL_DELJMP RESET_TLK011B:DEC TEMP_TLMOV A,TEMP_TLCJNE A,#00H,K012B ;没有到设定下限值，转MOV TEMP_TL,#119K012B: CALL TL_DELJMP RESET_TL;-------------------------------------------------------RESET_TH:CALL BEEP_BLJNB K3,$RESET_TH1:CALL ALERT_PLAYJNB FLAG2,R_TH01mov 75H,7fh ;送入熄灭符mov 76H,7fhCALL ALERT_PLAYJMP R_TH02R_TH01: CALL ALERT_THmov 75h,7Eh ;mov 76h,7DhCALL ALERT_PLAYR_TH02: JNB K1,K021AJNB K2,K021BJNB K3,K002JMP RESET_TH1K021A:INC TEMP_THMOV A,TEMP_THCJNE A,#120,K022A ;没有到设定上限值，转MOV TEMP_TH,#0K022A: CALL TH_DELJMP RESET_TH1K021B:DEC TEMP_TH ;减1MOV A,TEMP_THCJNE A,#00H,K022B ;没有到设定下限值，转MOV TEMP_TH,#119K022B: CALL TH_DELJMP RESET_TH1K002: CALL BEEP_BLCLR TR0 ;关闭中断RET;-----------------------------------------------------;键延时子程序;多次调用报警值显示程序来延时;-----------------------------------------------------TL_DEL: ;报警低值延时MOV R2,#0AHTL_DEL1: CALL ALERT_TLCALL ALERT_PLAYDJNZ R2,TL_DEL1RETTH_DEL: ;报警高值延时MOV R2,#0AHTH_DEL1: CALL ALERT_THCALL ALERT_PLAYDJNZ R2,TH_DEL1RET;====================================================;实时温度值与设定报警温度值 TH、TL 比较子程序;当实际温度大于 TH 的设定值时，显示“H”，继电器关闭。;当实际温度小于 TH 的设定值时，显示“O”，继电器吸合。;当实际温度小于 TL 的设定值时，显示“L”。;闪动显示标记符 H、L、O;====================================================TEMP_COMP:SETB TR0 ;启动中断MOV A,TEMP_THSUBB A,TEMP_ZH ;减数>被减数，则JC CHULI1 ;借位标志位C=1，转MOV A,TEMP_ZHSUBB A,TEMP_TL ;减数>被减数，则JC CHULI2 ;借位标志位C=1，转JNB FLAG2,T_COMP1 ;FLAG2=0,显示标记字符MOV 74H,#0AH ;熄灭符LCALL DISP1JMP T_COMP2T_COMP1: MOV 74H,#00HLCALL DISP1 ;显示"O"T_COMP2: CLR RELAY ;继电器吸合CLR TR0 ;关闭中断RET;---------------------------------------------;超温处理;---------------------------------------------CHULI1:SETB RELAY ;继电器关闭JNB FLAG2,CHULI10MOV 74H,#0AH ;熄灭符LCALL DISP1JMP CHULI11CHULI10: MOV 74H,#0DH LCALL DISP1 ;显示"H";CALL BEEP_BL ;蜂鸣器响CHULI11:CLR TR0 ;关闭中断RET;---------------------------------------------;欠温处理;---------------------------------------------CHULI2: ;欠温处理JNB FLAG2,CHULI20MOV 74H,#0AH ;熄灭符LCALL DISP1JMP CHULI21CHULI20: MOV 74H,#0CH LCALL DISP1 ;显示"L";CALL BEEP_BL ;蜂鸣器响CHULI21: CLR TR0 ;关闭中断RET;------------------------------------------------------------;把 DS18B20 暂存器里的温度报警值拷贝到EEROM;------------------------------------------------------------WRITE_E2:CALL RESETMOV A,#0CCH ;跳过ROM匹配LCALL WRITEMOV A,#48H ;温度报警值拷贝到EEROMLCALL WRITERET;--------------------------------------------------------------;把 DS18B20 EEROM 里的温度报警值拷贝回暂存器;-------------------------------------------------------------READ_E2:CALL RESETMOV A,#0CCH ;跳过ROM匹配LCALL WRITEMOV A,#0B8H ;温度报警值拷贝回暂存器CALL WRITERET 上一页 1 2 3 下一页
加入技术交流群
评论