2015-01-17 21:49:06 +00:00
|
|
|
/* by commy2
|
|
|
|
|
|
|
|
converts rangefinder distance into array of textures for the vectors scripted info control
|
|
|
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "script_component.hpp"
|
|
|
|
|
|
|
|
private ["_number", "_coordinate", "_isNegative"];
|
|
|
|
|
|
|
|
_number = _this select 0;
|
|
|
|
_coordinate = _this select 1;
|
|
|
|
|
|
|
|
_number = round (_number select _coordinate);
|
|
|
|
_isNegative = _number < 0;
|
|
|
|
_number = abs _number;
|
|
|
|
|
2015-01-20 17:26:31 +00:00
|
|
|
if (_number > 9999) exitWith {
|
|
|
|
[QUOTE(PATHTOF(rsc\vector_minus.paa)), QUOTE(PATHTOF(rsc\vector_minus.paa)), QUOTE(PATHTOF(rsc\vector_minus.paa)), QUOTE(PATHTOF(rsc\vector_minus.paa)), QUOTE(PATHTOF(rsc\vector_minus.paa))] // return
|
2015-01-17 21:49:06 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
private ["_digit0", "_digit1", "_digit2", "_digit3", "_digit4"];
|
|
|
|
|
|
|
|
_digit0 = "";
|
|
|
|
_digit1 = floor (_number / 1000);
|
|
|
|
_digit2 = floor (_number / 100) - _digit1 * 10;
|
|
|
|
_digit3 = floor (_number / 10) - _digit1 * 100 - _digit2 * 10;
|
|
|
|
_digit4 = _number mod 10;
|
|
|
|
|
|
|
|
switch (_coordinate) do {
|
|
|
|
case 0 : {
|
|
|
|
|
|
|
|
if (_isNegative) then {
|
|
|
|
|
|
|
|
if (_digit1 == 0) then {
|
|
|
|
if (_digit2 == 0) then {
|
|
|
|
if (_digit3 == 0) then {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_l.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
_digit3 = "";
|
|
|
|
_digit4 = "";
|
|
|
|
} else {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_l.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
_digit4 = "";
|
|
|
|
};
|
|
|
|
} else {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_l.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit2];
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit4 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
};
|
|
|
|
} else {
|
|
|
|
_digit0 = "";
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit2 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit3 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit4 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
};
|
|
|
|
|
|
|
|
} else {
|
|
|
|
|
|
|
|
if (_digit1 == 0) then {
|
|
|
|
if (_digit2 == 0) then {
|
|
|
|
if (_digit3 == 0) then {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_r.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
_digit3 = "";
|
|
|
|
_digit4 = "";
|
|
|
|
} else {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_r.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
_digit4 = "";
|
|
|
|
};
|
|
|
|
} else {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_r.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit2];
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit4 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
};
|
|
|
|
} else {
|
|
|
|
_digit0 = "";
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit2 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit3 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit4 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
};
|
|
|
|
};
|
|
|
|
|
|
|
|
};
|
|
|
|
|
|
|
|
case 1 : {
|
|
|
|
|
|
|
|
if (_isNegative) then {
|
|
|
|
|
|
|
|
if (_digit1 == 0) then {
|
|
|
|
if (_digit2 == 0) then {
|
|
|
|
if (_digit3 == 0) then {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_d.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
_digit3 = "";
|
|
|
|
_digit4 = "";
|
|
|
|
} else {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_d.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
_digit4 = "";
|
|
|
|
};
|
|
|
|
} else {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_d.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit2];
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit4 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
};
|
|
|
|
} else {
|
|
|
|
_digit0 = "";
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit2 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit3 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit4 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
};
|
|
|
|
|
|
|
|
} else {
|
|
|
|
|
|
|
|
if (_digit1 == 0) then {
|
|
|
|
if (_digit2 == 0) then {
|
|
|
|
if (_digit3 == 0) then {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_a.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
_digit3 = "";
|
|
|
|
_digit4 = "";
|
|
|
|
} else {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_a.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
_digit4 = "";
|
|
|
|
};
|
|
|
|
} else {
|
2015-04-06 14:07:52 +00:00
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_a.paa));
|
2015-01-17 21:49:06 +00:00
|
|
|
_digit1 = "";
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit2];
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit4 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
};
|
|
|
|
} else {
|
|
|
|
_digit0 = "";
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit2 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit3 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit4 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
};
|
|
|
|
};
|
|
|
|
|
|
|
|
};
|
|
|
|
|
|
|
|
case 2 : {
|
|
|
|
|
|
|
|
if (_isNegative) then {
|
|
|
|
|
|
|
|
if (_digit1 == 0) then {
|
|
|
|
if (_digit2 == 0) then {
|
|
|
|
if (_digit3 == 0) then {
|
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_u.paa));
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_p.paa));
|
|
|
|
_digit2 = "";
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
_digit4 = "";
|
|
|
|
} else {
|
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_u.paa));
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_p.paa));
|
|
|
|
_digit2 = "";
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit4 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
};
|
|
|
|
} else {
|
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_u.paa));
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_p.paa));
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit2];
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit4 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
};
|
|
|
|
} else {
|
|
|
|
_digit0 = "";
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit2 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit3 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit4 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
};
|
|
|
|
|
|
|
|
} else {
|
|
|
|
|
|
|
|
if (_digit1 == 0) then {
|
|
|
|
if (_digit2 == 0) then {
|
|
|
|
if (_digit3 == 0) then {
|
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_d.paa));
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_n.paa));
|
|
|
|
_digit2 = "";
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
_digit4 = "";
|
|
|
|
} else {
|
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_d.paa));
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_n.paa));
|
|
|
|
_digit2 = "";
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit4 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
};
|
|
|
|
} else {
|
|
|
|
_digit0 = QUOTE(PATHTOF(rsc\vector_d.paa));
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_n.paa));
|
|
|
|
_digit2 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit2];
|
|
|
|
_digit3 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit3];
|
|
|
|
_digit4 = format [QUOTE(PATHTOF(rsc\vector_%1.paa)), _digit4];
|
|
|
|
};
|
|
|
|
} else {
|
|
|
|
_digit0 = "";
|
|
|
|
_digit1 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit2 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit3 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
_digit4 = QUOTE(PATHTOF(rsc\vector_minus.paa));
|
|
|
|
};
|
|
|
|
};
|
|
|
|
|
|
|
|
};
|
|
|
|
};
|
|
|
|
|
2015-01-20 17:26:31 +00:00
|
|
|
// trap errors
|
|
|
|
if ({typeName _x == "STRING"} count [_digit0, _digit1, _digit2, _digit3, _digit4] < 5) exitWith {
|
|
|
|
[QUOTE(PATHTOF(rsc\vector_minus.paa)), QUOTE(PATHTOF(rsc\vector_minus.paa)), QUOTE(PATHTOF(rsc\vector_minus.paa)), QUOTE(PATHTOF(rsc\vector_minus.paa)), QUOTE(PATHTOF(rsc\vector_minus.paa))] // return
|
|
|
|
};
|
|
|
|
|
2015-01-17 21:49:06 +00:00
|
|
|
[_digit0, _digit1, _digit2, _digit3, _digit4]
|