2023-09-12 18:58:10 +00:00
|
|
|
#include "..\script_component.hpp"
|
2015-04-07 19:46:43 +00:00
|
|
|
/*
|
|
|
|
* 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>
|
2015-04-07 19:46:43 +00:00
|
|
|
*
|
|
|
|
* Return Value:
|
2015-08-05 03:01:30 +00:00
|
|
|
* muzzle velocity shift - m/s <NUMBER>
|
2015-08-05 02:38:04 +00:00
|
|
|
*
|
2017-06-08 13:31:51 +00:00
|
|
|
* Example:
|
2019-03-05 16:42:04 +00:00
|
|
|
* [[], 5] call ace_advanced_ballistics_fnc_calculateAmmoTemperatureVelocityShift
|
2017-06-08 13:31:51 +00:00
|
|
|
*
|
2015-08-05 02:38:04 +00:00
|
|
|
* Public: No
|
2015-04-07 19:46:43 +00:00
|
|
|
*/
|
2015-04-05 19:08:55 +00:00
|
|
|
|
2016-09-04 14:44:22 +00:00
|
|
|
params ["_muzzleVelocityShiftTable", "_temperature"];
|
2015-04-05 19:08:55 +00:00
|
|
|
|
2017-11-22 22:16:17 +00:00
|
|
|
// Check if muzzleVelocityShiftTable is less than 11 Entrys
|
2015-10-09 01:32:14 +00:00
|
|
|
if ((count _muzzleVelocityShiftTable) < 11) exitWith {0};
|
2016-09-04 14:44:22 +00:00
|
|
|
private _muzzleVelocityShiftTableUpperLimit = _muzzleVelocityShiftTable select 10;
|
2017-11-22 22:16:17 +00:00
|
|
|
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
|
2017-11-22 22:16:17 +00:00
|
|
|
private _temperatureIndexFunction = 0 max ((_temperature + 15) / 5) min 10;
|
2015-04-05 19:08:55 +00:00
|
|
|
|
2017-11-22 22:16:17 +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
|
|
|
|
2017-11-22 22:16:17 +00:00
|
|
|
linearConversion [_temperatureIndexA, _temperatureIndexB, _temperatureIndexFunction, _muzzleVelocityShiftTable select _temperatureIndexA, _muzzleVelocityShiftTable select _temperatureIndexB, true] // Return
|