单片机太阳能自动追光系统程序+电路+仿真

用51单片机做的太阳能自动追光系统仿真图 电路图（proteus仿真文件可以从51黑本贴附件下载）：

太阳能自动追光系统的全部文件：


全部资料（压缩包）下载： 太阳能自动追光系统.zip (48.51 KB, 下载次数: 1170)

2016-4-23 20:17 上传

点击文件名下载附件



下面是部分程序预览（完整版本请下载本帖附件）：

1. #include <reg52.h>                                                                                
   
2. #include <intrins.h>                                                                        
   
3. sbit            spb=P1^0;                                                                            //水平方向反转使能端
   
4. sbit            czb=P1^1;                                                                        //垂直方向反转使能端
   
5. sbit     spa=P1^2;                                                                                //水平方向正传使能端
   
6. sbit     cza=P1^3;                                                                                //垂直方向正传使能端
   
7. char    zhuan[8]={0xe6,0xc7,0xd3,0x9b,0xb9,0x3d,0x7c,0x6e};
   
8. bit      ka,kb,ma,mb;                                                                        
   
9. int      ia,ib;                                                                                       
   
10. /*******************************************************
    
11.                      电机转动延时子函数
    
12. ********************************************************/
    
13. void delay_dianji(unsigned int t)                                                        //电机转动延时函数
    
14. {                           
    
15.    unsigned int k;                                                                                
    
16.    while(t--)                                                                                       
    
17.    {
    
18.      for(k=0; k<300; k++)                                                                //k从0自加一至300
    
19.      { }
    
20.    }
    
21. }                                                                                                                                                
    
22. /*******************************************************
    
23.                      电机运转子函数
    
24. ********************************************************/
    
25. void  dianji()                                                                                        //电机运转子函数
    
26. {                                                                                                                 
    
27.     if(ma==1)                                                                                       
    
28.         {                                                                                                
    
29.             if(ka==0)                                                                                //若正传标志位有效
    
30.             {                                                                                                                           
    
31.                 ia++;                                                                                //水平数据位自加一
    
32.                 if(ia>7)ia=0;                                                                //数据位大于7，变为0
    
33.             }
    
34.         if(ka==1)                                                                                //若反转标志位有效
    
35.         {   
    
36.                 ia--;                                                                                //水平数据位自减一
    
37.                     if(ia<0)ia=7;                                                                   //数据位小于0，变为7
    
38.         }
    
39.         }
    
40.         if(ma==0)ia=ia;                //若水平方向转动标志位失效，水平方向数据位维持不变
    
41.         if(mb==1)                                                                                        //垂直转动标志位有效
    
42.         {
    
43.             if(kb==0)                                                                                 //若正转标志位有效
    
44.             {   
    
45.                     ib++;                                                                                //垂直数据位自加一
    
46.                     if(ib>7)ib=0;                                                                //数据位大于7，变为0
    
47.             }
    
48.             if(kb==1)                                                                            //若反转标志有效
    
49.             {                                                                                                                           
    
50.                     ib--;                                                                            //垂直数据位自减一
    
51.                     if(ib<0)ib=7;                                                            //数据位小于0，变为7
    
52.             }
    
53.         }
    
54.         if(mb==0)ib=ib;                //若垂直方向转动标志位失效，垂直方向数据位维持不变
    
55.         P0=zhuan[ia];                                                                            //P0发送水平转动码
    
56.         P2=zhuan[ib];                                                                            //P2发送垂直转动码
    
57.         delay_dianji(15);                                                                            //调用电机延时函数
    
58.         ma=0;                                                                                            //水平转动标志位失效
    
59.         mb=0;                                                                                            //垂直转动标志位失效
    
60. }
    
61. //*******************************************************
    
62.                   
    
63. //********************************************************
    
64. void fangxiang()                                                                                    //识别方向子函数
    
65. {
    
66.     if(spa==1)                                                                                        //水平正传使能端有效
    
67.         {
    
68.             ma=1;                                                                                        //水平方向电机转动
    
69.                 ka=0;                                                                                        //转动方向为正向
    
70.         }
    
71.         if(spb==1)                                                                               //水平反转使能端有效
    
72.         {
    
73.             ma=1;                                                                                        //水平方向电机转动
    
74.                 ka=1;                                                                                        //转动方向为反向
    
75.         }
    
76.     if(cza==1)                                                                                        //垂直正传使能端有效
    
77.         {                                                                                                                                       
    
78.             mb=1;                                                                                        //垂直方向电机转动
    
79.                 kb=0;                                                                                        //转动方向为正向
    
80.         }                                                                                                                                       
    
81.     if(czb==1)                                                                                        //垂直反转使能端有效
    
82.         {                                                                                                                  
    
83.             mb=1;                                                                                        //垂直方向电机转动
    
84.                 kb=1;                                                                                        //转动方向为反向
    
85.         }
    
86. }
    
87. /*******************************************************
    
88.                         主程序
    
89. ********************************************************/
    
90. main()                                                                                                         
    
91. {
    
92.     while(1)                                                                                        //死循环
    
93.         {
    
94.             fangxiang();                                                                                //识别方向子函数
    
95.             dianji();                                                                                 //电机运行子函数
    
96.         }
    
97. }
    

复制代码

感觉还行，看看，学习学习

51黑有你更精彩！！！

感谢分享，good

没有原理图吗？

15620604312 发表于 2016-5-3 20:51
**** 作者被禁止或删除 内容自动屏蔽 ****

你好！我看了你发的单片机的智能家居管理系统，请问方便告诉我一下这个系统的元件清单吗？

感谢，先学习学习

来学习了

谢谢楼主。感谢你的提供的程序，先学习学习。

谢谢楼主分享，先学习一下。

51黑有你更精彩！！！

不错值得学习…………

为什么要用四个电机？做跟踪应该二轴就够了。

谢谢老板！！！！！！！！！！！！！！！！！！！

不错值得学习…………

谢谢楼主分享  很好很有用 正好要做个太阳跟踪电路 太棒了

楼主。有没有家用太阳能发电系统的仿真和电路图

可不可以发一下资源

谢谢你，好人平安

非常不错

借鉴学习一下。谢谢分享

如果用舵机替换电机可以嘛

让我看看什么内容

东西很不错，符合大家的需求

楼主！你好，是这样的，我打算自己动手做一个小型的太阳能自动追光的装置，太阳能板大概是手机大小，我想问一下，我利用四个光敏装在太阳能板的四个角，通过光敏的电阻变化，给单片机信号，让垂直轴的舵机和水平轴的舵机自动调整实现追光，你觉得可行吗？？

感谢分享，正好想DIY呢

不错，拿来学习学习

感觉还行，看看，学习学习

仿真时，运行后有两个错误怎么改

请问楼主，有没有单片机控制的自动跟随吗太阳能窗台灯仿真

有点看到懂

学习一下

51黑有你更精彩！！！

可以      没事可以做着玩

学习了 感谢

感谢你的程序及仿真图。麻烦问一下，这个有实物图吗？

感谢分享，good

非常感谢楼主分享

可惜没有报告书文献

好帖啊