STC单片机串口接收程序

一组数据，共有多少字节？ 20 个？

根据字节数，设定一个数组。

收到一个，存放一个。

收到 20 个后，判断：

if (recbuf[16] == 'm' && recbuf[17] == 'b' && recbuf[18] == 'a' && recbuf[19] == 'r')

满足条件，就把其前面的，变换成数：

//recbuf[1] = '';

x = (recbuf[0] - 48) + (recbuf[2] - 48) 01 + (recbuf[3] - 48) 001;

//recbuf[4] = ' ' //recbuf[7] = ''

n = (recbuf[5] - 48) 10 + (recbuf[6] - 48) + (recbuf[8] - 48) 01;

//recbuf[9] = ' ' //recbuf[13] = ''

p = (recbuf[10] - 48) 100 + (recbuf[11] - 48) 10 + (recbuf[12] - 48)

+ (recbuf[14] - 48) 01 + (recbuf[15] - 48) 001;

Private Sub Form_Load()

    MSComm1CommPort = 1

    MSComm1Settings = " 9600,n,8,1"

    MSComm1InputMode = comInputModeBinary

    MSComm1InputLen = 0

    MSComm1SThreshold = 1

    MSComm1RThreshold = 1

    MSComm1PortOpen = True

    Text5 = ""

End Sub

Private Sub MSComm1_OnComm()

    Dim buffer As Variant

    Dim arr() As Byte

    Dim i As Long

    Select Case MSComm1CommEvent

        Case comEvReceive

            buffer = MSComm1Input

            arr = buffer

            For i = 0 To UBound(arr)

                Text5Text = Text5Text + "||" + Right("0" & Hex(arr(i)), 2)

            Next i

            MSComm1InBufferCount = 0

    End Select

End Sub

题主是否想询问“串口转ttl一次发送多次接收实现的方法”方法是设置串口通信参数、编写发送和接收程序、调试和测试。

1、设置串口通信参数：在使用串口通信时，需要设置波特率、数据位、停止位、校验位等参数，以保证发送和接收数据的正确性。根据具体的需求和硬件设备，选择合适的参数进行设置。

2、编写发送和接收程序：在程序中，使用串口发送数据时，可以通过循环的方式，多次发送相同的数据。接收数据时，需要设置一个循环，不断接收串口传来的数据，并对数据进行处理。

3、调试和测试：在实际使用中，可以通过串口调试工具等方式，对发送和接收程序进行测试和调试，以确保数据的正确性和稳定性。如果发现数据传输出现问题，可以检查串口通信参数、程序逻辑、硬件连接等方面，进行排查和调整。

LZ的代码错在：

Dim send(4) As Byte

它定义的Byte数组有5个元素，所以单片机不返回数据。应该改为：

Private Sub Command1_Click() '发送HEX数据93 93 93 93

  Dim send(3) As Byte

  send(0) = "&H93"

  send(1) = "&H93"

  send(2) = "&H93"

  send(3) = "&H93"

  MSComm1Output = send

End Sub

这样才发送4字节指令，此外从MSComm1RThreshold = 34看是设置接收字节长度为34字节。

以下修改了LZde1代码，供参考：

    Dim strdata

Private Sub Command1_Click() '发送HEX数据93 93 93 93

    Dim send(3) As Byte

    send(0) = "&H93"

    send(1) = "&H93"

    send(2) = "&H93"

    send(3) = "&H93"

    MSComm1Output = send

End Sub

Private Sub Form_Load()

    '串口初始化

    MSComm1Settings = "9600,n,8,1"

    MSComm1InputLen = 0

    MSComm1InputMode = comInputModeBinary

    MSComm1InBufferSize = 1024

    MSComm1OutBufferSize = 512

    MSComm1RThreshold = 34 '设置接收字节长度

    MSComm1InBufferCount = 0

    MSComm1OutBufferCount = 0

    MSComm1CommPort = 1 '串口号

    MSComm1PortOpen = True

    Timer1Interval = 0

End Sub

Private Sub MSComm1_OnComm()

    Dim i As Long

    Dim strBuff As String

    Dim strdata As String

    Dim str() As Byte

    Select Case MSComm1CommEvent

        Case comEvReceive

        strBuff = MSComm1Input

        str() = strBuff

        For i = 0 To UBound(str)    '接收16进制数据

        If Len(Hex(str(i))) = 1 Then

            strdata = strdata & "0" & Hex(str(i))

        Else

            strdata = strdata & Hex(str(i))

        End If

        Next

        Text1Text = strdata

        Call Timer1_Timer

    End Select

