立即注册 登录
返回首页

uid:356210的个人空间

日志

太阳能追光系统代码

已有 651 次阅读2018-11-30 19:34 |个人分类:代码| 太阳能追光代码

#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;  //×YÏò¶æ»úÇy¶ˉ¶Ë¿ú
sbit pwm1  = P2^1           ;  //oáÏò¶æ»úÇy¶ˉ¶Ë¿ú 

#define uchar unsigned char   //o궨òå unsigned char×Ö·ûÎauchar
#define uint unsigned int   //o궨òå unsigned int
#define ulint unsigned long int //o궨òå

/*¶¨òåÏà1ØìØêa1|Äü¼Ä′æÆ÷*/
#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;  //1aÃôÖμ±äá¿
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;        //í￡Ö1ê±¼ä±äá¿
int shi_=6,fen_=30;          //Æô¶ˉê±¼ä±äá¿
uchar set=0,set1=0,set2=0;  //Ä￡꽿ØÖƱäá¿
uchar xian=0;            //ÏÔê¾Ä￡ê½±êÖ¾±äá¿
uint GZ;              //1aÕÕ±äá¿
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è«2¿óÃ×÷AD￡¬ê1óÃ걸ù¾Yêμ¼êÇé¿ö¸3Öμ
ADC_RES = 0;  //Çåáã×a»»½á1û¼Ä′æÆ÷¸ß8λ
ADC_RESL= 0;  //Çåáã×a»»½á1û¼Ä′æÆ÷μí2λ
ADC_CONTR = 0x00; 
Delay1us();   //μè′yADC_CONTRÖμD′èë 
_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μÄÖμD′èënop; nop; nop; nop;
while(!(ADC_CONTR & ADC_FLAG)); //èç1ûAD×a»»Î′½áêøFLAGλÎa0￡¬3ìDòÔú′Ëμè′y￡¬èç1ûÎa1￡¬ìø3öÑ-»·
res=ADC_RES*4+ADC_RESL; //¶áAD×a»»½á1û
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)                    //×a3éds1302ËùDèμÄ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]='-'; //½Ç¶èêyÖμ×a»»ÏÔê¾
 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]='+'; //½Ç¶èêyÖμ×a»»ÏÔê¾
 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]='-'; //½Ç¶èêyÖμ×a»»ÏÔê¾
 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]='+'; //½Ç¶èêyÖμ×a»»ÏÔê¾
 Temp1[12]=Y/100%10+'0';
 Temp1[13]=Y/10%10+'0';
 Temp1[14]=Y%10+'0';
 }

 Test1[10]=GZ/1000+'0'; //1aÃôêyÖμ×a»»ÏÔê¾
 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'; //1aÃôêyÖμ×a»»ÏÔê¾
 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'; //1aÃôêyÖμ×a»»ÏÔê¾
 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'; //1aÃôêyÖμ×a»»ÏÔê¾
 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'; //1aÃôêyÖμ×a»»ÏÔê¾
 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   //ÖD¶Ï1·tÎñ3ìDò
{
TH0 = (65536-10)/256;         //ÖØ×°¼ÆêyÖμ                
   TL0 = (65536-10)%256;   //ÖØ×°¼ÆêyÖμ
js++;   //a×Ô¼ó1
if(js==2000)   //èç1ûaμèóú2000
{
   pwm0=1;
 pwm1=1;   //×YÏò¶æ»úÇy¶ˉ¶Ë¿úè¡·′
   js=0;   //°ÑaÖÃ0
}
else   //·ñÔòÅD¶ÏaêÇ·ñμèóúb
{
  if(js==b){pwm0=0;}   //èç1ûμèóú¾í°Ñ×YÏò¶æ»úÇy¶ˉ¶Ë¿úè¡·′
  if(js==d){pwm1=0;}
} 
}
void chushihua()  //Äú2¿ÖD¶Ï3õê¼»ˉoˉêy
{
TMOD = 0x01;  //½«¼ÆêyÆ÷éèÖÃÎa1¤×÷·½ê½1
     TH0 = (65536-10)/256;     //¸ø¼ÆêyÆ÷¸ß°Ëλ¸3Öμ                    
     TL0 = (65536-10)%256;   //¸ø¼ÆêyÆ÷μí°Ëλ¸3Öμ
     EA = 1; //¿a×üÖD¶Ï
     ET0 = 1;                    //¿aÖD¶Ï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();        //ADC3õê¼»ˉ
  InitLcd_LCD1602(); //òo¾§3õê¼»ˉ
ds1302_init();    //DS13023õê¼»ˉ
chushihua();     //PWMÖD¶Ï3õê¼»ˉ
while(1)
{ 
readtime();       //¶áè¡ê±¼ä
display(); //ÏÔ꾿ØÖÆ
keyscan();   //°′¼ü¿ØÖÆ

  if(((shi*60+fen)>=(shi_*60+fen_))&&((shi*60+fen)<=(_shi*60+_fen-1)))    //ÅD¶Ïê±¼ä¶Î¿a¸ú×ù
 {  
  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;
 }      
          
}
}


路过
鸡蛋
鲜花
握手
雷人
收藏 邀请 举报

评论 (0 个评论)

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

返回顶部