求助，根據(jù)ds1302得出的時間進行太陽追蹤單片機程序問題

ID:710256 · 發(fā)表于 2020-4-6 12:33

我想根據(jù)制作一個可以調(diào)節(jié)的ds1302時鐘，再根據(jù)時鐘計算出太陽高度角和方位角來進行太陽追蹤

可是我的程序卻不能用按鍵將改好的時間寫入ds1302
有高手能看下哪里不正確需要改嗎

單片機源程序如下:

#include <REG52.h>
#include <intrins.h>
#include <math.h>
#define uchar unsigned char
#define uint unsigned int
#define PI 3.14159 //圓周率
#define LAT 30.57 //緯度
sbit LCD_SCLK = P0^0;
sbit LCD_STD = P0^1;
sbit LCD_CS = P0^2;
sbit DS1302_CE = P3^1;
sbit DS1302_CK = P3^4;
sbit DS1302_IO = P3^5;
extern void _nop_(void);
uchar time[8] ;
uchar set_buf[12] = {0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30};
uchar angle[3];
uchar time_500ms;
uchar set_num = 0;
uchar key_num;
uchar count1,count2;
bit flag_js;
/* 發(fā)送一個字節(jié)到DS1302通信總線上 */
void DS1302ByteWrite(uchar dat)
{
uchar mask;
for (mask=0x01; mask!=0; mask<<=1) //低位在前，逐位移出
{
if ((mask&dat) != 0) //首先輸出該位數(shù)據(jù)
DS1302_IO = 1;
else
DS1302_IO = 0;
DS1302_CK = 1; //然后拉高時鐘
DS1302_CK = 0; //再拉低時鐘，完成一個位的操作
}
DS1302_IO = 1; //最后確保釋放IO引腳
}
/* 由DS1302通信總線上讀取一個字節(jié) */
unsigned char DS1302ByteRead()
{
uchar mask;
uchar dat = 0;
for (mask=0x01; mask!=0; mask<<=1) //低位在前，逐位讀取
{
if (DS1302_IO != 0) //首先讀取此時的IO引腳，并設(shè)置dat中的對應(yīng)位
{
dat |= mask;
}
DS1302_CK = 1; //然后拉高時鐘
DS1302_CK = 0; //再拉低時鐘，完成一個位的操作
}
return dat; //最后返回讀到的字節(jié)數(shù)據(jù)
}
/* 用單次寫操作向某一寄存器寫入一個字節(jié)，reg-寄存器地址，dat-待寫入字節(jié) */
void DS1302SingleWrite(uchar reg, uchar dat)
{
DS1302_CE = 1; //使能片選信號
DS1302ByteWrite((reg<<1)|0x80); //發(fā)送寫寄存器指令
DS1302ByteWrite(dat); //寫入字節(jié)數(shù)據(jù)
DS1302_CE = 0; //除能片選信號
}
/* 用單次讀操作從某一寄存器讀取一個字節(jié)，reg-寄存器地址，返回值-讀到的字節(jié) */
unsigned char DS1302SingleRead(uchar reg)
{
uchar dat;
DS1302_CE = 1; //使能片選信號
DS1302ByteWrite((reg<<1)|0x81); //發(fā)送讀寄存器指令
dat = DS1302ByteRead(); //讀取字節(jié)數(shù)據(jù)
DS1302_CE = 0; //除能片選信號
return dat;
}
/* 用突發(fā)模式連續(xù)寫入8個寄存器數(shù)據(jù)，dat-待寫入數(shù)據(jù)指針 */
void DS1302BurstWrite(unsigned char *dat)
{
uchar i;
DS1302_CE = 1;
DS1302ByteWrite(0xBE); //發(fā)送突發(fā)寫寄存器指令
for (i=0; i<8; i++) //連續(xù)寫入8字節(jié)數(shù)據(jù)
{
DS1302ByteWrite(dat[i]);
}
DS1302_CE = 0;
}
/* 用突發(fā)模式連續(xù)讀取8個寄存器的數(shù)據(jù)，dat-讀取數(shù)據(jù)的接收指針 */
void DS1302BurstRead(uchar *dat)
{
uchar i;
DS1302_CE = 1;
DS1302ByteWrite(0xBF); //發(fā)送突發(fā)讀寄存器指令
for (i=0; i<8; i++) //連續(xù)讀取8個字節(jié)
{
dat[i] = DS1302ByteRead();
}
DS1302_CE = 0;
}
/* DS1302初始化，如發(fā)生掉電則重新設(shè)置初始時間 */
void InitDS1302()
{
uchar dat;
uchar code InitTime[] = { //2020年4月1日星期二 12:30:00
0x00,0x30,0x12, 0x01, 0x04, 0x02, 0x20
};
DS1302_CE = 0; //初始化DS1302通信引腳
DS1302_CK = 0;
dat = DS1302SingleRead(0); //讀取秒寄存器
if ((dat & 0x80) != 0) //由秒寄存器最高位CH的值判斷DS1302是否已停止
{
DS1302SingleWrite(7, 0x00); //撤銷寫保護以允許寫入數(shù)據(jù)
DS1302BurstWrite(InitTime); //設(shè)置DS1302為默認的初始時間
}
}
//***********************************************************
//函數(shù)：void key（void）
//功能：鍵盤掃描、識別以及處理
//***********************************************************
void key(void)
{
uchar tmp,temp;
tmp=P1|0x07;
temp = tmp;
temp &= 0x07;
if(temp != key_num)
{
key_num = temp;
switch(key_num)
{
case 0x06: if(flag_js == 0)//設(shè)定/退出
{
flag_js = 1;
count1 = 1;
}
else if(flag_js == 1)
{
time[6] = (set_buf[11]<<4)+(set_buf[10]&0x0f);//年
time[4] = (set_buf[9]<<4)+(set_buf[8]&0x0f);//月
time[3] = (set_buf[7]<<4)+(set_buf[6]&0x0f);//日
time[2] = (set_buf[5]<<4)+(set_buf[4]&0x0f);//時
time[1] = (set_buf[3]<<4)+(set_buf[2]&0x0f);//分
time[0] = (set_buf[1]<<4)+(set_buf[0]&0x0f); //秒
DS1302BurstWrite(time);
flag_js = 0;
count2 = 1;
}
break;
case 0x05: if(flag_js == 1)//移位
{
set_num ++;
if(set_num > 11)
set_num = 0;
}
break;
case 0x03: if(flag_js == 1)//數(shù)字加一
{
switch(set_num)
{
case 0: if(set_buf[0] > 0x38) set_buf[0] = 0x30; //秒的個位
else set_buf[0]++; break;
case 1: if(set_buf[1] > 0x34) set_buf[1] = 0x30; //秒的十位
else set_buf[1]++; break;
case 2: if(set_buf[2] > 0x38) set_buf[2] = 0x30;
else set_buf[2]++; break;
case 3: if(set_buf[3] > 0x34) set_buf[3] = 0x30; //分
else set_buf[3]++; break;
case 4: if(set_buf[4] > 0x38) set_buf[4] = 0x30;
else set_buf[4]++; break;
case 5: if(set_buf[5] > 0x31) set_buf[5] = 0x30; //時
else set_buf[5]++; break;
case 6: if(set_buf[6] > 0x38) set_buf[5] = 0x30;
else set_buf[6]++; break;
case 7: if(set_buf[7] > 0x32) set_buf[5] = 0x30; //日
else set_buf[7]++; break;
case 8: if(set_buf[8] > 0x38) set_buf[5] = 0x30;
else set_buf[8]++; break;
case 9: if(set_buf[9] > 0x31) set_buf[5] = 0x30; //月
else set_buf[9]++; break;
case 10: if(set_buf[10] > 0x38) set_buf[5] = 0x30;
else set_buf[10]++; break;
case 11: if(set_buf[11] > 0x38) set_buf[5] = 0x30; //年
else set_buf[11]++; break;
default: break;
}
}
break;
default: break;
}
}
}

