PowerBasic发送RTU
RTU的好处就是在同样的波特率下,可比ASCII方式传送更多的数据
最近发现powerBasic制作dll很方便,就尝试着用它来做一个底层通信,但是可能是我不太了解这种语言,发现Udp Send只能发送字符串
所有就使用了迂回战术发送16进制的字符串了
代码是在UDPClnt.bas的基础上修改的。希望有人指导下
'程序片段
Buffer ="10000112456789abcdefAC" Buff_len=Len(Buffer)\2 ReDim bytBuff(buff_len) '转成Byte数组 For bytList=0 To buff_len-1 bytBuff(bytList)=Val( "&H" + Mid$(BUFFER,BYTLIST*2+1,2)) Next bytlist
Buffer=Nul$(0) '重新转成字符串 For bytList=0 To buff_len-1 Buffer=Buffer & Chr$(bytBuff(bytList)) Next BYTLIST Udp Send hUdp, At bip, %UPort, Buffer