ATmega16L学习板18B20测试程序

 ATmega16L学习板18B20测试程序
   晶振频率： 8MHz
   编译：  ICCAVR 6.31
   编写：  hanzhaowei@2911.net
********************************************************************/

#include <iom16v.h>
#include <macros.h>
#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]);
}