End Sub

Private Sub Timer1_Timer()

    strdata = ""

    MSComm1InBufferCount = 0

End Sub

首先，串口调试软件的波特率最好设置成9600，这种波特率也支持显示中文的，

USB转串口看你用的什么芯片，经过实验采用CH340或是341的是没有问题的，其他还有待验证。

串口调试软件也很重要，有些软件会奇怪出现乱码，但并不是程序错误，推荐你用小丁的sscom32，个人感觉很棒！ ;

; 程序名称：单片机串口发送中文字符实验，232通信程序

; 硬件说明：打开《串口调试助手》，波特率设为9600速率，110592晶体

; 注 意：《串口调试助手》要设置好COM号(请核对是否和设备管理器的COM编号一致)

; *** 作说明：下载程序后打开串口调试助手sscom32exe即可显示，或按一下复位开关

;/

ORG 0000H

AJMP main

ORG 0030H

main: MOV 20H,#00H

MOV TMOD,#22H ;定时器工作方式

MOV SCON,#40H

MOV TH1,#0FAH ;波特率9600

MOV PCON,#80H

SETB TR1

SETB REN ;允许接收

ajmp start

start: mov dptr,#num ;查表

send : clr a ;

movc a,@a+dptr

cjne a,#'$',send_2

ajmp $ ;遇到$停止。

send_2:mov sbuf,a

JNB TI,$ ;串行发送一帧结束了吗？

CLR TI ;

inc dptr ;指针加一

Ljmp send

num:

db 0dh,0ah,0dh,0ah,"XY900_USB型单片机学习板USB-232串口中文发送试验 "

db 0dh,0ah,0dh,0ah,"-----心情解梦-----"

db 0dh,0ah,0dh,0ah,"我梦见自己和前女友生了一个小孩,自己用婴儿车推着孩子在山间的公路上不停地走"

db 0dh,0ah,0dh,0ah,"最佳答案："

db 0dh,0ah,0dh,0ah,"首先,你们之间的感情给你留下了很深刻的东西，我想那些镜头可能是你们在一起时你所感受到的---那也许可能会是真的景物"

db 0dh,0ah,0dh,0ah,"其次，也可能是代表某种心情,我猜想是不是你们曾经的爱情让你觉得幸福但同时也有隐隐作痛回忆让你觉得不安全和无法掌握。",0dh,0ah,'$'

end

首先写发送程序，必须要使发送接收模块被允许，所以必须ME1 |= UTXE0 + URXE0该语句必须要写。其次发送接收都是高频的，故要将晶振设为高频，然后再对各个寄存器最一下必要的设置。

USART控制寄存器的组成部分：PENA,PEV,SP,CHAR,Listen,SYNC,MM,SWRST

各位都有其 *** 作功能,我列举几个我觉得比较重要的

首先看SYNC：

串口发送主要可分为异步的UART模式，和同步的SPI模式，即由SYNC来控制，

SYNC：“0”UART模式

“1”SPI模式

CHAR：“0”选择字符以7位发送，不用接收缓存寄存器URXBUF或发送缓存寄器UTXBUF的最高位

“1”选择字符以8位发送

SWRST: 置位时，USART的各中断允许初始化，直至复位时USART才被允许。

发送控制寄存器UTCTL亦类似，对各个位做必要的设置就可以得到你想要的结果。UTCTL8位由高到低分别为：未用，CKPL,SSEL1,SSEL0,URXSE,TXWake，未用，TXEPT。还有接收控制寄存器URCTL0和URCTL1详情可以参照书本。

另有一个比较重要的就是波特率计算，用到UBR0及UBR1波特率寄存器以及调整控制寄存器UMCTL具体计算为：UBR,UBR1和UBR0的16位数据

Mx ，调整器的各位数据

波特率=时钟周期/（UBR+（M7+M6+…+M0）/8）

贴上一个简单的程序：

#include <msp430x14xh>

void main(void)

