|
- .版本 2
- .常量 十六进制文本, "“0123456789ABCDEF”"
- .程序集 程序集1
- .子程序 _启动子程序, 整数型
- _临时子程序 ()
- 返回 (0)
- .子程序 _临时子程序
- .局部变量 字节集, 字节集
- .局部变量 计数, 整数型
- .局部变量 字节型数组, 字节型, , "0"
- 字节集 = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16 }
- 信息框 (字节集_到C语言代码 (字节集, “temp”), 0, , )
- 字节型数组 = { 16, 15, 14, 13, 12, 11, 10 }
- 信息框 (字节型数组_到C语言代码 (字节型数组, “temp”), 0, , )
- .子程序 字节集_到C语言代码, 文本型, 公开
- .参数 字节集, 字节集
- .参数 变量名, 文本型
- .局部变量 文件号, 整数型
- .局部变量 字节集长度, 整数型
- .局部变量 返回值, 文本型
- .局部变量 计数, 整数型
- .局部变量 换行, 逻辑型
- 字节集长度 = 取字节集长度 (字节集)
- .如果真 (字节集长度 ≤ 0)
- 返回 (“”)
- .如果真结束
- 文件号 = 打开内存文件 ()
- 写出文本 (文件号, “unsigned char ” + 变量名 + “[” + 到文本 (字节集长度) + “] = {” + #换行符 + 字符 (9))
- .计次循环首 (字节集长度, 计数)
- 写出文本 (文件号, “0x”, 字节型_到十六进制文本 (字节集 [计数]))
- .如果真 (字节集长度 ≠ 计数)
- 写出文本 (文件号, “,”)
- .如果真结束
- .如果 (计数 % 16 = 0)
- 换行 = 真
- 写出文本 (文件号, #换行符)
- .如果真 (字节集长度 ≠ 计数)
- 写出文本 (文件号, 字符 (9))
- .如果真结束
- .否则
- 换行 = 假
- .如果结束
- .计次循环尾 ()
- 写出文本 (文件号, 选择 (换行, “”, #换行符) + “};”)
- 移动读写位置 (文件号, 1, 0)
- 返回值 = 读入文本 (文件号, 取文件长度 (文件号))
- 返回 (返回值)
- .子程序 字节型数组_到C语言代码, 文本型, 公开
- .参数 字节型数组, 字节型, 数组
- .参数 变量名, 文本型
- 返回 (字节集_到C语言代码 (到字节集 (字节型数组), 变量名))
- .子程序 字节型_到十六进制文本, 文本型
- .参数 字节, 字节型
- 返回 (取文本中间 (#十六进制文本, 右移 (字节, 4) + 1, 1) + 取文本中间 (#十六进制文本, 位与 (字节, 15) + 1, 1))
复制代码
|
|