復(fù)制代碼

ID:401564 · 發(fā)表于 2020-4-6 17:25

用4個光敏電阻通過實時采光跟蹤它不好嗎?
冬天下午3點和夏天的下午3點,這太陽的方向是不一樣的呀

ID:710256 · 發(fā)表于 2020-4-6 17:51

這是算太陽角度，和主程序，望大佬指正

/*計算太陽角度*/
void anglecalculate()
{
int leap;
uint year,mon,day;
uint hour,min,sec;
uint DayAdd;
uchar DecAngle,HourAngle,DecAngle1;
uchar EleAngle,AziAngle,AziAngle1;
year=(time[6]>>4)*10+(time[6]&0x0f)+2000;
mon=(time[4]>>4)*10+(time[4]&0x0f);
day=(time[3]>>4)*10+(time[3]&0x0f);
hour=(time[2]>>4)*10+(time[2]&0x0f);
min=(time[1]>>4)*10+(time[1]&0x0f);
sec=(time[0]>>4)*10+(time[0]&0x0f);
leap=(year%4==0&&year%100!=0)||(year%400==0);閏年計算
switch(mon)
{
case 1:
DayAdd=(day);break;
case 2:
DayAdd=31+day;break;
case 3:
DayAdd=31+28+day;break;
case 4:
DayAdd=31+28+31+day;break;
case 5:
DayAdd=31+28+31+30+day;break;
case 6:
DayAdd=31+28+31+30+31+day;break;
case 7:
DayAdd=31+28+31+30+31+30+day;break;
case 8:
DayAdd=31+28+31+30+31+30+31+day;break;
case 9:
DayAdd=31+28+31+30+31+30+31+31+day;break;
case 10:
DayAdd=31+28+31+30+31+30+31+31+30+day;break;
case 11:
DayAdd=31+28+31+30+31+30+31+31+30+31+day;break;
case 12:
DayAdd=31+28+31+30+31+30+31+31+30+31+30+day;break;
default:
break; /*cout<<"月份輸入錯誤！*/
}
if(leap&&(mon>=3))
DayAdd=DayAdd+1; //當(dāng)前天數(shù)
DecAngle=(23.45*sin(2*PI*(284+DayAdd)/365))*PI/180;//計算赤緯角
DecAngle1=(23.45*sin(2*PI*(284+DayAdd+1)/365))*PI/180;//計算第二天赤緯角
HourAngle=(12-(hour)-(min)/60.0-(sec)/3600.0)*PI/12;//計算時角
EleAngle=asin(sin(LAT)*sin(DecAngle)+cos(LAT )*cos(DecAngle)*cos(HourAngle));//計算高度角
AziAngle=acos((sin(EleAngle)*sin(LAT )-sin(DecAngle))/(cos(EleAngle)*cos(LAT )));//計算方位角
AziAngle1=acos((0-sin(DecAngle1))/cos(LAT ));//計算第二天的方位角
angle[0]=EleAngle;
angle[1]=AziAngle;
angle[2]=AziAngle1;
}/*視日軌跡追蹤*/
void trackgo()
{
uchar h,f;
uchar y,z;
uchar p,q;
uchar c=0,d=0;
h=angle[0];//得到高度角
f=angle[1];//得到方位角
y=(f-c)/5;//計算方位電機需旋轉(zhuǎn)圈數(shù)
z=(h-d)/1;//計算高度電機需旋轉(zhuǎn)圈數(shù)
c=f;
d=h;
if(y!=0)
{
for(p=0;p<y;p++)
{
GoA1();
}
}
else
{
if(z!=0)
{
for(q=0;q<z;q++)
{
GoB1();
}
}
}
P2=0x00;
}
//函數(shù)：void main（）功能：主函數(shù)，初始化
void main()
{
uchar psec=0xaa;
uchar time_30s=0;
uint getdata;
float temp;
P2=0x00;
time_500ms = 0;
flag_js = 0;
count1 = 1;
count2 = 1;
InitDS1302();
timer_init();
Out_Init();
LCD_init();
delay_ms(50);
E_W_ANGLE=read2543(0x00);
S_N_ANGLE=read2543(0x10);
LIGHT_DETECTION=read2543(0x20);
while(1)
{
if(time_500ms == 50)
{
time_500ms=0;
DS1302BurstRead(time);//獲得時間
key();
anglecalculate();
if(psec!=time[0])
{
disp(flag_js); //用液晶顯示時間
psec=time[0];
}
time_30s++;
if(time_30s==6)//3s判定一次方位
{
time_30s=0;
getdata=read2543(0x20);
getdata=read2543(0x20);
getdata=read2543(0x20);
temp=(float)getdata/4095*500;
LIGHT_DETECTION=temp;//當(dāng)前光照強度
temp=0;
if(LIGHT_DETECTION<300&&LIGHT_DETECTION>100)//光強不足啟用視日軌跡追蹤
{
trackgo();
}
}
startgo();
}
}
}