{

volatile unsigned int i;

WDTCTL = WDTPW + WDTHOLD; // 关闭开门狗

P3SEL |= 0x30; // P34,5 = USART0 TXD/RXD

BCSCTL1 |= XTS; // ACLK= LFXT1，LFXT1高频工作

do

{

IFG1 &= ~OFIFG; // Clear OSCFault flag

for (i = 0xFF; i > 0; i--); // Time for flag to set

}

while ((IFG1 & OFIFG)); // OSCFault flag still set

BCSCTL2 |= SELM_3; // MCLK = LFXT1 (safe)

ME1 |= UTXE0 + URXE0; // Enable USART0 TXD/RXD

UCTL0 |= CHAR; // 8-bit character

UTCTL0 |= SSEL0; // UCLK= ACLK

UBR00 = 0x45; //

UBR10 = 0x00; //

UMCTL0 = 0x00; // 波特率计算

UCTL0 &= ~SWRST; //初始USART

IE1 |= URXIE0; // Enable USART0 RX interrupt

_BIS_SR(LPM0_bits + GIE); // Enter LPM0 w/ interrupt

}

#pragma vector=UART0RX_VECTOR

__interrupt void usart0_rx (void)

{

while (!(IFG1 & UTXIFG0)); // USART0 TX buffer ready

TXBUF0 = RXBUF0; // RXBUF0 to TXBUF0

}

亦可参考汇编的：

#include "msp430x12xh"

ORG 01100h ; Progam Start / 程序开始 /

;------------------------------------------------------------------------------

RESET movw #0A00h,SP //将立即数#0A00h赋给寄存器SP

call #Init_Sys

Mainloop bisb #CPUOFF,SR ; Enter LPM0 //CPU关闭进入低功耗模式0

nop

Init_Sys; Initalize MSP430 system

;------------------------------------------------------------------------------

StopWDT movw #WDTPW+WDTHOLD,&WDTCTL ; //关闭看门狗，高8位5A是写入，低8位80为时钟输入禁止，计数停止

SetupBC bisb #XTS,&BCSCTL1 ; LFXT1 = HF XTAL //选择晶振频率为高频，BCSCTL1寄存器的D6位为1，表示选择高频

SetupOsc bicb #OFIFG,&IFG1 ; Clear OSC fault flag //清中断标志1

movw #0FFh,R15 ; R15 = Delay //通用寄存器R15数据初始化

SetupOsc1 decw R15 ; Additional delay to ensure start //减一

jnz SetupOsc1 ; //不等于0时程序跳转

bitb #OFIFG,&IFG1 ; OSC fault flag set //状态位C置位

jnz SetupOsc ; OSC Fault, clear flag again //重新清中断标志1

bisb #SELM1+SELM0,&BCSCTL2 ; MCLK = LFXT1 //选择LFXT1CLK为MCLK的时钟源

SetupUART0 movb #CHAR,&UCTL0 ; 8-bit characters //8位数据位

movb #SSEL0,&UTCTL0 ; UCLK = ACLK //选择辅助时钟ACLK

movb #045h,&UBR00 ; 8MHz 115200

movb #000h,&UBR10 ; 8MHz 115200 //计算波特率

movb #000h,&UMCTL0 ; 8MHz no modulation 115200//未分频

bisb #UTXE0+URXE0,&ME1 ; Enable USART0 TXD/RXD //串口发送接收允许

bisb #URXIE0,&IE1 ; Enable USART0 RX interrupt//串口接收中断允许

SetupP3 bisb #030h,&P3SEL ; P34,5 = USART0 TXD/RXD //选择P34，5口，030h=001(p5)1(p4)0000,P3SEL的地址01bh的数值应该为0

bisb #010h,&P3DIR ; P34 = output direction //010h=0001(p4)0000,p4口为输出，

eint ; General enable interrupts //

ret ; Return from subroutine

;

;------------------------------------------------------------------------------

USART0RX_ISR; Confirm TX buffer is ready, then Echo back RXed character

;------------------------------------------------------------------------------

TX1 bitb #UTXIFG0,&IFG1 ; USART0 TX buffer ready //发送中断标志

jz TX1 ; Jump is TX buffer not ready //没在等待发送，则再去判断等待发送的标志

movb &RXBUF0,&TXBUF0 ; TX -> RXed character //共用一块缓冲

reti ;

;

;------------------------------------------------------------------------------

; Interrupt Vectors Used MSP430x13x/14x

;------------------------------------------------------------------------------

ORG 0FFFEh ; //复位中断

DW RESET ; POR, ext Reset, Watchdog //中断入口

ORG 0FFF2h ; //等待串口接收数据中断

DW USART0RX_ISR ; USART0 receive //串口接收

END

以上就是关于STC单片机串口接收程序全部的内容，包括:STC单片机串口接收程序、vb 串口 接收 程序、串口转ttl一次发送多次接收等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！