×
单片机 > 单片机程序设计 > 详情

18B20通讯程序-PIC

发布时间:2020-05-26 发布时间:
|

这是我在16F877,18F1320,18F1220上通过的18B20程序,18B20主要是延时问题,这个解决了,什么都可以通过。

[原作者没有提供所使用的编译器,由于是C程序,所以大同小异,建议使用时,确认是否与你的编译器兼容]

C程序

#include

#define uch unsigned char

#define unint unsigned int

#define DQ RB3 //定义18B20数据端口

#define DQ_DIR TRISB3 //定义18B20D口方向寄存器

#define W1_INPUT 1

#define W1_OUTPUT 0

#define FALSE 0

#define TRUE !FALSE

#define DQ_HIGH() DQ_DIR = W1_INPUT

#define DQ_LOW() DQ = 0; DQ_DIR = W1_OUTPUT

void delay(unint x)

{

unint d;

d=x;

while(--d)

{;}

}

bit reset(void) //初始化18B20

{

static bit presence; //定义一个应答信号

DQ_LOW();

delay(70); //置总线为低电平并保持至少480us

DQ_HIGH(); //等电阻拉高总线并保持15-60us

delay(5);

presence=DQ; //接受应答信号

delay(20); //延时60-240us

return(presence); //返回应答信号

}

//*************** 读一位函数******************//

bit read_bit(void)

{

static bit i;

DQ_LOW();

DQ_LOW();

DQ_HIGH();

asm("nop");

asm("nop");

asm("nop");

i=DQ;

delay(3);

return(i);

}

//*********************写一位函数****************//

void write_bit(uch bitval)

{

DQ_LOW();

delay(1);

if (bitval==1)

{

DQ_HIGH();

}

delay(3);

DQ_HIGH();

}

//************** 从18B20中读一个字节**************//

uch read_byte(void)

{

uch i;

uch j;

uch value=0;

for (i=0;i<8;i++)

{

j=read_bit(); //调读位函数

if (j) //如果是 1 置1

{

value|=(0x01<

asm("nop");

asm("nop");

asm("nop");

}

} //否则置 0

return(value);

}

//*********************向18B20中 写一个字节**************//

void write_byte(uch val)

{

uch i;

uch temp;

for (i=0;i<8;i++)

{

temp=val>>i;

temp&=0x01;

write_bit(temp); //调写位函数

}

asm("nop");

asm("nop");

asm("nop");

}

main()

{

uch teml,temh;

GIE=0;

OSCCON=0X6E; //这是18F1320的频率选择寄存器

ADCON1=0X7F;

do{

;

}while (reset()) ; //复位等待从机应答

write_byte(0XCC); //忽略ROM匹配

write_byte(0X44); //发送温度转化命令

delay(25000); //延时100-300us

do

{

;

}while( reset()); //再次复位,等待从机应答

write_byte(0XCC); //忽略ROM匹配

write_byte(0XBE); //发送读温度命令

teml =read_byte(); //读出温度低8

temh=read_byte(); //读出温度高8位

DQ_HIGH(); //释放总线



『本文转载自网络,版权归原作者所有,如有侵权请联系删除』

热门文章 更多
stm32 总线矩阵介绍