闹钟(定时) 温度c文库.doc

/********************************************************************
* 文件名 ： 时钟DS1302LCD.c
* 描述 : 该文件实现用DS1302来实现日历和时钟功能，液晶1602上显示出来。
* 创建人 ： 东流，2009年4月10日
* 版本号 ： 2.0
***********************************************************************/
#include<reg52.h>
#include<intrins.h>
#define uchar unsigned char//无符号字符0-255
#define uint unsigned int//无符号整型0-65535
#define CYCLE_1_0 0x698 // 1688us
#define CYCLE_1_5 0x9E4 // 2532
#define CYCLE_2_0 0xD30 // 3376us
#define TH_CYCLE_1_0 ( CYCLE_1_0 >> 8 )
#define TH_CYCLE_1_5 ( CYCLE_1_5 >> 8 )
#define TH_CYCLE_2_0 ( CYCLE_2_0 >> 8 )
// 用于解码的变量
unsigned int SAA3010RecvCode = 0; // 保存解码数值（1个控制位 5个地址位 6个命令位)
unsigned char SAA3010BitCount = 0; // 记录已经解码的位数
unsigned char SAA3010State = 0; // 初始状态
sbit relayout0= P1^0;
sbit relayout1= P1^1;
sbit relayout2= P1^2;
sbit relayout3= P1^3;
sbit relayout4= P1^4;
char code Tab[16]="0123456789ABCDEF";

sbit ACC0 = ACC^0;
sbit ACC7 = ACC^7;
sbit P3_2 = P3^2;
sbit P3_4 = P3^4;
sbit T_CLK = P1^6; /*实时时钟时钟线引脚 */
sbit T_IO = P3^5; /*实时时钟数据线引脚 */
sbit T_RST = P1^7; /*实时时钟复位线引脚 */
sbit Add_Key = P3 ^ 6;//加1键，S1
sbit Dec_Key = P3 ^ 7;//减1键，S2
sbit OK_Key = P2 ^ 0;//确定键，S3
sbit Bell_Out = P2 ^ 1;//闹钟管脚输出。低电平有效
sbit DQ = P2^3;//ds1820data
//这三个引脚参考资料
sbit E=P2^7; //1602使能引脚
sbit RW=P2^6; //1602读写引脚
sbit RS=P2^5; //1602数据/命令选择引脚

bit flag,secs=0,mins=0,hours=0,years=0,mons=0,days=0,weeks=0; //闪烁标志位
bit Bell_Swh,Hourb,Minb,Secb,Kgb;//闹钟调时闪烁标志位
bit flag_min = 0,flag_sec = 0;//整点报警标志位
unsigned char id,id2,d,e,S_1302,H_1302,H_Bell,S_Bell; //id为第几个调整对象，
uchar sec, min, hour, day, month, year,week;
/************************************************************/
//函数声明
void delay();
void Delay1(int num);//延时函数
uchar bcdtodec(uchar bcd);
uchar Convert(uchar In_Date);//形参主函数付的值
uchar dectobcd(uchar dec);
void Disp(void);//显示和闪烁函数
void enable(uchar del);
void id_case1_key(void);//id为1时的下一级选择
void L1602_char(uchar hang,uchar lie,char sign);
void L1602_init(void);
void L1602_string(uchar hang,uchar lie,uchar *p);
void Run_DS1302(void);
uchar uc_RTOutputByte(void);
void v_BurstR1302R(uchar *pReDa);
void v_BurstR1302T(uchar *pSecDa);
void v_BurstW1302R(uchar *pReDa);
void v_BurstW1302T(uchar *pSecDa);
void v_Get1302(uchar ucCurtime[]);
void v_RTInputByte(uchar ucDa);
void v_Set1302(uchar *pSecDa);
void v_W1302(uchar ucAddr, uchar ucDa);
void write(uchar del);
void Write_DS1302Init(void);
void Delay2(unsigned int t);//
void Disp2(void);//显示和闪烁函数
void id_case2_key(void);//id2为1时的下一级选择
void Set_Bell(unsigned char sel, bit sel_1);//根据选择调整相应项目并写入
unsigned int ReadTemperature(void);//读取温度
void Init_DS18B20(void);//初始化ds1820
unsigned char ReadOneChar(void);//温度读一个字节
void WriteOneChar(unsigned char dat);//温度写一个字节
void DelayUs(unsigned char us);//us 延时
void DelayMs(unsigned char ms);// Ms 延时

/********************************************************************
* 名称 : delay()
* 功能 : 延时,延时时间大概为140US。
* 输入 : 无
* 输出 : 无
***********************************************************************/

