找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開始

搜索
查看: 45721|回復(fù): 78
收起左側(cè)

單片機(jī)太陽(yáng)能自動(dòng)追光系統(tǒng)程序+電路+仿真

  [復(fù)制鏈接]
ID:63924 發(fā)表于 2016-4-23 20:19 | 顯示全部樓層 |閱讀模式
用51單片機(jī)做的太陽(yáng)能自動(dòng)追光系統(tǒng)仿真圖 電路圖(proteus仿真文件可以從51黑本貼附件下載):
0.png
太陽(yáng)能自動(dòng)追光系統(tǒng)的全部文件:
0.png

全部資料(壓縮包)下載: 太陽(yáng)能自動(dòng)追光系統(tǒng).zip (48.51 KB, 下載次數(shù): 1180)



下面是部分程序預(yù)覽(完整版本請(qǐng)下載本帖附件):
  1. #include <reg52.h>                                                                                
  2. #include <intrins.h>                                                                        
  3. sbit            spb=P1^0;                                                                            //水平方向反轉(zhuǎn)使能端
  4. sbit            czb=P1^1;                                                                        //垂直方向反轉(zhuǎn)使能端
  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.                      電機(jī)轉(zhuǎn)動(dòng)延時(shí)子函數(shù)
  12. ********************************************************/
  13. void delay_dianji(unsigned int t)                                                        //電機(jī)轉(zhuǎn)動(dòng)延時(shí)函數(shù)
  14. {                           
  15.    unsigned int k;                                                                                
  16.    while(t--)                                                                                       
  17.    {
  18.      for(k=0; k<300; k++)                                                                //k從0自加一至300
  19.      { }
  20.    }
  21. }                                                                                                                                                
  22. /*******************************************************
  23.                      電機(jī)運(yùn)轉(zhuǎn)子函數(shù)
  24. ********************************************************/
  25. void  dianji()                                                                                        //電機(jī)運(yùn)轉(zhuǎn)子函數(shù)
  26. {                                                                                                                 
  27.     if(ma==1)                                                                                       
  28.         {                                                                                                
  29.             if(ka==0)                                                                                //若正傳標(biāo)志位有效
  30.             {                                                                                                                           
  31.                 ia++;                                                                                //水平數(shù)據(jù)位自加一
  32.                 if(ia>7)ia=0;                                                                //數(shù)據(jù)位大于7,變?yōu)?
  33.             }
  34.         if(ka==1)                                                                                //若反轉(zhuǎn)標(biāo)志位有效
  35.         {   
  36.                 ia--;                                                                                //水平數(shù)據(jù)位自減一
  37.                     if(ia<0)ia=7;                                                                   //數(shù)據(jù)位小于0,變?yōu)?
  38.         }
  39.         }
  40.         if(ma==0)ia=ia;                //若水平方向轉(zhuǎn)動(dòng)標(biāo)志位失效,水平方向數(shù)據(jù)位維持不變
  41.         if(mb==1)                                                                                        //垂直轉(zhuǎn)動(dòng)標(biāo)志位有效
  42.         {
  43.             if(kb==0)                                                                                 //若正轉(zhuǎn)標(biāo)志位有效
  44.             {   
  45.                     ib++;                                                                                //垂直數(shù)據(jù)位自加一
  46.                     if(ib>7)ib=0;                                                                //數(shù)據(jù)位大于7,變?yōu)?
  47.             }
  48.             if(kb==1)                                                                            //若反轉(zhuǎn)標(biāo)志有效
  49.             {                                                                                                                           
  50.                     ib--;                                                                            //垂直數(shù)據(jù)位自減一
  51.                     if(ib<0)ib=7;                                                            //數(shù)據(jù)位小于0,變?yōu)?
  52.             }
  53.         }
  54.         if(mb==0)ib=ib;                //若垂直方向轉(zhuǎn)動(dòng)標(biāo)志位失效,垂直方向數(shù)據(jù)位維持不變
  55.         P0=zhuan[ia];                                                                            //P0發(fā)送水平轉(zhuǎn)動(dòng)碼
  56.         P2=zhuan[ib];                                                                            //P2發(fā)送垂直轉(zhuǎn)動(dòng)碼
  57.         delay_dianji(15);                                                                            //調(diào)用電機(jī)延時(shí)函數(shù)
  58.         ma=0;                                                                                            //水平轉(zhuǎn)動(dòng)標(biāo)志位失效
  59.         mb=0;                                                                                            //垂直轉(zhuǎn)動(dòng)標(biāo)志位失效
  60. }
  61. //*******************************************************
  62.                   
  63. //********************************************************
  64. void fangxiang()                                                                                    //識(shí)別方向子函數(shù)
  65. {
  66.     if(spa==1)                                                                                        //水平正傳使能端有效
  67.         {
  68.             ma=1;                                                                                        //水平方向電機(jī)轉(zhuǎn)動(dòng)
  69.                 ka=0;                                                                                        //轉(zhuǎn)動(dòng)方向?yàn)檎?br />
  70.         }
  71.         if(spb==1)                                                                               //水平反轉(zhuǎn)使能端有效
  72.         {
  73.             ma=1;                                                                                        //水平方向電機(jī)轉(zhuǎn)動(dòng)
  74.                 ka=1;                                                                                        //轉(zhuǎn)動(dòng)方向?yàn)榉聪?br />
  75.         }
  76.     if(cza==1)                                                                                        //垂直正傳使能端有效
  77.         {                                                                                                                                       
  78.             mb=1;                                                                                        //垂直方向電機(jī)轉(zhuǎn)動(dòng)
  79.                 kb=0;                                                                                        //轉(zhuǎn)動(dòng)方向?yàn)檎?br />
  80.         }                                                                                                                                       
  81.     if(czb==1)                                                                                        //垂直反轉(zhuǎn)使能端有效
  82.         {                                                                                                                  
  83.             mb=1;                                                                                        //垂直方向電機(jī)轉(zhuǎn)動(dòng)
  84.                 kb=1;                                                                                        //轉(zhuǎn)動(dòng)方向?yàn)榉聪?br />
  85.         }
  86. }
  87. /*******************************************************
  88.                         主程序
  89. ********************************************************/
  90. main()                                                                                                         
  91. {
  92.     while(1)                                                                                        //死循環(huán)
  93.         {
  94.             fangxiang();                                                                                //識(shí)別方向子函數(shù)
  95.             dianji();                                                                                 //電機(jī)運(yùn)行子函數(shù)
  96.         }
  97. }
