电子产品世界

对串行口的操作可分为以下几步进行：①串行口初始化；②发送联络信号;③接收联络信号；④发送数据。以下程序由汇编语言编写：
ORG 0030H
START:MOV SP,#60H
MOV TMOD, #20H ；T1工作模式2
MOV TH1, #72H
MOV TL1, #72H ；波特率110HZ
SETB TR1
MOV PCON, #00H ；SMOD=0
MOV SCON, #50H ；串行方式1
MOV R0，#20H
MOV R2，#30 ；数据个数
XX1：MOV A，#55H
MOV SBUF，A ；发送联络信号
WAIT1：JBC TI，WAIT2 ；等待发送完毕
AJMP WAIT1
WAIT2：JBC RI，READ ；等待接收完毕
AJMP WAIT2
READ：MOV A，SBUF ；接收联络信号
CJNE A，# 0AAH，XX1 ；接收数据不正确，重新开始
LOOP：MOV A，@R0
MOV SBUF，A
WAIT: JBC TI， LOOP1
AJMP WAIT ；等待发送完毕
LOOP1：INC R0
DJNZ R2，LOOP
END
（2）计算机的串行通讯程序
为了更方便地实时了解数据采集的情况，我们把从单片机读来的数据分别赋给数组，然后描绘出波形曲线。
首先开启一个VB项目，并在窗体上安排一个MSCOMM控件，作为串行通讯的信道。按下F4调出属性窗口，变量COMPORT属性为2，另外将 Rthreshold属性设为1，意思就是只要外界传送任何字符串，随即引发事件。安排一个定时器，作为连续动作的执行控件，一旦一位数据发送完就引发中断，发送下一个数据。设置一个picturebox对象，把由单片机传送来的数据以线条方式绘制在此图片框控件上。按下F4调出属性窗口，其Name属性改为“Graph1”。
MSCOMM控件支持以文本和二进制格式传输数据，由于下位机是单片机，处理二进制数据较为方便。因此本例中以二进制格式发送和接受数据，VB支持字节变量类型来存储二进制数据，从串口读入的字节被保存在字节数组变量中，因此定义两个BYTE类型的动态数组来存放和接受数据，在接受数据时采用事件驱动法，当接受缓冲区有Rthreshold个数据时，引起ONCOMM事件。
本程序接收从单片机发来的30个数据，当数据进入PC机的输入缓冲区后，程序会不断读取输入缓冲区的数据，并将这些读入的数据收在一起,赋给数组。
因为VB支持坐标格式，我们用SCALE函数作出坐标，定义X轴由0到30，表示有30个数据，Y轴由-20到+20，表示采集数据的范围是-20 到+20，表达式为SCALE（0，+20）-（30，-20），为了实时采集数据，可以用定时器不断地更新曲线。这样就可以动态地显示被采集的数据。

关键词： 串行 通讯 单片机 PC VB 实现 基于