新发布高精度温度传感芯片DS1624的完整程序

/**********************************

晶振:11.0592M

模拟I2C总线操作DS1624

2007/11/27

编写:fjh

/**********************************/

#include

#include

#include "lcd.c"

#define uchar unsigned char

#define uint unsigned int

#define ulong unsigned long

#define SCL_H PORTD|=(1<<4)

#define SCL_L PORTD&=~(1<<4)

#define SDA_H PORTD|=(1<<5)

#define SDA_L PORTD&=~(1<<5)

unsigned char temperdata[2]={0,0};

unsigned char buffer[6]={1,1,1,1,1,1};

/******************应用程序********************/ void timer1_init(void);

void delay(uchar us);

void Start(void);

void Stop(void);

void SendByte(uchar Dat);

uchar ReceiveByte(uchar b);

void Start_Temperature_T(void);

void I2cByteRead(void);

void data_to_buffer(uint a);

void Display(void);

/**********************************************/ void port_init(void)

{

PORTA = 0xff;

DDRA = 0xff;

PORTB = 0xff;

DDRB = 0xff;

PORTC = 0xff;

DDRC = 0xff;

PORTD = 0x00;

DDRD = 0xff;

PORTE = 0xff;

DDRE = 0xff;

PORTF = 0xff;

DDRF = 0xff;

PORTG = 0x00;

DDRG = 0x00;

}

// actual value: 1.000Sec (0.0%)

void timer1_init(void)

{

TCCR1B = 0x00; //stop

TCNT1H = 0xD5; //setup

TCNT1L = 0xD1;

OCR1AH = 0x2A;

OCR1AL = 0x2F;

OCR1BH = 0x2A;

OCR1BL = 0x2F;

OCR1CH = 0x2A;

OCR1CL = 0x2F;

ICR1H = 0x2A;

ICR1L = 0x2F;

TCCR1A = 0x00;

TCCR1B = 0x05; //start Timer

TIMSK = 0x04; //timer interrupt sources

}

#pragma interrupt_handler timer1_ovf_isr:15 void timer1_ovf_isr(void)

{

uint temperbuf=0;

ulong temperbuff=0;

//TIMER1 has overflowed

TCNT1H = 0xD5; //reload counter high value TCNT1L = 0xD1; //reload counter low value PORTF=~PORTF;

I2cByteRead();

buffer[5]=temperdata[1]/10;

buffer[4]=temperdata[1]%10;

temperbuf=temperdata[0];

temperbuf=(temperbuf>>3)*312;

data_to_buffer(temperbuf);

Display();

Start_Temperature_T();

}

void delay(uchar us)

{

while(us--);

}

/************************START***************************/ void Start(void)

{

//SDA_H;

delay(5);

SCL_H;

delay(5);

SDA_L;

delay(5);

SCL_L;

delay(5);

}

void Stop(void)

{

//SDA_L;

delay(5);

SCL_H;

delay(5);

SDA_H;

delay(5);

SCL_L;

delay(5);

}

/********************************************************/ /***********向I2C总线发送一个字节+接收一个ACK************/ void SendByte(uchar Dat)

{

uchar i=0;

uchar T_Data=0;

DDRD|=(1<<1);//输出

delay(10);

T_Data=Dat;

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

{

if(T_Data&0x80)

SDA_H;

else

SDA_L;

delay(5);

SCL_L;

delay(5);

SCL_H;

delay(5);

T_Data=T_Data<<1;

SCL_L;

delay(5);

}

SDA_H;//释放总线

delay(5);

SCL_L; /*********************/

delay(5);//接收一个ACK,不做处理

SCL_H; /*********************/

delay(5);

SCL_L;

}

/********************************************************/ /**********从I2C总线上读取一个字节+发送一个ACK***********/ uchar ReceiveByte(uchar b)

{

uchar i;

uchar temp;

uchar Dat;

SDA_H;

delay(5);

SCL_L;

delay(5);

DDRD&=~(1<<5);//输入

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

{

delay(5);

Dat=Dat<<1;

delay(5);

temp=PIND;

if(temp&0x20)

Dat|=0x01;

else

Dat|=0x00;

delay(5);

SCL_L;

delay(5);

}

DDRD|=(1<<5);//输出

if(b)//每收一个数后发送ACK或nACK

SDA_H;

else

SDA_L;

delay(5);

SCL_H;

delay(5);

SCL_L;

delay(5);

SDA_H; //释放总线

delay(100);

return Dat;

}

/****************************************************/ /***********启动温度转换,大约1S转换完一次***********/ void Start_Temperature_T(void)

{

Start();

SendByte(0x90);

delay(5);

SendByte(0xee);//

delay(5);

Stop();

}

/****************************************************/ /*****************读取温度寄存器值*******************/ void I2cByteRead(void)

{

Start();

SendByte(0x90);

delay(5);

SendByte(0xaa);

delay(5);

Start();//Restart

SendByte(0x91);//读数

delay(5);

temperdata[1]=ReceiveByte(0);//连续接收数据,所以发ACK

delay(5);

temperdata[0]=ReceiveByte(1);//只接收一个字节,所以发nACK delay(2);

Stop();

}

/**************HEX转BCD****************/

void data_to_buffer(uint a)

{

uchar i;

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

{

buffer[i]=a%10;

a=a/10;

}

}

/**************************************************/ void Display(void)

{

disp_two_char (0x81,tab[buffer[5]],tab[buffer[4]]);

disp_two_char (0x82,'.',tab[buffer[3]]);

disp_two_char (0x83,tab[buffer[2]],tab[buffer[1]]);

disp_one_char (0x84,tab[buffer[0]]);

disp_one_word (0x85,"℃");

}

/*******************MAIN函数*************************/ void main()

{

CLI();

port_init();

init_lcd ();

timer1_init();

SCL_L;

Stop();

Start_Temperature_T();

SEI();

lat_disp (0x00,0x00);//显示点阵

while(1)

{

}

}