mirror of
https://github.com/acemod/ACE3.git
synced 2024-08-30 18:23:18 +00:00
38 lines
981 B
Plaintext
38 lines
981 B
Plaintext
/*
|
|
* Author: Ruthberg
|
|
* Calculates distance at which the bullet velocity drops below the threshold velocity
|
|
*
|
|
* Arguments:
|
|
* theshold velocity <number>
|
|
*
|
|
* Return Value:
|
|
* distance <number
|
|
*
|
|
* Example:
|
|
* 403 call ace_atragmx_fnc_calculate_distance_at_velocity
|
|
*
|
|
* Public: No
|
|
*/
|
|
#include "script_component.hpp"
|
|
|
|
#define __DELTA_T 0.001
|
|
|
|
if (isNil QGVAR(targetSolutionInput)) exitWith { 0 };
|
|
|
|
private _thresholdVelocity = _this;
|
|
private _velocity = GVAR(targetSolutionInput) select 4;
|
|
|
|
if (_velocity <= _thresholdVelocity) exitWith { 0 };
|
|
|
|
private _distance = 0;
|
|
|
|
while {_velocity > _thresholdVelocity} do {
|
|
private _bc = GVAR(targetSolutionInput) select 14;
|
|
private _dragModel = GVAR(targetSolutionInput) select 15;
|
|
private _drag = parseNumber(("ace_advanced_ballistics" callExtension format["retard:%1:%2:%3", _dragModel, _bc, _velocity]));
|
|
_distance = _distance + _velocity * __DELTA_T;
|
|
_velocity = _velocity - (_drag * __DELTA_T);
|
|
};
|
|
|
|
_distance
|