１．发送子程序 ｌｉｓｔ ｐ＝１６ｃ６５，ｆ＝ｉｎｈｘ８ｍ
ｐｏｒｔｂ ｅｑｕ６
ｔｒｉｓｂ ｅｑｕ １６ｈ
ｓｔａｔｕｓ ｅｑｕ３
ｒｐ０ ｅｑｕ５
ｏｒｇ０ｘ１００
ｆｓ ｂｓｆ ｓｔａｔｕｓ，ｒｐ０；选存储体１
ｂｃｆ ｔｒｉｓｂ，６ ；置ＲＢ６为输出
ｂｃｆ ｓｔａｔｕｓ，ｒｐ０；恢复存储体０
ｂｓｆ ｐｏｒｔｂ，６ ；发准备信号“１”
ｍｏｖｌｗ０ｘ０８
ｍｏｖｗｆ１ｆ ；置发送字长
ｃａｌｌ ｙｓｔｂ ；延时同步
ｍｏｖｌｗ０ｘ１０
ｍｏｖｗｆ１ｃ
ｆｓ１ ｂｃｆ ｐｏｒｔｂ，６ ；发１６个起始位
ｄｅｃｆｓｚ１ｃ，１
ｇｏｔｏ ｆｓ１
ｔｓ ｃａｌｌ ｙｓｔｊ ；延时调节波特率
ｒｒｆ １６ｈ，１ ；发送字节移位
ｂｔｆｓｃ ｓｔａｔｕｓ，０
ｇｏｔｏ ｔｙ
ｍｏｖｌｗ０ｘ１０
ｍｏｖｗｆ１ｃ
ｆｓ２ ｂｃｆ ｐｏｒｔｂ，６ ；位为０，发１６个“０”
ｄｅｃｆｓｚ１ｃ，１
ｇｏｔｏ ｆｓ２
ｇｏｔｏ ｔｒ
ｔｙ ｍｏｖｌｗ０ｘ１０
ｍｏｖｗｆ１ｃ
ｆｓ３ ｂｓｆ ｐｏｒｔｂ，６ ；位为１，发１６个“１”
ｄｅｃｆｓｚ１ｃ，１
ｇｏｔｏ ｆｓ３
ｔｒ ｄｅｃｆｓｚ１ｆ， １
ｇｏｔｏ ｔｓ ；发送未完，延时发下一位
ｒｅｔｕｒｎ ；发送结束返回
ｅｎｄ
２．接收子程序
ｌｉｓｔ ｐ＝１６ｃ６５，ｆ＝ｉｎｈｘ８ｍ
ｐｏｒｔｂ ｅｑｕ６
ｔｒｉｓｂ ｅｑｕ １６ｈ
ｓｔａｔｕｓ ｅｑｕ ３
ｒｐ０ ｅｑｕ５
ｏｒｇ ０ｘ２００
ｊｓ ｂｓｆ ｓｔａｔｕｓ，ｒｐ０ ；选存储体１
ｂｓｆ ｔｒｉｓｂ，４ ；置ＲＢ４为输入
ｂｃｆ ｓｔａｔｕｓ，ｒｐ０ ；恢复存储体０
ｊｓ１ ｂｔｆｓｓ ｐｏｒｔｂ，４ ；检测收到“１”否
ｇｏｔｏ ｊｓ１ ；未收到“１”继续检测
ｍｏｖｌｗ０ｘ０８ ；置接收字长８位
ｍｏｖｗｆ１ｆ
ｌｏｏｐ１ ｍｏｖｌｗ０ｘ０８ ；置循环次数８
ｍｏｖｗｆ１ｄ
ｌｏｏｐ ｂｔｆｓｃ ｐｏｒｔｂ，４ ；检测起始位
ｇｏｔｏ ｌｏｏｐ１ ；未收到“０”重置８次循环
ｄｅｃｆｓｚ１ｄ，１
ｇｏｔｏ ｌｏｏｐ ；收到“０”继续检测
ｊｚ ｃａｌｌ ｙｓｔｂ ；收到８个“０”，延时同步，接收数据
ｂｔｆｓｃ ｐｏｒｔｂ，４ ；测试接收位
ｇｏｔｏ ｊｙ
ｂｃｆ ｓｔａｔｕｓ，０ ；收到“０”置ｃ＝０
ｇｏｔｏ ｊ１
ｊｙ ｂｓｆ ｓｔａｔｕｓ，０ ；收到“１”置ｃ＝１
ｊ１ ｒｒｆ １４ｈ，１ ；接收位移入１４ｈ
ｄｅｃｆｓｚ １ｆ，１
ｇｏｔｏ ｊｚ ；未接收完，延时接收下一位
ｒｅｔｕｒｎ ；接收完返回
ｅｎｄ
上面的程序貌似是匠人写的吧，我想问一个延时同步和延时调节波特率是什么？作用呢？ |
楼主
标题置顶
标题高亮
