易语言无符号右移，逻辑右移

a1537852926

遇到需要用易语言写无符号右移，找了很多例子，用负数测试的时候，发现结果不对。没办法，继续找办法。现在发现个简单的办法，也可以实现。所以，给大家分享下。也省得自己忘了。

  

子程序名	返回值类型	公开	备 注
逻辑右移	长整数型
参数名	类 型	参考	可空	数组	备 注
x	长整数型
y	整数型

变量名	类 型	静态	数组	备 注
s	长整数型
w	长整数型
d	长整数型

s ＝ 右移 (x, y)
w ＝ 左移 (取字节集长度 (到字节集 (s)), 3)
d ＝ 位与 (s, 位取反 (左移 (-1, w － y)))

.版本 2<br /> <br /> .子程序 逻辑右移, 长整数型<br /> .参数 x, 长整数型<br /> .参数 y, 整数型<br /> .局部变量 s, 长整数型<br /> .局部变量 w, 长整数型<br /> .局部变量 d, 长整数型<br /> <br /> s ＝ 右移 (x, y)<br /> w ＝ 左移 (取字节集长度 (到字节集 (s)), 3)<br /> d ＝ 位与 (s, 位取反 (左移 (-1, w － y)))

八百逗逼奔北坡

wlp 发表于 2024-3-14 05:25
看这里 https://bbs.125.la/forum.php?mod=viewthread&tid=14813306&extra=

谢谢...........

wlp

八百逗逼奔北坡 发表于 2024-3-13 22:57
21254 楼主处理等于166 正确 你这个处理出来是332 不懂啥原因

看这里 https://bbs.125.la/forum.php?mod ... 14813306&extra=

八百逗逼奔北坡

wlp 发表于 2022-1-20 03:00
[e=0].版本 2

.子程序 无符号右移, 整数型, 公开

21254 楼主处理等于166 正确 你这个处理出来是332 不懂啥原因

不苦小和尚

正好用到，太坑人了，结果不对，原来是符号问题

醉清风o

学习学习

wlp

  

子程序名	返回值类型	公开	备 注
无符号右移	整数型
参数名	类 型	参考	可空	数组	备 注
val	整数型
bit	整数型				范围：0-31

变量名	类 型	静态	数组	备 注
i	整数型
n	整数型

如果真 (bit ＜ 1 或 bit ＞ 31)
返回 (val)
' 先把最高位置0（其实相当于无符号右移1位）
n ＝ 左移 (1, 31)
n ＝ 位取反 (n)
val ＝ 位与 (val, n)
' 右移的时候，要减去最高位
val ＝ 右移 (val, bit － 1)
返回 (val)

.版本 2<br /> <br /> .子程序 无符号右移, 整数型, 公开<br /> .参数 val, 整数型<br /> .参数 bit, 整数型, , 范围：0-31<br /> .局部变量 i, 整数型<br /> .局部变量 n, 整数型<br /> <br /> .如果真 (bit ＜ 1 或 bit ＞ 31)<br />     返回 (val)<br /> .如果真结束<br /> ' 先把最高位置0（其实相当于无符号右移1位）<br /> n ＝ 左移 (1, 31)<br /> n ＝ 位取反 (n)<br /> val ＝ 位与 (val, n)<br /> ' 右移的时候，要减去最高位<br /> val ＝ 右移 (val, bit － 1)<br /> 返回 (val)

wlp

  

子程序名	返回值类型	公开	备 注
无符号右移	整数型
参数名	类 型	参考	可空	数组	备 注
val	整数型
bit	整数型				范围：0-31

变量名	类 型	静态	数组	备 注
i	整数型
n	整数型

如果真 (bit ＜ 1 或 bit ＞ 31)
返回 (val)
' 先把最高位置0（其实相当于无符号右移1位）
n ＝ 左移 (1, 31)
n ＝ 位取反 (n)
val ＝ 位与 (val, n)
' 右移的时候，要减去最高位
val ＝ 右移 (val, bit － 1)
返回 (val)

.版本 2<br /> <br /> .子程序 无符号右移, 整数型, 公开<br /> .参数 val, 整数型<br /> .参数 bit, 整数型, , 范围：0-31<br /> .局部变量 i, 整数型<br /> .局部变量 n, 整数型<br /> <br /> .如果真 (bit ＜ 1 或 bit ＞ 31)<br />     返回 (val)<br /> .如果真结束<br /> ' 先把最高位置0（其实相当于无符号右移1位）<br /> n ＝ 左移 (1, 31)<br /> n ＝ 位取反 (n)<br /> val ＝ 位与 (val, n)<br /> ' 右移的时候，要减去最高位<br /> val ＝ 右移 (val, bit － 1)<br /> 返回 (val)

a1537852926

lijixuan 发表于 2019-8-19 02:19
看不懂，{:3_49:}{:3_49:}

无符号右移，等用到加密解密计算的时候，就用到了。

87467311

  感谢分享