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

/* 文件名 ： 时钟DS1302LCD.c* 描述 : 该文件实现用DS1302来实现日历和时钟功能，液晶1602上显示出来。* 创建人 ： 东流，2009年4月10日* 版本号 ： 2.0*/#include#include#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= P10;sbit relayout1= P11;sbit relayout2= P12;sbit relayout3= P13;sbit relayout4= P14;char code Tab16=0123456789ABCDEF;sbit ACC0 = ACC0;sbit ACC7 = ACC7;sbit P3_2 = P32;sbit P3_4 = P34;sbit T_CLK = P16; /*实时时钟时钟线引脚 */sbit T_IO = P35; /*实时时钟数据线引脚 */sbit T_RST = P17; /*实时时钟复位线引脚 */sbit Add_Key = P3 6;/加1键，S1sbit Dec_Key = P3 7;/减1键，S2sbit OK_Key = P2 0;/确定键，S3sbit Bell_Out = P2 1;/闹钟管脚输出。低电平有效sbit DQ = P23;/ds1820data/这三个引脚参考资料sbit E=P27;/1602使能引脚sbit RW=P26;/1602读写引脚sbit RS=P25;/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);/初始化ds1820unsigned 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;it;i+)for(j=0;j1;/* 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 buffer3; buffer0 = 0x80; buffer1 = (unsigned char)(remotecode 8)& 0xFF); buffer2 = (unsigned char)(remotecode & 0xFF);if(buffer2=0x04)relayout4=relayout4;if(buffer2=0x03)relayout3=relayout3;if(buffer2=0x02)relayout2=relayout2;if(buffer2=0x01)relayout1=relayout1; if(buffer2=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 S1 SAA3010State = 1; SAA3010BitCount+; SAA3010RecvCode = SAA3010RecvCode S2 ( 1,1,0 ) SAA3010State = 2; SAA3010BitCount = SAA3010BitCount+2; SAA3010RecvCode = SAA3010RecvCode 1; SAA3010RecvCode = SAA3010RecvCode + 1; SAA3010RecvCode = SAA3010RecvCode S2 SAA3010State = 2; SAA3010BitCount+; SAA3010RecvCode = SAA3010RecvCode S1 SAA3010State = 1; SAA3010BitCount+; SAA3010RecvCode = SAA3010RecvCode S2 / 0-1-0 SAA3010State = 2; SAA3010BitCount = SAA3010BitCount+2; SAA3010RecvCode = SAA3010RecvCode 1; SAA3010RecvCode = SAA3010RecvCode + 1; SAA3010RecvCode = SAA3010RecvCode 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;i0;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 i) & 0x01; Out_Date |= (temp 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; i0; 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; i0; i-) /8Byte = 7Byte 时钟数据 + 1Byte 控制v_RTInputByte(*pSecDa); /写1Byte数据pSecDa+;T_CLK = 1;T_RST = 0;/* 名称 : v_BurstR1302T(uchar *pSecDa)* 功能 : 读取DS1302时钟数据* 输入 : pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B* 返回值 : ucDa :读取的数据*/void v_BurstR1302T(uchar *pSecDa)uchar i;T_RST = 0;T_CLK = 0;T_RST = 1;v_RTInputByte(0xbf); /0xbf:时钟多字节读命令for(i=8; i0; i-)*pSecDa = uc_RTOutputByte(); /读1Byte数据pSecDa+;T_CLK = 1;T_RST = 0;/* 名称 : v_BurstW1302R(uchar *pReDa)* 功能 : 往DS1302寄存器数写入数据(多字节方式)* 输入 : pReDa: 寄存器数据地址* 返回值 : 无*/void v_BurstW1302R(uchar *pReDa)uchar i;v_W1302(0x8e,0x00); /控制命令,WP=0,写操作T_RST = 0;T_CLK = 0;T_RST = 1;v_RTInputByte(0xfe); /0xbe:时钟多字节写命令for(i=31; i0; i-) /31Byte 寄存器数据v_RTInputByte(*pReDa); /写1Byte数据pReDa+;T_CLK = 1;T_RST = 0;/* 名称 : v_BurstR1302R(uchar *pReDa)* 功能 : 读取DS1302寄存器数据* 输入 : pReDa: 寄存器数据地址* 返回值 : 无*/void v_BurstR1302R(uchar *pReDa)uchar i;T_RST = 0;T_CLK = 0;T_RST = 1;v_RTInputByte(0xff); /0xbf:时钟多字节读命令for(i=31; i0; i-) /31Byte 寄存器数据*pReDa = uc_RTOutputByte(); /读1Byte数据pReDa+;T_CLK = 1;T_RST = 0;/* 名称 : v_Set1302(uchar *pSecDa)* 功能 : 设置初始时间* 输入 : pSecDa: 初始时间地址。初始时间格式为: 秒 分 时 日 月 星期 年* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B* 返回值: 无*/void v_Set1302(uchar *pSecDa)uchar i;uchar ucAddr = 0x80;v_W1302(0x8e, 0x00); /控制命令,WP=0,写操作for(i=7; i0; i-)v_W1302(ucAddr, *pSecDa); / 秒 分 时 日 月 星期 年pSecDa+;ucAddr += 2;v_W1302(0x8e, 0x80); /控制命令,WP=1,写保护/* 名称 : v_Get1302(uchar ucCurtime)* 功能 : 读取DS1302当前时间* 输入 : ucCurtime: 保存当前时间地址。当前时间格式为: 秒 分 时 日 月 星期 年* 7Byte (BCD码) 1B 1B 1B 1B 1