單片機太陽追蹤系統制作源碼與資料

ID:220936 · 發表于 2017-7-19 21:06

太陽追蹤系統制作圖解：

ppt文檔：

單片機源程序如下:

#include<reg51.h>
#include"i2c.h"
#define speed 8
//--定義PCF8591的讀寫地址--//
#define WRITEADDR 0x90 //寫地址
#define READADDR 0x91 //讀地址
//Motor
sbit a1 = P1^0; //定義管腳
sbit a2 = P1^1;
sbit a3 = P1^2;
sbit a4 = P1^3;
sbit b1 = P0^0;
sbit b2 = P0^1;
sbit b3 = P0^2;
sbit b4 = P0^3;
//--聲明全局函數--//
void Pcf8591SendByte(unsigned char channel);
unsigned char Pcf8591ReadByte();
void delay(int time);
void GoA1();
void GoA2();
void GoB1();
void GoB2();
/*******************************************************************************
* 函數名 : main
* 函數功能 : 主函數
* 輸入 : 無
* 輸出 : 無
*******************************************************************************/
void main()
{
unsigned int M;
M=4;
a1=0;
a2=0;
a3=0;
a4=0;
b1=0;
b2=0;
b3=0;
b4=0;
while(1)
{
unsigned int adNum[4];
unsigned int A1;
unsigned int A2;
unsigned int A3;
unsigned int B1;
unsigned int B2;
unsigned int B3;
float value;
//--顯示電位器電壓--//
Pcf8591SendByte(0); //發送電位器轉換命令
//--由于8591在第一次讀取的時候是讀取到的上次轉換的結果--//
//--所以我們先讀一次，只是讀到的數據不做處理--//
adNum[0]= Pcf8591ReadByte()*2;//將前一次轉換結果讀走
value=adNum[0]/2*0.01953; //轉為電壓值
adNum[0]=value*100; //保留兩位小數
A1= adNum[0];
Pcf8591SendByte(1); //發送熱敏轉換命令
adNum[0]= Pcf8591ReadByte()*2;//讀取電位器轉換結果
value=adNum[0]/2*0.01953; //轉為電壓值
adNum[0]=value*100; //保留兩位小數
A1= adNum[0];
Pcf8591SendByte(2); //發送光敏轉換命令
adNum[1]=Pcf8591ReadByte()*2; //ADC1讀取熱敏
value=adNum[1]/2*0.01953; //轉為電壓值
adNum[1]=value*100;
//--一下讀取的方式跟上面一樣處理--//
//--讀光敏--//
A2=adNum[1];
A3=adNum[0]-adNum[1];
if ( A3<0 )
{
A3 = -A3;
}
Pcf8591SendByte(3); //發送外部輸入電壓轉換命令
adNum[2]=Pcf8591ReadByte()*2; //ADC2讀取光敏
value=adNum[2]/2*0.01953; //轉為電壓值
adNum[2]=value*100;
//--讀取外部輸入電壓--//
B1=adNum[2];
adNum[3]=Pcf8591ReadByte()*2; //ADC3讀取外部輸入電壓
value=adNum[3]/2*0.01953; //轉為電壓值
adNum[3]=value*100;
B2=adNum[3];
B3=adNum[2]-adNum[3];
if ( B3<0 )
{
B3 = -B3;
}
//比較兩個電壓是否相等//
if(A3<M)
{
a1=0;
a2=0;
a3=0;
a4=0;
}
else
{
if(A1<A2)
{
GoA2();
}
else
{
GoA1();
}
}
//比較兩個電壓是否相等//
if(B3<M)
{
b1=0;
b2=0;
b3=0;
b4=0;
}
else
{
if(B1<B2)
{
GoB2();
}
else
{
GoB1();
}
}
}
}
/*******************************************************************************
* 函數名 : Pcf8591SendByte
* 函數功能 : 寫入一個控制命令
* 輸入 : channel（轉換通道）
* 輸出 : 無
*******************************************************************************/
void Pcf8591SendByte(unsigned char channel)
{
I2C_Start();
I2C_SendByte(WRITEADDR, 1); //發送寫器件地址
I2C_SendByte(0x40|channel, 0); //發送控制寄存器
I2C_Stop();
}
/*******************************************************************************
* 函數名 : Pcf8591ReadByte
* 函數功能 : 讀取一個轉換值
* 輸入 : 無
* 輸出 : dat
*******************************************************************************/
unsigned char Pcf8591ReadByte()
{
unsigned char dat;
I2C_Start();
I2C_SendByte(READADDR, 1);//發送讀器件地址
dat=I2C_ReadByte(); //讀取數據
I2C_Stop(); //結束總線
return dat;
}
//正轉a
void GoA1()
{ //A
a1=1;
a2=0;
a3=0;
a4=0;
delay(speed);
//AB
a1=1;
a2=1;
a3=0;
a4=0;
delay(speed);
//B
a1=0;
a2=1;
a3=0;
a4=0;
delay(speed);
//BC
a1=0;
a2=1;
a3=1;
a4=0;
delay(speed);
//C
a1=0;
a2=0;
a3=1;
a4=0;
delay(speed);
//CD
a1=0;
a2=0;
a3=1;
a4=1;
delay(speed);
//D
a1=0;
a2=0;
a3=0;
a4=1;
delay(speed);
//DA
a1=1;
a2=0;
a3=0;
a4=1;
delay(speed);
}
//反轉a
void GoA2()
{
//DA
a1=1;
a2=0;
a3=0;
a4=1;
delay(speed);
//D
a1=0;
a2=0;
a3=0;
a4=1;
delay(speed);
//CD
a1=0;
a2=0;
a3=1;
a4=1;
delay(speed);
//C
a1=0;
a2=0;
a3=1;
a4=0;
delay(speed);
//BC
a1=0;
a2=1;
a3=1;
a4=0;
delay(speed);
//B
a1=0;
a2=1;
a3=0;
a4=0;
delay(speed);
//AB
a1=1;
a2=1;
a3=0;
a4=0;
delay(speed);
//A
a1=1;
a2=0;
a3=0;
a4=0;
delay(speed);
}
//正轉b
void GoB1()
{ //A
b1=1;
b2=0;
b3=0;
b4=0;
delay(speed);
//AB
b1=1;
b2=1;
b3=0;
b4=0;
delay(speed);
//B
b1=0;
b2=1;
b3=0;
b4=0;
delay(speed);
//BC
b1=0;
b2=1;
b3=1;
b4=0;
delay(speed);
//C
b1=0;
b2=0;
b3=1;
b4=0;
delay(speed);
//CD
b1=0;
b2=0;
b3=1;
b4=1;
delay(speed);
//D
b1=0;
b2=0;
b3=0;
b4=1;
delay(speed);
//DA
b1=1;
b2=0;
b3=0;
b4=1;
delay(speed);
}
//反轉b
void GoB2()
{
//DA
b1=1;
b2=0;
b3=0;
b4=1;
delay(speed);
//D
b1=0;
b2=0;
b3=0;
b4=1;
delay(speed);
//CD
b1=0;
b2=0;
……………………
…………限于本文篇幅余下代碼請從51黑下載附件…………

復制代碼

所有資料51hei提供下載:

太陽追蹤系統.rar (2.99 MB, 下載次數: 376)

ID:208108 · 發表于 2017-7-20 10:42

好資料，正準備用STC自帶的ADC來做。

ID:208443 · 發表于 2017-7-23 10:31

很好太陽能充電器

ID:222635 · 發表于 2017-7-27 08:30

很厲害

ID:224393 · 發表于 2017-9-9 09:12

好資料剛好準備做

ID:195950 · 發表于 2017-9-11 21:55

有電路圖么？？

ID:433547 · 發表于 2018-11-26 16:45

需要添加步進電機嗎樓主

ID:350104 · 發表于 2018-11-27 10:52

思路不錯就是實際應用不知道怎么樣單純用光敏電阻監測光線強度可以達到效果嗎？

ID:171111 · 發表于 2018-11-29 19:02

謝謝分享這個資料太好了正需要

ID:524003 · 發表于 2019-4-28 22:21

挺好的,學習了,感謝樓主

ID:484435 · 發表于 2019-4-29 09:34

謝謝分享

ID:576710 · 發表于 2019-7-2 22:28

為什么不讓下載

ID:371529 · 發表于 2019-7-5 19:34

優秀，想賞你

ID:220936 · 發表于 2019-8-8 15:17

哈哈我哈哈發表于 2019-7-5 19:34
優秀，想賞你

謝謝

ID:613786 · 發表于 2020-2-13 11:29

除了仿真圖打不開，其他還好

ID:141106 · 發表于 2020-2-13 14:49

謝謝分享

ID:171111 · 發表于 2020-4-25 01:06

謝謝分享正需要值得參考

ID:724172 · 發表于 2020-9-3 15:24

這是用的電機什么型號的？

ID:828650 · 發表于 2020-10-12 15:43

終于找到了，太感謝樓主了

ID:143767 · 發表于 2020-10-14 13:14

我下載看了，電路圖不全，步進電機是怎么控制的，單片機部分也沒有

ID:357153 · 發表于 2020-10-15 17:04

單純用光敏電阻監測光線強度可以達到效果嗎

ID:675767 · 發表于 2021-2-5 23:45

這個真的很牛逼啊

先收藏了

ID:200118 · 發表于 2021-2-14 23:32

電路圖不全，發份完整的圖紙就好了。。。

ID:883932 · 發表于 2021-2-17 01:06

很有幫助，就是沒有電路圖
另外程序里有讀取熱敏的注釋，暫時看不懂是啥意思
很不錯的資料，有待完善

ID:869417 · 發表于 2021-2-21 18:37

學習了。與普通比較電路控制普通電機哪個方案好。

ID:557411 · 發表于 2021-3-20 16:50

很實用，提高充電效率

ID:1045132 · 發表于 2022-9-21 15:39

謝謝分享，資料不是很全

ID:63317 · 發表于 2022-9-21 20:47

謝謝分享正需要值得參考

ID:977861 · 發表于 2022-10-3 12:58

太實用了，做的不錯，光接收部位有需要改進的地方

帳號		自動登錄	找回密碼
密碼			立即注冊

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

單片機太陽追蹤系統制作源碼與資料

評分