|
大师们帮忙看看这个附件检验怎么写,谢谢
检验方式:Checksum32检验
检验码:D3CE921F
排序方式:XOR32反序
补充内容 (2014-6-29 12:09):
.版本 2
.支持库 commobj
.子程序 Checksum32, 字节集, 公开
.参数 Byte, 字节集, 参考
.局部变量 S
.局部变量 Text, 文本型
.局部变量 Sixteen, 文本型
.局部变量 i
.局部变量 Tem, 文本型
.局部变量 Buffer, 快速字节集对象
.局部变量 指针
.计次循环首 (取字节集长度 (Byte), i)
S = S + Byte
.计次循环尾 ()
.如果真 (S > 0)
Text = 取文本右边 (“00000000” + 取十六进制文本 (S), 8)
Sixteen = “0123456789ABCDEF”
.变量循环首 (1, 8, 2, i)
Tem = 取文本中间 (Text, i, 2)
指针 = (寻找文本 (Sixteen, 取文本左边 (Tem, 1), , 真) - 1) × 16 + 寻找文本 (Sixteen, 取文本右边 (Tem, 1), , 真) - 1
Buffer.添加 (取字节集左边 (到字节集 (指针), 1))
.变量循环尾 ()
.如果真结束
返回 (Buffer.取字节集 (, ))
|
|