通過VB.NET上位機(jī)點亮STM32 LED燈源程序

ID:196268 · 發(fā)表于 2019-12-2 17:51

VB.NET2010編寫的上位機(jī)通過串口連接，點亮STM32開發(fā)板的LED燈，網(wǎng)上的例子，自己改的。

單片機(jī)源程序如下:
#include "led.h"
#include "delay.h"
#include "key.h"
#include "sys.h"
#include "usart.h"

int main(void)
{
      u8 a;
      u8 t;
      u8 len;
      u16 times=0;
      delay_init();                   //延時函數(shù)初始化
      NVIC_PriorityGroupConfig(NVIC_PriorityGroup_2); //設(shè)置NVIC中斷分組2:2位搶占優(yōu)先級，2位響應(yīng)優(yōu)先級
      uart_init(9600);       //串口初始化為115200
      LED_Init();                            //LED端口初始化
      KEY_Init();
      while(1)
      {
            LED1=1;
            if(USART_RX_STA&0x8000)
            {
                     len=USART_RX_STA&0x3fff;//得到此次接收到的數(shù)據(jù)長度
                     printf("\r\n您發(fā)送的消息為:\r\n\r\n");
                     for(t=0;t<len;t++)

                     {
                              USART_SendData(USART1, USART_RX_BUF[t]);//向串口1發(fā)送數(shù)據(jù)
                              a=USART_RX_BUF[t];
                              while(USART_GetFlagStatus(USART1,USART_FLAG_TC)!=SET);//等待發(fā)送結(jié)束
                     }
                     printf("\r\n\r\n");//插入換行
                     USART_RX_STA=0;
            }else
            {
                     times++;
                     if(times%5000==0)
                     {
                              printf("\r\nSTM32開發(fā)板串口實驗\r\n");
      }
                     if(times%200==0)printf("\r\n請輸入數(shù)據(jù)，以回車鍵結(jié)束\r\n");
      if(a=='0')LED0=0;
      if(a=='1')LED0=1;

            delay_ms(10);

}
  }
}

全部資料51hei下載地址：

STM32串口通信.7z (187.96 KB, 下載次數(shù): 19)

點亮LED燈.rar (69.1 KB, 下載次數(shù): 21)