bittest( ) 函式
確定一個數值型數值的指定位是否為 1。如果為 1，返回“真”(.T.)，否則返回“假”(.F.)。
語法
BITTEST(nExpression1, nExpression2)
參數
nExpression1
指定要檢查位的數值。如果 nExpression1 不是整數，那么該數在檢查之前，將轉換成整數。
nExpression2
指定 nExpression1 需要檢查的位置。nExpression2
的取值範圍為 0 到 31，0 表示最右端位。
返回值類型
邏輯型
bittest( ) 函式示例
下例使用 bittest( ) 函式來確定一系列整數是否為偶數。如果是偶數，函式 iseven 返回“真”(.t.)；否則返回“假”(.f.)。
clear
? '2 even? '
?? iseven(2) && 偶數，返回 .t.
? '3 even? '
?? iseven(3) && 非偶數，返回 .f.
? '0 even? '
?? iseven(0) && 偶數，返回 .t.
? '-13 even? '
?? iseven(-13) && 非偶數，返回 .f.
function iseven
parameter ninteger
return not bittest(ninteger, 0)
