PIC单片机 18B20温度传感器和六位数码管显示温度结果，其中整数部分2位，小数部分4位

//目的：熟悉DS18B20的使用 //六位数码管显示温度结果，其中整数部分2位，小数部分4位 //每次按下RB0键后进行一次温度转换。 //硬件要求：把DS18B20插在18B20插座上 // 拨码开关S10第1位置ON，其他位置OFF // 拨码开关S5、S6全部置ON，其他拨码开关全部置OFF #include<pic.h> __CONFIG(0x1832); //芯片配置字，看门狗关，上电延时开，掉电检测关，低压编程关，加密，4M晶体HS振荡 #define uch unsigned char //给unsigned char起别名 uch # define DQ RA0 //定义18B20数据端口 # define DQ_DIR TRISA0 //定义18B20D口方向寄存器 # define DQ_HIGH() DQ_DIR =1 //设置数据口为输入 # define DQ_LOW() DQ = 0; DQ_DIR = 0 //设置数据口为输出 unsigned char TLV=0 ; //采集到的温度高8位 unsigned char THV=0; //采集到的温度低8位 unsigned char TZ=0; //转换后的温度值整数部分 unsigned char TX=0; //转换后的温度值小数部分 unsigned int wd; //转换后的温度值BCD码形式 unsigned char shi; //整数十位 unsigned char ge; //整数个位 unsigned char shifen; //十分位 unsigned char baifen; //百分位 unsigned char qianfen; //千分位 unsigned char wanfen; //万分位 unsigned char table[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90}; //0-9的显示代码 //------------------------------------------------ //延时函数 void delay(char x,char y) { char z; do{ z=y; do{;}while(--z); }while(--x); } //其指令时间为：7+（3*（Y-1）+7）*（X-1）如果再加上函数调用的call 指令、页面设定、传递参数花掉的7 个指令。 //则是：14+（3*（Y-1）+7）*（X-1）。 //-------------------------------------------------- //结果显示函数 void display() { TRISA=0X00; //设置A口全为输出 PORTD=table[shi]; //显示整数十位 PORTA=0x3e; delay(10,70); PORTD=table[ge]&0X7F; //显示整数个位，并点亮小数点 PORTA=0x3d; delay(10,70); PORTD=table[shifen]; //显示小数十分位 PORTA=0x3b; delay(10,70); PORTD=table[baifen]; //显示小数百分位 PORTA=0x37; delay(10,70); PORTD=table[qianfen]; //显示小数千分位 PORTA=0x2f; delay(10,70); PORTD=table[wanfen]; //显示小数万分位 PORTA=0x1f; delay(10,70); } //------------------------------------------------ //系统初始化函数 void init() { ADCON1=0X07; //设置A口为普通数字口 TRISA=0X00; //设置A口方向为输出 TRISD=0X00; //设置D口方向为输出 } //----------------------------------------------- //复位DS18B20函数 reset(void) { char presence=1; while(presence) { DQ_LOW() ; //主机拉至低电平 delay(2,70); //延时503us DQ_HIGH(); //释放总线等电阻拉高总线,并保持15~60us delay(2,8); //延时70us if(DQ==1) presence=1; //没有接收到应答信号，继续复位 else presence=0; //接收到应答信号 delay(2,60); //延时430us } } //----------------------------------------------- //写18b20写字节函数 void write_byte(uch val) { uch i; uch temp; for(i=8;i>0;i--) { temp=val&0x01; //最低位移出 DQ_LOW(); NOP(); NOP(); NOP(); NOP(); NOP(); //从高拉至低电平,产生写时间隙 if(temp==1) DQ_HIGH(); //如果写1,拉高电平 delay(2,7); //延时63us DQ_HIGH(); NOP(); NOP(); val=val>>1; //右移一位 } } //------------------------------------------------ //18b20读字节函数 uch read_byte(void) { uch i; uch value=0; //读出温度 static bit j; for(i=8;i>0;i--) { value>>=1; DQ_LOW(); NOP(); NOP(); NOP(); NOP(); NOP(); NOP(); //6us DQ_HIGH(); //拉至高电平 NOP(); NOP(); NOP(); NOP(); NOP(); //4us j=DQ; if(j) value|=0x80; delay(2,7); //63us } return(value); } //------------------------------------------------- //启动温度转换函数 void get_temp() { int i; DQ_HIGH(); reset(); //复位等待从机应答 write_byte(0XCC); //忽略ROM匹配 write_byte(0X44); //发送温度转化命令 for(i=20;i>0;i--) { display(); //调用多次显示函数，确保温度转换完成所需要的时间 } reset(); //再次复位，等待从机应答 write_byte(0XCC); //忽略ROM匹配 write_byte(0XBE); //发送读温度命令 TLV=read_byte(); //读出温度低8 THV=read_byte(); //读出温度高8位 DQ_HIGH(); //释放总线 TZ=(TLV>>4)|(THV<<4)&0X3f; //温度整数部分 TX=TLV<<4; //温度小数部分 if(TZ>100) TZ/100; //不显示百位 ge=TZ%10;//个位 //整数部分个位 shi=TZ/10;//十位 //整数十位 wd=0; if (TX & 0x80) wd=wd+5000; if (TX & 0x40) wd=wd+2500; if (TX & 0x20) wd=wd+1250; if (TX & 0x10) wd=wd+625; //以上4条指令把小数部分转换为BCD码形式 shifen=wd/1000; //十分位 baifen=(wd%1000)/100; //百分位 qianfen=(wd%100)/10; //千分位 wanfen=wd%10; //万分位 NOP(); } //-------------------------------------------------- //猪函数 void main() { init(); //调用系统初始化函数 while(1) { get_temp(); //调用温度转换函数 display(); //调用结果显示函数 } }