用lisp编写串口助手源代码_串口调试助手源代码（详细中文注释）

【实例简介】该资源有两个，一是串口调试助手的源代码，可以实现数据的接收和发送；二是实现点击某个按钮发送指定数据的应用程序的源代码。代码都是含有详细的中文注释，可以直接编译通过，且内含可执行文件都是可以直接运行的。适合作为串口助手开发与原理了解的参考，希望本资源对您有用

【实例截图】

【核心代码】

// SerialassistantDlg.cpp : 实现文件

//

#include "stdafx.h"

#include "Serialassistant.h"

#include "SerialassistantDlg.h"

#include "afxdialogex.h"

#ifdef _DEBUG

#define new DEBUG_NEW

#endif

// 用于应用程序“关于”菜单项的 CAboutDlg 对话框

class CAboutDlg : public CDialogEx

{

public:

CAboutDlg();

// 对话框数据

#ifdef AFX_DESIGN_TIME

enum { IDD = IDD_ABOUTBOX };

#endif

protected:

virtual void DoDataExchange(CDataExchange* pDX); // DDX/DDV 支持

// 实现

protected:

DECLARE_MESSAGE_MAP()

};

CAboutDlg::CAboutDlg() : CDialogEx(IDD_ABOUTBOX)

{

}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)

{

CDialogEx::DoDataExchange(pDX);

}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialogEx)

END_MESSAGE_MAP()

// CSerialassistantDlg 对话框

CSerialassistantDlg::CSerialassistantDlg(CWnd* pParent /*=NULL*/)

: CDialogEx(IDD_SERIALASSISTANT_DIALOG, pParent)

, m_setOk(false)

, m_strTXData(_T(""))

, m_strRXData(_T(""))

{

m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);

}

void CSerialassistantDlg::DoDataExchange(CDataExchange* pDX)

{

CDialogEx::DoDataExchange(pDX);

DDX_Control(pDX, IDC_COMBO_COM, m_comboCom);

DDX_Control(pDX, IDC_MSCOMM1, m_ctrlComm);

DDX_Text(pDX, IDC_EDIT_TXDATA, m_strTXData);

DDX_Text(pDX, IDC_EDIT_RXDATA, m_strRXData);

}

BEGIN_MESSAGE_MAP(CSerialassistantDlg, CDialogEx)

ON_WM_SYSCOMMAND()

ON_WM_PAINT()

ON_WM_QUERYDRAGICON()

ON_CBN_SELCHANGE(IDC_COMBO_COM, &CSerialassistantDlg::OnCbnSelchangeComboCom)

ON_BN_CLICKED(IDC_BUTTON_SEND, &CSerialassistantDlg::OnBnClickedButtonSend)

ON_BN_CLICKED(IDC_BUTTON_CLEANUP, &CSerialassistantDlg::OnBnClickedButtonCleanup)

END_MESSAGE_MAP()

// CSerialassistantDlg 消息处理程序

BOOL CSerialassistantDlg::OnInitDialog()

{

CDialogEx::OnInitDialog();

// 将“关于...”菜单项添加到系统菜单中。

// IDM_ABOUTBOX 必须在系统命令范围内。

ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);

ASSERT(IDM_ABOUTBOX < 0xF000);

CMenu* pSysMenu = GetSystemMenu(FALSE);

if (pSysMenu != NULL)

{

BOOL bNameValid;

CString strAboutMenu;

bNameValid = strAboutMenu.LoadString(IDS_ABOUTBOX);

ASSERT(bNameValid);

if (!strAboutMenu.IsEmpty())

{

pSysMenu->AppendMenu(MF_SEPARATOR);

pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);

}

}

// 设置此对话框的图标。 当应用程序主窗口不是对话框时，框架将自动

// 执行此操作

SetIcon(m_hIcon, TRUE);// 设置大图标

SetIcon(m_hIcon, FALSE);// 设置小图标

// TODO: 在此添加额外的初始化代码

m_comboCom.AddString(_T("COM1")); // 为组合框控件的列表框添加列表项

m_comboCom.AddString(_T("COM2"));

m_comboCom.AddString(_T("COM3"));

m_comboCom.AddString(_T("COM4"));

m_comboCom.AddString(_T("COM5"));

m_comboCom.AddString(_T("COM6"));

m_comboCom.AddString(_T("COM7"));

m_comboCom.AddString(_T("COM8"));

m_comboCom.AddString(_T("COM9"));

m_comboCom.AddString(_T("COM10"));

return TRUE; // 除非将焦点设置到控件，否则返回 TRUE

}

void CSerialassistantDlg::OnSysCommand(UINT nID, LPARAM lParam)

{

if ((nID & 0xFFF0) == IDM_ABOUTBOX)

{

CAboutDlg dlgAbout;

dlgAbout.DoModal();

}

else

{

CDialogEx::OnSysCommand(nID, lParam);

}

}

