Dec2Bin9 ( decnum )

Converts a decimal number to its binary equivalent.

Average rating: 4.6 (30 votes) Log in to vote

M S Pease

Sample input:

Dec2Bin9 ( 511 )

Sample output:

111111111

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

// current max dec number input is 511
// the pattern is pretty obvious, so you 
// can increase or decrease it accordingly
// M S Pease

Let ( 
[
i = Int ( Mod ( decnum ; 2 ) ); 
h = Int ( Mod ( decnum / 2 ; 2 )) ; 
g = Int ( Mod ( decnum / 4; 2 )) ; 
f = Int ( Mod ( decnum / 8; 2 )) ; 
e = Int ( Mod ( decnum / 16 ; 2 )) ; 
d = Int ( Mod ( decnum / 32 ; 2 )) ; 
c = Int ( Mod ( decnum / 64 ; 2 )) ; 
b = Int ( Mod ( decnum / 128 ; 2 )) ; 
a = Int ( Mod ( decnum / 256 ; 2 )) 

] ;  

a&b&c&d&e&f&g&h&i

)

Non-recursive function to convert a decimal number to its binary equivalent, currently to 9 places (decimal 511 max).

The other "Dec2Bin" custom function didn't work for me, so I formulated this version. It is very simple to edit this function to accommodate larger decimal inputs, or limit it to smaller inputs. I needed nine binary places, so this is the result, named "Dec2Bin9".

Comments

		comment, VR Oct 6, 2011
It is very simple to construct a function to accommodate ANY decimal input: DecToBin ( decimal ) Let ( [ next = Div ( decimal ; 2 ) ] ; Case ( next ; DecToBin ( next ) ) & Mod ( decimal ; 2 ) ) See also: http://www.briandunning.com/cf/218

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

Dec2Bin9 ( decnum )

Comments

Support this website.

Support this website.