ACE3/addons/common/functions/fnc_toBin.sqf
jonpas 742626ff1a
General - Relative script_component.hpp includes (#9378)
Co-authored-by: PabstMirror <pabstmirror@gmail.com>
2023-09-12 20:58:10 +02:00

37 lines
708 B
Plaintext

#include "..\script_component.hpp"
/*
* Author: commy2
* Converts number to binary number
*
* Arguments:
* 0: A number <NUMBER>
* 1: Minumum length of numbers <NUMBER> (default: 1)
*
* Return Value:
* A binary number as string <STRING>
*
* Example:
* [5] call ace_common_fnc_toBin
*
* Public: Yes
*/
params ["_number", ["_minLength", 1]];
private _sign = ["", "-"] select (_number < 0);
_number = round abs _number;
private _bin = ["", "0"] select (_number == 0);
while {_number > 0} do {
private _rest = str (_number mod 2);
_number = floor (_number / 2);
_bin = _rest + _bin;
};
while {count toArray _bin < _minLength} do {
_bin = "0" + _bin;
};
_sign + _bin // return