📄 gsd.c.bak
字号:
#include <reg51.h>
#include <intrins.h>//装载
#define uchar unsigned char
#define uint unsigned int
#define PCF8583 0XA0
#define _Nop() _nop_() /*定义空指令*/
sbit SDA=P1^7; /*模拟I2C数据传送位*/
sbit SCL=P1^6; /*模拟I2C时钟控制位*/
sbit DATAD=P1^1;
sbit CLKD=P1^0;
sbit DATAT=P3^0;
sbit CLKT=P3^1;
sbit DQ=P3^5;
sbit TEST=P3^4;
uchar SEG7[10]={0x03,0x9f,0x25,0x0d,0x99,0x49,0x41,0x1f,0x01,0x09};/*0~9的数码管段码*/
uchar D_act[10]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80,0x04,0x08};//12位数码管位码；
uchar T_act[2]={0x10,0x20};
void dis_temper(uchar m);
void d_send164(uchar m);
void T_send164(uchar m);
void dis_time(uchar m);
void init_timer0(void);
uchar discnt,cnt;
uchar read_temp;
uint time_cnt,T_discnt;
uchar temp1,temp2,temp;
uchar MS,mon,day,hou,min,sec,year;
bit ack;
void init_timer0(void)
{
TMOD=0X11;
TH0=0xF4;TL0=0x48;TH1=0X3C;TL1=0XAF;
ET0=1;
ET1=1;
TR1=1;TR0=1;EA=1;
}
void time1(void) interrupt 3 //50ms
{//uchar temp1,temp2,temp;
TH1=0X3C;TL1=0XAF;
time_cnt++; // gettempTS();
if(time_cnt>=20) // 50毫秒计时时间到，读PCF8583的各寄存器的值
{ read_temp=1;
time_cnt=0;
}
}
void time0(void) interrupt 1
{
/*TH0=0xFa;TL0=0x24;//TH0=0xF4;TL0=0x48;
dis_time(discnt);//}// 显示温度
discnt++;
if(discnt>1)discnt=0;// 显示为12位数码管*/
TH0=0xFa;TL0=0x24;
discnt++;cnt++;T_discnt++;
if(T_discnt>=2)T_discnt=0;
if(discnt>=10)discnt=0;// 显示为12位数码管
if(cnt>200)cnt=0;// 调整时的闪烁周期
dis_temper(T_discnt);
switch(MS)
{
case 0:{dis_time(discnt); }break;// 显示走时
//case 1:{dis_adjtime(discnt);}break;// 显示调时
default: break;
}
}
void T_send164(uchar m)
{uchar k,i,b;
k=SEG7[m];
i=8;
CLKT=0;
while (i--)
{b=k>>i;
if((b&0x01)==0x01)DATAT=1;//判断b的最低位的值是多少
else DATAT=0;
CLKT=1;
CLKT=0;
}
}
void d_send164(uchar m)
{uchar k,i,b;
k=SEG7[m];
i=8;
CLKD=0;
while (i--)
{b=k>>i;
if((b&0x01)==0x01)DATAD=1;//判断b的最低位的值是多少
else DATAD=0;
CLKD=1;
CLKD=0;
}
}
void dis_temper(uchar m)
{
P1&=0Xcf;
switch(m)
{case 0:{T_send164(temp/10);P1|=T_act[m];}break;//P1&=0Xcf;P1&=0Xcf;
case 1:{T_send164(temp%10);P1|=T_act[m];}break;
default:break;}
}
void dis_time(uchar m)
{
P1&=0Xf3;/// 等价于 P1=P1&0xc3；；准备送段码 ，位码口全部清零
P2=0X00;////准备送段码，位码口全部清零
{switch(m)
{case 0:{d_send164(mon/10);P2|=D_act[m];P1&=0Xf3;}break;
case 1:{d_send164(mon%10);P2|=D_act[m];P1&=0Xf3;}break;
case 2:{d_send164(day/10);P2|=D_act[m];P1&=0Xf3;}break;
case 3:{d_send164(day%10);P2|=D_act[m];P1&=0Xf3;}break;
case 4:{d_send164(hou/10);P2|=D_act[m];P1&=0Xf3;}break;
case 5:{d_send164(hou%10);P2|=D_act[m];P1&=0Xf3;}break;
case 6:{d_send164(min/10);P2|=D_act[m];P1&=0Xf3;}break;
case 7:{d_send164(min%10);P2|=D_act[m];P1&=0Xf3;}break;
case 8:{d_send164(sec/10);P1|=D_act[m];P2=0X00;}break;
case 9:{d_send164(sec%10);P1|=D_act[m];P2=0X00;}break;
/*case 10:{send164(temp%10);P1|=act[m];P2=0X00;}break;
case 11:{send164(temp/10);P1|=act[m];P2=0X00;}break;*/
default:break;}
}
}
void Delay_uS(unsigned int tt) //延时时间为（tt*9+16）us.晶振为12MHz
{
while(tt--)
;
}
void delay15us(void)
{
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
}
void Delay1mS(unsigned int tt) //延时时间为tt ms.晶振为12MHz
{
unsigned char i;
while(tt--)
for(i=200;i>0;i--)
;
}
void DS18B20_init(void)
{ uint i;
DQ=1;
_nop_();
start: DQ=0;
for(i=0;i<8;i++){delay15us();delay15us();delay15us();delay15us();}
//Delay_uS(54);
DQ=1;
delay15us();delay15us(); //Delay_uS(4);
while(DQ)
{
i++;
if(i>320)
{goto start;
}
}
DQ=1;
for(i=0;i<8;i++){delay15us();delay15us();delay15us();delay15us();}//Delay_uS(45);
}
bit readTS(void) //读DS18B20数据位
{
bit b;
DQ=1;
DQ=0;
_nop_();//_nop_();_nop_();
DQ=1;
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();//_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
b=DQ;_nop_();_nop_();_nop_();
DQ=1;
delay15us();delay15us();delay15us();delay15us();//delay15us(); Delay_uS(5);
//DQ=1;
return b;
}
uchar readBTS(void) //读1字节
{char i,j;
bit b;
uchar a;
j=0;
for(i=0;i<8;i++)
{
b=readTS();
if(b)j+=1;
j=_cror_(j,1);
}
a=(uchar)j;
return a;
}
void write0TS(void) //写DS18B20数据位0
{
DQ=1;
DQ=0;
delay15us();delay15us();delay15us();delay15us();// delay15us();delay15us();Delay_uS(5);delay15us();
_nop_();_nop_();_nop_();
DQ=1;
_nop_();
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
}
//********************************************************
void write1TS(void) //写DS18B20数据位1
{
DQ=1;
DQ=0;
_nop_();
_nop_();_nop_();_nop_();_nop_();_nop_();
DQ=1;
//_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
delay15us();delay15us();delay15us();delay15us();_nop_();_nop_();_nop_();_nop_();_nop_(); //delay15us();delay15us();delay15us();delay15us();delay15us();delay15us();delay15us();Delay_uS(5);
}
void writeBTS(uchar byte) //写1字节
{uchar i;
for(i=0;i<8;i++)
{
if(byte&0x01)
write1TS();
else
write0TS();
byte=byte>>1;
}
}
void gettempTS(void) //读取测得的环境温度
{uchar a,b;
EA=0;
DS18B20_init();
writeBTS(0xcc);
writeBTS(0x44);EA=1;
Delay1mS(700);EA=0;
DS18B20_init();
writeBTS(0xcc);
writeBTS(0xbe);
temp2=readBTS();
temp1=readBTS();
readBTS();readBTS();readBTS();readBTS();
readBTS();readBTS();readBTS();EA=1;
a=(temp2&0xf0)>>4;
b=(temp1&0x07)<<4;
temp=a|b;
/*temp1=temp1<<4;
temp1+=(temp2&0xf0)>>4;
temp2=(temp2&0x0f)?5:0;*/
}
/*******************************************************************
起动总线函数
函数原型: void Start_I2c();
功能: 启动I2C总线,即发送I2C起始条件.
********************************************************************/
void Start_I2c(void)
{
SDA=1; /*发送起始条件的数据信号*/
_Nop();
_Nop();
SCL=1;
_Nop(); /*起始条件建立时间大于4.7us,延时*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop(); /*起始条件建立时间大于4.7us,延时*/
SDA=0; /*发送起始信号*/
_Nop(); /* 起始条件锁定时间大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop(); /*起始条件建立时间大于4.7us,延时*/
SCL=0; /*钳住I2C总线，准备发送或接收数据 */
_Nop();
_Nop();
_Nop();
_Nop();
}
/*******************************************************************
结束总线函数
函数原型: void Stop_I2c();
功能: 结束I2C总线,即发送I2C结束条件.
********************************************************************/
void Stop_I2c(void)
{
SDA=0; /*发送结束条件的数据信号*/
_Nop(); /*发送结束条件的时钟信号*/
_Nop(); /*发送结束条件的时钟信号*/
SCL=1; /*结束条件建立时间大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
SDA=1; /*发送I2C总线结束信号*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
}
/*******************************************************************
字节数据传送函数
函数原型: void SendByte(uchar c);
功能: 将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
此状态位进行操作.(不应答或非应答都使ack=0 假)
发送数据正常，ack=1; ack=0表示被控器无应答或损坏。
********************************************************************/
void SendByte(uchar c)
{
uchar BitCnt;
for(BitCnt=0;BitCnt<8;BitCnt++) /*要传送的数据长度为8位*/
{
if((c<<BitCnt)&0x80)SDA=1; /*判断发送位*/
else SDA=0;
_Nop();
_Nop();
SCL=1; /*置时钟线为高，通知被控器开始接收数据位*/
_Nop();
_Nop(); /*保证时钟高电平周期大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop(); /*保证时钟高电平周期大于4μs*/
_Nop();
_Nop();
_Nop();
SCL=0;
}
_Nop();
_Nop();
_Nop();
_Nop();
SDA=1; /*8位发送完后释放数据线，准备接收应答位*/
_Nop();
_Nop();
_Nop();
_Nop();
SCL=1;
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
if(SDA==1)ack=0;
else ack=1; /*判断是否接收到应答信号*/
SCL=0;
_Nop();
_Nop();
_Nop();
_Nop();
}
/*******************************************************************
字节数据传送函数
函数原型: uchar RcvByte();
功能: 用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
发完后请用应答函数。
********************************************************************/
uchar RcvByte(void)
{
uchar retc;
uchar BitCnt;
retc=0;
SDA=1; /*置数据线为输入方式*/
for(BitCnt=0;BitCnt<8;BitCnt++)
{
_Nop();
_Nop();
SCL=0; /*置时钟线为低，准备接收数据位*/
_Nop();
_Nop(); /*时钟低电平周期大于4.7μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop(); /*时钟低电平周期大于4.7μs*/
_Nop();
_Nop();
_Nop();
SCL=1; /*置时钟线为高使数据线上数据有效*/
_Nop();
_Nop();
_Nop();
_Nop();
retc=retc<<1;
if(SDA==1)retc=retc+1; /*读数据位,接收的数据位放入retc中 */
_Nop();
_Nop();
_Nop();
_Nop();
}
SCL=0;
_Nop();
_Nop();
_Nop();
_Nop();
return(retc);
}
/********************************************************************
应答子函数
原型: void Ack_I2c(bit a);
功能:主控器进行应答信号,(可以是应答或非应答信号)
********************************************************************/
void Ack_I2c(bit a)
{
if(a==0)SDA=0; /*在此发出应答或非应答信号 */
else SDA=1;
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
SCL=1;
_Nop();
_Nop(); /*时钟低电平周期大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop(); /*时钟低电平周期大于4μs*/
_Nop();
_Nop();
_Nop();
SCL=0; /*清时钟线，钳住I2C总线以便继续接收*/
_Nop();
_Nop();
_Nop();
_Nop();
}
/*******************************************************************
向有子地址器件发送字节数据函数
函数原型: bit ISendByte(uchar sla,ucahr c);
功能: 从启动总线到发送地址，数据，结束总线的全过程,从器件地址sla.
如果返回1表示操作成功，否则操作有误。
注意： 使用前必须已结束总线。
********************************************************************/
bit ISendByte(uchar sla,uchar suba,uchar c)
{
Start_I2c(); /*启动总线*/
SendByte(sla); /*发送器件地址*/
if(ack==0)return(0);
SendByte(suba); /*发送器件地址*/
if(ack==0)return(0);
SendByte(c); /*发送数据*/
if(ack==0)return(0);
Stop_I2c(); /*结束总线*/
return(1);
}
/*******************************************************************
向有子地址器件读字节数据函数
函数原型: bit IRcvByte(uchar sla,ucahr *c);
功能: 从启动总线到发送地址，读数据，结束总线的全过程,从器件地
址sla，返回值在c.
如果返回1表示操作成功，否则操作有误。
注意： 使用前必须已结束总线。
********************************************************************/
uchar IRcvByte(uchar sla,uchar suba)
{
uchar c;
Start_I2c(); /*启动总线*/
SendByte(sla); /*发送器件地址*/
if(ack==0)return(0);
SendByte(suba); /*发送子器件地址*/
if(ack==0)return(0);
Start_I2c();
SendByte(sla+1); /*发读器件地址*/
if(ack==0)return(0);
c=RcvByte(); /*读取数据*/
Ack_I2c(1); /*发送非就答位*/
Stop_I2c(); /*结束总线*/
return c;
}
void readtime(void)
{uchar time_temp1,time_temp,time_temp2;
time_temp=IRcvByte(PCF8583, 0X02);
time_temp1=(time_temp/16)&0x0f;time_temp2=time_temp&0x0f;
sec=time_temp1*10+time_temp2;
time_temp=IRcvByte(PCF8583, 0X03);
time_temp1=time_temp>>4;time_temp2=time_temp&0x0f;
min=time_temp1*10+time_temp2;
time_temp=IRcvByte(PCF8583, 0X04);
time_temp1=(time_temp>>4)&0x03;time_temp2=time_temp&0x0f;
hou=time_temp1*10+time_temp2;
time_temp=IRcvByte(PCF8583, 0X05);
time_temp1=(time_temp>>4)&0x03;;time_temp2=time_temp&0x0f;
day=time_temp1*10+time_temp2;
time_temp=IRcvByte(PCF8583, 0X06);
time_temp1=(time_temp>>4)&0x01;time_temp2=time_temp&0x0f;
mon=time_temp1*10+time_temp2;
time_temp=IRcvByte(PCF8583, 0X05);
time_temp1=(time_temp>>6)&0x03;time_temp2=time_temp&0x0f;
year=time_temp1;
}
void main(void)
{
uchar a;
init_timer0();//初始化定时器T0
show_hz();
show_date_time();
//ISendByte( PCF8583, 0x00, 0x00);
// DS18B20_init(); //温度传感器DS18B20初始化
//DS18B20_init(); //温度传感器DS18B20初始化
// temp=82;
while(1)
{
readtime();
if(a!=sec)
{
a=sec;
show_date_time();
}
if( read_temp==1)
{
gettempTS();
read_temp=0;
} //读DS18B20检测到的温度Delay1mS(600);
//Display();
}
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -