读取数据 (取运行目录 () ＋
“\393009.cis”, a
)写取数据 (取运行目录 () ＋
“\写出.cis”, a
)调试输出 (a
)| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| s | 整数型 | | |
| k | 字节集 | | |
| bin | 字节集 | | |
| n | 整数型 | | |
| 代码 | 字节集 | | |
| j | 整数型 | | |
s ＝
取数组成员数 (参信息
)
计次循环首 (s, n
)
k ＝
{ 0, 0
}k
[1
] ＝
进制_十六到十 (参信息
[n
].品种
)代码 ＝
到字节集 (参信息
[n
].代码
)计次循环首 (12 －
取字节集长度 (代码
), j
)代码 ＝ 代码 ＋
{ 0
}
计次循环尾 ()bin ＝ bin ＋ k ＋ 代码 ＋
{ 128, 63
}计次循环尾 ()调试输出 (“写出”, bin
)写到文件 (文件名, bin
)| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| bin | 字节集 | | |
| 分割 | 字节集 | | 0 |
| n | 整数型 | | |
| 品种 | 字节集 | | |
bin ＝
读入文件 (文件名
)分割 ＝
分割字节集 (bin,
{ 128, 63
},
)重定义数组 (返回信息, 假,
取数组成员数 (分割
))
计次循环首 (取数组成员数 (分割
), n
)品种 ＝
取字节集左边 (分割
[n
], 1
)返回信息
[n
].品种 ＝
进制_十到十六 (品种
[1
],
)返回信息
[n
].代码 ＝
到文本 (取字节集中间 (分割
[n
], 3, 6
))
调试输出 (到文本 (取字节集中间 (分割
[n
], 3, 11
))
)计次循环尾 () 
lc.zip
(49.96 KB, 下载次数: 4)
