標(biāo)題: 通過VB.NET上位機(jī)點(diǎn)亮STM32 LED燈源程序 [打印本頁]
作者: 旮旯    時(shí)間: 2019-12-2 17:51
標(biāo)題: 通過VB.NET上位機(jī)點(diǎn)亮STM32 LED燈源程序
VB.NET2010編寫的上位機(jī)通過串口連接，點(diǎn)亮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í)函數(shù)初始化         
        NVIC_PriorityGroupConfig(NVIC_PriorityGroup_2); //設(shè)置NVIC中斷分組2:2位搶占優(yōu)先級(jí)，2位響應(yīng)優(yōu)先級(jí)
        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ù)長(zhǎng)度                        
                        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ā)板 串口實(shí)驗(yàn)\r\n");
        }         
                        if(times%200==0)printf("\r\n請(qǐng)輸入數(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)
點(diǎn)亮LED燈.rar (69.1 KB, 下載次數(shù): 21)
作者: 旮旯    時(shí)間: 2019-12-7 11:45
沒人來看嘛，我自己先頂下
作者: pcbboy    時(shí)間: 2019-12-7 13:32
不錯(cuò)，上位機(jī)有源文件嗎？象學(xué)習(xí)一下。
作者: ujyhy    時(shí)間: 2019-12-11 09:55
怎么沒法用啊
作者: 旮旯    時(shí)間: 2019-12-11 21:19
ujyhy 發(fā)表于 2019-12-11 09:55
怎么沒法用啊

怎么沒法用，我自己測(cè)試了才發(fā)的啊




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