|
发表于 2021-1-1 14:42:55
|
显示全部楼层
广东省广州市
本帖最后由 romantic 于 2021-1-1 19:00 编辑
.版本 2
.支持库 eCalc
.子程序 解密
.局部变量 a, 大数
.局部变量 b, 大数
.局部变量 c, 大数
.局部变量 v1, 长整数型
.局部变量 v2, 长整数型
.局部变量 v1_17_63, 长整数型
.局部变量 v37_39, 长整数型
v1_17_63 = 到长整数 (“4611686018427453441”)
v37_39 = 到长整数 (“343597383680”)
a.导入文本 (“5432101234567890987654321234567890”)
b.导入文本 (“1234567890123450”)
c = a.整除 (b)
v1 = 到长整数 (c.导出文本 ())
v2 = int64_or (v1, v1_17_63)
v1 = int64_rol (v2, 11)
v2 = int64_or (v1, v37_39)
输出调试文本 (“密码:” + Int64ToHex (v2))
v1 = 到长整数 (“-” + 到文本 (v2))
v2 = int64_ror (v1, 3)
v1 = int64_shr (int64_shl (v2, 48), 48)
输出调试文本 (“偏移:” + 到文本 (v1))
|
|