溫度報警器ds18b20制作-預覽頁
【正文】 重設 ? 可擴充一些其他功能 程序流程圖 電路仿真圖 報警程序 ? LED_0 EQU 30H ? LED_1 EQU 31H ? WENDU EQU 35H ? TEMPER_L EQU 29H 。溫度設置開關 ? CLOSE BIT 。判斷是否高于上限 ? JC HALM ? SETB CLOSE2 ? MOV A,L_TEM ? DEC A ? SUBB A,WENDU 。關閉報警聲 ? JNB CLOSE,CL2 ? MOV R2,235 。超過 99度上限顯示 ? LCALL GET_TEMPER_2 ? MOV A,TEMPER_L ? MOV C,40H 。判斷 SP1是否按下 ? LCALL DELAY10MS 。 判斷 DS1820是否存在 若 DS18B20不存在則返回 ? S22: LCALL DELAY1 ? CLR LIGHT 。準備讀溫度前先復位 ? MOV A,0CCH 。讀出轉換后的溫度值 ? BCD_2: ? LCALL INIT_1820 。跳過 ROM匹配 ? LCALL WRITE_1820 ? MOV A,44H 。發(fā)出讀溫度命令 ? LCALL WRITE_1820 ? LCALL READ_18200 。低位存入 29H(TEMPER_L),高位存入 28H(TEMPER_H) ? RE00: MOV R2,8 。十位在 a ? mov LED_0,b 。 [取 ]個位數(shù) ? MOVC A,A+DPTR 。顯示 1ms ? setb ? mov a,LED_1 。開十位顯示 ? ? acall DELAY1mS 。超過上限顯示 ? MOV LED_1,10 ? mov dptr,TAB 。送出個位的 7段代碼 ? clr ? acall DELAY1mS ? setb ? mov a,LED_1 。顯示子程序將 29H中的 ,低 8位十六進制數(shù)轉換成 10進制 ? mov b,10 。指定查表啟始地址 ? mov r0,20 ? dpl1_3: mov a,LED_0 ? MOVC A,A+DPTR 。4個 100次沒完循環(huán) ? ret ? DELAY1mS: MOV R7,0f0H ? DJNZ R7,$ ? RET ? INIT_1820: SETB DQ 。等待 DS18B20回應 ? ? ? LJMP TSR4 ? TSR3: SETB FLAG 。時序要求延時一段時間 ? TSR7: SETB DQ ? RET ? DELAY10MS: MOV R6,20 //延時 10ms子程序 ? L1: MOV R7,247 ? DJNZ R7,$ ? DJNZ R6,L1 ? RET ? DELAY1: MOV R7,20H ? DJNZ R7,$ ? RET ? DELAY2: MOV R5,20 ? D2: MOV R6,20 ? D3: MOV R7,250 ? DJNZ R7,$ ? DJNZ R6,D3 ? DJNZ R5,D2 ? RET ? DELY500: MOV R7,0FDH ? DJNZ R7,$ ? RET ? END 實物圖
試題試卷相關推薦
鄂ICP備17016276號-1