这就是P版所指的“位运算”,确实很强大。 $Rand=Random(-100, 100, 1)
MsgBox(0,"第1题--2变64",BitShift(2,-5))
MsgBox(0,"第2题--高低位互换",Hex(BitRotate(0x2D041020,16,"D")))
MsgBox(0,"第3题--奇偶判断(1奇0偶)"&$Rand,"结果为:"&BitAND($Rand,1))
MsgBox(0,"第4题--正负判断(1负0正)"&$Rand,BitAND(BitShift($Rand,31),1))
MsgBox(0,"第5题--后三位判断(结果为7符合)"&$Rand,BitAND($Rand,7))
MsgBox(0,"第6题--7变13/13变7","7==>"&BitXOR(7,10)&@CRLF&"13==>"&BitXOR(13,10))
MsgBox(0,"第7题--右起第十位取反",BitXOR(36615,0x00000200))
MsgBox(0,"第8题--取末尾连续1"&$Rand,BitShift(BitXOR($Rand, $Rand + 1), 1))
MsgBox(0,"第9题--取绝对值"&$Rand,BitXOR($Rand,BitShift($Rand,31))+BitAND(BitShift($Rand,31),1))
MsgBox(0,"第10题--右起第1位取反"&$Rand,BitOR($Rand, 1))我也不符合要求。{:face (394):} 學習了,發現還挺有趣的 本帖最后由 lixiaolong 于 2010-9-26 21:27 编辑
回复 1# pusofalse
第8题,不知道这样对不对?
$iRandom = "847"
MsgBox(0, BitXOR($iRandom, 832), "取" & $iRandom & "右边位连续的1。") 回复 20# lixiaolong
只用847测试是正确的,而真正用到时,这个数是未知的。用1024这个数测试呢~ 太复杂了,,{:face (229):} 运算符不能用实在太变态了... P大出马 惯例 留名待查。。 看不懂题目的悄悄路过 {:face (121):}精彩极了,学习了 精彩的代码,学习了... 学习了,谢谢 本帖最后由 allchn 于 2010-10-17 19:22 编辑
这不是标准函数吗,AutoIt3 有位运算
页:
1
[2]