0.1

dayz_code/medical/load/load_act.sqf

@@ -0,0 +1,33 @@
+// Load_act.sqf
+// JULY 2010 - norrin
+
+private ["_args","_dragger","_vcl","_wounded"];
+
+_args		= _this select 3;
+_dragger 	= _args select 0;
+_vcl 		= _args select 1;
+_wounded	= _args select 2;
+r_drag_sqf 	= false;
+r_action = false;
+r_action_load = false;
+call fnc_usec_medic_removeActions;
+
+_dragger removeAction NORRN_loadWoundedAction;
+  
+if ((_vcl emptyPositions "cargo") > 0) then
+{	
+	detach _wounded;
+	_dragger  switchMove "";
+	_wounded setVariable ["NORRN_LoadVcl", _vcl, true];
+	sleep 1;
+	[_wounded] execVM "\z\addons\dayz_code\medical\load\load_wounded.sqf";
+	norrnRLact = _wounded;
+	publicVariable "norrnRLact";
+	player removeAction NORRN_dropAction;
+}else{
+	
+	hint "No space left in vehicle";
+};
+NORRN_load_wounded_action = true;
+
+if (true) exitWith {};

dayz_code/medical/load/load_wounded.sqf

@@ -0,0 +1,51 @@
+// Load_wounded.sqf
+// OCTOBER 2010 - norrin
+
+private ["_wounded","_vcl","_group"];
+
+_wounded 	= _this select 0;
+
+if (!local _wounded) exitWith {};
+
+sleep 1;
+_vcl = _wounded getVariable "NORRN_loadVcl";
+_wounded setVariable ["NORRN_unit_dragged", true, true];
+
+_wounded assignAsCargo _vcl; 
+_wounded moveInCargo _vcl;
+sleep 1;
+norrnRALW = _wounded;
+publicVariable "norrnRALW";
+_wounded switchMove "kia_hmmwv_driver";
+
+if (local _wounded) then 
+{	
+	waitUntil {!(_wounded getVariable "NORRN_unconscious")|| !alive _wounded || vehicle _wounded == _wounded || (assignedVehicleRole _wounded) select 0 != "Cargo"};
+	
+	if (vehicle _wounded == _wounded || (assignedVehicleRole _wounded) select 0 != "Cargo") exitWith 
+	{
+		if (_wounded getVariable "NORRN_AIunconscious") then
+		{	
+			if (vehicle _wounded != _wounded) then
+			{
+				unassignVehicle _wounded;
+				sleep 0.05;
+				_wounded action ["EJECT", _vcl];
+				sleep 1;
+			};
+			norrinRAlie = _wounded;
+			publicVariable "norrinRAlie";
+			_wounded switchMove "ainjppnemstpsnonwrfldnon";
+			_wounded setVariable ["NORRN_unit_dragged", false, true];
+			sleep 1;
+		};
+	};
+	
+	if (vehicle _wounded != _wounded && alive _wounded) then
+	{	
+		_wounded  playMove "BasicDriver";
+	};
+};
+sleep 0.01;
+if (true) exitWith {};
+

dayz_code/medical/load/unLoad_act.sqf

@@ -0,0 +1,37 @@
+// unLoad_act.sqf
+// AUGUST 2010 - norrin
+
+private ["_args","_dragger","_vcl","_wounded"];
+
+_args		= _this select 3;
+_name 		= _args select 0;
+_vcl 		= _args select 1;
+_crewVcl	= crew _vcl;
+
+_name removeAction NORRN_pullOutAction;
+
+for [{ _loop = 0 },{ _loop < count _crewVcl },{ _loop = _loop + 1}] do
+{
+	_unit = _crewVcl select _loop; 
+
+	if (_unit getVariable "NORRN_unconscious") then
+	{
+		unassignVehicle _unit;
+		sleep 0.05;
+		_unit action ["EJECT", _vcl];
+		sleep 1;
+		_position = position _unit;
+		_isOnDeck = getPos _unit in LHA_Deck;
+		if (_isOnDeck) then {
+			_unit setPosAsl [(_position select 0), (_position select 1), (LHA_height+1)];
+		};
+		_unit switchMove "";
+		_unit switchMove "ainjppnemstpsnonwrfldnon";
+		sleep 0.2;
+		norrnRalie = _unit;
+		publicVariable "norrnRalie";
+	};
+	sleep 0.1;
+};
+
+if (true) exitWith {};