復(fù)制代碼

評(píng)分

參與人數(shù) 9黑幣 +92 收起 理由
wenkang + 5 共享資料的黑幣獎(jiǎng)勵(lì)!
13622983180 + 7 絕世好帖!
yuan960221 + 5 贊一個(gè)!
zwjviki + 5 很給力!
GloomyHeart + 5 很給力!
一笑泯恩仇啊 + 5 絕世好帖!
ggg620 + 5
杰克稻草 + 5 很給力!
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)!

查看全部評(píng)分

回復(fù)

使用道具 舉報(bào)

ID:118229 發(fā)表于 2016-5-3 20:51 | 顯示全部樓層
感覺還行,看看,學(xué)習(xí)學(xué)習(xí)
回復(fù)

使用道具 舉報(bào)

ID:147586 發(fā)表于 2016-11-12 23:46 | 顯示全部樓層
51黑有你更精彩!。
回復(fù)

使用道具 舉報(bào)

ID:105425 發(fā)表于 2016-11-18 07:58 | 顯示全部樓層
感謝分享,good
回復(fù)

使用道具 舉報(bào)

ID:110780 發(fā)表于 2016-12-1 08:20 來自手機(jī) | 顯示全部樓層
沒有原理圖嗎?
回復(fù)

使用道具 舉報(bào)

