《单片机串口通信及测控应用实战详解》——6.3 PC端程序设计

6.3 PC端程序设计

单片机串口通信及测控应用实战详解
6.3.1 采用Visual Basic实现
1．程序界面设计
运行VB 6.0，创建标准的工程项目文件，设计程序窗体。

（1）添加1个MSComm控件用于实现PC与单片机串口通信。

（2）添加2个按钮控件CommandButton，用于输出指令和关闭程序。

（3）添加3个文本控件TextBox，用于输入单片机地址、继电器状态和返回数据。

（4）添加5个标签控件Label，用于显示文本框功能等。

2．属性设置
程序窗体、控件对象的主要属性设置如表6-2所示。

设计的程序界面如图6-4所示。

3．编写程序代码
以下是实现PC与多个单片机串口通信的Visual Basic程序。

'PC发送数据01 11，表示01号单片机板继电器1和2打开
'PC发送数据01 00，表示01号单片机板继电器1和2关闭
'PC发送数据02 01，表示02号单片机板继电器1关闭，继电器2打开
'PC发送数据02 10，表示02号单片机板继电器1打开，继电器2关闭
'初始化串口
Private Sub Form_Load()
  MSComm1.CommPort = 1
  MSComm1.Settings = "9600,n,8,1"
  MSComm1.InputMode = 1
  MSComm1.SThreshold = 1
  MSComm1.RThreshold = 1
  MSComm1.PortOpen = True
End Sub
'状态输出
Private Sub Cmdout_Click()
  Dim uout1 As Variant                              　　　　'单片机地址号
  Dim uout2 As Variant                                 　　　　'单片机继电器状态值
  uout1 = "&H" & Val(addrText.Text)
  uout2 = "&H" & Val(dataText.Text)
  MSComm1.Output = Chr(uout1) & Chr(uout2)    '将十六进制数据值发送给单片机
End Sub
'返回数据
Private Sub MSComm1_OnComm()
  Dim Inbyte() As Byte
  Dim buffer As String
  Dim strdata(10) As String
  Dim datanum As String
  Select Case MSComm1.CommEvent
    Case comEvReceive
      Inbyte = MSComm1.Input                          　　　　'读取单片机返回的数据串
      For i = LBound(Inbyte) To UBound(Inbyte)
        buffer = buffer + Hex(Inbyte(i)) + Chr(32)   　　'获得单片机返回数据串
      Next i
    Case comEvSend
  End Select
    For jj = 1 To 6
      strdata(jj) = Mid(Trim(buffer), jj, 1)           　　'从数据串中逐个取位
    Next jj
    If Len(Trim(buffer)) = 3 Then
      datanum = "0" & strdata(1) & strdata(2) & "0" & strdata(3)
    End If
    If Len(Trim(buffer)) = 4 Then
      datanum = "0" & strdata(1) & strdata(2) & strdata(3) & strdata(4)
    End If
  receiveText.Text = datanum                '显示单片机返回的数据串
End Sub
'关闭程序
Private Sub Cmdexit_Click()
   MSComm1.PortOpen = False
   Unload Me