// 如果向对话框添加最小化按钮，则需要下面的代码

// 来绘制该图标。 对于使用文档/视图模型的 MFC 应用程序，

// 这将由框架自动完成。

void CSerialassistantDlg::OnPaint()

{

if (IsIconic())

{

CPaintDC dc(this); // 用于绘制的设备上下文

SendMessage(WM_ICONERASEBKGND, reinterpret_cast(dc.GetSafeHdc()), 0);

// 使图标在工作区矩形中居中

int cxIcon = GetSystemMetrics(SM_CXICON);

int cyIcon = GetSystemMetrics(SM_CYICON);

CRect rect;

GetClientRect(&rect);

int x = (rect.Width() - cxIcon 1) / 2;

int y = (rect.Height() - cyIcon 1) / 2;

// 绘制图标

dc.DrawIcon(x, y, m_hIcon);

}

else

{

CDialogEx::OnPaint();

}

}

//当用户拖动最小化窗口时系统调用此函数取得光标

//显示。

HCURSOR CSerialassistantDlg::OnQueryDragIcon()

{

return static_cast(m_hIcon);

}

void CSerialassistantDlg::OnCbnSelchangeComboCom() //组合框的消息处理函数，但选择串口后会触发该函数执行，即串口初始化操作

{

// TODO: 在此添加控件通知处理程序代码

int nSel;

nSel = m_comboCom.GetCurSel();//获取组合框控件的列表框中选中项的索引

//串口控件添加控制变量m_ctrlComm，该内容非常的重要，相当于定义了一个串口类，然后就可以调用串口控制类中的相关函数进行操作。

m_ctrlComm.put_CommPort(nSel 1);//选择串口号(这里因为列表框的索引号是从0开始，所以(nSel 1)对应的才是我们所选的串口号)

m_ctrlComm.put_PortOpen(TRUE);//打开串口

m_ctrlComm.put_RThreshold(2);//收到两个字节引发OnComm事件

m_ctrlComm.put_InputMode(1);//输入模式选为二进制

m_ctrlComm.put_Settings(_T("9600,n,8,1"));//设置串口参数，波特率，无奇偶校验，位停止位，位数据位

m_ctrlComm.put_InputMode(1); // 以二进制方式检取数据

m_ctrlComm.put_RThreshold(1); //参数1表示每当串口接收缓冲区中有多于或等于1个字符时将引发一个接收数据的OnComm事件

m_ctrlComm.put_InputLen(0); //设置当前接收区数据长度为0

m_ctrlComm.get_Input();//先预读缓冲区以清除残留数据

m_setOk = true;//标记串口设置OK

}

BEGIN_EVENTSINK_MAP(CSerialassistantDlg, CDialogEx)

ON_EVENT(CSerialassistantDlg, IDC_MSCOMM1, 1, CSerialassistantDlg::OnComm, VTS_NONE)

END_EVENTSINK_MAP()

void CSerialassistantDlg::OnComm() //该程序为串口控键进行数据的接收和显示

{

// TODO: 在此处添加消息处理程序代码

VARIANT variant_inp; //Variant 是一种特殊的数据类型，除了定长String数据及用户定义类型外，可以包含任何种类的数据。

COleSafeArray safearray_inp;

LONG len, k;

BYTE rxdata[2048]; //设置BYTE数组，用于存储接收到的数据，所以最大只能接收2048个字节的数据

CString strtemp;

if (m_ctrlComm.get_CommEvent() == 2) //事件值为2表示接收缓冲区内有字符

{

以下你可以根据自己的通信协议加入处理代码

variant_inp = m_ctrlComm.get_Input();//读缓冲区

safearray_inp = variant_inp;//VARIANT型变量转换为ColeSafeArray型变量

len = safearray_inp.GetOneDimSize();//得到有效数据长度

for (k = 0; k

safearray_inp.GetElement(&k, rxdata k);//转换为BYTE型数组

for (k = 0; k

{

BYTE bt = *(char*)(rxdata k);//字符型

strtemp.Format(_T("%c"), bt); //将字符送入临时变量strtemp存放

m_strRXData = strtemp; //加入接收编辑框对应字符串

}

}

UpdateData(FALSE); //更新编辑框内容

}

void CSerialassistantDlg::OnBnClickedButtonSend()

{

// TODO: 在此添加控件通知处理程序代码

if (m_setOk == true)//判断是否打开并初始化串口

{

UpdateData(TRUE); //读取编辑框内容

m_ctrlComm.put_Output(COleVariant(m_strTXData)); //发送数据，COleVariant用于将任意类型的数据转化为VARIANT类型数据

}

else

{

MessageBox(_T("请先选择COM口"));

}

}

void CSerialassistantDlg::OnBnClickedButtonCleanup()

{

// TODO: 在此添加控件通知处理程序代码

m_strRXData = "";

UpdateData(FALSE);//更新编辑框内容

}