分享用16F877A和DS18B20的测温程序
[PIC16F877A+汇编语言]DS18B20温度采集程序
![[PIC16F877A+汇编语言]DS18B20温度采集程序](https://img.taocdn.com/s3/m/e3f42a5c30b765ce0508763231126edb6e1a765a.png)
[PIC16F877A+汇编语言]DS18B20温度采集程序DS18B20温度采集程序[PIC16F877A+汇编语言];六位数码管显示温度结果，其中整数部分2位，小数部分4位;每次按下RB0键后进行一次温度转换。
;硬件要求：把DS18B20插在18B20插座上; 拨码开关S10第1位置ON，其他位置OFF; 拨码开关S5、S6全部置ON，其他拨码开关全部置OFF;*****************以下是暂存器的定义*****************************#INCLUDE#DEFINE DQ PORTA,0 ;18B20数据口__CONFIG_DEBUG_OFF&_CP_ALL&_WRT_HALF&_CPD_ON&_LVP_OFF &_BODEN_OFF&_PWRTE_ON&_W DT_OFF&_HS_OSC;调试模式关闭，写保护，一半ROM可在线改写，EEPROM加密，低压编程关闭，掉电检测关闭，上电延时开，看门狗关，4M晶振HS 振荡CBLOCK 20HDQ_DELAY1DQ_DELAY2TEMPTEMP1TEMP2 ;存放采样到的温度值TEMP3COUNTCOUNT1ENDCTMR0_VALUE EQU 0AH ;寄存器初值为6，预分频比1：4，中断一次时间为4*（256-6）=1000us DQ_DELAY_VALUE1 EQU 0FAHDQ_DELAY_VALUE2 EQU 4H;**********************以下是程序的开始************************ORG 00HNOPGOTO MAIN ;入口地址ORG 04HRETFIE ;在中断入口出放置一条中断返回指令，防止干扰产生中断TABLEADDWF PCL,1RETLW 0C0H ;0的编码（公阳极数码管）RETLW 0F9H ;1的编码RETLW 0A4H ;2的编码RETLW 0B0H ;3的编码RETLW 99H ;4的编码RETLW 92H ;5的编码RETLW 082H ;6RETLW 0F8H ;7RETLW 080H ;8RETLW 090H ;9;***************************主程序*******************************MAINCLRF PORTACLRF PORTBBANKSEL TRISACLRF TRISA ;A口所有先设置为输出CLRF TRISDMOVLW 01HMOVWF TRISB ;B0口为输入，其他为输出MOVWF ADCON1 ;关闭所有A/D口MOVLW 01HMOVWF OPTION_REG ;分频比1：4，定时器，内部时钟源 BCF STATUS,RP0CLRF TEMPCLRF TEMP1CLRF TEMP2 ;清零临时寄存器MOVLW 8HMOVWF COUNTMOVLW 38HMOVWF FSRCLRF INDFINCF FSR,1DECFSZ COUNT,1GOTO $-3;****************************循环处理部分************************;先启动18B20温度转换程序，在判断温度转换是否完成（需750us）;未完成则调用显示子程序，直到完成温度转换;完成后读取温度值;送LCD显示LOOPBTFSC PORTB,0 ;判断温度转换按键是否按下GOTO LOOP1 ;否，转显示CALL DELAY ;消抖BTFSC PORTB,0 ;再次判断GOTO LOOP1CALL RESET_18B20 ;调用复位18B20子程序MOVLW 0CCHCALL WRITE_18B20 ;SKIP ROM命令MOVLW 44HMOVWF TEMPCALL WRITE_18B20 ;温度转换命令CLRF STATUSCALL DELAY_750MS ;调用温度转换所需要的750MS延时NOP CALL RESET_18B20MOVLW 0CCHMOVWF TEMPCALL WRITE_18B20 ;SKIP ROM命令MOVLW 0BEHMOVWF TEMPCALL WRITE_18B20 ;读温度命令CALL READ_18B20 ;调用读温度低字节MOVFW TEMPMOVWF TEMP1 ;保存到TEMP1CALL READ_18B20 ;调用读温度高字节MOVFW TEMPMOVWF TEMP2 ;保存到TMEP2CALL RESET_18B20LOOP1CALL TEMP_CHANGE ;调用温度转换程序CALL DISPLAY ;调用LCD显示程序GOTO LOOP ;循环工作;*********************复位DS18B20子程序************************** RESET_18B20;根据DATASHEET介绍,写数据时应遵照如下规定：;主控制器把总线拉低至少480us，;18B20等待15-60us后，把总线拉低做为返回给控制器的应答信号BANKSEL TRISABCF TRISA,0BCF STATUS,RP0BCF DQMOVLW 0A0HMOVWF COUNT ;160USDECFSZ COUNT,1GOTO $-1 ;拉低480usBSF DQ ;释放总线MOVLW 14HMOVWF COUNTDECFSZ COUNT,1GOTO $-1 ;等待60usBANKSEL TRISABSF TRISA,0 ;DQ设置为输入BCF STATUS,RP0BTFSC DQ ;数据线是否为低GOTO RESET_18B20 ;否则继续复位MOVLW 4HMOVWF COUNTDECFSZ COUNT,1 ;延时一段时间后再次判断GOTO $-1BTFSC DQGOTO RESET_18B20MOVLW 4BHMOVWF COUNTDECFSZ COUNT,1GOTO $-1BANKSEL TRISABCF TRISA,0 ;DQ设置为输出BCF STATUS,RP0RETURN;*********************写DS18B20子程序**************************** WRITE_18B20;根据DATASHEET介绍,写数据时应遵照如下规定：;写数据0时，主控制器把总线拉低至少60us;写数据1时，主控制器把总线拉低，但必须在15us内释放MOVLW 8HMOVWF COUNT ;8位数据BANKSEL TRISABCF TRISA,0BCF STATUS,RP0BCF STATUS,CWRITE_18B20_1BSF DQ ;先保持DQ为高MOVLW 5HMOVWF COUNT1BCF DQ ;拉低DQ15usDECFSZ COUNT1,1GOTO $-1RRF TEMP,1BTFSS STATUS,C ;判断写的数据为0还是1 GOTO WRITE_0BSF DQ ;为1，立即拉高数据线GOTO WRITE_ENDWRITE_0BCF DQ ;继续保持数据线为低WRITE_ENDMOVLW 0FHMOVWF COUNT1 ;保持45msDECFSZ COUNT1,1GOTO $-1BSF DQ ;释放总线DECFSZ COUNT,1 ;是否写完8位数据GOTO WRITE_18B20_1RETURN;**********************读DS18B20子程序**************************** READ_18B20;根据DATASHEET介绍,读数据时应遵照如下规定：;读数据0时，主控制器把总线拉低后，18B20再把总线拉低60us ;读数据1时，主控制器把总线拉低后，保持总线状态不变;主控制器在数据线拉低后15us内读区数据线上的状态。
DS18B20测温程序
DS18B20测温程序（数码显示）*;************************************************************************** ;*接线方法: *;* 1、用一8P的数据线，一头插在J1，另一头插在J5，接通数码管的段选*;* 2、用一8P的数据线，一头插在J4，另一头插在J6，接通数码管的位选*;* 3、将DS18B20插在主机上的测温部份 *;* 4、用一根单根的数据线，一头插在DS18B20所在数据插针，另一头插到P2.7 * ;**************************************************************************TEMPER_L EQU 36H ;从DS18B20中读回高位，低位暂存区TEMPER_H EQU 35H ;TEMPER_NUM EQU 60H;温度值存储TEMPER_GE EQU 61HTEMPER_SHI EQU 62HTEMPER_SAVE EQU 63HFLAG1 BIT 00HFLAG2 BIT 01HRS BIT p3.0;液晶控制接口RW BIT p3.1E BIT p3.2DQ BIT P2.7;单总线口ORG 0000HA JMP MAINORG 0030HMAIN: MOV SP,#70HLCALL GET_TEMPERLCALL TEMPER_COVLCALL DISPLAYLJMP MAINNOP;**************************************************;读出转换后的温度值;**************************************************GET_TEMPER:SETB DQ ; 定时入口BCD: LCALL INIT_1820JB FLAG1,S22LJMP BCD ;若DS18B20不存在则返回S22: LCALL DELAY1MO V A,#0CCH ; 跳过ROM匹配------0CC命令LCALL WRITE_1820MOV A,#44H ; 发出温度转换命令LCALL WRITE_1820LCALL DELAYCBA CALL INIT_1820JB FLAG1,ABCLJMP CBAABC CALL DELA Y1MOV A,#0CCH ; 跳过ROM匹配LCALL WRITE_1820MOV A,#0BEH ; 发出读温度命令LCALL WRITE_1820LCALL READ_18200 ;READ_1820RET;************************************************************** ;读DS18B20的程序,从DS18B20中读出一个字节的数据;************************************************************** READ_1820:MOV R2,#8RE1:CLR CSETB DQNOPNOPCLR DQNOPNOPNOPSETB DQMOV R3,#7DJNZ R3,$MOV C,DQMOV R3,#23DJNZ R3,$RRC ADJNZ R2,RE1RET;******************************************************;写DS18B20的程序;******************************************************WRITE_1820:MOV R2,#8CLR CWR1:MOV R3,#6DJNZ R3,$RRC AMOV DQ,CMOV R3,#23DJNZ R3,$SETB DQNOPDJNZ R2,WR1SETB DQRET;****************************************************;读DS18B20的程序,从DS18B20中读出两个字节的温度数据;****************************************************READ_18200:MOV R4,#2 ; 将温度高位和低位从DS18B20中读出MOV R1,#36H ; 低位存入36H(TEMPER_L),高位存入35H(TEMPER_H) RE00:MOV R2,#8RE01:CLR CSETB DQNOPNOPCLR DQNOPNOPNOPSETB DQMOV R3,#7DJNZ R3,$MOV C,DQMOV R3,#23DJNZ R3,$RRC ADJNZ R2,RE01MOV @R1,ADEC R1DJNZ R4,RE00RET;;****************************************************;将从DS18B20中读出的温度数据进行转换;;****************************************************TEMPER_COV:MOV A,#0F0HANL A,TEMPER_L ; 舍去温度低位中小数点后的四位温度数值SWAP AMOV TEMPER_NUM,A ;得到低四位MOV A,TEMPER_LJNB ACC.3,TEMPER_COV1 ; 四舍五入去温度值INC TEMPER_NUMTEMPER_COV1:MOV A,TEMPER_HANL A,#07HSWAP AORL A,TEMPER_NUM ;得到高四位，再与低四位相或得到值MOV TEMPER_NUM,A ; 保存变换后的温度数据LCALL BIN_BCDRET;;**************************************************** ;将16进制的温度数据转换成压缩BCD码;;**************************************************** BIN_BCD:MOV A,TEMPER_NUMMOV B,#10DIV ABMOV TEMPER_SHI,AMOV TEMPER_GE,BMOV A,TEMPER_SAVECJNE A,TEMPER_GE,ZWFHRET:MOV TEMPER_SAVE,TEMPER_GERETZW:CALL LCDDISPAJMP FHRET;**************************************************** ;DS18B20初始化程序;;**************************************************** INIT_1820:SETB DQNOPCLR DQMOV R0,#250TSR1:DJNZ R0,TSR1 ; 延时520usSETB DQMOV R0,#25H ;96US-25HTSR2:DJNZ R0,TSR2JNB DQ,TSR3;如D0为低则复位成功，DS18B20存在LJMP TSR4 ; 延时TSR3:SETB FLAG1 ; 置标志位,表示DS1820存在LJMP TSR5TSR4:CLR FLAG1 ; 清标志位,表示DS1820不存在LJMP TSR7TSR5:MOV R0,#06BH ;200USTSR6:DJNZ R0,TSR6 ; 延时TSR7:SETB DQ ;拉高总线RET;************************************************* ;数码显示程序;************************************************* Display:MOV DPTR,#disptabMOV A,TEMPER_GEMOVC A,@A+DPTRMOV P1,ACLR P2.2CALL DELAYCALL DELAYSETB P2.2MOV DPTR,#disptabMOV A,TEMPER_SHIMOVC A,@A+DPTRMOV P1,ACLR P2.3CALL DELAYCALL DELAYSETB P2.3RET;************************************************* ;液晶显示程序;*************************************************mov p0,#01h;清屏call enrwmov p0,#38h;设为8位，5＊7字型两行 call enrwmov p0,#0Chcall enrwmov p0,#06hcall enrwmov p0,#80hcall enrwmov dptr,#yjtabcall rwrammov p0,#0C0hcall enrwmov dptr,#yjtab1call rwramW_TEM:mov p0,#0CChcall enrwMO V DPTR,#ASCIIMO V A,TEMPER_SHIMO VC A,@A+DPTRMO V P0,Asetb rsclr rwclr ecall delaysetb eMO V DPTR,#ASCIIMO V A,TEMPER_GEMO VC A,@A+DPTRMO V P0,Asetb rsclr rwclr ecall delaysetb eRE Tenrw:clr rsclr rwclr esetb eretrwram:mov r1,#00ha1: mov a,r1movc a,@a+dptrcall rwram2inc r1cjne a,#00h,a1retrwram2:mov p0,asetb rsclr rwclr ecall delaysetb eret;*************************************************;延时子程序;*************************************************DELAY:MOV R6,#250;延时500usDJNZ R6,$RETDELAY1:MOV R7,#20HDJNZ R7,$RETdisptab:db 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H;字形代码表 ;0 1 2 3 4 5 6 7 8 9yjtab: db 'HTTP// ',00hyjtab1:db 'CHENZHOU_TE:**`C',00hASCII: DB 30H,31H,32H,33H,34H,35H,36H,37H,38H,39Hend。
ds18b20温度计程序
ORG 0000HAJMP MAINORG 0030HMAIN: MOV R5,#0FFHMAIN1:MOV P0,#00H ;系统自检。
自高位向低位带小数点显示8扫描256次CLR P2.4LCALL DELAYSETB P2.4CLR P2.5LCALL DELAYSETB P2.5CLR P2.6LCALL DELAYSETB P2.6CLR P2.7LCALL DELAYSETB P2.7DJNZ R5,MAIN1SETB P2.4 ;关显示SETB P2.5SETB P2.6SETB P2.7SJMP MAIN2DELAY:MOV R7 ,#05H //；延时LP8: MOV R6,#19HLP7:DJNZ R6,LP7DJNZ R7,LP8RET; DS18B20初始化汇编程序;*****************************************//MAIN2:LCALL DISP //；主程序SETB P3.2 // ；18B20DQ置1拉高LCALL INIT // ；调初始化MOV A,#0CCH //；跳过ROM匹配------0CCLCALL WRITE // ；调写DS18B20的程序MOV A,#44H // ；发出温度转换命令LCALL WRITE // ；调写DS18B20的程序MOV R6,#34H //；延时136微秒转换时间，写一个字约需70微秒。
DJNZ R6,$LCALL DISPLCALL INITMOV A,#0CCHLCALL WRITEMOV A,#0BEH // ；发出读温度命令LCALL WRITELCALL READCLR CLCALL CONVTEMPLCALL DISPBCDLCALL DISPSJMP MAIN2WRITE:MOV R0,#8 // ；写子程序CLR CWR1: CLR P3.2MOV 20H,#3 // ；延时17微秒DJNZ 20H,$RRC AMOV P3.2,CMOV 21H,#10 // ；发送后延时45微秒DJNZ 21H,$SETB P3.2NOPDJNZ R0,WR1 // ；8位未发送完转SETB P3.2RETREAD: MOV R6,#2 // ；读子程序CLR PSW.5 // ；清清标志F0RE0:MOV R2,#8RE1:CLR CSETB P3.2 // ；拉高DQNOP // ；延时2微秒CLR P3.2 // ；拉低DQSETB P3.2MOV 22H,#3RE2:DJNZ 22H,RE2MOV C,P3.2MOV 23H,#10RE3:DJNZ 23H,RE3RRC ADJNZ R2,RE1 //；8位未读完继续读CPL PSW.5JNB PSW.5,RE4 // ；高8位保存至28HMOV 29H,A // ；低8位及小数保存至29HRE4:MOV 28H,ADJNZ R6,RE0 //；高8位未读继续RETINIT:SETB P3.2 // ；初始化开始DQ置1（整个时隙和理论值不是很准确）NOP //；延时L0:CLR P3.2 // ；DQ拉低MOV 24H,#100 // ；延时400微秒DJNZ 24H,$SETB P3.2 // ；DQ拉高MOV 25H,#10 // ；置40微秒延时常数L01:JNB P3.2,L2 // ；有18B20响应转L2DJNZ 25H,L01 // ；无18B20响应等待40微秒SJMP L0 // ；无18B20重新初始化L2:MOV R7,#60 // ，延时240微秒L3:DJNZ R7,L3SETB P3.2 //；DQ拉高、退出RETCONVTEMP:MOV A,28H //；温度转换ANL A,#80H //；温度正负判别JZ TEMPC1 //；温度为正转CLR C // ；温度为负调整MOV A,29HCPL AADD A,#01HMOV 29H,AMOV A,28HCPL AADDC A,#00HMOV 28H,AMOV 26H,#0BH // ；温度为负26H内送#0BHSJMP TEMPC11TEMPC1:MOV 26H,#0AH //；温度为正26H内送#0AHTEMPC11:MOV A,26HSWAP AMOV 26H,A // ；26H高4位为温度符号MOV A,29H // ；取温度小数部分ANL A,#0FH ;去整数个位MOV DPTR,#DOTTABMOVC A,@A+DPTRMOV 27H,A // ；查表得小数值，并保存至27H单元MOV A,29H // ；温度整数部分拼装后暂时存入AANL A,#0F0H // ；留下整数个位SWAP AMOV 29H,AMOV A,28HANL A,#0FHSWAP AHEX2BCD1:MOV B,#64H // ；温度整数部分除100得整数百位，并存入R7中DIV ABMOV R7,A // ；R7中为百位，B中为十位和个位MOV A,#0AH // ；温度整数部分除10得整数十位和个位XCH A,B // ；除数与被除数交换DIV ABSWAP AORL A,BTEMPC10:MOV 29H,A // ；温度十位和个位存入29H单元中，十位在高4位，个位在低4位ANL A,#0F0H // ；取温度十位SWAP AORL A,26H //；十位加温度符号存入26H单元；高4位为符号MOV 26H,AMOV A,29HANL A,#0FH // ；取温度个位SWAP AORL A,27HMOV 27H,A // ；27H单元中高4位为个位，低4位为小数MOV A,R7JZ TEMPC12 // ；百位为0退出ANL A,#0FH // ；百位不为0即温度为正和十位重新拼装后存入26H，高4位为百位SWAP A // ；MOV R7,AMOV A,26HANL A,#0FH ; // ；去除26H单元的符号ORL A,R7 //；百位和十位拼装，放入26H单元高4位为百位MOV 26H,A // ；低4位为十位TEMPC12:RETDOTTAB:DB 00H,01H,01H,02H,03HDB 03H,04H,04H,05H,06HDB 06H,07H,08H,08H,09H,09HDISPBCD:MOV A,27H // ；BCD码转换ANL A,#0FHMOV 70H,A // ；取小数，并保存在70H中SWAP AANL A,#0FHMOV 71H,A // ；取整数个位，并保存在71H中MOV A,26HANL A,#0FHMOV 72H,A //；取整数十位，并保存在72H中MOV A,26HSWAP AANL A,#0FHMOV 73H,A // ；取整数百位，并保存在73H中MOV A,72H //；取整数十位ANL A,#0F0HCJNE A,#00H,DISPBCD2SJMP DISPBCD2DISPBCD0:MOV A,26H // ；取整数百位ANL A,#0F0HCJNE A,#00H,DISPBCD2 //；百位不等于0退出MOV A,26HSW AP AANL A,#0FH //；十位保留符号MOV 73H,#0AHMOV 72H,ADISPBCD2:RETDISP:MOV R1,#70H // ；显示子程序MOV R5,#11101111B // ；送Y4位码PLAY:MOV P0,#0FFH // ；关段码MOV A,R5 // ；取Yn位码MOV P2,A // ；送位码MOV A,@R1 //；取段码MOV DPTR,#TABMOVC A,@A+DPTRMOV P0,A // ；送段码MOV A,R5JB ACC.5,LOOP1 // ；位码未指向Y2（整数个位）转CLR P0.7 ;；开小数点LOOP1:LCALL DL1MS //；调显示延时INC R1 // ；指向下一位显示段码MOV A,R5 ;取显示位码JNB ACC.7,ENDOUTRL A // ；向下一位位码MOV R5,AAJMP PLAYENDOUT:MOV P0,#0FFHMOV P3,#0FFHRETTAB: DB 0C0H,0F9H,0A4H,0B0HDB 99H,92H,82H,0F8HDB 80H,90H,0FFH,0BFHDL1MS:MOV R6,#14H // ；延时1mS DL1: MOV R7,#19HDL2: DJNZ R7,DL2DJNZ R6,DL1RETEND。
DS18B20汇编程序(完整版)
DS18B20汇编程序;实验目的：熟悉DS18B20的使用;六位数码管显示温度结果，其中整数部分2位，小数部分4位;每次按下RB0键后进行一次温度转换。
;硬件要求：把DS18B20插在18B20插座上; 拨码开关S10第1位置ON，其他位置OFF; 拨码开关S5、S6全部置ON，其他拨码开关全部置OFF;*****************以下是暂存器的定义*****************************#INCLUDE<P16F877A.INC>#DEFINE DQ PORTA,0 ;18B20数据口__CONFIG_DEBUG_OFF&_CP_ALL&_WRT_HALF&_CPD_ON&_LVP_OFF&_BODEN_OFF&_PWRTE_ON&_WDT_OFF&_HS _OSCCBLOCK 20HDQ_DELAY1DQ_DELAY2TEMPTEMP1TEMP2 ;存放采样到的温度值TEMP3COUNTCOUNT1ENDCTMR0_VALUE EQU 0AH ;寄存器初值为6，预分频比1：4，中断一次时间为4*（256-6）=1000usDQ_DELAY_VALUE1 EQU 0FAHDQ_DELAY_VALUE2 EQU 4H;**********************以下是程序的开始************************ ORG 00HNOPGOTO MAIN ;入口地址ORG 04HRETFIE ;在中断入口出放置一条中断返回指令，防止干扰产生中断TABLEADDWF PCL,1RETLW 0C0H ;0的编码（公阳极数码管）RETLW 0F9H ;1的编码RETLW 0A4H ;2的编码RETLW 0B0H ;3的编码RETLW 99H ;4的编码RETLW 92H ;5的编码RETLW 082H ;6RETLW 0F8H ;7RETLW 080H ;8RETLW 090H ;9;***************************主程序******************************* MAINCLRF PORTACLRF PORTBBANKSEL TRISACLRF TRISA ;A口所有先设置为输出CLRF TRISDMOVLW 01HMOVWF TRISB ;B0口为输入，其他为输出MOVLW 06HMOVWF ADCON1 ;关闭所有A/D口MOVLW 01HMOVWF OPTION_REG ;分频比1：4，定时器，内部时钟源BCF STATUS,RP0CLRF TEMPCLRF TEMP1CLRF TEMP2 ;清零临时寄存器MOVLW 8HMOVWF COUNTMOVLW 38HMOVWF FSRCLRF INDFINCF FSR,1DECFSZ COUNT,1GOTO $-3;****************************循环处理部分************************;先启动18B20温度转换程序，在判断温度转换是否完成（需750us）;未完成则调用显示子程序，直到完成温度转换;完成后读取温度值;送LCD显示LOOPBTFSC PORTB,0 ;判断温度转换按键是否按下GOTO LOOP1 ;否，转显示CALL DELAY ;消抖BTFSC PORTB,0 ;再次判断GOTO LOOP1CALL RESET_18B20 ;调用复位18B20子程序MOVLW 0CCHMOVWF TEMPCALL WRITE_18B20 ;SKIP ROM命令MOVLW 44HMOVWF TEMPCALL WRITE_18B20 ;温度转换命令CLRF STATUSCALL DELAY_750MS ;调用温度转换所需要的750MS延时NOPCALL RESET_18B20MOVLW 0CCHMOVWF TEMPCALL WRITE_18B20 ;SKIP ROM命令MOVLW 0BEHMOVWF TEMPCALL WRITE_18B20 ;读温度命令CALL READ_18B20 ;调用读温度低字节MOVFW TEMPMOVWF TEMP1 ;保存到TEMP1CALL READ_18B20 ;调用读温度高字节MOVFW TEMPMOVWF TEMP2 ;保存到TMEP2CALL RESET_18B20LOOP1CALL TEMP_CHANGE ;调用温度转换程序CALL DISPLAY ;调用LCD显示程序GOTO LOOP ;循环工作;*********************复位DS18B20子程序************************** RESET_18B20;根据DATASHEET介绍,写数据时应遵照如下规定：;主控制器把总线拉低至少480us，;18B20等待15-60us后，把总线拉低做为返回给控制器的应答信号BANKSEL TRISABCF TRISA,0BCF STATUS,RP0BCF DQMOVLW 0A0HMOVWF COUNT ;160USDECFSZ COUNT,1GOTO $-1 ;拉低480usBSF DQ ;释放总线MOVLW 14HMOVWF COUNTDECFSZ COUNT,1GOTO $-1 ;等待60usBANKSEL TRISABSF TRISA,0 ;DQ设置为输入BCF STATUS,RP0BTFSC DQ ;数据线是否为低GOTO RESET_18B20 ;否则继续复位MOVLW 4HMOVWF COUNTDECFSZ COUNT,1 ;延时一段时间后再次判断GOTO $-1BTFSC DQGOTO RESET_18B20MOVLW 4BHMOVWF COUNTDECFSZ COUNT,1GOTO $-1BANKSEL TRISABCF TRISA,0 ;DQ设置为输出BCF STATUS,RP0RETURN;*********************写DS18B20子程序**************************** WRITE_18B20;根据DATASHEET介绍,写数据时应遵照如下规定：;写数据0时，主控制器把总线拉低至少60us;写数据1时，主控制器把总线拉低，但必须在15us内释放MOVLW 8HMOVWF COUNT ;8位数据BANKSEL TRISABCF TRISA,0BCF STATUS,RP0BCF STATUS,CWRITE_18B20_1BSF DQ ;先保持DQ为高MOVLW 5HMOVWF COUNT1BCF DQ ;拉低DQ15usDECFSZ COUNT1,1GOTO $-1RRF TEMP,1BTFSS STATUS,C ;判断写的数据为0还是1GOTO WRITE_0BSF DQ ;为1，立即拉高数据线GOTO WRITE_ENDWRITE_0BCF DQ ;继续保持数据线为低WRITE_ENDMOVLW 0FHMOVWF COUNT1 ;保持45msDECFSZ COUNT1,1GOTO $-1BSF DQ ;释放总线DECFSZ COUNT,1 ;是否写完8位数据GOTO WRITE_18B20_1RETURN;**********************读DS18B20子程序**************************** READ_18B20;根据DATASHEET介绍,读数据时应遵照如下规定：;读数据0时，主控制器把总线拉低后，18B20再把总线拉低60us;读数据1时，主控制器把总线拉低后，保持总线状态不变;主控制器在数据线拉低后15us内读区数据线上的状态。
ds18b20详解及程序
d s18b20详解及程序(总1页) -CAL-FENGHAI.-(YICAI)-Company One1
-CAL-本页仅作为文档封面，使用请直接删除
最近都在学习和写单片机的程序, 今天有空又模仿DS18B20温度测量显示实验写了一个与DS18B20基于单总线通信的程序.
DS18B20 数字温度传感器(参考:智能温度传感器DS18B20的原理与应用)是DALLAS 公司生产的1－Wire，即单总线器件，具有线路简单，体积小的特点。
因此用它来组成一个测温系统，具有线路简单，在一根通信线，可以挂很多这样的数字温度计。
DS18B20 产品的特点:
（1）、只要求一个I/O 口即可实现通信。
（2）、在DS18B20 中的每个器件上都有独一无二的序列号。
（3）、实际应用中不需要外部任何元器件即可实现测温。
（4）、测量温度范围在－55 到＋125℃之间; 在-10 ~ +85℃范围内误差为
±5℃;
（5）、数字温度计的分辨率用户可以从9 位到12 位选择。
将12位的温度值转换为数字量所需时间不超过750ms;（6）、内部有温度上、下限告警设置。
DS18B20引脚分布图
DS18B20 详细引脚功能描述:
1、GND 地信号；
2、DQ数据输入出引脚。
开漏单总线接口引脚。
当被用在寄生电源下，此引脚可以向器件提供电源；漏极开路, 常太下高电平. 通常要求外接一个约5kΩ的上拉电阻.
3、VDD可选择的VDD 引脚。
电压范围:3~5.5V; 当工作于寄生电源时，此引脚必须接地。
DS18B20存储器结构图
暂存储器的头两个字节为测得温度信息的低位和高位字节;。
多个DS18B20温度测量程序
#include<reg51.h>#include<intrins.h> //nop函数#include<stdlib.h>#include<math.h>#define uchar unsigned char#define uint unsigned intsbit DS18B20_DQ=P2^7;sbit feng=P2^0;sbit deng=P1^0;#define LCD_data P0 //ch375数据端口uchar count1,count2,count;sbit LCD_RS=P3^5;sbit LCD_RW=P3^6; //ch375的rw也是此口sbit LCD_EN=P3^4;#include<key_fo.h>uchar ds18b20_serial[4][8]={0x28,0x51,0x8c,0x9e,0x03,0x00,0x00,0xfd, //第1个18B20的ID0x28,0x71,0x91,0x9e,0x03,0x00,0x00,0xdb, //第2个18B20的ID0x28,0x43,0xa6,0x9a,0x03,0x00,0x00,0x83, //第3个18B20的ID0x28,0xe3,0x8a,0x9e,0x03,0x00,0x00,0x08 //第4个18B20的ID};#include<12864.h>uchar temp_num1;uchar temp_num2;uint temper=0,yushe1=325,yushe2=325,yushe3=325,yushe4=325,piancha;/****************************************************函数：void Ds18b20_Delay(uint timer)功能：STC单片机严格的us级延时函数*****************************************************/void Ds18b20_Delay(uint timer) //us{while(timer--){_nop_();_nop_();_nop_();}}/***************************************************函数：void rest()功能：DS18B20芯片复位函数说明：复位时，MCU将数据线置为低电平，并且保持480uS-960uS，然后置为高电平，延时一段时间后，然后由MCU接受DS18B20的响应信号。
基于PIC16F877的DS18B20驱动程序
{
uchar i,dat=0;
for(i=0;i<8;i++)
{
DQ=1;
NOP();
NOP();
NOP();
NOP();
NOP();
dat>>=1;
DQ=0;
DQ_IN(); //定义成输入
dec=(uchar)(templ*50/8)%10; //将小数的第二位作为整数取出(templ*6.25)%10
templ=(templ*5)/8; //温度的小数部分扩大十倍(小数部分为*0.0625)
if(dec>=5)
{
templ+=1;
}
value=value*10+templ; //整数部分扩大十倍加扩大十倍后的小数部分
delay(160);
DQ=1;
DQ_IN();
delay(16); //等待DS18B20发出低电平应答
// n=DQ; //如果在工程中，并不知道总线上有没有挂测温设备，就需要返回n进行判断，n=0表示有设备
// while(DQ);
DQ_OUT();
DQ=1; //释放数据线
delay(2);
}
/*----------------------------------------
函数名称：read_byte()
作者 : haijun_zhang
入口参数：无
出口参数：dat
功能描述：从DS18B20读一个字节的数据
------------------------------------------*/
ds18b20温度检测程序(C语言)
//18B20单线温度检测的应用样例程序#include<REG52.H>#include<math.h>#include<INTRINS.H>#include<stdio.h>#define uchar unsigned char#define uint unsigned int;/*****************************************************************************/ sbit seg1=P2^0;sbit seg2=P2^1;sbit seg3=P2^2;sbit DQ=P1^7;//ds18b20 端口sfr dataled=0x80;//显示数据端口/**********************************************************************/uchar temp;uchar flag_get,count,num,minute,second;uchar code tab[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};//7段数码管段码表共阳uchar str[3];/***********************************************************************/void delay1(uchar MS);unsigned char ReadTemperature(void);void Init_DS18B20(void);unsigned char ReadOneChar(void);void WriteOneChar(unsigned char dat);void delay(unsigned int i);void INITchuangkou(void);//void Initdingshiqi1(void);/************************************************************************/main(){TMOD|=0x21;//定时器设置TH0=0xef;TL0=0xf0;EA=1;TR0=1;//Initdingshiqi1();INITchuangkou();P2=0x00;count=0;while(1){str[2]=0x39;//显示C符号str[0]=tab[temp/10]; //十位温度str[1]=tab[temp%10]; //个位温度if(flag_get==1) //定时读取当前温度{temp=ReadTemperature();printf("%d",temp);flag_get=0;}}}void tim(void) interrupt 1 using 1//中断，用于数码管扫描和温度检测间隔{TH0=0xef;//定时器重装值TL0=0xf0;num++;if (num==50){num=0;flag_get=1;//标志位有效second++;if(second>=60){second=0;minute++;}}count++;if(count==1){P2=0;dataled=str[0];}//数码管扫描if(count==2){P2=1;dataled=str[1];}if(count==3){ P2=2;dataled=str[2];count=0;}}/******************************************************************************void delay(unsigned int i)//延时函数{while(i--);}/****************************************************************************** *********///18b20初始化函数void Init_DS18B20(void){unsigned char x=0;DQ = 1; //DQ复位delay(8); //稍做延时DQ = 0; //单片机将DQ拉低delay(80); //精确延时大于480usDQ = 1; //拉高总线delay(10);x=DQ; //稍做延时后如果x=0则初始化成功x=1则初始化失败delay(5);}//读一个字节unsigned char ReadOneChar(void){unsigned char i=0;unsigned char dat = 0;for (i=8;i>0;i--){DQ = 0; // 给脉冲信号dat>>=1;DQ = 1; // 给脉冲信号if(DQ)dat|=0x80;delay(5);}return(dat);}//写一个字节void WriteOneChar(unsigned char dat){unsigned char i=0;for (i=8; i>0; i--){DQ = dat&0x01;delay(5);DQ = 1;dat>>=1;}delay(5);}//读取温度unsigned char ReadTemperature(void){unsigned char a=0;unsigned char b=0;unsigned char t=0;//float tt=0;Init_DS18B20();WriteOneChar(0xCC); // 跳过读序号列号的操作WriteOneChar(0x44); // 启动温度转换delay(200);Init_DS18B20();WriteOneChar(0xCC); //跳过读序号列号的操作WriteOneChar(0xBE); //读取温度寄存器等（共可读9个寄存器）前两个就是温度a=ReadOneChar();b=ReadOneChar();b<<=4;b+=(a&0xf0)>>4;t=b;//tt=t*0.0625;//t= tt*10+0.5; //放大10倍输出并四舍五入return(t);}void INITchuangkou(void){SCON=0X50;TH1=0XFD;TR1=1;TI=1;}/*void Initdingshiqi1(void);{TMOD=0X11;TH1=0XFD;TL1=0XFD; TR1=1;}*/。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
分享用16F877A和DS18B20的测温程序以下是用本网站的MCD－demouse板做了一个0到99度的测温程序，只要把数据处理程序改一下就可以改变测量范围和精度。
#INCLUDE <P16F877A.INC>CBLOCK 20HINPUT_HIGH_8 ;high 8 bit,don't allow other P use it but temperature conversion pINPUT_LOW_8 ;low 8 bit,don't allow other P use it but temperature conversion pDELAY_TEMP0DELAY_TEMP1PASS_TEMPUNITS_ORDERTENS_DIGITCOUNT_16ENDCORG 00HNOPGOTO INITIALORG 05HTABLEADDWF PCL,1DT 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,90H,90H,90H ;comment anodeDISPLAYMOVFW UNITS_ORDERCALL TABLEMOVWF PORTCBCF PORTA,0 ;trigger transistor of NPN than display units_o rderCALL DELAY_1MSBSF PORTA,0 ;closeMOVFW TENS_DIGITCALL TABLEMOVWF PORTCBCF PORTA,1 ;trigger transistor of NPN than display tens_dig itCALL DELAY_1MSBSF PORTA,1RETURNDELAY_1MSMOVLW 12HMOVWF DELAY_TEMP0MOVLW 12HMOVWF DELAY_TEMP1DECFSZ DELAY_TEMP1GOTO $-1DECFSZ DELAY_TEMP0GOTO $-5RETURNINITIALBANKSEL TRISAMOVLW 00HMOVWF TRISA ;porta0..1 to launch led, porta2 18b20 communicatio n portMOVLW B'00000110' ;set porta as digital portMOVWF ADCON1MOVLW 00HMOVWF TRISC ;8 bits led data busMOVLW 0FFH ;portb1 as a command keyMOVWF TRISBMOVLW 00HMOVWF OPTION_REG ;portb as week pull upBANKSEL PORTACLRF UNITS_ORDERCLRF TENS_DIGITMAINCALL DISPLAY ;press key to start the functionBTFSC PORTB,2GOTO $-2BTFSS PORTB,2 ;key release?GOTO $-1CALL INITIAL_18B20BTFSS DELAY_TEMP1,1GOTO MAINMOVLW 0CCH ;skip the romMOVWF PASS_TEMPCALL WRITE_18B20MOVLW 44H ;release the command of conversionMOVWF PASS_TEMPCALL WRITE_18B20MOVLW D'30'MOVWF COUNT_16MOVLW D'90' ;delay 900ms for conversionMOVWF DELAY_TEMP1MOVLW D'110'MOVWF DELAY_TEMP0DECFSZ DELAY_TEMP0GOTO $-1DECFSZ DELAY_TEMP1GOTO $-5DECFSZ COUNT_16GOTO $-9CALL INITIAL_18B20BTFSS DELAY_TEMP1,1GOTO MAINMOVLW 0CCHMOVWF PASS_TEMPCALL WRITE_18B20 ;release the command of reading MOVLW 0BEHMOVWF PASS_TEMPCALL WRITE_18B20CALL READ_18B20CALL INITIAL_18B20 ;end the other data to transmit BTFSS DELAY_TEMP1,1GOTO MAINCALL BCD_CONVERSIONGOTO MAININITIAL_18B20BCF PORTB,2BANKSEL TRISABCF TRISA,2BANKSEL PORTAMOVLW 0BHMOVWF DELAY_TEMP0MOVLW 22HMOVWF COUNT_16DECFSZ COUNT_16,1GOTO $-1 ;delay 586usDECFSZ DELAY_TEMP0,1GOTO $-5BANKSEL TRISABSF TRISA,2 ;release the busBANKSEL PORTAMOVFW PORTAMOVLW D'25' ;delay 76usMOVWF DELAY_TEMP0DECFSZ DELAY_TEMP0,1GOTO $-1BTFSS PORTA,2GOTO $+3BCF DELAY_TEMP1,1 ;not respondenceGOTO $+2BSF DELAY_TEMP1,1MOVLW D'160' ;delay 480usMOVWF DELAY_TEMP0DECFSZ DELAY_TEMP0,1GOTO $-1BSF DELAY_TEMP1,1 ;the slave device responded and set the bit of f lagRETURNWRITE_18B20MOVLW 08HMOVWF DELAY_TEMP0BCF STATUS,CWR_LOOP1BCF PORTA,2BANKSEL TRISABCF TRISA,2BANKSEL PORTANOPNOPRRF PASS_TEMP,1BTFSS STATUS,CGOTO WR_ZEROBANKSEL TRISABSF TRISA,2BANKSEL PORTAWR_ZEROMOVLW D'25' ;delay 75usMOVWF DELAY_TEMP1DECFSZ DELAY_TEMP1GOTO $-1BANKSEL TRISABSF TRISA,2BANKSEL PORTANOPNOPDECFSZ DELAY_TEMP0,1GOTO WR_LOOP1RETURNREAD_18B20MOVLW D'16'MOVWF DELAY_TEMP0READ_LOOP2BCF PORTA,2BANKSEL TRISABCF TRISA,2BANKSEL PORTANOPNOPNOPNOPNOPBANKSEL TRISABSF TRISA,2BANKSEL PORTANOPNOPNOPNOPBTFSS PORTA,2GOTO $+3BSF STATUS,CGOTO $+2BCF STATUS,CRRF INPUT_HIGH_8,1RRF INPUT_LOW_8,1MOVLW D'20' ;delay 60usMOVWF DELAY_TEMP1DECFSZ DELAY_TEMP1,1GOTO $-1DECFSZ DELAY_TEMP0,1GOTO READ_LOOP2RETURNBCD_CONVERSIONMOVLW 08HMOVWF COUNT_16MOVLW 0FHANDWF INPUT_HIGH_8,1SWAPF INPUT_HIGH_8,1MOVLW 0F0HANDWF INPUT_LOW_8,1SWAPF INPUT_LOW_8,1MOVFW INPUT_LOW_8ADDWF INPUT_HIGH_8,1 ;save 8bits data in input_high_8CLRF INPUT_LOW_8BCF STATUS,CLOOP_8TIMESRLF INPUT_HIGH_8,1RLF INPUT_LOW_8,1DECFSZ COUNT_16GOTO $+2GOTO SEPARATE_2RSMOVLW INPUT_LOW_8MOVWF FSRCALL ADJ_BCDGOTO LOOP_8TIMESADJ_BCDMOVLW 03HADDWF INDF,WMOVWF TENS_DIGITBTFSC TENS_DIGIT,3MOVWF INDF ;if the low four bits plus 3 is more than 7,MOVLW 30H ;add 3,if less than 7,do not change itADDWF INDF,W ;if the high four bits plus 3 is more than 7,than MOVWF TENS_DIGITBTFSC TENS_DIGIT,7 ;add 3,if less than 7,do not change itMOVWF INDFRETURNSEPARATE_2RSMOVFW INPUT_LOW_8MOVWF UNITS_ORDERMOVWF TENS_DIGITMOVLW 0FHANDWF UNITS_ORDER,1MOVLW 0F0HANDWF TENS_DIGIT,1SWAPF TENS_DIGIT,1RETURNEND。