2015-01-11 16:42:31 +00:00
|
|
|
/*
|
|
|
|
|
Author: commy2
|
|
|
|
|
|
|
|
|
|
Description:
|
|
|
|
|
Converts number to binary number
|
|
|
|
|
|
|
|
|
|
Arguments:
|
|
|
|
|
A number
|
|
|
|
|
|
|
|
|
|
Return Value:
|
|
|
|
|
A binary number, String
|
|
|
|
|
*/
|
2015-01-13 19:56:02 +00:00
|
|
|
#include "script_component.hpp"
|
2015-01-11 16:42:31 +00:00
|
|
|
|
|
|
|
|
private ["_number", "_minLength", "_sign", "_bin", "_rest"];
|
|
|
|
|
|
|
|
|
|
_number = _this select 0;
|
|
|
|
|
_minLength = _this select 1;
|
|
|
|
|
|
|
|
|
|
if (isNil "_minLength") then {_minLength = 1};
|
|
|
|
|
|
|
|
|
|
_sign = ["", "-"] select (_number < 0);
|
|
|
|
|
|
|
|
|
|
_number = round abs _number;
|
|
|
|
|
_bin = ["", "0"] select (_number == 0);
|
|
|
|
|
|
|
|
|
|
while {_number > 0} do {
|
|
|
|
|
_rest = str (_number mod 2);
|
|
|
|
|
_number = floor (_number / 2);
|
|
|
|
|
|
|
|
|
|
_bin = _rest + _bin;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
while {count toArray _bin < _minLength} do {
|
|
|
|
|
_bin = "0" + _bin;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
_sign + _bin
|