void delay()//void为函数类型，说明返回数值的类型，要返回就要有return，如不，则void
{
int i,j;
for(i=0; i<=10; i++)
for(j=0; j<=2; j++)
;
}
/******************************************************************************/
void Delay1(int num)//延时函数
{
while(num--) ;
}
/*****************************************************************/
void Delay2(unsigned int t)//
{
unsigned int i,j;
for(i=0;i<t;i++)
{
for(j=0;j<10;j++);
}
}
/******************************************************************/
void DelayUs(unsigned char us);//us 延时
void DelayMs(unsigned char ms);// Ms 延时

/********************************************************************/
void DelayUs(unsigned char us)// us 延时
{
unsigned char uscnt;
uscnt=us>>1;/* Crystal frequency in 12MHz*/
while(--uscnt);
}
/******************************************************************/
void DelayMs(unsigned char ms)// Ms 延时
{
while(--ms)
{
DelayUs(250);
DelayUs(250);
DelayUs(250);
DelayUs(250);
}
}
/*******************************************************************/
void SAA3010ProcessCommand(int remotecode)// 红外处理命令
{
unsigned char buffer[3];

buffer[0] = 0x80;
buffer[1] = (unsigned char)((remotecode >> 8)& 0xFF);
buffer[2] = (unsigned char)(remotecode & 0xFF);
if(buffer[2]==0x04)relayout4=~relayout4;
if(buffer[2]==0x03)relayout3=~relayout3;
if(buffer[2]==0x02)relayout2=~relayout2;
if(buffer[2]==0x01)relayout1=~relayout1;
if(buffer[2]==0x0c)relayout0=~relayout0;
DelayMs(1000);
}
/***************************************************************/
void SAA3010Init()// 初始化中断及定时器
{
EA = 1;
TMOD = 0x10; // T1工作于方式1，即16位定时器
ET1 = 1; // 关定时器0中断允许
TR1 = 1; // 关闭定时器
TH1 = 0;
TL1 = 0;
// 外部中断源INT0
EX1 = 1; // 允许外部中断源INT1
PX1 = 1; // 外部中断源为高优先级
IT1 = 1; // 边缘触发
SAA3010BitCount = 0;
SAA3010RecvCode = 0;
SAA3010State = 0;

}
/*****************************************************************/
void SAA3010Timer1(void) interrupt 3// 定时器T1的中断处理函数
{
// 出现了超时
if( SAA3010BitCount == 13 )
{
if( SAA3010State == 1 || // 1,1
SAA3010State == 2 ) // 0,1
{
SAA3010BitCount ++;
SAA3010RecvCode = SAA3010RecvCode << 1;
SAA3010RecvCode = SAA3010RecvCode + 1;
}
}

// 检查是否有合理数据
if( SAA3010BitCount == 14 )
{
// 停止中断0
EX1 = 0;

// 处理遥控命令
SAA3010ProcessCommand((~SAA3010RecvCode) & 0x0FFF );
}

// 重新初始化初始化
SAA3010BitCount = 0;
SAA3010State = 0;

// 启用中断
EX1 = 1;
}

/***************************************************************/
void SAA3010Int1(void) interrupt 2 // 外部中断1的处理函数
{
// 保存计数器的高位，作为判断周期长短的依据
unsigned char HighTick = TH1;

// 重置计数器
TH1=0;TL1=0;TR1=1;ET1=1;

// 状态转移图
switch( SAA3010State )
{
case 0: // 第一个起始位
SAA3010State = 2;
SAA3010BitCount = 1;
SAA3010RecvCode = 0;
break;
case 1: // 状态1
if( HighTick == TH_CYCLE_1_0 ) // S1->S1
{
SAA3010State = 1;
SAA3010BitCount++;
SAA3010RecvCode = SAA3010RecvCode << 1;
SAA3010RecvCode = SAA3010RecvCode + 1;
}
else if( HighTick == TH_CYCLE_1_5 ) // S1->S2 ( 1,1,0 )
{
SAA3010State = 2;
SAA3010BitCount = SAA3010BitCount+2;
SAA3010RecvCode = SAA3010RecvCode << 1;
SAA3010RecvCode = SAA3010RecvCode + 1;
SAA3010RecvCode = SAA3010RecvCode << 1;
}
else // 错误状态
{
SAA3010BitCount = 0;
SAA3010State = 0;
}
break;
case 2: // 状态2
if( HighTick == TH_CYCLE_1_0 ) // S2->S2
{
SAA3010State = 2;
SAA3010BitCount++;
SAA3010RecvCode = SAA3010RecvCode << 1;
}
else if( HighTick == TH_CYCLE_1_5 ) // S2->S1
{
SAA3010State = 1;
SAA3010BitCount++;
SAA3010RecvCode = SAA3010RecvCode << 1;
SAA3010RecvCode = SAA3010RecvCode + 1;
}
else if( HighTick == TH_CYCLE_2_0 ) // S2->S2
{
// 0->1->0
SAA3010State = 2;
SAA3010BitCount = SAA3010BitCount+2;
SAA3010RecvCode = SAA3010RecvCode << 1;
SAA3010RecvCode = SAA3010RecvCode + 1;
SAA3010RecvCode = SAA3010RecvCode << 1;
}
else // 错误状态
{
SAA3010BitCount = 0;
SAA3010State = 0;
}
break;
}
}
/***********************************************************/
void Beep(void)//BELL 蜂明器发声,整点报警
{
Bell_Out = 0;
Delay1(6000);//50ms
Bell_Out = 1;
Delay1(6000);//50ms
}

