>Ok, num%2 works, however, when you say "then divide by 2 to get next", what do you mean ? I've tried dividing by 2 several different ways (numerator, denominator, etc.) and didn't get a correct result.

lparameters tnNumber
for ix = 1 to 32 && 32 bits integer
	? tnNumber%2
	tnNumber = int(tnNumber/2)
endfor

Cetin