ACE3/addons/fcs/functions/fnc_getRange.sqf
2016-01-21 15:01:41 +01:00

49 lines
1.5 KiB
Plaintext

/*
* Author: commy2
* Read laser distance measurement from engine.
*
* Argument:
* 0: Measurement Accuracy (default: 1) <NUMBER>
* 1: Maximum measure distance (default: 5000) <NUMBER>
* 2: Minimum measure distance (default: 0) <NUMBER>
* 3: Blank display on range error (default: false) <BOOL>
*
* Return value:
* Measured distance <NUMBER>
*
* Public: No
*/
#include "script_component.hpp"
params [["_accuracy",1], ["_maxDistance",5000], ["_minDistance",0], ["_blank",false]];
disableSerialization;
private _dlgRangefinder = uiNamespace getVariable ["ACE_dlgRangefinder", displayNull];
private _distance = parseNumber ctrlText (_dlgRangefinder displayCtrl 151);
if (_distance == 0) then {
_distance = _this call EFUNC(common,getTargetDistance);
} else {
// Is distance out of bound?
_distance = _distance min _maxDistance;
_distance = _distance max _minDistance;
// If don't let accuracy be less than 1
_accuracy = _accuracy max 1;
_distance = (round (_distance/_accuracy)) * _accuracy;
};
// Change the display if the range is out of bounds
if (_distance >= _maxDistance || _distance <= _minDistance) then {
if (_blank) then {
(_dlgRangefinder displayCtrl 1713151) ctrlSetText "----";
} else {
(_dlgRangefinder displayCtrl 1713151) ctrlSetText ([_distance, 4, 0] call CBA_fnc_formatNumber) + "*";
};
} else {
(_dlgRangefinder displayCtrl 1713151) ctrlSetText ([_distance, 4, 0] call CBA_fnc_formatNumber);
};
_distance