/*****************************************************************************/
void Bell_now(void)
{
Bell_Out = 0;
Delay1(31250); //for 250ms
Bell_Out = 1;
Delay1(6350); //50ms
Bell_Out = 0;
Delay1(18750);//150ms
Bell_Out = 1;
Delay1(50000);//400ms
}
/******************************************************************************/
void WriteOneChar(unsigned char dat)//温度写一个字节
{
unsigned char i=0;
for (i=8; i>0; i--)
{
DQ = 0;
DQ = dat&0x01;
Delay1(5);
DQ = 1;
dat>>=1;
}
}

/******************************************************************************/
unsigned char ReadOneChar(void)//温度读一个字节
{
unsigned char i=0;
unsigned char dat = 0;
for (i=8;i>0;i--)
{
DQ = 0; // 给脉冲信号
dat>>=1;
DQ = 1; // 给脉冲信号
if(DQ)
dat|=0x80;
Delay1(4);
}
return(dat);
}

/****************************************************************/
unsigned int ReadTemperature(void)//读取温度
{
unsigned char TMPL=0;
unsigned char TMPH=0;
unsigned int temp=0;
float tt=0;
Init_DS18B20();
WriteOneChar(0xCC); // 跳过读序号列号的操作
WriteOneChar(0x44); // 启动温度转换
Init_DS18B20();
WriteOneChar(0xCC); //跳过读序号列号的操作
WriteOneChar(0xBE); //读取温度寄存器
TMPL=ReadOneChar(); //读低8位
TMPH=ReadOneChar(); //读高8位
temp = TMPH;
temp <<= 8;
temp = temp | TMPL;
tt = TMPL * 0.0625;
temp = TMPL / 16 + TMPH * 16;
return(temp);
}
/********************************************************************
* 名称 : Convert(uchar In_Date)
* 功能 : 因为电路设计时，P0.0--P0.7接法刚好了资料中的相反，所以设计该函数。
* 输入 : 1602资料上的值
* 输出 : 送到1602的值
***********************************************************************/
uchar Convert(uchar In_Date)//形参主函数付的值
{
uchar i, Out_Date = 0, temp = 0;
for(i=0; i<8; i++)
{
temp = (In_Date >> i) & 0x01;
Out_Date |= (temp << (7 - i));
}
return Out_Date;
}
/********************************************************************
* 名称 : enable(uchar del)
* 功能 : 1602写命令函数
* 输入 : 输入的命令值
* 输出 : 无
***********************************************************************/
void enable(uchar del)
{
P0 = Convert(del);
RS = 0;
RW = 0;
E = 0;
delay();
E = 1;
delay();
}
/********************************************************************
* 名称 : write(uchar del)
* 功能 : 1602写数据函数
* 输入 : 需要写入1602的数据
* 输出 : 无
***********************************************************************/

void write(uchar del)
{
P0 = Convert(del);
RS = 1;
RW = 0;
E = 0;
delay();
E = 1;
delay();
}
/*******************************************************************************/
void Init_DS18B20(void)//初始化ds1820
{
unsigned char x=0;
DQ = 1; //DQ复位
Delay1(8); //稍做延时
DQ = 0; //单片机将DQ拉低
Delay1(80); //精确延时 大于 480us
DQ = 1; //拉高总线
Delay1(14);
x=DQ; //稍做延时后 如果x=0则初始化成功 x=1则初始化失败
Delay1(20);
}

/********************************************************************
* 名称 : L1602_init()
* 功能 : 1602初始化，请参考1602的资料
* 输入 : 无
* 输出 : 无
***********************************************************************/

