设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 24小时必答区 › 求助，根据ds1302得出的时间进行太阳追踪 单片机程序问 ...
返回列表 发新帖
查看: 2140|回复: 7
打印 上一主题 下一主题
收起左侧

求助，根据ds1302得出的时间进行太阳追踪 单片机程序问题

[复制链接]
跳转到指定楼层
楼主
ID:710256 发表于 2020-4-6 12:33 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
我想根据制作一个可以调节的ds1302时钟，再根据时钟计算出太阳高度角和方位角来进行太阳追踪

可是我的程序却不能用按键将改好的时间写入ds1302
有高手能看下哪里不正确需要改吗


单片机源程序如下:
  1. #include <REG52.h>
  2. #include <intrins.h>
  3. #include <math.h>

  5. #define uchar unsigned char
  6. #define uint  unsigned int
  7. #define PI 3.14159                        //圆周率
  8. #define LAT 30.57           //纬度


  11. sbit LCD_SCLK = P0^0;
  12. sbit LCD_STD = P0^1;
  13. sbit LCD_CS = P0^2;


  16. sbit DS1302_CE = P3^1;
  17. sbit DS1302_CK = P3^4;
  18. sbit DS1302_IO = P3^5;

  20. extern void _nop_(void);


  23. uchar        time[8] ;
  24. uchar        set_buf[12] = {0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30};
  25. uchar   angle[3];
  26. uchar        time_500ms;
  27. uchar        set_num = 0;
  28. uchar        key_num;
  29. uchar        count1,count2;
  30. bit         flag_js;

  32. /* 发送一个字节到DS1302通信总线上 */
  33. void DS1302ByteWrite(uchar dat)
  34. {
  35.     uchar mask;
  36.    
  37.     for (mask=0x01; mask!=0; mask<<=1)  //低位在前，逐位移出
  38.     {
  39.         if ((mask&dat) != 0) //首先输出该位数据
  40.             DS1302_IO = 1;
  41.         else
  42.             DS1302_IO = 0;
  43.         DS1302_CK = 1;       //然后拉高时钟
  44.         DS1302_CK = 0;       //再拉低时钟，完成一个位的操作
  45.     }
  46.     DS1302_IO = 1;           //最后确保释放IO引脚
  47. }
  48. /* 由DS1302通信总线上读取一个字节 */
  49. unsigned char DS1302ByteRead()
  50. {
  51.     uchar mask;
  52.     uchar dat = 0;
  53.    
  54.     for (mask=0x01; mask!=0; mask<<=1)  //低位在前，逐位读取
  55.     {
  56.         if (DS1302_IO != 0)  //首先读取此时的IO引脚，并设置dat中的对应位
  57.         {
  58.             dat |= mask;
  59.         }
  60.         DS1302_CK = 1;       //然后拉高时钟
  61.         DS1302_CK = 0;       //再拉低时钟，完成一个位的操作
  62.     }
  63.     return dat;              //最后返回读到的字节数据
  64. }
  65. /* 用单次写操作向某一寄存器写入一个字节，reg-寄存器地址，dat-待写入字节 */
  66. void DS1302SingleWrite(uchar reg, uchar dat)
  67. {
  68.     DS1302_CE = 1;                   //使能片选信号
  69.     DS1302ByteWrite((reg<<1)|0x80);  //发送写寄存器指令
  70.     DS1302ByteWrite(dat);            //写入字节数据
  71.     DS1302_CE = 0;                   //除能片选信号
  72. }
  73. /* 用单次读操作从某一寄存器读取一个字节，reg-寄存器地址，返回值-读到的字节 */
  74. unsigned char DS1302SingleRead(uchar reg)
  75. {
  76.     uchar dat;
  77.    
  78.     DS1302_CE = 1;                   //使能片选信号
  79.     DS1302ByteWrite((reg<<1)|0x81);  //发送读寄存器指令
  80.     dat = DS1302ByteRead();          //读取字节数据
  81.     DS1302_CE = 0;                   //除能片选信号
  82.    
  83.     return dat;
  84. }
  85. /* 用突发模式连续写入8个寄存器数据，dat-待写入数据指针 */
  86. void DS1302BurstWrite(unsigned char *dat)
  87. {
  88.     uchar i;
  89.    
  90.     DS1302_CE = 1;
  91.     DS1302ByteWrite(0xBE);  //发送突发写寄存器指令
  92.     for (i=0; i<8; i++)     //连续写入8字节数据
  93.     {
  94.         DS1302ByteWrite(dat[i]);
  95.     }
  96.     DS1302_CE = 0;
  97. }
  98. /* 用突发模式连续读取8个寄存器的数据，dat-读取数据的接收指针 */
  99. void DS1302BurstRead(uchar *dat)
  100. {
  101.     uchar i;
  102.    
  103.     DS1302_CE = 1;
  104.     DS1302ByteWrite(0xBF);  //发送突发读寄存器指令
  105.     for (i=0; i<8; i++)     //连续读取8个字节
  106.     {
  107.         dat[i] = DS1302ByteRead();
  108.     }
  109.     DS1302_CE = 0;
  110. }
  111. /* DS1302初始化，如发生掉电则重新设置初始时间 */
  112. void InitDS1302()
  113. {
  114.     uchar dat;
  115.     uchar code InitTime[] = {  //2020年4月1日 星期二 12:30:00
  116.         0x00,0x30,0x12, 0x01, 0x04, 0x02, 0x20
  117.     };
  118.    
  119.     DS1302_CE = 0;  //初始化DS1302通信引脚
  120.     DS1302_CK = 0;
  121.     dat = DS1302SingleRead(0);  //读取秒寄存器
  122.     if ((dat & 0x80) != 0)      //由秒寄存器最高位CH的值判断DS1302是否已停止
  123.     {
  124.         DS1302SingleWrite(7, 0x00);  //撤销写保护以允许写入数据
  125.         DS1302BurstWrite(InitTime);  //设置DS1302为默认的初始时间
  126.     }
  127. }

  129. //***********************************************************
  130. //函数：void key（void）
  131. //功能：键盘扫描、识别以及处理
  132. //***********************************************************
  133. void key(void)
  134. {
  135.         uchar        tmp,temp;
  136.     tmp=P1|0x07;
  137.         temp = tmp;
  138.         temp &= 0x07;
  139.         if(temp != key_num)
  140.         {
  141.                 key_num = temp;
  142.                 switch(key_num)
  143.                 {
  144.                         case 0x06: if(flag_js == 0)//设定/退出
  145.                         {
  146.                           flag_js = 1;
  147.                           count1  = 1;
  148.                                                    
  149.                         }
  150.                        else if(flag_js == 1)
  151.                         {
  152.                           time[6] = (set_buf[11]<<4)+(set_buf[10]&0x0f);//年
  153.                           
  154.                           time[4] = (set_buf[9]<<4)+(set_buf[8]&0x0f);//月
  155.                           time[3] = (set_buf[7]<<4)+(set_buf[6]&0x0f);//日
  156.                           time[2] = (set_buf[5]<<4)+(set_buf[4]&0x0f);//时
  157.                           time[1] = (set_buf[3]<<4)+(set_buf[2]&0x0f);//分
  158.                           time[0] = (set_buf[1]<<4)+(set_buf[0]&0x0f); //秒
  159.                           DS1302BurstWrite(time);
  160.                           flag_js = 0;
  161.                           count2  = 1;

  163.                          }
  164.                         break;
  165.                         case 0x05: if(flag_js == 1)//移位
  166.                                                 {
  167.                                                         set_num ++;
  168.                                                         if(set_num > 11)
  169.                                                         set_num = 0;
  170.                                                 }
  171.                                                 break;
  172.                         case 0x03: if(flag_js == 1)//数字加一
  173.                                                 {
  174.   switch(set_num)
  175.   {
  176.    case 0:  if(set_buf[0] > 0x38) set_buf[0] = 0x30; //秒的个位
  177.    else set_buf[0]++; break;
  178.    case 1:  if(set_buf[1] > 0x34) set_buf[1] = 0x30; //秒的十位
  179.    else set_buf[1]++; break;
  180.    case 2:  if(set_buf[2] > 0x38) set_buf[2] = 0x30;
  181.    else set_buf[2]++; break;
  182.    case 3:  if(set_buf[3] > 0x34) set_buf[3] = 0x30; //分
  183.    else set_buf[3]++; break;
  184.    case 4:  if(set_buf[4] > 0x38) set_buf[4] = 0x30;
  185.    else set_buf[4]++; break;
  186.    case 5:  if(set_buf[5] > 0x31) set_buf[5] = 0x30; //时
  187.    else set_buf[5]++; break;
  188.    case 6:  if(set_buf[6] > 0x38) set_buf[5] = 0x30;
  189.    else set_buf[6]++; break;
  190.    case 7:  if(set_buf[7] > 0x32) set_buf[5] = 0x30; //日
  191.   else set_buf[7]++; break;
  192.   case 8:  if(set_buf[8] > 0x38) set_buf[5] = 0x30;
  193.   else set_buf[8]++; break;
  194.   case 9:  if(set_buf[9] > 0x31) set_buf[5] = 0x30; //月
  195.   else set_buf[9]++; break;
  196.   case 10:  if(set_buf[10] > 0x38) set_buf[5] = 0x30;
  197.   else set_buf[10]++; break;
  198.   case 11:  if(set_buf[11] > 0x38) set_buf[5] = 0x30; //年
  199.   else set_buf[11]++; break;
  200.   default: break;
  201.                                                         }
  202.                                                 }
  203.                                                 break;

  205.                         default: break;
  206.                 }
  207.         }
  208. }
