十六进制查看器

数据长度 ＝ 取字节集长度 (参数据)
.如果 (数据长度 ％ 16 ＝ 0) ' 先计算一共有多少行，我们假定每行16个字节
行数 ＝ 数据长度 ÷ 16
.否则
行数 ＝ 数据长度 ÷ 16 ＋ 1
.如果结束
.计次循环首 (行数, i) ' 分成一行行来处理
一行数据 ＝ 取字节集中间 (参数据, 16 × (i － 1), 16) ' 每次处理16个字节
一行文本 ＝ “”
右侧文本 ＝ “”
.计次循环首 (取字节集长度 (一行数据), j)
某字节 ＝ 一行数据 [j]
一行文本 ＝ 一行文本 ＋ “ ” ＋ 填充重复文本 (取十六进制文本 (某字节), 2, “0”)
.如果真 (参是否显示文本)
.如果 (某字节 ＜ 32)
右侧文本 ＝ 右侧文本 ＋ “.”
.否则
右侧文本 ＝ 右侧文本 ＋ 字符 (某字节)
.如果结束

.如果真结束

.计次循环尾 ()
.如果真 (取文本长度 (一行文本) ＜ 50)
一行文本 ＝ 填充重复文本 (一行文本, 50, “ ”, 假) ' 此句给一行的后部填充空格，以保证右侧对齐
.如果真结束
.如果真 (参是否显示行号)
一行文本 ＝ 填充重复文本 (取十六进制文本 (i), 4, “0”, 真) ＋ “ |” ＋ 一行文本
.如果真结束
.如果真 (参是否显示文本)
一行文本 ＝ 一行文本 ＋ “ | ” ＋ 右侧文本
.如果真结束
结果文本 ＝ 结果文本 ＋ 一行文本 ＋ #换行符
.计次循环尾 ()