易语言位测试、位置位、位复位、位取反
.版本 2
.程序集 bit
.子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
返回 (0)
.子程序 bit_Test, 逻辑型, , 对指定位测试 1返回真 0返回假
.参数 dwbitString, 整数型
.参数 dwbitOffset, 整数型, , 0-31
.局部变量 bSet, 逻辑型
' mov eax, dword ptr [ebp+0Ch]
' bt dword ptr [ebp+08h], eax
' setb byte ptr [ebp-04h]
置入代码 ({ 139, 69, 12, 15, 163, 69, 8, 15, 146, 69, 252 })
返回 (bSet)
.子程序 bit_Set, 整数型, , 对指定位置位
.参数 dwbitString, 整数型
.参数 dwbitOffset, 整数型, , 0-31
' mov eax,dword ptr [ebp+0Ch]
' bts dword ptr [ebp+08h],eax
置入代码 ({ 139, 69, 12, 15, 171, 69, 8 })
返回 (dwbitString)
.子程序 bit_Reset, 整数型, , 对指定位复位
.参数 dwbitString, 整数型
.参数 dwbitOffset, 整数型, , 0-31
' mov eax,dword ptr [ebp+0Ch]
' btr dword ptr [ebp+08h],eax
置入代码 ({ 139, 69, 12, 15, 179, 69, 8 })
返回 (dwbitString)
.子程序 bit_Complement, 整数型, , 对指定位取反
.参数 dwbitString, 整数型
.参数 dwbitOffset, 整数型, , 0-31
' mov eax, dword ptr [ebp+0Ch]
' btc dword ptr [ebp+08h], eax
置入代码 ({ 139, 69, 12, 15, 187, 69, 8 })
返回 (dwbitString)
易语言的整数型变量也以位寻址吗?