• ByteArray 实验：拼一帧二进制数据
  • 这个实验做完你会得到什么
  • 一、导入扩展
  • 二、界面组件
  • 三、我们要拼的帧格式
  • 四、分步搭代码块
    • 第 1 步：拼出这一帧
    • 第 2 步：把它拆回来
    • 第 3 步：校验和对不对
    • 第 4 步：加一段文本
  • 五、排错表
  • 六、下一步
  • 相关文档

« 返回 ByteArray 拓展文档　 IoT 专题

ByteArray 实验：拼一帧二进制数据

这个实验做完你会得到什么

点一下按钮，屏幕上出现一串十六进制 AA 05 01 00 64 6E —— 这就是一帧完整的 二进制协议数据；再点一下，把它按帧头、长度、命令、参数、校验和逐段拆解回来。

跟硬件打交道时，对方要的往往不是文字而是字节：发送 "100" 和 发送 0x64 是 两回事。这一篇把”怎么按协议拼字节、怎么看清拼对没有”讲通， 后面接蓝牙、UDP、串口都用得上。

一、导入扩展

UrsAI2ByteArray.zip（解压后导入 .aix）　 示例工程：ByteArrayTest.aia

这个扩展把一段字节数组包成组件，提供两类操作：

二、界面组件

三、我们要拼的帧格式

自定义一个最常见的协议格式，一共 6 个字节：

帧头是干什么的：串口/网络上的数据是流式的，接收方需要一个标志知道”新的一帧从这里开始”。 挑一个不常出现的值（0xAA = 二进制 10101010）当帧头是行业惯例。

长度字段让接收方知道还要再读几个字节才算读完一帧 —— 没有它就只能靠猜。

四、分步搭代码块

第 1 步：拼出这一帧

global 命令 = 1
global 参数 = 100

when 按钮_拼帧.Click() {
  UrsAI2ByteArray1.Clear()
  UrsAI2ByteArray1.AddByte(170)
  UrsAI2ByteArray1.AddByte(5)
  UrsAI2ByteArray1.AddByte(命令)
  UrsAI2ByteArray1.AddWord(参数)
  UrsAI2ByteArray1.AddByte((170 + 5 + 命令 + 参数) % 256)
  标签_十六进制.Text = UrsAI2ByteArray1.ToHex
  标签_状态.Text = join("共 ", UrsAI2ByteArray1.Size, " 字节")
}

中途验证：标签上出现一串十六进制，字节数显示 6。这是本实验最关键的一步 —— ToHex 是唯一能让你”看见”字节的手段，拼错了立刻看得出来。

先 Clear 再拼。这个组件是有状态的，不清空就会在上一次的数据后面继续追加， 越拼越长 —— 这是最常见的错误，而且现象很迷惑（第一次对，第二次开始就不对）。

AddWord 是 2 个字节：100 会写成 00 64 或 64 00，取决于 MsbFirst 属性 （高位在前 / 低位在前）。跟硬件对接时这个必须和对方一致，字节序搞反是 二进制协议里最典型的坑，表现是数值离谱地大或小。

校验和取 % 256：一个字节装不下超过 255 的数，必须取低 8 位。

第 2 步：把它拆回来

when 按钮_解析.Click() {
  UrsAI2ByteArray1.ReadIndex = 1
  var 帧头 = UrsAI2ByteArray1.ReadByte()
  var 长度 = UrsAI2ByteArray1.ReadByte()
  var 命令码 = UrsAI2ByteArray1.ReadByte()
  var 参数值 = UrsAI2ByteArray1.ReadWord()
  var 校验 = UrsAI2ByteArray1.ReadByte()
  标签_解析.Text = join("帧头 ", 帧头, "\n长度 ", 长度, "\n命令 ", 命令码, "\n参数 ", 参数值, "\n校验 ", 校验)
}

中途验证：拆出来的五个值应该是 170 / 5 / 1 / 100 / (校验和)，和拼进去的一致。

读之前把 ReadIndex 归 1。读指针会随着每次 Read 往后移，不复位的话 第二次点「拆开看」就读到数据末尾之后了 —— Available 会变成 0。

读的顺序必须和写的顺序、宽度完全对应：写的时候 AddWord（2 字节）， 读的时候就必须 ReadWord。用 ReadByte 去读只会拿到半个数。

第 3 步：校验和对不对

when 按钮_校验.Click() {
  UrsAI2ByteArray1.ReadIndex = 1
  var 累加 = 0
  for i = 1 to UrsAI2ByteArray1.Size - 1 {
    累加 = 累加 + UrsAI2ByteArray1.GetByteAt(i)
  }
  var 帧内校验 = UrsAI2ByteArray1.GetByteAt(UrsAI2ByteArray1.Size)
  if 累加 % 256 = 帧内校验 {
    标签_状态.Text = "校验通过"
    标签_状态.TextColor = "&HFF43A047"
  } else {
    标签_状态.Text = join("校验失败：算出 ", 累加 % 256, "，帧内是 ", 帧内校验)
    标签_状态.TextColor = "&HFFE53935"
  }
}

中途验证：点「校验」显示绿色的”校验通过”。

GetByteAt(位置) 是按下标随机读取，不动读指针，适合做校验这种要来回看的事； ReadByte() 是顺序读取，会推进指针。两者别混用。

下标从 1 开始（App Inventor 的列表也是 1 基），不是 0。

第 4 步：加一段文本

协议里常常要带设备名之类的字符串：

when 按钮_带文本.Click() {
  UrsAI2ByteArray1.Clear()
  UrsAI2ByteArray1.AddByte(170)
  UrsAI2ByteArray1.AddUTF8String("客厅灯")
  标签_十六进制.Text = UrsAI2ByteArray1.ToHex
  标签_状态.Text = join("共 ", UrsAI2ByteArray1.Size, " 字节；这三个汉字占 ", UrsAI2ByteArray1.GetUTF8ByteSize("客厅灯"), " 字节")
}

中途验证：字节数显示 10 —— 帧头 1 字节 + 三个汉字 9 字节。

一个汉字在 UTF-8 里是 3 个字节，不是 1 个。给硬件发中文之前一定要确认 对方能不能处理多字节字符 —— 很多单片机固件只认 ASCII， 那就得用 AddASCIIString（一个字符一个字节，中文会丢）。 这也是蓝牙中文乱码那类问题的根源。

五、排错表

六、下一步

把拼好的帧真正发出去，三条路都支持直接发字节数组：

• UDP 实验 —— UDPXmitter.XmitByteArray()
• BLE 低功耗蓝牙 —— WriteBytes
• HC-05 经典蓝牙 —— 发送字节

相关文档

• UrsAI2ByteArray 拓展参考
• 蓝牙通信乱码的原理与解决
• BLE 写字节与写字符串的区别