ID:82421 發(fā)表于 2016-12-12 18:09 | 顯示全部樓層
15620604312 發(fā)表于 2016-5-3 20:51
**** 作者被禁止或刪除 內(nèi)容自動(dòng)屏蔽 ****

你好!我看了你發(fā)的單片機(jī)的智能家居管理系統(tǒng),請(qǐng)問方便告訴我一下這個(gè)系統(tǒng)的元件清單嗎?
回復(fù)

使用道具 舉報(bào)

ID:155197 發(fā)表于 2016-12-16 10:29 | 顯示全部樓層
感謝,先學(xué)習(xí)學(xué)習(xí)
回復(fù)

使用道具 舉報(bào)

ID:155317 發(fā)表于 2016-12-17 15:26 | 顯示全部樓層
來學(xué)習(xí)了
回復(fù)

使用道具 舉報(bào)

ID:155466 發(fā)表于 2016-12-17 18:13 | 顯示全部樓層
謝謝樓主。感謝你的提供的程序,先學(xué)習(xí)學(xué)習(xí)。
回復(fù)

使用道具 舉報(bào)

ID:73030 發(fā)表于 2016-12-19 09:18 來自手機(jī) | 顯示全部樓層
謝謝樓主分享,先學(xué)習(xí)一下。
回復(fù)

使用道具 舉報(bào)

ID:47652 發(fā)表于 2017-2-14 10:52 | 顯示全部樓層
51黑有你更精彩。。
回復(fù)

使用道具 舉報(bào)

ID:78465 發(fā)表于 2017-3-12 19:28 來自手機(jī) | 顯示全部樓層
不錯(cuò)值得學(xué)習(xí)…………
回復(fù)

使用道具 舉報(bào)

ID:86235 發(fā)表于 2017-4-5 08:58 | 顯示全部樓層
為什么要用四個(gè)電機(jī)?做跟蹤應(yīng)該二軸就夠了。
回復(fù)

使用道具 舉報(bào)

ID:189100 發(fā)表于 2017-4-13 10:41 | 顯示全部樓層
謝謝老板。。。。。。。。。。。。。。。。。!
回復(fù)

使用道具 舉報(bào)

ID:189100 發(fā)表于 2017-4-13 10:41 | 顯示全部樓層
不錯(cuò)值得學(xué)習(xí)…………
回復(fù)

使用道具 舉報(bào)

ID:171111 發(fā)表于 2017-4-13 18:21 來自手機(jī) | 顯示全部樓層
謝謝樓主分享  很好很有用 正好要做個(gè)太陽(yáng)跟蹤電路 太棒了
回復(fù)

使用道具 舉報(bào)

ID:191654 發(fā)表于 2017-4-20 17:47 來自手機(jī) | 顯示全部樓層
樓主。有沒有家用太陽(yáng)能發(fā)電系統(tǒng)的仿真和電路圖
回復(fù)

使用道具 舉報(bào)

ID:193550 發(fā)表于 2017-4-25 19:52 | 顯示全部樓層
可不可以發(fā)一下資源
回復(fù)

使用道具 舉報(bào)

ID:193550 發(fā)表于 2017-4-25 19:52 | 顯示全部樓層
謝謝你,好人平安
回復(fù)

使用道具 舉報(bào)

ID:200595 發(fā)表于 2017-5-14 14:24 | 顯示全部樓層
非常不錯(cuò)
回復(fù)

使用道具 舉報(bào)

ID:201612 發(fā)表于 2017-5-18 08:55 | 顯示全部樓層
借鑒學(xué)習(xí)一下。謝謝分享
回復(fù)

使用道具 舉報(bào)

ID:253107 發(fā)表于 2017-11-24 16:16 | 顯示全部樓層
如果用舵機(jī)替換電機(jī)可以嘛
回復(fù)

使用道具 舉報(bào)

