mirror of
https://github.com/acemod/ACE3.git
synced 2024-08-30 18:23:18 +00:00
148 lines
4.4 KiB
Plaintext
148 lines
4.4 KiB
Plaintext
#include "..\script_component.hpp"
|
|
/*
|
|
* Author: Jaynus, NouberNou, Lambda.Tiger,
|
|
* This function creates spalling if the hit slowed the speed down enough.
|
|
*
|
|
* Arguments:
|
|
* Arguments are the same as BI's "HitPart" EH:
|
|
* https://community.bistudio.com/wiki/Arma_3:_Event_Handlers#HitPart
|
|
*
|
|
* Return Value:
|
|
* None
|
|
*
|
|
* Example:
|
|
* [BIS_HITPART_EH_ARGS] call ace_frag_fnc_doSpall;
|
|
*
|
|
* Public: No
|
|
*/
|
|
TRACE_1("doSpall",_this);
|
|
params [
|
|
"_projectile",
|
|
["_objectHit", objNull],
|
|
["_lastPosASL", [0, 0, 0]],
|
|
["_lastVelocity", [0, 0, 0]],
|
|
["_surfaceNorm", [0, 0, 0]],
|
|
["_surfaceType", ""],
|
|
["_ammo", "", [""]],
|
|
["_shotParents", [objNull, objNull], [[]]],
|
|
["_vectorUp", [0,0,1]]
|
|
];
|
|
|
|
if (CBA_missionTime - GVAR(lastSpallTime) < ACE_FRAG_SPALL_HOLDOFF ||
|
|
_lastPosASL isEqualTo [0,0,0] ||
|
|
{isNull _objectHit || {_objectHit isKindOf "man" ||
|
|
{_ammo isEqualTo ""}}}) exitWith {
|
|
TRACE_4("time/invldHit",CBA_missionTime,GVAR(lastSpallTime),_objectHit,_lastPosASL);
|
|
};
|
|
|
|
private _material = [_surfaceType] call FUNC(getMaterialInfo);
|
|
if (_material isEqualTo "ground") then {
|
|
#ifdef DEBUG_MODE_FULL
|
|
systemChat "ground spall";
|
|
#endif
|
|
};
|
|
|
|
// Find spall speed / fragment info
|
|
[_ammo] call FUNC(getSpallInfo) params ["_caliber", "_explosive", "_indirectHit"];
|
|
private _vel = if (alive _projectile) then {
|
|
_explosive = 0; // didn't explode since it's alive a frame later
|
|
velocity _projectile
|
|
} else {
|
|
[0, 0, 0];
|
|
};
|
|
|
|
private _velocityChange = vectorMagnitude _lastVelocity - vectorMagnitude _vel;
|
|
/*
|
|
* This is all fudge factor since real spalling is too complex for calculation.
|
|
* There are two terms. The first is from round impact, taking a quasi scale
|
|
* of sqrt(2)/50 * round caliber * srqt(change in speed). The second term is
|
|
* explosive * indirect hit, for any explosive contribution
|
|
*/
|
|
private _spallPower = (ACE_FRAG_ROUND_COEF * _caliber * sqrt _velocityChange + _explosive * _indirectHit) * GVAR(spallIntensity);
|
|
TRACE_3("found speed",_velocityChange,_caliber,_spallPower);
|
|
|
|
|
|
if (_spallPower < 2) exitWith {
|
|
TRACE_1("lowImpulse",_ammo);
|
|
};
|
|
|
|
|
|
private _lastVelocityUnit = vectorNormalized _lastVelocity;
|
|
private _deltaStep = _lastVelocityUnit vectorMultiply 0.05;
|
|
|
|
if (terrainIntersectASL [_lastPosASL vectorAdd _deltaStep, _lastPosASL]) exitWith {
|
|
TRACE_2("terrainIntersect",_lastPosASL,_deltaStep);
|
|
};
|
|
|
|
#ifdef DEBUG_MODE_DRAW
|
|
if GVAR(dbgSphere) then {
|
|
[_lastPosASL vectorAdd _lastVelocityUnit, "orange"] call FUNC(dev_sphereDraw);
|
|
[_lastPosASL, "yellow"] call FUNC(dev_sphereDraw);
|
|
};
|
|
#endif
|
|
|
|
/*
|
|
* Improve performance of finding otherside of object on shallow angle
|
|
* impacts. 120 degrees due to 90 degree offset with _lastVelocityUnit into object.
|
|
*/
|
|
private _spallPosASL = _lastPosASL vectorAdd _deltaStep;
|
|
if (120 > acos ( _lastVelocityUnit vectorDotProduct _surfaceNorm)) then {
|
|
_spallPosASL = _spallPosASL vectorAdd (_deltaStep vectorMultiply 5);
|
|
};
|
|
private _insideObject = true;
|
|
for "_i" from 2 to 21 do
|
|
{
|
|
private _nPos = _spallPosASL vectorAdd _deltaStep;
|
|
if (!lineIntersects [_spallPosASL, _nPos]) then {
|
|
_spallPosASL = _nPos vectorAdd (_deltaStep vectorMultiply 2);
|
|
_insideObject = false;
|
|
break
|
|
};
|
|
_spallPosASL = _nPos;
|
|
};
|
|
|
|
if (_insideObject) exitWith {
|
|
TRACE_3("insideObj",_lastPosASL,_spallPosASL,alive _projectile);
|
|
};
|
|
// Passed all exitWiths
|
|
GVAR(lastSpallTime) = CBA_missionTime;
|
|
|
|
#ifdef DEBUG_MODE_DRAW
|
|
if GVAR(dbgSphere) then {
|
|
[_spallPosASL, "green"] call FUNC(dev_sphereDraw);
|
|
};
|
|
#endif
|
|
|
|
private _spawnSize = switch (true) do
|
|
{
|
|
case (_spallPower < 3): { "_spall_tiny" };
|
|
case (_spallPower < 5): { "_spall_small" };
|
|
case (_spallPower < 8): { "_spall_medium" };
|
|
case (_spallPower < 12): { "_spall_large" };
|
|
default { "_spall_huge" };
|
|
};
|
|
|
|
private _spallSpawner = createVehicle [
|
|
"ace_frag_" + _material + _spawnSize,
|
|
ASLToATL _spallPosASL,
|
|
[],
|
|
0,
|
|
"CAN_COLLIDE"
|
|
];
|
|
_spallSpawner setVectorDirandUp [_lastVelocityUnit, _vectorUp];
|
|
_spallSpawner setVelocity (_lastVelocityUnit vectorMultiply (_velocityChange/ACE_FRAG_SPALL_VELOCITY_INHERIT_COEFF));
|
|
_spallSpawner setShotParents _shotParents;
|
|
|
|
#ifdef DEBUG_MODE_FULL
|
|
systemChat ("spd: " + str speed _spallSpawner + ", spawner: " + _fragSpawnType + ", spallPow: " + str _spallPower);
|
|
#endif
|
|
#ifdef DEBUG_MODE_DRAW
|
|
_spallSpawner addEventHandler [
|
|
"SubmunitionCreated",
|
|
{
|
|
params ["", "_subProj"];
|
|
[_subProj] call FUNC(dev_addRound);
|
|
}
|
|
];
|
|
#endif
|