太陽能跟蹤系統程序

ID:191473 · 發表于 2017-5-31 03:32

#include <reg52.h> //
#include <LCD1602.H>
#include "DS1302.h"
#include<intrins.h>

sfr ADC_CONTR = 0xBC; //ADC control register
sfr ADC_RES = 0xBD; //ADC hight 8-bit result register
sfr ADC_RESL = 0xBE; //ADC low 2-bit result register
sfr P1ASF = 0x9D; //P1 secondary function control register

sbit xiay  = P3^0; //定義

sbit key1  = P3^2; //定義選擇鍵
sbit key2  = P3^3; //定義加按鍵端口
sbit key3  = P3^4; //定義減按鍵端口
sbit key4  = P3^5; //定義
sbit key5  = P3^6; //定義
sbit pwm0  = P2^0;    //縱向舵機驅動端口
sbit pwm1  = P2^1          ;    //橫向舵機驅動端口

#define uchar unsigned char    //宏定義    unsigned char字符為uchar
#define uint unsigned int    //宏定義    unsigned int
#define ulint unsigned long int //宏定義

/*定義相關特殊功能寄存器*/
#define ADC_POWER 0x80 //ADC power control bit
#define ADC_FLAG 0x10 //ADC complete flag
#define ADC_START 0x08 //ADC start control bit
#define ADC_SPEEDLL 0x00 //540 clocks
#define ADC_SPEEDL 0x20 //360 clocks
#define ADC_SPEEDH 0x40 //180 clocks
#define ADC_SPEEDHH 0x60 //90 clocks

uint guangmin_0=0,guangmin_1=0,guangmin_2=0,guangmin_3=0;  //光敏值變量
uchar xdata Temp[16]="13-04-30 :  G ";
uchar xdata Test[16]="19:14:00 :  K ";
uchar xdata Temp1[16]="X:    Y:    ";
uchar xdata Test1[16]="guangzhao:    ";
uchar xdata Temp2[16]=" G0    G1    ";
uchar xdata Test2[16]=" G2    G3    ";

uint nian,yue,ri,shi,fen,miao;
int _shi=18,_fen=30;          //停止時間變量
int shi_=6,fen_=30;             //啟動時間變量
uchar set=0,set1=0,set2=0;    //模式控制變量
uchar xian=0;             //顯示模式標志變量
uint GZ;                //光照變量
uchar X,Y;             //角度變量

uint js=0;             //標志位變量
uint b=107,d=107;            //角度控制變量