复制代码

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶顶 踩踩
回复

使用道具 举报

沙发
ID:401564 发表于 2020-4-6 17:25 | 只看该作者
用4个光敏电阻通过实时采光跟踪它不好吗?
冬天下午3点和夏天的下午3点,这太阳的方向是不一样的呀
回复

使用道具 举报

板凳
ID:710256 发表于 2020-4-6 17:51 | 只看该作者
这是算太阳角度，和主程序，望大佬指正

  2. /*计算太阳角度*/
  3. void anglecalculate()
  4. {  
  5.    int     leap;
  6.    uint    year,mon,day;
  7.    uint    hour,min,sec;
  8.    uint    DayAdd;
  9.    uchar   DecAngle,HourAngle,DecAngle1;
  10.    uchar   EleAngle,AziAngle,AziAngle1;
  11.    year=(time[6]>>4)*10+(time[6]&0x0f)+2000;
  12.    mon=(time[4]>>4)*10+(time[4]&0x0f);
  13.    day=(time[3]>>4)*10+(time[3]&0x0f);
  14.    hour=(time[2]>>4)*10+(time[2]&0x0f);
  15.    min=(time[1]>>4)*10+(time[1]&0x0f);
  16.    sec=(time[0]>>4)*10+(time[0]&0x0f);
  17.    leap=(year%4==0&&year%100!=0)||(year%400==0);闰年计算
  18.    switch(mon)
  19.           {
  20.             case 1:
  21.                   DayAdd=(day);break;
  22.             case 2:
  23.                   DayAdd=31+day;break;
  24.             case 3:
  25.                           DayAdd=31+28+day;break;
  26.             case 4:
  27.                           DayAdd=31+28+31+day;break;
  28.             case 5:
  29.                           DayAdd=31+28+31+30+day;break;
  30.             case 6:
  31.                           DayAdd=31+28+31+30+31+day;break;
  32.             case 7:
  33.                           DayAdd=31+28+31+30+31+30+day;break;
  34.             case 8:
  35.                       DayAdd=31+28+31+30+31+30+31+day;break;
  36.             case 9:
  37.                           DayAdd=31+28+31+30+31+30+31+31+day;break;
  38.             case 10:
  39.                           DayAdd=31+28+31+30+31+30+31+31+30+day;break;
  40.             case 11:
  41.                           DayAdd=31+28+31+30+31+30+31+31+30+31+day;break;
  42.             case 12:
  43.                           DayAdd=31+28+31+30+31+30+31+31+30+31+30+day;break;
  44.                 default:
  45.                       break;         /*cout<<"月份输入错误！*/
  46.           }
  47.   if(leap&&(mon>=3))
  48.   DayAdd=DayAdd+1; //当前天数  
  49.   DecAngle=(23.45*sin(2*PI*(284+DayAdd)/365))*PI/180;//计算赤纬角
  50.   DecAngle1=(23.45*sin(2*PI*(284+DayAdd+1)/365))*PI/180;//计算第二天赤纬角
  51.   HourAngle=(12-(hour)-(min)/60.0-(sec)/3600.0)*PI/12;//计算时角
  52.   EleAngle=asin(sin(LAT)*sin(DecAngle)+cos(LAT )*cos(DecAngle)*cos(HourAngle));//计算高度角
  53.   AziAngle=acos((sin(EleAngle)*sin(LAT )-sin(DecAngle))/(cos(EleAngle)*cos(LAT )));//计算方位角
  54.   AziAngle1=acos((0-sin(DecAngle1))/cos(LAT ));//计算第二天的方位角
  55.   angle[0]=EleAngle;
  56.   angle[1]=AziAngle;
  57.   angle[2]=AziAngle1;
  58.   
  59.      
  60. }/*视日轨迹追踪*/
  61. void trackgo()
  62. {
  63.     uchar h,f;
  64.     uchar y,z;
  65.     uchar p,q;
  66.     uchar c=0,d=0;

  68.    
  69.     h=angle[0];//得到高度角
  70.     f=angle[1];//得到方位角
  71.     y=(f-c)/5;//计算方位电机需旋转圈数
  72.     z=(h-d)/1;//计算高度电机需旋转圈数
  73.     c=f;
  74.     d=h;
  75.     if(y!=0)
  76.     {              
  77.       for(p=0;p<y;p++)
  78.        {
  79.         GoA1();
  80.        }
  81.      }
  82.     else
  83.      {  
  84.        if(z!=0)
  85.         {            
  86.          for(q=0;q<z;q++)
  87.           {
  88.             GoB1();
  89.            }
  90.          }
  91.       }            
  92.     P2=0x00;
  93. }
  94. //函数：void main（）功能：主函数，初始化
  95. void main()
  96. {
  97.     uchar psec=0xaa;
  98.     uchar time_30s=0;
  99.     uint getdata;
  100.     float temp;
  101.    
  102.     P2=0x00;
  103.         time_500ms = 0;
  104.         flag_js = 0;
  105.         count1 = 1;
  106.         count2 = 1;

  108.     InitDS1302();
  109.     timer_init();
  110.     Out_Init();
  111.    LCD_init();
  112.        
  113.     delay_ms(50);

  115.     E_W_ANGLE=read2543(0x00);
  116.     S_N_ANGLE=read2543(0x10);
  117.     LIGHT_DETECTION=read2543(0x20);
  118.    
  119.         while(1)
  120.         {
  121.       
  122.        if(time_500ms == 50)
  123.        {
  124.             time_500ms=0;
  125.             DS1302BurstRead(time);//获得时间
  126.             key();
  127.             anglecalculate();
  128.             if(psec!=time[0])
  129.              {                       
  130.                            disp(flag_js); //用液晶显示时间
  131.                psec=time[0];
  132.               }
  133.             time_30s++;
  134.         
  135.             if(time_30s==6)//3s判定一次方位
  136.              {
  137.                  time_30s=0;
  138.                  getdata=read2543(0x20);
  139.                  getdata=read2543(0x20);
  140.                  getdata=read2543(0x20);
  141.                  temp=(float)getdata/4095*500;
  142.                  LIGHT_DETECTION=temp;//当前光照强度
  143.                  temp=0;

  145.                  if(LIGHT_DETECTION<300&&LIGHT_DETECTION>100)//光强不足启用视日轨迹追踪
  146.                   {
  147.                      trackgo();           
  148.                    }            
  149.             }
  150.       
  151.             startgo();
  152.        }
  153.         }
  154. }
