ATmega16L学习板18B20测验程序

ATmega16L学习板18B20测验程序

晶振频率： 8MHz
编译： ICCAVR 6.31

#include
#include
#include “../include/board.h”

/*===================================================================
// 函数功用： DS18B20数据校验函数
// 形参： void
// 回来： unsigned char 校验成果
// 编写： 2004/8/25
// 补白： CRC公式为：CRC ＝ X^8 + X^5 + X^4 + 1
===================================================================*/
unsigned char crccheck(unsigned char *p,unsigned char len)
{
unsigned char bit0,cbit,r,temp,i,j,byte;
temp = 0;
for(j = 0; j < len; j++)
{
byte = p[j];
for(i = 0; i < 8; i++)
{
cbit = temp & 0x01;
bit0 = byte&0x01;
temp >>= 1;
r = cbit ^ bit0;
if(r == 1)
temp ^= 0x8c;
byte >>= 1;
}
}
return temp;
}

/*===================================================================
// 函数功用： us延时函数
// 形参： void
// 回来： void
// 编写： 2004/8/25
===================================================================*/
void delay_us(unsigned int time)
{
do
{
time–;
}
while (time>1);
}

/*===================================================================
// 函数功用： 判别总线应对
// 形参： void
// 回来： unsigned char true为应对
// 编写： 2004/8/25
===================================================================*/
unsigned char ds1820_ack(void)
{
unsigned char ack;
DDRC |= DQ;
PORTC &= ~DQ;
delay_us(500); // reset
PORTC |= DQ;
DDRC &= ~DQ;
delay_us(45);
ack = DQ & PINC;
delay_us(500); // host receive
if(ack)
return true;
else
return false;
}

/*===================================================================
// 函数功用： 从 1-wire 总线上读取一个字节
// 形参： void
// 回来： unsigned char 读到的值
// 编写： 2004/8/25
===================================================================*/
unsigned char read_byte(void)
{
unsigned char i;
unsigned char value = 0;
for(i = 8; i > 0; i–)
{
value >>= 1; // low bit first
DDRC |= DQ;
PORTC &= ~DQ; // pull DQ low to start timeslot
delay_us(3);
PORTC |= DQ;
DDRC &= ~DQ; // release bus
delay_us(10);
if(DQ & PINC)
value|=0x80;
delay_us(100);
DDRC |= DQ;
delay_us(5); // time interval
}
return(value);
}

/*===================================================================
// 函数功用： 向 1-WIRE 总线上写一个字节
// 形参： value 写到总线上的值
// 回来： void
// 编写： 2004/8/25
===================================================================*/
void write_byte(unsigned char value)
{
unsigned char i;
DDRC |= DQ;
for(i = 8; i > 0; i–)
{
if(value & 0x01)
{
PORTC &= ~DQ; // pull DQ low to start timeslot
delay_us(10);
PORTC |= DQ;
delay_us(100);
}
else
{
PORTC &= ~DQ; // pull DQ low to start timeslot
delay_us(100);
PORTC |= DQ;
delay_us(10);
}
value >>= 1;
}
}

/*===================================================================
// 函数功用： 读取温度
// 形参： *temperature 温度存储空间
// 回来： unsigned char true为有用
// 编写： 2004/8/25
===================================================================*/
unsigned char Read_Temperature(unsigned int *temperature)
{
unsigned char i;
union{
unsigned char c[2];
unsigned int x;
}temp;
unsigned char temporary[9];

ds1820_ack();
write_byte(0xCC); // Skip ROM
write_byte(0x44); // Start Conversion
for(i = 0; i < 16; i++)
delay_us(50000);
ds1820_ack();
write_byte(0xCC); // Skip ROM
write_byte(0xBE); // Read Scratch Pad
for(i = 0; i < 9; i++)
temporary[i] = read_byte();
temp.c[0] = temporary[0];
temp.c[1] = temporary[1];

if(crccheck(temporary,9))
return false;
else
{
*temperature = temp.x;
return true;
}
}

/*===================================================================
// 函数功用： 读取Rom Code
// 形参： *temp DS18B20的Rom Code存储空间
// 回来： unsigned char true为有用
// 编写： 2004/8/25
===================================================================*/
unsigned char Read_RomCode(unsigned char *temp)
{
ds1820_ack();
write_byte(0x33);
temp[0] = read_byte();
temp[1] = read_byte();
temp[2] = read_byte();
temp[3] = read_byte();
temp[4] = read_byte();
temp[5] = read_byte();
temp[6] = read_byte();
temp[7] = read_byte();
if(crccheck(temp,8))
return false;
else
return true;
}

/*===================================================================
// 函数功用： 匹配DS18B20
// 形参： *p DS18B20的Rom Code
// 回来： void
// 编写： 2004/8/25
===================================================================*/
void ds1820_match(unsigned char *p)
{
unsigned char i;
ds1820_ack();
write_byte(0x55);
for(i=0;i<8;i++)
write_byte(p[i]);
}