void Delay1us() //@12.000MHz
{
_nop_();
_nop_();
_nop_();
_nop_();
}
void InitADC()
{
P1ASF = 0xf0; //Set all P1 as analog input port 0xff=1111 1111B 即P1全部用作AD，使用時根據實際情況賦值
ADC_RES = 0;  //清零轉換結果寄存器高8位
ADC_RESL= 0;  //清零轉換結果寄存器低2位
ADC_CONTR = 0x00;
Delay1us(); //等待ADC_CONTR值寫入
_nop_();
_nop_();
_nop_();
_nop_();
}
unsigned int GetADC(unsigned char ch,unsigned char speed)
{
unsigned int res;
  ADC_CONTR =ADC_CONTR | ADC_POWER | speed | ADC_START | ch;
Delay1us();//確保ADC_CONTR的值寫入nop; nop; nop; nop;
while(!(ADC_CONTR & ADC_FLAG)); //如果AD轉換未結束FLAG位為0，程序在此等待，如果為1，跳出循環
res=ADC_RES*4+ADC_RESL; //讀AD轉換結果
ADC_RES=0;
ADC_RESL=0;
ADC_CONTR=0; //寄存器復位
return res;
}
void readtime()
{
   nian= BCD_Decimal(read_1302(0x8d));
   yue = BCD_Decimal(read_1302(0x89));
   ri  = BCD_Decimal(read_1302(0x87));
   shi = BCD_Decimal(read_1302(0x85));
   fen = BCD_Decimal(read_1302(0x83));
   miao= BCD_Decimal(read_1302(0x81));
}
uchar key_bcd(uchar key_decimal)                   //轉成ds1302所需的BCD碼
{
uchar temp;
temp=(((key_decimal/10)&0x0f)<<4)|(key_decimal%10);
return temp;
}
void keyscan()
{
//-----------------------------模式鍵key1----------------------------
if(key1==0&&xian==0)
{
   //delay(5);
   if(key1==0)
   {
      //delay(10);
      while(!key1);
   set++;
   set1=0;
   set2=0;
   if(set>6)set=0;
   }
}
//-----------------------------模式鍵key4----------------------------
if(key4==0&&xian==0)
{
   //delay(5);
   if(key4==0)
   {
      //delay(10);
      while(!key4);
   set=0;
   set1++;
   set2=0;
   if(set1>2)set1=0;
   }
}
//-----------------------------模式鍵key5----------------------------
if(key5==0&&xian==0)
{
   //delay(5);
   if(key5==0)
   {
      //delay(10);
      while(!key5);
   set=0;
   set1=0;
   set2++;
   if(set2>2)set2=0;
   }
}
//-----------------------------key2----------------------------
if(key2==0)
{
   //delay(2);
   if(key2==0)
   {
      //delay(5);
      while(!key2);

switch(set)
   {
      case 1: nian++;
         if(nian>99)nian=0;
write_1302(0x8e,0x00);
write_1302(0x8c,key_bcd(nian)| 0x80);
write_1302(0x8e,0x80);
break;
      case 2: yue++;
         if(yue>12)yue=1;
write_1302(0x8e,0x00);
write_1302(0x88,key_bcd(yue));
write_1302(0x8e,0x80);
break;
      case 3: ri++;
         if(ri>31)ri=1;
write_1302(0x8e,0x00);
write_1302(0x86,key_bcd(ri));
write_1302(0x8e,0x80);
break;

      case 4: shi++;
         if(shi>23)shi=0;
write_1302(0x8e,0x00);
write_1302(0x84,key_bcd(shi));
write_1302(0x8e,0x80);
break;
      case 5: fen++;
         if(fen>59)fen=0;
write_1302(0x8e,0x00);
write_1302(0x82,key_bcd(fen));
write_1302(0x8e,0x80);
break;
      case 6: miao++;
         if(miao>59)miao=0;
write_1302(0x8e,0x00);
write_1302(0x80,key_bcd(miao)&0x7f);
write_1302(0x8e,0x80);
break;
   }
   switch(set1)
   {
      case 1: _shi++;
         if(_shi>23)_shi=23;
break;
      case 2: _fen++;
         if(_fen>59)_fen=0;
break;
   }
   switch(set2)
   {
      case 1: shi_++;
         if(shi_>_shi)shi_=_shi;
break;
      case 2: fen_++;
         if(fen_>59)fen_=0;
break;
   }

   }
}
//-----------------------------key3----------------------------
if(key3==0)
{
   //delay(2);
   if(key3==0)
   {
      //delay(5);
      while(!key3);
   if(set==0&&set1==0&&set2==0)
   {
        xian++;
      if(xian>2)xian=0;
   b++;d++;
   }
switch(set)
   {
      case 1: nian--;
         if(nian>99)nian=99;
write_1302(0x8e,0x00);
write_1302(0x8c,key_bcd(nian)| 0x80);
write_1302(0x8e,0x80);
break;
      case 2: yue--;
         if(yue>12)yue=12;
write_1302(0x8e,0x00);
write_1302(0x88,key_bcd(yue));
write_1302(0x8e,0x80);
break;
      case 3: ri--;
         if(ri>31)ri=31;
write_1302(0x8e,0x00);
write_1302(0x86,key_bcd(ri));
write_1302(0x8e,0x80);
break;

      case 4: shi--;
         if(shi>23)shi=23;
write_1302(0x8e,0x00);
write_1302(0x84,key_bcd(shi));
write_1302(0x8e,0x80);
break;
      case 5: fen--;
         if(fen>59)fen=59;
write_1302(0x8e,0x00);
write_1302(0x82,key_bcd(fen));
write_1302(0x8e,0x80);
break;
      case 6: miao--;
         if(miao>59)miao=59;
write_1302(0x8e,0x00);
write_1302(0x80,key_bcd(miao)&0x7f);
write_1302(0x8e,0x80);
break;
   }
   switch(set1)
   {
      case 1: _shi--;
         if(_shi<shi_)_shi=shi_;
break;
      case 2: _fen--;
         if(_fen<0)_fen=59;
break;
   }
   switch(set2)
   {
      case 1: shi_--;
         if(shi_<0)shi_=0;
break;
      case 2: fen_--;
         if(fen_<0)fen_=59;
break;
   }
   }
}
}
uchar ttt;
void display()
{
if(xian==0)    //顯示模式0
{
      ttt++;
if(ttt>5)ttt=0;
if(set==1)
{
if(ttt>2)
{
   Temp[0]=nian/10+'0';
   Temp[1]=nian%10+'0';
}
else
{
   Temp[0]=' ';
   Temp[1]=' ';
}
}
else
{
   Temp[0]=nian/10+'0';
   Temp[1]=nian%10+'0';
}

if(set==2)
{
if(ttt>2)
{
   Temp[3]=yue/10+'0';
   Temp[4]=yue%10+'0';
}
else
{
   Temp[3]=' ';
   Temp[4]=' ';
}
}
else
{
   Temp[3]=yue/10+'0';
   Temp[4]=yue%10+'0';
}

if(set==3)
{
if(ttt>2)
{
   Temp[6]=ri/10+'0';
   Temp[7]=ri%10+'0';
}
else
{
   Temp[6]=' ';
   Temp[7]=' ';
}
}
else
{
   Temp[6]=ri/10+'0';
   Temp[7]=ri%10+'0';
}
if(set1==1)
{
if(ttt>2)
{
   Temp[9]=_shi/10+'0';
   Temp[10]=_shi%10+'0';
}
else
{
   Temp[9]=' ';
   Temp[10]=' ';
}
}
else
{
   Temp[9]=_shi/10+'0';
   Temp[10]=_shi%10+'0';
}
if(set1==2)
{
if(ttt>2)
{
   Temp[12]=_fen/10+'0';
   Temp[13]=_fen%10+'0';
}
else
{
   Temp[12]=' ';
   Temp[13]=' ';
}
}
else
{
   Temp[12]=_fen/10+'0';
   Temp[13]=_fen%10+'0';
}
ShowString(0,Temp);

if(set==4)
{
if(ttt>2)
{
   Test[0]=shi/10+'0';
   Test[1]=shi%10+'0';
}
else
{
   Test[0]=' ';
   Test[1]=' ';
}
}
else
{
   Test[0]=shi/10+'0';
   Test[1]=shi%10+'0';
}

if(set==5)
{
if(ttt>2)
{
   Test[3]=fen/10+'0';
   Test[4]=fen%10+'0';
}
else
{
   Test[3]=' ';
   Test[4]=' ';
}
}
else
{
   Test[3]=fen/10+'0';
   Test[4]=fen%10+'0';
}

if(set==6)
{
if(ttt>2)
{
   Test[6]=miao/10+'0';
   Test[7]=miao%10+'0';
}
else
{
   Test[6]=' ';
   Test[7]=' ';
}
}
else
{
   Test[6]=miao/10+'0';
   Test[7]=miao%10+'0';
}
if(set2==1)
{
if(ttt>2)
{
   Test[9]=shi_/10+'0';
   Test[10]=shi_%10+'0';
}
else
{
   Test[9]=' ';
   Test[10]=' ';
}
}
else
{
   Test[9]=shi_/10+'0';
   Test[10]=shi_%10+'0';
}
if(set2==2)
{
if(ttt>2)
{
   Test[12]=fen_/10+'0';
   Test[13]=fen_%10+'0';
}
else
{
   Test[12]=' ';
   Test[13]=' ';
}
}
else
{
   Test[12]=fen_/10+'0';
   Test[13]=fen_%10+'0';
}
ShowString(1,Test);
}
if(xian==1)    //顯示模式1
{
   Y=b;
   X=d;
   GZ=(guangmin_0+guangmin_1+guangmin_2+guangmin_3)/4;
   if(X<=107)
   {
         X=107-X;
   Temp1[3]='-';    //角度數值轉換顯示
   Temp1[4]=X/100%10+'0';
   Temp1[5]=X/10%10+'0';
   Temp1[6]=X%10+'0';
   }
   if(X>=107)
   {
         X=X-107;
   Temp1[3]='+';    //角度數值轉換顯示
   Temp1[4]=X/100%10+'0';
   Temp1[5]=X/10%10+'0';
   Temp1[6]=X%10+'0';
   }

   if(Y<=107)
   {
         Y=107-Y;
   Temp1[11]='-';    //角度數值轉換顯示
   Temp1[12]=Y/100%10+'0';
   Temp1[13]=Y/10%10+'0';
   Temp1[14]=Y%10+'0';
   }
   if(Y>=107)
   {
         Y=Y-107;
   Temp1[11]='+';    //角度數值轉換顯示
   Temp1[12]=Y/100%10+'0';
   Temp1[13]=Y/10%10+'0';
   Temp1[14]=Y%10+'0';
   }

   Test1[10]=GZ/1000+'0';    //光敏數值轉換顯示
   Test1[11]=GZ/100%10+'0';
   Test1[12]=GZ/10%10+'0';
   Test1[13]=GZ%10+'0';
   ShowString(0,Temp1);
   ShowString(1,Test1);
}
if(xian==2)    //顯示模式2
{

   Temp2[4]=guangmin_0/1000+'0';    //光敏數值轉換顯示
   Temp2[5]=guangmin_0/100%10+'0';
   Temp2[6]=guangmin_0/10%10+'0';
   Temp2[7]=guangmin_0%10+'0';

   Temp2[11]=guangmin_1/1000+'0';    //光敏數值轉換顯示
   Temp2[12]=guangmin_1/100%10+'0';
   Temp2[13]=guangmin_1/10%10+'0';
   Temp2[14]=guangmin_1%10+'0';

   Test2[4]=guangmin_2/1000+'0';    //光敏數值轉換顯示
   Test2[5]=guangmin_2/100%10+'0';
   Test2[6]=guangmin_2/10%10+'0';
   Test2[7]=guangmin_2%10+'0';

   Test2[11]=guangmin_3/1000+'0';    //光敏數值轉換顯示
   Test2[12]=guangmin_3/100%10+'0';
   Test2[13]=guangmin_3/10%10+'0';
   Test2[14]=guangmin_3%10+'0';

   ShowString(0,Temp2);
   ShowString(1,Test2);
}
}
void timer0_irpt()interrupt 1    //中斷1服務程序
{
   TH0 = (65536-10)/256;       //重裝計數值
TL0 = (65536-10)%256;    //重裝計數值
   js++;    //a自加1
   if(js==2000)    //如果a等于2000
   {
      pwm0=1;
   pwm1=1;    //縱向舵機驅動端口取反
      js=0;    //把a置0
   }
   else    //否則判斷a是否等于b
   {
   if(js==b){pwm0=0;}         //如果等于就把縱向舵機驅動端口取反
   if(js==d){pwm1=0;}
   }
}
void chushihua()    //內部中斷初始化函數
{
   TMOD = 0x01;    //將計數器設置為工作方式1
   TH0 = (65536-10)/256;    //給計數器高八位賦值
   TL0 = (65536-10)%256;    //給計數器低八位賦值
   EA = 1; //開總中斷
   ET0 = 1;                   //開中斷1
   TR0 = 1;
}
void pianzhuankongzhi(void)
{



   if(((guangmin_0+guangmin_1)-10)<(guangmin_2+guangmin_3))
   {
        b--;
   if(b<45){b=45;}
   }
   if(((guangmin_2+guangmin_3)-10)<(guangmin_0+guangmin_1))
   {
        b++;
   if(b>140){b=140;}
   }
   Delay1us();
   if(((guangmin_3+guangmin_0)-10)<(guangmin_1+guangmin_2))
   {
        d--;
   if(d<45){d=45;}
   }
   if(((guangmin_1+guangmin_2)-10)<(guangmin_3+guangmin_0))
   {
        d++;
   if(d>170){d=170;}
   }


}
void main(void)
{
InitADC();          //ADC初始化
  InitLcd_LCD1602();    //液晶初始化
ds1302_init();       //DS1302初始化
chushihua();       //PWM中斷初始化
while(1)
{
        readtime();    //讀取時間
   display();    //顯示控制
   keyscan();         //按鍵控制

         if(((shi*60+fen)>=(shi_*60+fen_))&&((shi*60+fen)<=(_shi*60+_fen-1)))       //判斷時間段開跟蹤
   {
      guangmin_0=GetADC(0,ADC_SPEEDLL);
   guangmin_1=GetADC(1,ADC_SPEEDLL);

   guangmin_2=GetADC(2,ADC_SPEEDLL);
   guangmin_3=GetADC(3,ADC_SPEEDLL);

   pianzhuankongzhi();    //舵機控制
   EA=1;
   }
   else
   {
   EA=0;
   }

}
}