ACE3/addons/medical_treatment/functions/fnc_createLitterServer.sqf
mharis001 44050df98b Medical Treatment - Modernize and Cleanup (#6933)
* Modernize and cleanup medical_treatment

* One line for each old public function

* Fix litterCleanupDelay name

* Improve adjustment calcs / wound blood loss / medications

fix func descriptions

Calc wound blood loss on events

reorder includes so scritpmacroMed has global effect

trivial optimization for getCardiacOutput

Fix var

Fix wounds not reopening (nil _category)

Fix surgical kit inherting canBandage conditional

debug hitpoints

Update ACE_Medical_Treatment_Actions.hpp

Use woundBleeding for IS_BLEEDING macro

rework medication vars

comments

Reset var in init / fullHeal

Update addons/medical_treatment/functions/fnc_onMedicationUsage.sqf

Co-Authored-By: PabstMirror <pabstmirror@gmail.com>

* Change wound data array

Drop unique id and merge classId and category

* Splinting and treatment and gui

* Add arm fractures and aim effects

* localizations and event

* fix

* fix merge for renamed files

* Fixes and code review changes

* Move medical logs clearing to treatment

* More cleanup work

* cleanup

* Apply suggestions from code review

Co-Authored-By: PabstMirror <pabstmirror@gmail.com>

* formating, rename bone images

* Fix args for setDead call in actionPlaceInBodyBag

* Apply suggestions from code review

Co-Authored-By: PabstMirror <pabstmirror@gmail.com>

* disable calls to extension

* Update fnc_onMedicationUsage.sqf

* Medical - Skip unneeded setVars on initUnit (#6949)

*  Medical - Transfer state machine state on locality (#6950)

* Medical - Transfer state machine state on locality

* Fix feedback isUnconscious var

* Exclude AI

* Make UAV excludes consistant, formating

* Update fnc_treatmentFullHealLocal.sqf

* reset fractures on respawn

* Fix merge

* Add PAK time coefficient setting

* Fix medication

* Add ace_medical_replacementItems config array

* checkItems performance improvement

* Treatment - cap max animation speed (#6995)

* Treatment - cap max animation speed

and add lock to prevent AF from reseting anim

* Update fnc_getBandageTime.sqf

* Use local version of setAnimSpeedCoef

* Revert "Use local version of setAnimSpeedCoef"

This reverts commit 36c22a9047.

* Move replacementItems compiling to preInit

* Improve replacementItems compiling

* Cleanup splint functions, use macros for fractures

* Rename splintCondition to canSplint

* Add cprCreatesPulse setting

* Cleanup remaining functions

* Capitalize stringtable entry names

* getStitchTime function and fix treatment locations

* Update addons/medical_treatment/functions/fnc_getHealTime.sqf

Co-Authored-By: SilentSpike <silentspike100+Github@gmail.com>
2019-06-03 10:31:46 -05:00

58 lines
1.6 KiB
Plaintext

#include "script_component.hpp"
/*
* Author: Glowbal, mharis001
* Creates a litter object and handles its cleanup. Only execute on server.
*
* Arguments:
* 0: Litter Class <STRING>
* 1: Position ASL <ARRAY>
* 2: Direction <NUMBER>
*
* Return Value:
* None
*
* Example:
* ["Litter_1", [100, 100, 0], 90] call ace_medical_fnc_createLitterServer
*
* Public: No
*/
params ["_litterClass", "_position", "_direction"];
if (isNil QGVAR(litterObjects)) then {
GVAR(litterObjects) = [];
GVAR(litterCleanup) = false;
};
private _model = getText (configFile >> "CfgVehicles" >> _litterClass >> "model");
if (_model == "") exitWith {};
// createSimpleObject expects a path without the leading slash
if (_model select [0, 1] == "\") then {
_model = _model select [1];
};
private _object = createSimpleObject [_model, [0, 0, 0]];
_object setPosASL _position;
_object setDir _direction;
// Set the litter object's position next frame to correct HORRIBLE spacing (fixes #1112)
[{
params ["_object", "_position"];
_object setPosASL _position;
}, [_object, _position]] call CBA_fnc_execNextFrame;
// Delete oldest litter object if max count reached
if (count GVAR(litterObjects) > GVAR(maxLitterObjects)) then {
private _litterToDelete = GVAR(litterObjects) deleteAt 0;
deleteVehicle (_litterToDelete select 0);
};
GVAR(litterObjects) pushBack [_object, CBA_missionTime];
// Start cleanup loop if not already running and litter lifetime is not forever
if (!GVAR(litterCleanup) && {GVAR(litterCleanupDelay) > 0}) then {
[] call FUNC(litterCleanupLoop);
GVAR(litterCleanup) = true;
};