复制代码
回复

使用道具 举报

地板
ID:710256 发表于 2020-4-6 20:37 | 只看该作者
Y_G_G 发表于 2020-4-6 17:25
用4个光敏电阻通过实时采光跟踪它不好吗?
冬天下午3点和夏天的下午3点,这太阳的方向是不一样的呀

用采光跟踪只是其中一部分还要与轨迹跟踪相配合，光强不够，天气不好就启用轨迹跟踪
回复

使用道具 举报

5#
ID:401564 发表于 2020-4-7 09:36 | 只看该作者
astlaqwq 发表于 2020-4-6 20:37
用采光跟踪只是其中一部分还要与轨迹跟踪相配合，光强不够，天气不好就启用轨迹跟踪

你这估计是太阳能之类的,那天气不好的话,太阳能还有什么用呢?没有太阳,转哪不都一样的吗?有了太阳,就调整一下不就得了
而且,这经度时间什么的,你算过时区没有呀?我们用的是北京时间,你家在北京吗?大年三十的时候,新疆那边可是晚上八九点才天黑的
冬天和夏天的太阳轨迹也是不一样的
采光跟踪已经可以解决很多问题
回复

使用道具 举报

6#
ID:710256 发表于 2020-4-7 12:49 | 只看该作者
Y_G_G 发表于 2020-4-7 09:36
你这估计是太阳能之类的,那天气不好的话,太阳能还有什么用呢?没有太阳,转哪不都一样的吗?有了太阳,就调整 ...

我主要是实现在白天实现全天候的太阳追踪所以需要两种方式一起用，至于经度的校正没有进行，不需要太精确，能力有限，看了一堆资料被一大堆公式绕了进去
回复

使用道具 举报

7#
ID:678200 发表于 2020-4-9 17:57 | 只看该作者
求仿真跟程序，学习一下
回复

使用道具 举报

8#
ID:671688 发表于 2023-3-9 14:01 | 只看该作者
求仿真跟程序，学习一下
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表