串口数据发送与接收的问题，请高手留步！

ftpc

小弟最近在学习下位机通讯，做了个实例，但发现效果不理想，没有实现真正的目的，还请各路高手帮我指点一下，谢谢大家

功能很简单，我发送“1”的数据给下位机，下位机返回相应的数据给我。

要实现的功能如下图：


而我做出来的实例效果却变成了如下：

实例效果

实在不知道是哪里写错了，同时也附上源码，请各位帮看看，谢谢了


[e]
.版本 2

.子程序 _按钮1_被单击, , , 数据发送
.局部变量 临时文本, 文本型
.局部变量 临时字节集, 字节集

临时文本 ＝ 删全部空 (编辑框1.内容)
临时字节集 ＝ 到字节集 (临时文本)
端口1.发送数据 (临时字节集)

.子程序 _端口1_数据到达
.参数 数据字节值, 整数型

编辑框2.加入文本 (到进制 (到文本 (数据字节值), 10, 16) ＋ “,”)


.子程序 到进制, 文本型, 公开, 可以将从二进制到三十六进制的数值随意进行转换
.参数 被转换文本, 文本型, , 欲被转换的文本(不可以转换负数以及小数)
.参数 被转换进制, 整数型, , 被转换文本的进制(2-36之间)
.参数 转换的进制, 整数型, , 要转换到的进制(2-36之间)
.局部变量 欲转换文本, 文本型
.局部变量 临时文本, 文本型
.局部变量 临时数值, 长整数型
.局部变量 计次变量, 整数型

.如果真 (被转换进制 ＜ 2 或 转换的进制 ＜ 2 或 被转换进制 ＞ 36 或 转换的进制 ＞ 36) ' 判断两个“进制系数”是否正确
输出调试文本 (“参数错误-进制只能在2-36之间”)
返回 (“”)
.如果真结束
被转换文本 ＝ 到大写 (到半角 (被转换文本)) ' 规范参数
.计次循环首 (取文本长度 (被转换文本), 计次变量)
临时文本 ＝ 取文本中间 (被转换文本, 计次变量, 1)
.如果真 (寻找文本 (取文本左边 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 被转换进制), 临时文本, , 假) ＝ -1)
临时文本 ＝ “参数错误-” ＋ 被转换文本 ＋ “不是一个有效的” ＋ 取文本左边 (数值到金额 (被转换进制, 真), 取文本长度 (数值到金额 (被转换进制, 真)) － 4) ＋ “进制数！”
跳出循环 ()
.如果真结束
.如果真 (计次变量 ＝ 取文本长度 (被转换文本))
临时文本 ＝ “”
.如果真结束

.计次循环尾 ()
.如果真 (临时文本 ≠ “”)
输出调试文本 (临时文本)
返回 (“”)
.如果真结束
' 以上为数据处理代码
.如果真 (被转换进制 ＝ 转换的进制)
返回 (被转换文本)
.如果真结束
.计次循环首 (取文本长度 (被转换文本), 计次变量) ' 整数转换开始
临时数值 ＝ (寻找文本 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 取文本中间 (被转换文本, 计次变量, 1), , 真) － 1) × 求次方 (被转换进制, 取文本长度 (被转换文本) － 计次变量) ＋ 临时数值
.计次循环尾 ()
.判断循环首 (临时数值 ＞ 转换的进制 － 1)
欲转换文本 ＝ 取文本中间 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 到数值 (到文本 (临时数值 ％ 转换的进制)) ＋ 1, 1) ＋ 欲转换文本
临时数值 ＝ 取整 (临时数值 ÷ 转换的进制)
.判断循环尾 ()
欲转换文本 ＝ 取文本中间 (“0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”, 临时数值 ＋ 1, 1) ＋ 欲转换文本 ' 整数转换结束
.如果真 (取文本长度 (欲转换文本) ＝ 1)
返回 (“0” ＋ 欲转换文本)
.如果真结束
返回 (欲转换文本)

[/e]

月夜·猫妖

乃有没有初始化串口？顺便建议不要这样去用，这样写会有顺序问题，你应该用一个缓冲数组来做，先接收所有数据然后再转化显示

ftpc

希望能有高手帮我指点一下呀

ftpc

难道这里没有这方面的高手吗？？？

ftpc

我的天呀，只有看热闹的，都没有一个人能给点提示吗？？？？

XCMV

还不知道的话加我QQ"635169189 我经常用易语言写监控软件

ftpc

xxilong 发表于 2014-3-7 17:42
还不知道的话加我QQ"635169189 我经常用易语言写监控软件

这里不方便回答的吗？