国产免费AV|泡泡玛特欧洲总部将设在伦敦|中文天堂网www新版资源在线|一本久道综合在线中文|国精产品一二三产区的使用方法|香蕉鱼在线观看|www.27eee

ELEOK

標題: 51單片機追光程序Proteus仿真原理圖（太陽能充電） [打印本頁]
作者: eng    時間: 2021-6-20 02:44
標題: 51單片機追光程序Proteus仿真原理圖（太陽能充電）
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）



部分源碼：完整源碼請下載本文尾部的附件。
  1. /********************************************************************
  2. * 名稱   : PSend_Hex()
  3. * 功能   : 發送字符串函數,可控制發送長度
  4. * 變量   : 無
  5. * 返回值 : 無
  6. ********************************************************************/
  7. void Send_Hex(unsigned char *p,unsigned char num)
  8. {
  9.        while(num--)   //剩余發送的字符數
  10.     {
  11.         SBUF = *p; //將要發送的數據賦給串口緩沖寄存器
  12.             while(!TI);//等待發送結束
  13.             TI = 0;    //軟件清零
  14.             p++;       //指針加一
  15.     }   
  16. }
  17. void main()       //函數功能：主函數
  18. {      

  20.     uchar AD_Up,AD_Down,AD_Left,AD_Right;
  21.     uchar i,j,k;
  22.     uchar Table[4];
  23.     Delay_ms(2000);
  24.     UART_Init();   
  25.     while(1)
  26.     {
  27.         if(!ENTER)
  28.         {
  29.             Delay_ms(20);
  30.             while(!ENTER);
  31.             k++;   
  32.         }
  33.         if(k == 5)
  34.         {
  35.         LED1 = 1;
  36.         LED2 = 0;
  37.         for(i=0;i<8;i++)
  38.         {
  39.             switch(AD_CHANNEL)
  40.             {
  41.                 case 0: PCF8591_ISendByte(PCF8591,0x41);
  42.                 AD_Up=PCF8591_IRcvByte(PCF8591)*2;  //ADC0 模數轉換1
  43.                 break;  
  44.                
  45.                 case 1: PCF8591_ISendByte(PCF8591,0x42);
  46.                 AD_Down=PCF8591_IRcvByte(PCF8591)*2;  //ADC1  模數轉換2
  47.                 break;  
  48.                 case 2: PCF8591_ISendByte(PCF8591,0x43);
  49.                 AD_Left=PCF8591_IRcvByte(PCF8591)*2;  //ADC2 模數轉換3
  50.                 break;  
  51.                
  52.                 case 3: PCF8591_ISendByte(PCF8591,0x40);
  53.                 AD_Right=PCF8591_IRcvByte(PCF8591)*2;  //ADC3  模數轉換4
  54.                 break;
  55.             }

  57.             Send_Hex(Table,4);
  58.             if(++AD_CHANNEL>3)
  59.             {
  60.              AD_CHANNEL=0;
  61.              Table[0] = AD_Up;
  62.             Table[1] = AD_Down;
  63.             Table[2] = AD_Left;
  64.             Table[3] = AD_Right;
  65.              }
  66.         }
  67.         }
  68.         if(k%2 == 1)
  69.         {
  70.             LED1 = 0;
  71.             LED2 = 1;
  72.             AD_Up = 0;    //上
  73.             AD_Down = 0;//下
  74.             AD_Left = 0;//左
  75.             AD_Right = 0;//右   
  76.         }        
  77.         ///////////////////////////
  78.       
  79.         if(((AD_Up<AD_Down)&&(AD_Down-AD_Up>10))||(!UP))//上轉
  80.         {
  81.             for(i=0;i<10;i++)
  82.             {
  83.                 for(j=0;j<4;j++)
  84.                 {
  85.                     P2=Motor_Up[j];
  86.                     Delay_ms(10);
  87.                 }        
  88.             }   
  89.         }
  90.         //////////////////////////////////////
  91.         if(((AD_Up>AD_Down)&&(AD_Up-AD_Down>10))||(!DOWN))//下轉
  92.         {
  93.             for(i=0;i<10;i++)
  94.             {
  95.                 for(j=0;j<4;j++)
  96.                 {
  97.                     P2=Motor_Down[j];
  98.                     Delay_ms(10);
  99.                 }        
  100.             }
  101.         }
復制代碼
完整51單片機c源代碼和Protues 仿真文件.zip (364.97 KB, 售價: 5 E幣)




歡迎光臨 ELEOK (http://m.afoofa.cn/) Powered by Discuz! X5.0