End Sub```

4．运行程序
程序设计、调试完毕后，运行程序。

PC通过串行口将十六进制数发送给多个单片机，驱动地址吻合的单片机继电器动作，并在数码管显示接收的数。单片机接收到数据后，返回原数据给PC。

如PC发送十六进制数据“01 11”，驱动1号单片机板继电器1和2打开，单片机返回十六进制数据“01 11”。

程序运行界面如图6-5所示。

<div style="text-align: center"><img src="https://yqfile.alicdn.com/d23efbdc42cbbff9a507dbc44776661092c8529d.png" width="" height="">
</div>

####6.3.2 采用Visual C++实现
1．程序界面设计
程序界面设计与VB多单片机通信基本相同。设计的程序界面如图6-6所示。

<div style="text-align: center"><img src="https://yqfile.alicdn.com/4ca4785487f33fedbf750ab51c1f4a03c38cf733.png" width="" height="">
</div>

2．编写程序代码
以下是实现PC与多个单片机串口通信的VC++参考程序。

include "stdafx.h"

include "mcu.h"

include "mcuDlg.h"

//串口初始化设置
BOOL CMcuDlg::OnInitDialog()
{
　　m_Comm.SetCommPort(1); //选择COM1
　　m_Comm.SetInputMode(1); //输入方式为二进制方式　　　　
　　m_Comm.SetRThreshold(1); //参数1表示每当串口接收缓冲区中有多于或等于1个字符时将引发一个接收数据的OnComm事件
　　m_Comm.SetSThreshold(1);//参数1表示当传输缓冲区完全空时将引发一个接收数据的OnComm事件
　　m_Comm.SetSettings("9600,n,8,1");
　　m_Comm.SetPortOpen(TRUE);//打开串口
　　return TRUE;
}
//发送数据
void CMcuDlg::OnOK()
{
　　CByteArray data;
　　CString a,b;
　　int len;
　　UpdateData(TRUE); //读编辑框内容
　　len = Str2Hex(m_address+m_data,data);
　　m_Comm.SetOutput(COleVariant(data));　　
}
//接受返回数据
void CMcuDlg::OnOnCommMscomm1()
{
　　VARIANT data;
　　COleSafeArray data2;
　　CByteArray datatemp;
　　LONG k = 0;
　　BYTE Inbyte[2]; //设置BYTE数组
　　CString strtemp;　　
　　if(m_Comm.GetCommEvent() = = 2) //事件值为2表示接收缓冲区内有字符
　　{
　　　　data = m_Comm.GetInput(); //读缓冲区
　　 data2 = data; //VARIANT型变量转换为ColeSafeArray型变量
　　　　data2.GetElement(&k,&Inbyte[0]);//获取回传数据,前两个字节
　　　　k++;
　　　　data2.GetElement(&k,&Inbyte[1]);

　　}
　　strtemp.Format("%s %s",HexChar(Inbyte[0]),HexChar(Inbyte[1]));
　　m_receive = strtemp;
　　UpdateData(false);
}
//十六进制转为字符串
char* CMcuDlg::HexChar(BYTE idata)
{
char *temp = new char[3];
　　char a,b;
　　temp[2] = '\0';
　　a = idata>>4;
　　b = idata&0x0f;
　　if(a<9)
　　　　temp[0] = (a+48);
　　else
　　　　temp[0] = (a+55);
　　if(b<9)
　　　　temp[1] = (b+48);
　　else
　　　　temp[1] = (b+55);
　　return temp;　　
}
//将字符转换十六进制
char CMcuDlg::HexChar(char c)
{
　　if((c> = '0')&&(c< = '9'))
　　　　return c-0x30;
　　else if((c> = 'A')&&(c< = 'F'))
　　　　return c-'A'+10;
　　else if((c> = 'a')&&(c< = 'f'))
　　　　return c-'a'+10;
　　else
　　　　return -1;
}
//把字符串转换为十六进制
int CMcuDlg::Str2Hex(CString str, CByteArray &senddata)
{
　　int hexdata,lowhexdata;
　　int hexdatalen = 0;
　　int len = str.GetLength();
　　senddata.SetSize(len/2);
　　for(int i = 0;i
　　{
　　　　char lstr,hstr = str[i];
　　　　if(hstr = = ' ')
　　　　{
　　　　　　i++;
　　　　　　continue;
　　　　}
　　　　i++;
　　　　if(i> = len)
　　　　　　break;
　　　　lstr = str[i];
　　　　hexdata = HexChar(hstr); //高位转换
　　　　lowhexdata = HexChar(lstr); //低位转换
　　　　if((hexdata = = 16)||(lowhexdata = = 16))
　　　　　　break;
　　　　else
　　　　　　hexdata = hexdata*16+lowhexdata;
　　　　i++;
　　　　senddata[hexdatalen] = (char)hexdata;
　　　　hexdatalen++;
　　}
　　return hexdatalen;
}
//关闭串口退出程序
void CMcuDlg::OnCancel()
{
　　m_Comm.SetPortOpen(false);//关闭串口
　　CDialog::OnCancel();
}```

3．运行程序
程序设计、调试完毕，运行程序。

PC通过串行口将十六进制数发送给多个单片机，驱动地址吻合的单片机继电器动作，并在数码管显示接收的数。单片机接收到数据后，返回原数据给PC。

如PC发送十六进制数据“02 11”，驱动2号单片机板继电器1和2打开，单片机返回十六进制数据“0211”。

程序运行界面如图6-7所示。

本文仅用于学习和交流目的，不代表异步社区观点。非商业转载请注明作译者、出处，并保留本文的原始链接。

时间： 2024-04-26 20:34:49

《单片机串口通信及测控应用实战详解》——6.3 PC端程序设计的相关文章

《单片机串口通信及测控应用实战详解》——第6章 多个单片机与PC串口　通信的数据传送

第6章 多个单片机与PC串口 通信的数据传送 单片机串口通信及测控应用实战详解一台PC和若干台89C51单片机构成小型分散测控系统是目前微型计算机应用的一大趋势.在这样的系统中,以89C51芯片为核心的智能式测控仪表(从机)既能完成数据采集.处理和各种控制任务,又可将数据传送给PC(主机),PC将这些数据进行加工处理或显示.打印,同时将各种控制命令传送给各个从机,以实现集中管理和最优控制.显然,要组成这样的系统,首先要解决PC与各个单片机之间的数据通信问题,这是一个多机通信问题.

