Accessing Bits

BlitzMax Forums/BlitzMax Programming/Accessing Bits

theres some oddness with powers and floats heres what I had to do to get it to work....

SuperStrict

Function bitIsSet:Int(bit:Int , value:Int)
	Local mask:Int = 0
	For Local i:Int = 0 To 15
		If i = bit Then mask:+ Int((2^i)+0.1)
'		Print Int((2^i)+0.1)
	Next
'Print "mask="+mask	
	If mask & value Then Return True Else Return False
End Function

For Local i:Int = 0 To 7
	Print bitisset(i, 10)
Next