void L1602_init(void)
{
enable(0x01);//清屏
enable(0x38);//显示模式设置
enable(0x0c);//显示开及光标设置
enable(0x06);//显示光标移动设置
enable(0xd0);
L1602_string(1,1,"DAYS 20");
L1602_string(2,1,"TIME ");
L1602_char(2, 14, '(');
L1602_char(2, 16, ')');
L1602_char(1, 16, 'G');
L1602_char(2, 8, ':');
L1602_char(1, 10, '-');
L1602_char(1, 13, '-');
}

/********************************************************************
* 名称 : L1602_char(uchar hang,uchar lie,char sign)
* 功能 : 改变液晶中某位的值，如果要让第一行，第五个字符显示"b" ，调用该函数如下
L1602_char(1,5,'b')
* 输入 : 行，列，需要输入1602的数据
* 输出 : 无
***********************************************************************/
void L1602_char(uchar hang,uchar lie,char sign)
{
uchar a;
if(hang == 1) a = 0x80;
if(hang == 2) a = 0xc0;
a = a + lie - 1;
enable(a);
write(sign);
}

/********************************************************************
* 名称 : L1602_string(uchar hang,uchar lie,uchar *p)
* 功能 : 改变液晶中某位的值，如果要让第一行，第五个字符开始显示"ab cd ef" ，调用该函数如下
L1602_string(1,5,"ab cd ef;")
* 输入 : 行，列，需要输入1602的数据
* 输出 : 无
***********************************************************************/
void L1602_string(uchar hang,uchar lie,uchar *p)
{
uchar a;
if(hang == 1) a = 0x80;
if(hang == 2) a = 0xc0;
a = a + lie - 1;
enable(a);
while(1)
{
if(*p == '\0') break;//当*P为'\0'，跳出循环，不再往下。如不满足则循环
write(*p);
p++;
}
}

/********************************************************************
* 名称 : v_RTInputByte（）
* 功能 : 往DS1302写入1Byte数据
* 输入 : ucDa 写入的数据
* 输出 : 无
***********************************************************************/
void v_RTInputByte(uchar ucDa)
{
uchar i;
ACC = ucDa;
T_RST = 1;
for(i=8; i>0; i--)
{
T_IO = ACC0;
T_CLK = 1;
T_CLK = 0;
ACC = ACC >> 1;
}
}

/********************************************************************
* 名称 : uc_RTOutputByte（）
* 功能 : 从DS1302读取1Byte数据
* 输入 : 无
* 返回值: ACC
***********************************************************************/
uchar uc_RTOutputByte(void)
{
uchar i;
T_RST = 1;
for(i=8; i>0; i--)
{
ACC = ACC >>1;
T_IO=1;
ACC7 = T_IO;
T_CLK = 1;
T_CLK = 0;
}
return(ACC);
}

/********************************************************************
* 名称 : v_W1302(uchar ucAddr, uchar ucDa)
* 功能 : 往DS1302写入数据
* 输入 : ucAddr: DS1302地址, ucDa: 要写的数据
* 返回值 : 无
***********************************************************************/
void v_W1302(uchar ucAddr, uchar ucDa)
{
T_RST = 0;
T_CLK = 0;
T_RST = 1;
v_RTInputByte(ucAddr); // 写地址
_nop_();
_nop_();
v_RTInputByte(ucDa); // 写1Byte数据
T_CLK = 1;
T_RST = 0;
}

/********************************************************************
* 名称 : uc_R1302(uchar ucAddr)
* 功能 : 读取DS1302某地址的数据
* 输入 : ucAddr: DS1302地址
* 返回值 : ucDa :读取的数据
***********************************************************************/
uchar uc_R1302(uchar ucAddr)
{
uchar ucDa;
T_RST = 0;
T_CLK = 0;
T_RST = 1;
v_RTInputByte(ucAddr); //写地址，命令
_nop_();
_nop_();
ucDa = uc_RTOutputByte(); //读1Byte数据
T_CLK = 1;
T_RST = 0;
return(ucDa);
}

/********************************************************************
* 名称 : v_BurstW1302T
* 功能 : 往DS1302写入时钟数据(多字节方式)
* 输入 : pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 控制
* 8Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B 1B
* 返回值 : 无
***********************************************************************/
void v_BurstW1302T(uchar *pSecDa)
{
uchar i;
v_W1302(0x8e, 0x00); //控制命令,WP=0,写操作
T_RST = 0;
T_CLK = 0;
T_RST = 1;
v_RTInputByte(0xbe); //0xbe:时钟多字节写命令
for(i=8