《单片机串口通信及测控应用实战详解》——6.2 单片机端程序设计

6.2 单片机端程序设计 单片机串口通信及测控应用实战详解 6.2.1 使用查询方式C51程序设计 串口在发送数据和接收数据完成时均会引起串口中断,从而使接收标志位RI和发送标志位TI置1.查询方式和中断方式的区别就在于CPU查看RI和TI方式不同,以及处理数据的效率不同. 查询方式是指通过CPU定时的查询SCON串口控制寄存器中的接收标志位RI和发送标志位TI来接收和发送数据.此种方式下,当串口发送数据或接收数据完成时,仅仅将相应的标志位置1而不会以任何形式通知主程序.主程序只能通过定时查询发

《单片机串口通信及测控应用实战详解》——导读

前言 单片机串口通信及测控应用实战详解 目前,许多单片机应用系统中,上.下位机分工明确,作为下位机核心器件的单片机一般只负责数据的采集和通信.采用单片机的控制系统或装置具有可靠性高.易于控制.系统设计灵活.编程简单.使用方便及性价比高等优点.但是,单片机也有不易显示各种实时图表/曲线和汉字.无良好的用户界面及不便于监控等缺点.而作为上位机的计算机通常以基于图形界面的Windows系统为操作平台,可以提供良好的人机界面,进行系统的监控和管理,进行程序编制.参数设定和修改.数据采集和保存等,既能保证

《单片机串口通信及测控应用实战详解》——6.1 系统设计说明

6.1 系统设计说明 单片机串口通信及测控应用实战详解6.1.1 设计任务PC通过RS485串行口将十六进制数(如01 11,其中01表示单片机地址,11表示继电器状态)发送给多个单片机,驱动地址吻合的单片机继电器动作,并在数码管显示接收的数据.单片机接收到数据后,返回十六进制数(如01 11)给PC.具体任务如表6-1所示. 6.1.2 线路连接 当PC与多台具有RS-232接口的单片机开发板通信时,可使用RS-232/RS-485通信接口转换器,将计算机上的RS-232通信口转为RS-485

扩展-单片机串口通信和flash操作

问题描述 单片机串口通信和flash操作 如何将PC机的数据通过单片机的串口送到单片机的扩展falsh上, 解决方案 单片机和单片机是不同的,这个没法一概而论. 解决方案二: 你应该查下你的单片机写入flash的指令和格式,厂家一般有例子代码. 然后再编写程序,约定一种协议让单片机可以从PC上下载数据.如果单片机内存不够,还得分批写入. 解决方案三: 最后编写上位机的软件,将flash所需的数据发给单片机. 解决方案四: 串口通信发送数据,单片机处理 解决方案五: http://dev.yesk

51单片机串口通信时，接收到数据后为什么在while语句中将EA置1

问题描述 51单片机串口通信时,接收到数据后为什么在while语句中将EA置1 刚进入while语句时为什么要将EA置1??程序如下: #include #define uchar unsigned char uchar numaflagbenum; sbit beep=P2^3; void init(); void main() { init(); while(1) { if(flag==1) { EA=0; flag=0; TR0=1; if(a==1) { benum=4; } if(a=

程序-PIC单片机串口通信时波特率的具体算法？

问题描述 PIC单片机串口通信时波特率的具体算法? 我那个单片机是PIC16F877A,晶振4M,我想将波特率设置为38400,求告知具体算法 真的救急.这是因为我蓝牙模块的波特率为38400的,最初我单片机程序的波特率是9600的,我是不是也要将单片机的程序的波特率也设置为38400呢,还是将蓝牙模块的波特率设置为9600呢,最主要是我电脑没蓝牙,没办法修改蓝牙模块的波特率. 解决方案 资料页的最后有个表格,上面有

求解答-C语言51单片机串口通信程序求教

问题描述 C语言51单片机串口通信程序求教 #include #include #include #define INBUF_LEN 4 //数据长度 unsigned char inbuf1[INBUF_LEN]; unsigned char checksum,count3; bit read_flag=0; void init_serialcomm(void) { SCON = 0x50; //SCON: serail mode 1, 8-bit UART, enable ucvr TMOD

pl2303-安卓和stc单片机串口通信的问题

问题描述 安卓和stc单片机串口通信的问题 我用安卓usbserial开源软件及pl2302通过串口连接单片机,收发时发现一个问题,如果安卓端发送一串字节数组 比如0x00,0x01,0X02.单片机部分就是一个简单的接收并原样发送的程序代码.现在有出现一个问题安卓端接收时第一个字节总是缺失,只接收到0x01,0x02.这是怎么回事? 解决方案 参考:http://download.csdn.net/download/luda8801/6766599 解决方案二: 现在给你支个招,你试试将三个数