ACE3/addons/common/functions/fnc_numberToDigits.sqf
2015-03-26 14:11:04 +01:00

41 lines
858 B
Plaintext

/*
* Author: commy2
*
* Transforms a number to an array of the correspondending digits.
*
* Argument:
* 0: Number to 'digitize' (Number)
* 1: Set the minimal length of the returned array. Useful for getting left hand zeroes. (Number, optional)
*
* Return value:
* Digits. The maximum count is six digits. (Array)
*/
#include "script_component.hpp"
private ["_number", "_minLength", "_length", "_digits"];
_number = _this select 0;
_minLength = _this select 1;
_number = _number min 999999;
_number = str _number;
_length = count _number;
if (isNil "_minLength") then {_minLength = _length};
_minLength = _minLength min 6;
while {_length < _minLength} do {
_number = "0" + _number;
_length = _length + 1;
};
_digits = [];
for "_x" from 0 to (_length - 1) do {
_digits pushBack parseNumber (_number select [_x, 1]);
};
_digits