ID:257624 發(fā)表于 2017-12-5 12:10 | 顯示全部樓層
讓我看看什么內(nèi)容
回復(fù)

使用道具 舉報(bào)

ID:256455 發(fā)表于 2017-12-6 17:18 | 顯示全部樓層
東西很不錯(cuò),符合大家的需求
回復(fù)

使用道具 舉報(bào)

ID:264146 發(fā)表于 2017-12-22 17:01 | 顯示全部樓層
樓主!你好,是這樣的,我打算自己動(dòng)手做一個(gè)小型的太陽(yáng)能自動(dòng)追光的裝置,太陽(yáng)能板大概是手機(jī)大小,我想問一下,我利用四個(gè)光敏裝在太陽(yáng)能板的四個(gè)角,通過光敏的電阻變化,給單片機(jī)信號(hào),讓垂直軸的舵機(jī)和水平軸的舵機(jī)自動(dòng)調(diào)整實(shí)現(xiàn)追光,你覺得可行嗎??
回復(fù)

使用道具 舉報(bào)

ID:271802 發(fā)表于 2018-1-9 16:30 | 顯示全部樓層
感謝分享,正好想DIY呢
回復(fù)

使用道具 舉報(bào)

ID:86577 發(fā)表于 2018-2-19 13:36 | 顯示全部樓層
不錯(cuò),拿來學(xué)習(xí)學(xué)習(xí)
回復(fù)

使用道具 舉報(bào)

ID:76133 發(fā)表于 2018-2-20 14:13 | 顯示全部樓層

感覺還行,看看,學(xué)習(xí)學(xué)習(xí)
回復(fù)

使用道具 舉報(bào)

ID:301818 發(fā)表于 2018-4-4 10:24 | 顯示全部樓層
仿真時(shí),運(yùn)行后有兩個(gè)錯(cuò)誤怎么改
回復(fù)

使用道具 舉報(bào)

ID:301818 發(fā)表于 2018-4-4 13:17 | 顯示全部樓層
請(qǐng)問樓主,有沒有單片機(jī)控制的自動(dòng)跟隨嗎太陽(yáng)能窗臺(tái)燈仿真
回復(fù)

使用道具 舉報(bào)

ID:320204 發(fā)表于 2018-5-2 09:21 | 顯示全部樓層
有點(diǎn)看到懂
回復(fù)

使用道具 舉報(bào)

ID:328187 發(fā)表于 2018-5-12 13:32 | 顯示全部樓層
學(xué)習(xí)一下
回復(fù)

使用道具 舉報(bào)

ID:396194 發(fā)表于 2018-9-10 19:53 | 顯示全部樓層
51黑有你更精彩!!
回復(fù)

使用道具 舉報(bào)

ID:394719 發(fā)表于 2018-9-14 09:22 | 顯示全部樓層
可以      沒事可以做著玩
回復(fù)

使用道具 舉報(bào)

ID:397735 發(fā)表于 2018-9-14 15:08 來自手機(jī) | 顯示全部樓層
學(xué)習(xí)了 感謝
回復(fù)

使用道具 舉報(bào)

ID:403696 發(fā)表于 2018-10-3 15:38 | 顯示全部樓層
感謝你的程序及仿真圖。麻煩問一下,這個(gè)有實(shí)物圖嗎?
回復(fù)

使用道具 舉報(bào)

ID:424539 發(fā)表于 2018-11-11 16:03 | 顯示全部樓層
感謝分享,good
回復(fù)

使用道具 舉報(bào)

ID:450456 發(fā)表于 2018-12-20 09:15 | 顯示全部樓層
非常感謝樓主分享
回復(fù)

使用道具 舉報(bào)

ID:450456 發(fā)表于 2018-12-20 09:24 | 顯示全部樓層
可惜沒有報(bào)告書文獻(xiàn)
回復(fù)

使用道具 舉報(bào)

ID:450490 發(fā)表于 2018-12-20 09:44 | 顯示全部樓層
好帖啊
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表