復(fù)制代碼

ID:710256 · 發(fā)表于 2020-4-6 20:37

Y_G_G 發(fā)表于 2020-4-6 17:25
用4個光敏電阻通過實時采光跟蹤它不好嗎?
冬天下午3點和夏天的下午3點,這太陽的方向是不一樣的呀

用采光跟蹤只是其中一部分還要與軌跡跟蹤相配合，光強不夠，天氣不好就啟用軌跡跟蹤

ID:401564 · 發(fā)表于 2020-4-7 09:36

astlaqwq 發(fā)表于 2020-4-6 20:37
用采光跟蹤只是其中一部分還要與軌跡跟蹤相配合，光強不夠，天氣不好就啟用軌跡跟蹤

你這估計是太陽能之類的,那天氣不好的話,太陽能還有什么用呢?沒有太陽,轉(zhuǎn)哪不都一樣的嗎?有了太陽,就調(diào)整一下不就得了
而且,這經(jīng)度時間什么的,你算過時區(qū)沒有呀?我們用的是北京時間,你家在北京嗎?大年三十的時候,新疆那邊可是晚上八九點才天黑的
冬天和夏天的太陽軌跡也是不一樣的
采光跟蹤已經(jīng)可以解決很多問題

ID:710256 · 發(fā)表于 2020-4-7 12:49

Y_G_G 發(fā)表于 2020-4-7 09:36
你這估計是太陽能之類的,那天氣不好的話,太陽能還有什么用呢?沒有太陽,轉(zhuǎn)哪不都一樣的嗎?有了太陽,就調(diào)整 ...

我主要是實現(xiàn)在白天實現(xiàn)全天候的太陽追蹤所以需要兩種方式一起用，至于經(jīng)度的校正沒有進行，不需要太精確，能力有限，看了一堆資料被一大堆公式繞了進去

ID:678200 · 發(fā)表于 2020-4-9 17:57

求仿真跟程序，學(xué)習(xí)一下

ID:671688 · 發(fā)表于 2023-3-9 14:01

求仿真跟程序，學(xué)習(xí)一下

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

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

求助，根據(jù)ds1302得出的時間進行太陽追蹤 單片機程序問題

求助，根據(jù)ds1302得出的時間進行太陽追蹤單片機程序問題