开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 嵌入式/单片机编程 > 单片机开发 > 查看源码
Rtc._c
资源名称：AVR.rar　[点击查看]
上传用户：rbltsz
上传日期：2007-09-19
资源大小：2509k
文件大小：12k
源码类别：

单片机开发

开发平台：

C/C++

Rtc._c：源码内容
  1. //***************************FileName:RTC.C************************//
  2. //***************************ICCAVR V6.30编译**********************//
  4. #include <io8535v.h>                   //寄存器定义文件
  5. #include <macros.h>                    //使用到宏
  6. #define uchar unsigned char            //数据类型定义
  7. #define uint unsigned char             //数据类型定义
  8. #define SD2303 0x64                    //SD2303器件IIC识别码
  11. uchar Table[12]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x38,0x76};
  12.      //显示数据表 0    1    2     3   4    5    6    7    8    9    L    H  
  13. uchar Data[4]={0,0,0,0};               //DS1722
  14. uchar Enter_Flag;                      //确定
  15. uchar F_Flag;                          //数据应答标志
  17. void DelayMs(uint i)                   //延时函数1
  18. {uchar j;
  19.  for(;i!=0;i--)
  20.   {for(j=2000;j!=0;j--) {;}}
  21. }
  23. void Display(uchar *p)
  24. {uchar i,sel=0x00;
  25.  for(i=0;i<16;i++)
  26.   {PORTC=sel;
  27.    PORTA=Table[p[i]];
  28.    DelayMs(10);
  29.    sel=sel<<1;
  30.   }
  31. }
  33.   
  34. void NOPNOP(uchar i)                   //延时函数2
  35. {for(;i!=0;i--) NOP();}
  37. void SetSCL(uchar i)                   //IIC时钟线SCL设置
  38. {if(i==1) PORTB=PORTB|0x01;
  39.  else     PORTB=PORTB&0xFE;}
  40.  
  41. void SetSDA(uchar i)                   //IIC数据线SDA设置
  42. {if(i==1) PORTB=PORTB|0x02;
  43.  else     PORTB=PORTB&0xFD;}
  44.  
  45. //SCL=PB^0;       SD2303时钟线  
  46. //SDA=PB^1;       SD2303数据线 
  47. //INTRB=PB^3;     SD2303中断线A
  48. //INTRA=PB^2;     SD2303中断线B
  50. void Start()                           //IIC总线开始信号
  51. {SetSDA(1);
  52.  SetSCL(1);
  53.  NOPNOP(50);
  54.  SetSDA(0);
  55.  NOPNOP(50);
  56.  SetSCL(0);
  57. }
  59. void Stop()                            //IIC总线停止信号
  60. {SetSDA(0);             
  61.  SetSCL(1);
  62.  NOPNOP(50);
  63.  SetSDA(1);
  64.  NOPNOP(50);
  65.  SetSCL(0);
  66. }
  68. void Ack()                             //单片机应答信号
  69. {SetSDA(0);
  70.  SetSCL(1);   
  71.  NOPNOP(50);
  72.  SetSCL(0);
  73.  SetSDA(1);     
  74. }
  76. void Nack()                            //单片机非应答信号
  77. {SetSDA(1);
  78.  SetSCL(1);
  79.  NOPNOP(50);
  80.  SetSCL(0);
  81.  SetSDA(0);
  82. }
  84. void Check_Ack()                       //器件应答信号检查
  85. {SetSDA(1);
  86.  SetSCL(1);
  87.  F_Flag=0;
  88.  DDRB=DDRB&0xFD; 
  89.  if((PINB&0x02)==0)
  90.    {SetSCL(0);
  91.     NOPNOP(50);}
  92.  else
  93.     {F_Flag=1;
  94.      SetSCL(0);
  95.      NOPNOP(50);}
  96. DDRB=DDRB|0x02;
  97. }
  99. void Write_Bit0()                      //向IIC总线写0
  100. {SetSDA(0);
  101.  SetSCL(1);
  102.  NOPNOP(50);
  103.  SetSCL(0);
  104. }
  106. void Write_Bit1()                      //向IIC总线写1
  107. {SetSDA(1);
  108.  SetSCL(1);
  109.  NOPNOP(50);
  110.  SetSCL(0);
  111.  SetSDA(0);
  112. }
  114. void Write_Byte(uchar Data)            //向IIC总线写一字节数据
  115. {uchar i;
  116.  for(i=0;i<8;i++)
  117.    {if((Data&0x80)>0)       
  118.          Write_Bit1();
  119.     else
  120.          Write_Bit0();
  121.     Data<<=1;                        
  122.     }
  123. }
  126. uchar Read_Byte()                      //从IIC总线读一字节数据
  127. {uchar nn=0xff;             
  128.  uchar j;
  129.  for (j=0;j<8;j++)
  130.     {SetSDA(1);
  131.      SetSCL(1);
  132.      DDRB=DDRB&0xFB;
  134.        if((PINB&0x02)==0)
  135.     {nn<<=1;
  136.          nn=(nn&0xfe);                 
  137.          SetSCL(0);}
  138.      else 
  139.         {nn<<=1;
  140.          nn=(nn|0x01);                 
  141.          SetSCL(0);}
  142.     }
  143.   DDRB=DDRB|0x02;
  144.  return(nn);              
  145. }
  147. //****************************写N个字节子程序**********************//
  148. //函数参数说明：
  149. //Slave:IIC器件地址，如上文定义的SD2303
  150. //Address:起始地址
  151. //Array:读数据存放的数组
  152. //Number:读取的字节数
  153. void Write_Nbyte(uchar Slave,uchar Address,uchar *Array,uchar Number)
  154. {uchar k;
  155.  writ:do                     //开始->写IIC器件地址->检查应答位
  156.     {Start();
  157.      Write_Byte(Slave);
  158.      Check_Ack();
  159.     }while(F_Flag==1);
  160.    do
  161.     {Write_Byte(Address<<4); //送起始地址->检查应答位
  162.      Check_Ack();
  163.     }while(F_Flag==1);
  164.    for(k=0;k<Number;k++)     //写Number个数据
  165.     {Write_Byte(*Array);
  166.  Array++;
  167.      Check_Ack();}           //检查应答位
  168.    Stop();                 
  169. }
  171. //****************************写一个字节子程序**********************//
  172. //函数参数说明：
  173. //Slave:IIC器件地址，如上文定义的SD2303
  174. //Address:IIC器件寄存器地址
  175. //Data:数据
  176. void Write_1byte(uchar Slave,uchar Address,uchar Data)
  177. {writ:do                     //开始->写IIC器件地址->检查应答位
  178.     {Start();
  179.      Write_Byte(Slave);
  180.      Check_Ack();
  181.     }while(F_Flag==1);
  182.    do
  183.     {Write_Byte(Address<<4); //送起始地址->检查应答位
  184.      Check_Ack();
  185.     }while(F_Flag==1);
  186.    Write_Byte(Data);
  187.    Check_Ack();              //检查应答位
  188.    Stop();                   //停止信号
  189. }
  192. //***************************读N个字节子程序***********************//
  193. //函数参数说明：
  194. //Slave:IIC器件地址，如上文定义的SD2303
  195. //Address:起始地址
  196. //Array:读数据存放的数组
  197. //Number:读取的字节数
  198. void Read_Nbyte(uchar Slave,uchar Address,uchar *Array,uchar Number)
  199. {uchar data0,x;
  200.     //第一步：开始信号->写IIC器件地址->检查应答位
  201. do{Start();Write_Byte(Slave);Check_Ack();}while(F_Flag==1);
  202.     //第二步：写起始地址->检查应答位
  203.     do {Write_Byte(Address<<4);Check_Ack();}while(F_Flag==1);
  204.     //第三步：开始信号->写IIC器件地址+1(表示读)->检查应答位
  205.     do{Start();Write_Byte(Slave+1);Check_Ack();}while(F_Flag==1);
  206.     //第四步：读N字节，每读完一字节发一个Ack应答,最后一字节发Nack
  207.     for(x=0;x<Number;x++)
  208.      {data0=Read_Byte();*Array=data0;Array++;
  209.   if(x<(Number-1)) { Ack(); }}
  210.     Nack();
  211.     //第五步：发停止信号，结束读操作
  212.     Stop();
  213. }
  215. //***************************按键处理程序**************************//
  216. //说明：为简化程序设计，此程序不保证输入的时间数据的合理性。
  217. void Key_Process(void)
  218. {uchar temp1[17]={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
  219.   //输入数据格式依次为年、月、日、星期、小时和分钟
  220.  uchar temp2[7]={0,0,0,0,0,0,0,};
  221.  uchar temp3[3]={0,0,0xff};
  222.   //输入数据格式依次为小时和分钟
  223.  uchar Key;
  224.  uchar *Flag;
  225.  uchar i;
  226.  Flag=temp1;
  227.  if(PIND!=0xff)
  228.   {DelayMs(20);                        //延时去抖
  229.    if(PIND!=0xff)
  230.    Key=PINB;
  231.    if(Key==0xfe)                       //"时间设置"键按下
  232.     {temp1[0]|=0x80;                   //年高位设置提示
  233.  while(!Enter_Flag)                //直到按下确定键方停止
  234.        {for(i=0;i<50;i++)
  235.       Display(temp1);              //显示和延时
  236. Key=~PIND;
  237. switch(Key)
  238.  {case 0x04:                   //"＋"键处理
  239.        (*Flag)++;
  240.    if(((*Flag)&0x7f)==10) *Flag=0|0x80;
  241.        break;
  242.   case 0x08:                   //"－"键处理
  243.         if(((*Flag)&0x7f)==0) *Flag=10|0x80; 
  244. (*Flag)--;
  245. break;
  246.   case 0x10:                   //"下一位"键处理
  247.         Flag++;
  248. (*(Flag-1))&=0x7f;     //上一位去掉小数点显示
  249. (*Flag)|=0x80;         //当前位加上小数点显示
  250. if(Flag==temp1+13) 
  251.  {Flag=temp1;
  252.   (*Flag)|=0x80;
  253.   (*(Flag+13))&=0x7f;}
  254. break;
  255.   case 0x20:                   //"上一位"键处理
  256.         if(Flag==temp1) 
  257.     {(*Flag)&=0x7f;
  258.  Flag=temp1+13;
  259.  (*Flag)|=0x80;} 
  260. else Flag--;           
  261. (*Flag)|=0x80;         //当前位加上小数点显示
  262. (*(Flag+1))&=0x7f;     //下一位去掉点小数点显示
  263. break;
  264.   case 0x40:Enter_Flag=1;break;//"确定"键处理
  265. //   case 0x80:Enter_Flag=1;break;  //测试用
  266.   default:break;}
  267.     
  268.    }
  269.  Enter_Flag=0;                     //按键状态恢复
  270.      temp2[0]=0x00;                    //秒，默认从00开始计时
  271.  temp2[1]=(temp1[11]<<4)|temp1[12];//分
  272.  temp2[2]=(temp1[9]<<4)|temp1[10]; //时
  273.  temp2[3]=temp1[8];                //周
  274.  temp2[4]=(temp1[6]<<4)|temp1[7];  //日
  275.  temp2[5]=(temp1[4]<<4)|temp1[5];  //月
  276.  temp2[6]=(temp1[2]<<4)|temp1[3];  //年
  277.  Write_Nbyte(SD2303,0x00,temp2,7); //初始化设定时间
  278.     }
  279.    if(Key==0xfd)                       //"闹铃设置"键按下
  280.     {temp1[9]|=0x80;
  281.  Flag=temp1+9;                     //定时小时高位设置提示
  282.  while(!Enter_Flag)                //直到按下确定键方停止
  283.        {for(i=0;i<50;i++)
  284.       Display(temp1);
  285. Key=~PINB;
  286. switch(Key)
  287.  {case 0x04:                   //"＋"按键处理
  288.        (*Flag)++;
  289.    if(((*Flag)&0x7f)==10) *Flag=0|0x80;
  290.        break;
  291.   case 0x08:                   //"－"按键处理
  292.         if(((*Flag)&0x7f)==0) *Flag=10|0x80; 
  293. (*Flag)--;
  294. break;
  295.   case 0x10:                   //"下一位"按键处理
  296.         Flag++;
  297. (*(Flag-1))&=0x7f;     //上一位去掉小数点显示
  298. (*Flag)|=0x80;         //当前位加上小数点显示
  299. if(Flag==temp1+13) 
  300.  {(*Flag)&=0x7f;
  301.   Flag=temp1+9;
  302.   (*Flag)|=0x80;}
  303. break;
  304.   case 0x20:                   //"上一位"按键处理
  305.         if(Flag==temp1+9) 
  306.  {(*Flag)&=0x7f;
  307.   Flag=temp1+13;
  308.   (*Flag)|=0x80;}
  309. else Flag--;
  310. (*Flag)|=0x80;         //当前位加上小数点显示
  311. (*(Flag+1))&=0x7f;     //下一位去掉小数点显示
  312. break;
  313.   case 0x40:Enter_Flag=1;break;//"确定"键处理
  314. //  case 0x80:Enter_Flag=1;break;//测试用
  315.   default:break;}
  316.     
  317.    }
  318.  Enter_Flag=0;
  319.      temp3[0]=((temp1[11]<<4)|temp1[12])&0x7f; //分数据处理，去掉小数点
  320.  temp3[1]=((temp1[9]<<4)|temp1[10])&0x7f;  //时数据处理，去掉小数点
  321.  if((temp3[0]<0x60)&&(temp3[1]<0x24))      //判断是否为合法时间
  322.    {Write_1byte(SD2303,0x0e,0b10110000);   //开启闹铃使能
  323.     Write_1byte(SD2303,0x0f,0b00101000);   //开始中断使能
  324. Write_Nbyte(SD2303,0x08,temp3,3);}     //初始化闹铃设置
  325.  else  
  326.     Write_1byte(SD2303,0x0e,0b00110000);   //取消闹铃功能
  327.     }
  328.   }
  329. }
  330.  
  331.  
  332. //***************************DS1722函数开始************************//
  334. void Convert(uchar p1,uchar *p2)
  335. {uchar temp;
  336.  if(p1&0x80)   
  337.    {p2[13]=10;               //零下温度用10表示                    
  338.     p1=0xff-p1;}             //温度绝对值
  339.  else
  340.    p2[13]=11;                //零上温度用11表示
  341.    p2[14]=p1/10;             //温度十位
  342.    p2[15]=p1-p2[14]*10;      //温度个位
  343. }
  345. //***************************通过SPI接口写数据函数*****************//
  346. //函数参数说明：
  347. //Address：DS1722寄存器地址
  348. //Data：写入的数据
  349. void DSWrite_Byte(uchar Address,uchar Data)
  350. {uchar clear;
  351.  PORTB=PORTB|0x10;           //使能SPI器件
  352.  SPDR=Address;
  353.  while(!(SPSR&0x80)) {;}
  354.  clear=SPSR;
  355.  clear=SPDR;
  356.  SPDR=Data;
  357.  while(!(SPSR&0x80)) {;}
  358.  clear=SPSR;
  359.  clear=SPDR;
  360.  PORTB=PORTB&0xef;
  361. }
  364. //***************************通过SPI接口读数据函数*****************//
  365. //函数参数说明：
  366. //Address：DS1722寄存器地址
  367. //返回值：读取的温度数据
  368. uchar DSRead_Byte(uchar Address)
  369. {uchar clear;
  370.  uchar Data;
  371.  PORTB=PORTB|0x10;
  372.  SPDR=Address;
  373.  while(!(SPSR&0x80)) {;}
  374.  clear=SPSR;
  375.  clear=SPDR;
  376.  SPDR=Address;               //发空数据
  377.  while(!(SPSR&0x80)) {;}
  378.  clear=SPSR;
  379.  Data=SPDR;
  380.  PORTB=PORTB&0xef;
  381.  return(Data);
  382. }
  383.  
  384. void main(void)
  385. {uchar i;
  386.  uchar time[16]={2,0,0,4,1,2,2,7,1,1,7,3,0,0,0,0};
  387.  uchar Set_Time[7]={0x50,0x30,0x20,0x03,0x05,0x01,0x05};
  388.      //初始化时间   2005-01-05 Wed 20-30-50
  389.  uchar SD,DS; 
  390.  uchar SD2303_Controller1=0x00;              //禁止中断
  391.  uchar SD2303_Controller2=0x20;              //时间格式：24小时制
  392.  DDRA=0xff;                                  //A口输出
  393.  DDRC=0xff;                                  //C口输出
  394.  DDRD=0x80;                                  //D口最高位输出，其他带上拉输入
  395.  PORTD=0x7F;
  396.  DDRB=0xF3;                                  //B口带第2、3位带上拉输入，其他输出
  397.  PORTB=0xF3;
  398.  Write_1byte(SD2303,0x0e,SD2303_Controller1);//写控制字
  399.  Write_1byte(SD2303,0x0f,SD2303_Controller2);//写控制字
  400.  Write_Nbyte(SD2303,0x00,Set_Time,7);        //初始化时间
  401.  SPCR=0b01011100;
  402.  DSWrite_Byte(0x80,0xf0);                      //DS1722 8位分辨率自由转换模式
  403.  while(1)
  404. {Key_Process();                          //按键处理
  405.  Read_Nbyte(SD2303,0x00,Set_Time,7);     //读取时间
  406.      time[2]=Set_Time[6]>>4;                 //年高位；
  407.  time[3]=Set_Time[6]&0x0f;               //年低位；
  408.  time[4]=Set_Time[5]>>4;                 //月高位；
  409.      time[5]=Set_Time[5]&0x0f;               //月低位；
  410.  time[6]=Set_Time[4]>>4;                 //日高位；
  411.  time[7]=Set_Time[4]&0x0f;               //日低位；
  412.  time[8]=Set_Time[3];                    //星期；
  413.  time[9]=Set_Time[2]>>4;                 //时高位；
  414.  time[10]=Set_Time[2]&0x0f;              //时低位；
  415.  time[11]=Set_Time[1]>>4;                //分高位；
  416.      time[12]=Set_Time[1]&0x0f;              //分低位；
  417.  time[13]=Set_Time[0]>>4;                //秒高位；
  418.  time[14]=Set_Time[0]&0x0f;              //秒低位；
  419.  Read_Nbyte(SD2303,0x0f,&SD,1);          //读取中断标志位
  420.  if(SD&0x02)  PORTD=PORTD|0x80;          //响铃1分钟
  421.  else            PORTD=PORTD&0x7F;       //关闭闹铃 
  422.      DS=DSRead_Byte(0x02);                   //读取温度值
  423.      Convert(DS,time);
  424.      Display(time);                          //时间显示
  425.    }
  426. }