標題: STM32隨光追光系統(tǒng)的源碼+視頻 [打印本頁]
作者: QI0609    時間: 2019-12-18 12:25
標題: STM32隨光追光系統(tǒng)的源碼+視頻
視頻在B站，鏈接如下，大家有喜歡的可以去看看，現(xiàn)在開放源代碼。STM32F103ZET6芯片。
視頻地址：https://www.bilibili.com/video/av68476662
視頻地址：https://www.bilibili.com/video/av66018630

這個是校光伏大賽比賽的一個作品
旨在萬物互聯(lián)，萬物聯(lián)網(wǎng)。

加入電壓采集功能，實時傳給電腦端的LORA
加入角度測量模塊

單片機源程序如下:
  1. #include "delay.h"
  2. #include "sys.h"
  3. #include "usart.h"
  4. #include "timer4.h"
  5. #include "adc.h"
  6. #include "oled.h"
  7. #include "lora_app.h"
  8. #include "lora_ui.h"
  9. #include "usart3.h"
  10. #include "string.h"
  11. #include "stdio.h"
  12. #include "timer.h"
  13. #include "rtc.h"
  14. //d12 d13 d14 d15
  15. #define N 200
  16. #define M 50
  17. #define deat_speed 50
  18. #define pwm_min 1749
  19. #define pwm_mid 1849
  20. #define pwm_max 1949
  21. #define pwm_sum 3698
  22. u16 x = 0,y = 0,z = 0;
  23. u16 ADC = 0;
  24. u8 t=0;
  25. float vote = 0.0;
  26. u16 up_a,up_b;
  27. u16 down_a,down_b;
  28. u8 i,j,min_up=0,min_down=0,min_UP=0;
  29. u16 up_date[N];
  30. u16 down_date[M];
  31. void delay_min(u8 n,u8 sent_up,u8 sent_down);
  32. void time_display(void);
  33. int main(void)
  34. {
  35.     uart_init(115200);
  36.     delay_init();
  37.     OLED_Init();
  38.     RTC_Init();                                  //RTC初始化
  39.     TIM4_PWM_Init(1999,719);//50khz
  40.     Adc_Init();
  41.     LoRa_Init();
  42.     LoRa_Set();//LoRa配置(進入配置需設(shè)置串口波特率為115200)
  43.     while(1)
  44.     {
  45.         //1號歸位
  46.         //2號固定45度
  47.         TIM_SetCompare1(TIM4,pwm_min);
  48.         TIM_SetCompare2(TIM4,1810);
  49.         delay_ms(200);
  50.         //1號開始檢測
  51.         up_b = 0;
  52.         up_a = 0;
  53.         for(; up_a < N; up_a += 2) //200脈沖單位，檢測100次
  54.         {
  55.             TIM_SetCompare1(TIM4,pwm_min + up_a);//舵機轉(zhuǎn)180度
  56.             delay_ms(deat_speed);
  57.             up_date[up_b] = (Get_Adc_Average(ADC_Channel_0,1));
  58.             up_b ++;
  59.         }
  60.         //1號歸位
  61.         //2號固定135度
  62.         TIM_SetCompare1(TIM4,pwm_max);
  63.         TIM_SetCompare2(TIM4,1890);
  64.         delay_ms(500);
  65.         //1號開始檢測
  66.         up_b = 100;
  67.         up_a = N;
  68.         for(; up_a > 0; up_a -= 2) //200脈沖單位，檢測100次
  69.         {
  70.             TIM_SetCompare1(TIM4,pwm_min + up_a);//舵機轉(zhuǎn)180度
  71.             delay_ms(deat_speed);
  72.             up_date[up_b] = (Get_Adc_Average(ADC_Channel_0,1));
  73.             up_b ++;
  74.         }
  75.         //找最大值
  76.         for(j = 1; j < N - 1; j ++)
  77.         {
  78.             if(up_date[j + 1] < up_date[min_UP])
  79.             {
  80.                 min_UP = j + 1;
  81.             }
  82.             else
  83.             {
  84.                 j +=1;
  85.             }
  86.         }
  87.         //判斷min_up在哪邊
  88.         if(min_UP < 100)
  89.         {
  90.             min_up = min_UP;
  91.             TIM_SetCompare1(TIM4,min_up * 2 + pwm_min);
  92.             TIM_SetCompare2(TIM4,pwm_mid);
  93.             delay_ms(500);
  94.             //2號舵機上下
  95.             down_b = 0;
  96.             down_a = 100;
  97.             for(; down_a > 0; down_a -=2)
  98.             {
  99.                 TIM_SetCompare2(TIM4,pwm_min + down_a);
  100.                 delay_ms(deat_speed);
  101.                 down_date[down_b] = (Get_Adc_Average(ADC_Channel_0,1));
  102.                 down_b ++;
  103.             }
  104.             //找最大值
  105.             for(i = 1; i < M - 1; i ++)
  106.             {
  107.                 if(down_date[i + 1] < down_date[min_down])
  108.                 {
  109.                     min_down = i + 1;
  110.                 }
  111.                 else
  112.                 {
  113.                     i +=1;
  114.                 }
  115.             }
  116.             //算出最大值所在的平面坐標
  117.             TIM_SetCompare2(TIM4,min_down * (-2) + pwm_mid);
  118.         }
  119.         else
  120.         {
  121.             min_up = N - min_UP;
  122.             //算出最大值所在的平面坐標
  123.             TIM_SetCompare1(TIM4,min_up * 2 + pwm_min);
  124.             TIM_SetCompare2(TIM4,pwm_mid);
  125.             delay_ms(500);
  126.             //2號舵機上下
  127.             down_b = 0;
  128.             down_a = 100;
  129.             for(; down_a > 0; down_a -=2)
  130.             {
  131.                 TIM_SetCompare2(TIM4,pwm_max - down_a);
  132.                 delay_ms(deat_speed);
  133.                 down_date[down_b] = (Get_Adc_Average(ADC_Channel_0,1));
  134.                 down_b ++;
  135.             }
  136.             //找最大值
  137.             for(i = 1; i < M - 1; i ++)
  138.             {
  139.                 if(down_date[i + 1] < down_date[min_down])
  140.                 {
  141.                     min_down = i + 1;
  142.                 }
  143.                 else
  144.                 {
  145.                     i +=1;
  146.                 }
  147.             }
  148.             //算出最大值所在的平面坐標
  149.             TIM_SetCompare2(TIM4,min_down * 2 + pwm_mid);

  151.         }

  153.         OLED_16x16CN(0,0,up_date[min_UP] / 1000);
  154.         OLED_16x16CN(9,0,up_date[min_UP] / 100 % 10);
  155.         OLED_16x16CN(18,0,up_date[min_UP] / 10 % 10);
  156.         OLED_16x16CN(27,0,up_date[min_UP] % 10);
  157.         OLED_16x16CN(0,2,down_date[min_down] / 1000);
  158.         OLED_16x16CN(9,2,down_date[min_down] / 100 % 10);
  159.         OLED_16x16CN(18,2,down_date[min_down] / 10 % 10);
  160.         OLED_16x16CN(27,2,down_date[min_down] % 10);
  161.         OLED_16x16CN(0,4,min_UP / 100);
  162.         OLED_16x16CN(9,4,min_UP / 10 % 10);
  163.         OLED_16x16CN(18,4,min_UP % 10);
  164.         OLED_16x16CN(32,4,min_down / 10);
  165.         OLED_16x16CN(40,4,min_down % 10);
  166.         //發(fā)送數(shù)據(jù)
  167.         if(!LORA_AUX)//若空閑
  168.         {
  169.             LoRa_SendData(min_UP,min_down);//發(fā)送數(shù)據(jù)
  170.         }
  171.                 time_display();        //調(diào)試部分
  172. //        while(1)
  173. //        {
  174. //            int hhh;
  175. //            hhh ++;
  176. //        }
  177.         delay_min(15,min_UP,min_down);
  178.     }
  179. }

  181. void delay_min(u8 n,u8 sent_up,u8 sent_down)
  182. {
  183.     for(y = 0; y < n; y ++)
  184.     {
  185.         for(x = 0; x < 30; x ++)
  186.         {
  187.             delay_ms(500);
  188.             delay_ms(500);
  189.             delay_ms(500);
  190.             delay_ms(500);
  191.             //調(diào)試
  192.             //采集光伏板電壓
  193.             ADC = (int)((Get_Adc_Average(ADC_Channel_1,1)));//A1
  194.             //轉(zhuǎn)換為電壓
  195.             vote = 2 * ADC / 1262.0;
  196. //                        printf("LIGHT = %f /ADC\r\n",vote);
  197.             if(!LORA_AUX)//若空閑
  198.             {
  199.                 LoRa_SendData(sent_up,sent_down);//發(fā)送數(shù)據(jù)
  200.                 LoRa_SendData_v(vote * 10);
  201.             }
  202.         }
  203.     }
  204. }



  208. void time_display(void)
  209. {
  210.     if(t!=calendar.sec)
  211.     {
  212.         t=calendar.sec;
  213. //        年
  214.         OLED_16x16CN(0,6,calendar.w_year / 10 % 10);
  215.         OLED_16x16CN(8,6,calendar.w_year % 10);
  216.         OLED_16x16CN(16,6,11);
  217. //    月
  218.         OLED_16x16CN(24,6,calendar.w_month / 10 % 10);
  219.         OLED_16x16CN(32,6,calendar.w_month % 10);
  220.         OLED_16x16CN(40,6,11);
  221. //        日
  222.         OLED_16x16CN(48,6,calendar.w_date / 10 %10);
  223.         OLED_16x16CN(56,6,calendar.w_date % 10);
  224.         OLED_16x16CN(64,6,11);
  225.         switch(calendar.week)
  226.         {
  227.         case 0:
  228.             OLED_16x16CN(72,6,7);
  229. ……………………

  231. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

所有資料51hei提供下載:
9-21.7z (1.36 MB, 下載次數(shù): 135)

作者: 1069663316    時間: 2019-12-24 11:14
能用51嗎
作者: yuanhong    時間: 2020-3-25 15:41
正好需要，感謝分享！
作者: DEVIL嗯    時間: 2022-9-19 20:24
視頻里的什么電機啊，型號



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1