int 64 益出 万年难题

nj20346

wlp 发表于 2025-4-19 09:22
结果应该是对的，只用到了加减，位异或，左移，如果是右移，结果就不对 ...

从益出后就全不对了，前面的都是对的

wlp

nj20346 发表于 2025-4-19 09:57
从益出后就全不对了，前面的都是对的

最后的结果，到字节集   对比就知道，对不对了

qq793359277

你这C++代码内部返回的是无符号长整数, 可方法的返回值是无符号整数, 额外加个long就行

zainex

如果你不想完全用置入代码来实现，你也可以将涉及无符号长整数的各种运算都给封装成子程序。
结果看起来会像下面这样：

  

子程序名	返回值类型	公开	备 注
加法_长整数	长整数型
参数名	类 型	参考	可空	数组	备 注
a	长整数型
b	长整数型

置入代码 ({ 139, 69, 16, 139, 85, 20, 3, 69, 8, 19, 85, 12, 93, 194, 16, 0 })
返回 (0)
' mov eax, DWORD PTR [ebp+16]
' mov edx, DWORD PTR [ebp+20]
' add eax, DWORD PTR [ebp+8]
' adc edx, DWORD PTR [ebp+12]
' pop ebp
' ret 16

子程序名	返回值类型	公开	备 注
HashString	长整数型
参数名	类 型	参考	可空	数组	备 注
输入字符串	文本型
类型	整数型

变量名	类 型	静态	数组	备 注
seed1	长整数型
seed2	长整数型
ch	整数型
i	整数型

seed1 ＝ 2146271213  ' 0x7FED7FED
seed2 ＝ 4008636142  ' 0xEEEEEEEE
输入字符串 ＝ 到大写 (输入字符串)
计次循环首 (取文本长度 (输入字符串), i)
ch ＝ 取代码 (输入字符串, i)
' seed1 ＝ 位异或_长整数 (加密表 [左移_长整数 (类型, 8) ＋ ch ＋ 1], seed1 ＋ seed2)
seed1 ＝ 位异或_长整数 (加密表 [左移_长整数 (类型, 8) ＋ ch ＋ 1], 加法_长整数 (seed1, seed2))
' seed2 ＝ ch ＋ seed1 ＋ seed2 ＋ 左移_长整数 (seed2, 5) ＋ 3
seed2 ＝ 加法_长整数 (ch, 加法_长整数 (加法_长整数 (加法_长整数 (seed1, seed2), 左移_长整数 (seed2, 5)), 3))
调试输出 (ch, “seed2:” ＋ 到文本 (seed2))
计次循环尾 ()
返回 (seed1)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 加法_长整数, 长整数型<br /> .参数 a, 长整数型<br /> .参数 b, 长整数型<br /> <br /> 置入代码 ({ 139, 69, 16, 139, 85, 20, 3, 69, 8, 19, 85, 12, 93, 194, 16, 0 })<br /> 返回 (0)<br /> ' mov eax, DWORD PTR [ebp+16]<br /> ' mov edx, DWORD PTR [ebp+20]<br /> ' add eax, DWORD PTR [ebp+8]<br /> ' adc edx, DWORD PTR [ebp+12]<br /> ' pop ebp<br /> ' ret 16<br /> <br /> <br /> .子程序 HashString, 长整数型<br /> .参数 输入字符串, 文本型<br /> .参数 类型, 整数型, 可空<br /> .局部变量 seed1, 长整数型<br /> .局部变量 seed2, 长整数型<br /> .局部变量 ch, 整数型<br /> .局部变量 i, 整数型<br /> <br /> seed1 ＝ 2146271213  ' 0x7FED7FED<br /> seed2 ＝ 4008636142  ' 0xEEEEEEEE<br /> 输入字符串 ＝ 到大写 (输入字符串)<br /> .计次循环首 (取文本长度 (输入字符串), i)<br />     ch ＝ 取代码 (输入字符串, i)<br /> <br />     ' seed1 ＝ 位异或_长整数 (加密表 [左移_长整数 (类型, 8) ＋ ch ＋ 1], seed1 ＋ seed2)<br />     seed1 ＝ 位异或_长整数 (加密表 [左移_长整数 (类型, 8) ＋ ch ＋ 1], 加法_长整数 (seed1, seed2))<br /> <br />     ' seed2 ＝ ch ＋ seed1 ＋ seed2 ＋ 左移_长整数 (seed2, 5) ＋ 3<br />     seed2 ＝ 加法_长整数 (ch, 加法_长整数 (加法_长整数 (加法_长整数 (seed1, seed2), 左移_长整数 (seed2, 5)), 3))<br /> <br />     调试输出 (ch, “seed2:” ＋ 到文本 (seed2))<br /> .计次循环尾 ()<br /> 返回 (seed1)

nj20346

zainex 发表于 2025-4-19 12:27
易语言本身就不支持无符号类型，所以涉及无符号类型的各种运算均无法通过其自身完美解决，你只能另辟蹊径， ...

你太牛了，试了一下是可以，速度还挺快