Difference between revisions of "Dec2binMEL"

Latest revision as of 05:22, 22 April 2017

global proc string dec2bin(int $iNumber) {
       //Converted from AS by Nick Pisca 0001d 2009
	string $bin = "";
	int $oNumber = $iNumber; 
	while ($iNumber>0) {
		if ($iNumber%2) {
			$bin = "1"+$bin;
		} else {
			$bin = "0"+$bin;
		}
		$iNumber = floor($iNumber/2);
	}
	while (size($bin)<8) {
		$bin = "0"+$bin;
	}
	return $bin;
};