N

技术支持

EWS CENTER

您的当前位置:首页 > 技术支持  > 技术文章

串口自定义通讯协议的使用

2015-01-28

'下面程序把串口收到的数据都从串口返回去
 
'配置串口为RAW模式
SETCOM (38400,8,1,0,0 ,0)
 
dim char1
while 1
get #0, char1
'print #0, chr(char1)'这种方式只能输出字符串,二进制0不能打印
putchar #0, char1'这种可以输出二进制
wend
 
 
 
'下面程序采用多任务来接收数据
 
'配置串口为RAW模式
SETCOM (38400,8,1,0,0 ,0)
 
global if_getdata
if_getdata=0
global datalist(100)
global datanum
global data
 
runtask 1, task_get
 
while 1
if if_getdata =1 then
print "data received:", datalist
print "data is:", data
if_getdata = 0
end if
wend
 
 
'接收任务
task_get:
 
dim char1
datanum=0
 
while 1
get #0, char1
 
if char1 = 10 then  '换行符
if_getdata = 1
datalist(datanum)=0'字符串结束了
'可以在这里转换数据
data=val(datalist)'假设是数字
 
datanum=0
else
datalist(datanum)=char1'填入数组
datanum=datanum+1
end if
 
wend
 
end

 

分享按钮