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

/**********************************晶振:11.0592M模拟I2C总线操作DS16242007/11/27编写:fjh/**********************************/#include <iom128v.h>#include <macros.h>#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; //stopTCNT1H = 0xD5; //setupTCNT1L = 0xD1;OCR1AH = 0x2A;OCR1AL = 0x2F;OCR1BH = 0x2A;OCR1BL = 0x2F;OCR1CH = 0x2A;OCR1CL = 0x2F;ICR1H = 0x2A;ICR1L = 0x2F;TCCR1A = 0x00;TCCR1B = 0x05; //start TimerTIMSK = 0x04; //timer interrupt sources}#pragma interrupt_handler timer1_ovf_isr:15 void timer1_ovf_isr(void){uint temperbuf=0;ulong temperbuff=0;//TIMER1 has overflowedTCNT1H = 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;elseSDA_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;elseDat|=0x00;delay(5);SCL_L;delay(5);}DDRD|=(1<<5);//输出if(b)//每收一个数后发送ACK或nACKSDA_H;elseSDA_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();//RestartSendByte(0x91);//读数delay(5);temperdata[1]=ReceiveByte(0);//连续接收数据,所以发ACKdelay(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){}}。