ACE3/addons/advanced_ballistics/functions/fnc_calculateAmmoTemperatureVelocityShift.sqf

35 lines
1.2 KiB
Plaintext
Raw Normal View History

/*
* Author: Ruthberg
*
* Calculates the ammo temperature induced muzzle velocity shift
*
* Arguments:
2015-05-08 15:20:56 +00:00
* 0: muzzle velocity shift lookup table - m/s <ARRAY>
2015-04-07 19:54:29 +00:00
* 1: temperature - degrees celcius <NUMBER>
*
* Return Value:
* muzzle velocity shift - m/s <NUMBER>
2015-08-05 02:38:04 +00:00
*
* Example:
* [[], 5] call ace_advanced_ballistics_fnc_calcilateAmmoTemperatureVelocityShift
*
2015-08-05 02:38:04 +00:00
* Public: No
*/
2015-04-05 19:08:55 +00:00
#include "script_component.hpp"
params ["_muzzleVelocityShiftTable", "_temperature"];
2015-04-05 19:08:55 +00:00
// Check if muzzleVelocityShiftTable is less than 11 Entrys
if ((count _muzzleVelocityShiftTable) < 11) exitWith {0};
private _muzzleVelocityShiftTableUpperLimit = _muzzleVelocityShiftTable select 10;
if (isNil "_muzzleVelocityShiftTableUpperLimit") exitWith {0};
2015-04-05 19:08:55 +00:00
2015-08-05 02:13:36 +00:00
// Find exact data index required for given temperature
private _temperatureIndexFunction = 0 max ((_temperature + 15) / 5) min 10;
2015-04-05 19:08:55 +00:00
// Lower and upper data index used for interpolation
private _temperatureIndexA = floor(_temperatureIndexFunction);
private _temperatureIndexB = ceil(_temperatureIndexFunction);
2015-04-05 19:08:55 +00:00
linearConversion [_temperatureIndexA, _temperatureIndexB, _temperatureIndexFunction, _muzzleVelocityShiftTable select _temperatureIndexA, _muzzleVelocityShiftTable select _temperatureIndexB, true] // Return