Conversion - Allows for Conversion of Player Patients to AI Patients

addons/conversion/$PBOPREFIX$

@@ -0,0 +1 @@
+x\kat\addons\conversion

addons/conversion/ACE_Medical_Treatment_Actions.hpp

@@ -0,0 +1,15 @@
+class ACE_Medical_Treatment_Actions {
+    class CheckPulse;
+    class BasicBandage;
+    class ConvertPatient: CheckPulse {
+        displayName = CSTRING(convertPatient);
+        displayNameProgress = CSTRING(converting);
+        condition = QFUNC(manualConversionCondition);
+        medicRequired = QGVAR(manualConversionLevel);
+        treatmentLocations = QGVAR(manualConversionLocation);
+        treatmentTime = QGVAR(manualConversionTime);
+        allowedSelections[] = {"All"};
+        items[] = {""};
+        callbackSuccess = QFUNC(manualConversion);
+    };
+};

addons/conversion/CfgEventHandlers.hpp

@@ -0,0 +1,20 @@
+class Extended_PreInit_EventHandlers {
+    class ADDON {
+        init = QUOTE(call COMPILE_FILE(XEH_preInit));
+        disableModuload = "true";
+    };
+};
+
+class Extended_Init_EventHandlers {
+    class CAManBase {
+        class ADDON {
+            init = QUOTE([ARR_2((_this select 0),false)] call FUNC(init));
+        };
+    };
+};
+
+class Extended_PostInit_EventHandlers {
+    class ADDON {
+        init = QUOTE(call COMPILE_FILE(XEH_postInit));
+    };
+};

addons/conversion/CfgFunctions.hpp

@@ -0,0 +1,10 @@
+class CfgFunctions {
+    class overwrite_ace_medical_status {
+        tag = "ace_medical_status";
+        class ace_medical_status {
+            class setDead {
+                file = QPATHTOF(functions\fnc_setDead.sqf);
+            };
+        };
+    };
+};

addons/conversion/CfgVehicles.hpp

@@ -0,0 +1,21 @@
+class CfgVehicles {
+    class Man;
+    class CAManBase: Man {
+        class ACE_Actions {
+            class ACE_MainActions {
+                class KAT_TicketConversion {
+                    displayName = CSTRING(TicketConversion);
+                    condition = QUOTE(_target call FUNC(ticketConversionCondition));
+                    statement = QUOTE(_target call FUNC(ticketConversion));
+                    icon = QACEPATHTOF(medical_gui,ui\cross.paa);
+                };
+                class KAT_LibConversion {
+                    displayName = CSTRING(LibConversion);
+                    condition = QUOTE(_target call FUNC(libConversionCondition));
+                    statement = QUOTE(_target call FUNC(libConversion));
+                    icon = QACEPATHTOF(medical_gui,ui\cross.paa);
+                };
+            };
+        };
+    };
+};

addons/conversion/XEH_PREP.hpp

@@ -0,0 +1,15 @@
+PREP(conversionCheck);
+PREP(conversionCondition);
+PREP(fullHealLocal);
+PREP(handleRespawn);
+PREP(init);
+PREP(KATConditionExecutionDeath);
+PREP(KATConditionSecondChance);
+PREP(libConversion);
+PREP(libConversionCondition);
+PREP(libConversionDistance);
+PREP(manualConversion);
+PREP(manualConversionCondition);
+PREP(setDead);
+PREP(ticketConversion);
+PREP(ticketConversionCondition);

addons/conversion/XEH_postInit.sqf

@@ -0,0 +1,50 @@
+#include "script_component.hpp"
+
+[QEGVAR(misc,handleRespawn), LINKFUNC(handleRespawn)] call CBA_fnc_addEventHandler;
+[QACEGVAR(medical_treatment,fullHealLocalMod), LINKFUNC(fullHealLocal)] call CBA_fnc_addEventHandler;
+
+["kat_conversion_convertCasualty", {
+    private _type = typeOf player; 
+    private _group = createGroup [(side player), true]; 
+    private _previousUnit = player;
+    private _setName = name _previousUnit;
+    private _loadout = getUnitLoadout player;
+    private _unit = _group createUnit [_type, [0,0,0], [], 0, "NONE"];
+    _unit setUnitLoadout _loadout;
+
+    _previousUnit setVariable [QEGVAR(vitals,simpleMedical), false, true];
+    _previousUnit setVariable [QGVAR(currentConverted), true, true];
+
+    selectPlayer _unit; 
+
+    ["kat_conversion_unitTransfer", [_previousUnit]] call CBA_fnc_serverEvent;
+
+    _previousUnit setName _setName;
+
+    forceRespawn player;
+    deleteVehicle _unit;
+}] call CBA_fnc_addEventHandler;
+
+["kat_conversion_unitTransfer", {
+    params ["_previousUnit"];
+    private _group2 = createGroup [(side _previousUnit), true]; 
+    [_previousUnit] join _group2;
+    _group2 setGroupOwner 2;
+    [_previousUnit, true] call ACEFUNC(medical,setUnconscious);
+}] call CBA_fnc_addEventHandler;
+
+["kat_conversion_respawnTimer", {
+    params ["_time"];
+    private _currentRespawnTime = playerRespawnTime;
+    setPlayerRespawnTime _time;
+    _currentUnit = player;
+
+    [{
+        params ["_currentUnit"];
+
+        (lifeState _currentUnit isEqualTo "HEALTHY")
+    }, {
+        params [_currentRespawnTime];
+        setPlayerRespawnTime _currentRespawnTime;
+    }, [_currentUnit, _currentRespawnTime], 360, {}] call CBA_fnc_waitUntilAndExecute;
+}] call CBA_fnc_addEventHandler;

addons/conversion/XEH_preInit.sqf

@@ -0,0 +1,142 @@
+#include "script_component.hpp"
+
+ADDON = false;
+
+PREP_RECOMPILE_START;
+#include "XEH_PREP.hpp"
+PREP_RECOMPILE_END;
+
+#define CBA_SETTINGS_CAT "KAT - ADV Medical: Conversion"
+
+[
+    QGVAR(enable),
+    "CHECKBOX",
+    [LLSTRING(CONVERSION_ENABLE), LLSTRING(CONVERSION_ENABLE_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [false],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(enableConversionMessage),
+    "CHECKBOX",
+    [LLSTRING(CONVERSION_MESSAGE), LLSTRING(CONVERSION_MESSAGE_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [false],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(enableTicketConversion),
+    "CHECKBOX",
+    [LLSTRING(CONVERSION_TICKET_CONVERSION), LLSTRING(CONVERSION_TICKET_CONVERSION_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [false],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(ticketConversionGain),
+    "SLIDER",
+    [LLSTRING(CONVERSION_TICKET_CONVERSION_GAIN), LLSTRING(CONVERSION_TICKET_CONVERSION_GAIN_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [0, 10, 3, 0],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(enableLiberationConversion),
+    "CHECKBOX",
+    [LLSTRING(CONVERSION_LIBERATION_CONVERSION), LLSTRING(CONVERSION_LIBERATION_CONVERSION_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [false],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(enableLiberationConversionGain),
+    "SLIDER",
+    [LLSTRING(CONVERSION_LIBERATION_CONVERSION_GAIN), LLSTRING(CONVERSION_LIBERATION_CONVERSION_GAIN_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [0, 100, 50, 0],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(enableLiberationConversionDistance),
+    "SLIDER",
+    [LLSTRING(CONVERSION_LIBERATION_CONVERSION_DISTANCE), LLSTRING(CONVERSION_LIBERATION_CONVERSION_DISTANCE_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [0, 5000, 1000, 0],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(enableSpectatorRespawn),
+    "CHECKBOX",
+    [LLSTRING(CONVERSION_SPECTATOR_RESPAWN), LLSTRING(CONVERSION_SPECTATOR_RESPAWN_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [false],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(forceVehicleConversion),
+    "CHECKBOX",
+    [LLSTRING(CONVERSION_FORCE_VEHICLE), LLSTRING(CONVERSION_FORCE_VEHICLE_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [false],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(convertVehicles),
+    "EDITBOX",
+    [LLSTRING(CONVERSION_FORCE_VEHICLE_LIST), LLSTRING(CONVERSION_FORCE_VEHICLE_LIST_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    "'kat_stretcher'",
+    1,
+    {
+        private _array = [_this, "CfgVehicles"] call EFUNC(chemical,getList);
+        missionNamespace setVariable [QGVAR(convertVehicles), _array, true];
+    },
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(allowManualConversion),
+    "CHECKBOX",
+    [LLSTRING(CONVERSION_MANUAL_CONVERSION), LLSTRING(CONVERSION_MANUAL_CONVERSION_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [false],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(manualConversionLevel),
+    "LIST",
+    [LLSTRING(CONVERSION_MANUAL_CONVERSION_LEVEL), LLSTRING(CONVERSION_MANUAL_CONVERSION_LEVEL_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [[0, 1, 2], ["STR_ACE_Medical_Treatment_Anyone", "STR_ACE_Medical_Treatment_Medics", "STR_ACE_Medical_Treatment_Doctors"], 0],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(manualConversionLocation),
+    "LIST",
+    [LLSTRING(CONVERSION_MANUAL_CONVERSION_LOCATION), LLSTRING(CONVERSION_MANUAL_CONVERSION_LOCATION_DESC)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [[0,1,2,3],["STR_ACE_Common_Anywhere", "STR_ACE_Common_Vehicle", "STR_ACE_Medical_Treatment_MedicalFacilities", "STR_ACE_Medical_Treatment_VehiclesAndFacilities"],0],
+    true
+] call CBA_Settings_fnc_init;
+
+[
+    QGVAR(manualConversionTime),
+    "SLIDER",
+    [LLSTRING(CONVERSION_LIBERATION_CONVERSION_TIME)],
+    [CBA_SETTINGS_CAT, ELSTRING(GUI,SubCategory_Basic)],
+    [0, 60, 15, 0],
+    true
+] call CBA_Settings_fnc_init;
+
+ADDON = true;

addons/conversion/config.cpp

@@ -0,0 +1,35 @@
+#include "script_component.hpp"
+
+class CfgPatches {
+    class ADDON    {
+        name = COMPONENT_NAME;
+        requiredVersion = REQUIRED_VERSION;
+        units[] = {};
+        weapons[] = {};
+        magazines[] = {};
+        requiredAddons[] = {
+            "ace_medical",
+            "ace_medical_ai",
+            "ace_medical_blood",
+            "ace_medical_damage",
+            "ace_medical_engine",
+            "ace_medical_feedback",
+            "ace_medical_gui",
+            "ace_medical_statemachine",
+            "ace_medical_status",
+            "ace_medical_treatment",
+            "ace_medical_vitals",
+            "ace_dogtags",
+            "cba_settings"
+        };
+        author = "Mazinski";
+        authors[] = {"Mazinski"};
+        url = ECSTRING(main,URL);
+        VERSION_CONFIG;
+    };
+};
+
+#include "CfgEventHandlers.hpp"
+#include "CfgFunctions.hpp"
+#include "CfgVehicles.hpp"
+#include "ACE_Medical_Treatment_Actions.hpp"

addons/misc/functions/fnc_conditionExecutionDeath.sqf → addons/conversion/functions/fnc_KATConditionExecutionDeath.sqf

@@ -1,8 +1,8 @@
 #include "..\script_component.hpp"
 /*
- * Author: BaerMitUmlaut
- * Modified: Blue
- * Condition for an execution caused death (fatal injury received in cardiac arrest).
+ * Author: mharis001
+ * Edited: Blue, Mazinski.H
+ * Condition for going into cardiac arrest upon receiving a fatal injury.
  *
  * Arguments:
  * 0: Unit <OBJECT>
@@ -11,16 +11,16 @@
  * None
  *
  * Example:
- * [player] call ace_medical_statemachine_fnc_conditionExecutionDeath
+ * [player] call kat_conversion_fnc_conditionSecondChance
  *
  * Public: No
  */
 
 params ["_unit"];
 
-(if (isPlayer _unit) then {
+(if (isPlayer _unit || (GET_CONVERT_STATUS(_unit) && LIB_CONVERSION_DISTANCE(_unit))) then {
     ACEGVAR(medical_statemachine,fatalInjuriesPlayer) != FATAL_INJURIES_NEVER
 } else {
-    (ACEGVAR(medical_statemachine,fatalInjuriesAI) != FATAL_INJURIES_NEVER) && {!(_unit getVariable [QGVAR(PreventInstantAIDeath), false])}
+    (ACEGVAR(medical_statemachine,fatalInjuriesAI) != FATAL_INJURIES_NEVER) && {!(_unit getVariable [QEGVAR(misc,PreventInstantAIDeath), false])}
 })
-&& {!(_unit getVariable [QACEGVAR(medical,deathBlocked), false])}
+&& {!(_unit getVariable [QACEGVAR(medical,deathBlocked), false])}

addons/misc/functions/fnc_conditionSecondChance.sqf → addons/conversion/functions/fnc_KATConditionSecondChance.sqf

@@ -1,7 +1,7 @@
 #include "..\script_component.hpp"
 /*
  * Author: mharis001
- * Modified: Blue
+ * Edited: Blue, Mazinski.H
  * Condition for going into cardiac arrest upon receiving a fatal injury.
  *
  * Arguments:
@@ -11,15 +11,15 @@
  * None
  *
  * Example:
- * [player] call ace_medical_statemachine_fnc_conditionSecondChance
+ * [player] call kat_conversion_fnc_conditionSecondChance
  *
  * Public: No
  */
 
 params ["_unit"];
 
-if (isPlayer _unit) then {
+if (isPlayer _unit || (GET_CONVERT_STATUS(_unit) && LIB_CONVERSION_DISTANCE(_unit))) then {
     ACEGVAR(medical_statemachine,fatalInjuriesPlayer) != FATAL_INJURIES_ALWAYS
 } else {
-    ACEGVAR(medical_statemachine,fatalInjuriesAI) != FATAL_INJURIES_ALWAYS || {_unit getVariable [QGVAR(PreventInstantAIDeath), false]}
-};
+    ACEGVAR(medical_statemachine,fatalInjuriesAI) != FATAL_INJURIES_ALWAYS || {_unit getVariable [QEGVAR(misc,PreventInstantAIDeath), false]}
+}