Add reliable workaround for swimming in ground and air issue

Fixes #1913

CHANGE LOG 1.0.6.2.txt

@@ -12,7 +12,7 @@
 [FIXED] Player_forceSave is now called correctly when the abort menu is opened. It was previously using the wrong variable and time.
 [FIXED] The unconscious wake up animation can no longer be skipped by using a bandage or other right click actions.
 [FIXED] Sharpening a knife will no longer delete one if the player already had a fully sharpened knife on their toolbelt (duplicate weapon).
-[FIXED] Swimming in ground when relogging on some maps again. #1913 @Cherdenko
+[FIXED] Swimming in air or ground after relog, clothes change and respawn on certain maps. #1913 @Cherdenko
 [FIXED] Arma cheats enterable on map display and create marker text box. #1915 @BigEgg17
 
 [NOTE] Fixes below are included in the mission file and server pbo as part of server package 1.0.6.1A (March 10th 2017)

SQF/dayz_code/compile/BIS_fnc/fn_halo.sqf

@@ -239,14 +239,8 @@ if (typename _this == typename []) then {
 	//--- Free fall
 	if (count _this == 2) exitwith { //Fresh spawn calling from player_monitor.fsm
 		_alt = _this select 1;
-		_unit allowDamage false;
+		_unit call fn_exitSwim;
-		_paraPosition = [_unit] call FNC_GetPos;
-		//_paraPosition set [2,_alt];
-		_para = createVehicle ["ParachuteWest", _paraPosition, [], 0, "CAN_COLLIDE"];
-		_para setpos _paraPosition;
-		_unit moveindriver _para; //Workaround for stuck swimming in air on maps with respawn_west in water. Can't setPos to ground first because antiTP blocks it.
 		_unit setvariable ["bis_fnc_halo_now",true];
-		_unit allowDamage true;
 		_unit spawn bis_fnc_halo;
 	};
 	//-------------

SQF/dayz_code/compile/fn_exitSwim.sqf

@@ -0,0 +1,11 @@
+//This workaround reliably exits swimming after a setPos directly from water to land or air.
+//"Getting out while IsMoveOutInProgress" prints to client RPT, but it's needed to complete quickly and should be harmless.
+
+_unit = _this;
+_unit allowDamage false;
+_paraPosition = [_unit] call FNC_GetPos;
+_para = "ParachuteWest" createVehicleLocal [0,0,0];
+_para setPos _paraPosition;
+_unit moveInDriver _para;
+deleteVehicle _para;
+_unit allowDamage true;

SQF/dayz_code/compile/player_switchModel.sqf

@@ -113,6 +113,7 @@ _switchUnit = {
 	_rndy = floor(random 100);
 	_oldUnit setPosATL [(respawn_west_original select 0) + _rndx, (respawn_west_original select 1) + _rndy, 0];
 	_newUnit setPosATL _position;
+	if (surfaceIsWater respawn_west_original) then {_newUnit call fn_exitSwim;};
 	removeAllWeapons _oldUnit;
 	{_oldUnit removeMagazine _x;} count magazines _oldUnit;
 	if !(isNull _oldUnit) then {deleteVehicle _oldUnit;};

SQF/dayz_code/init/compiles.sqf

@@ -18,6 +18,7 @@ if (!isDedicated) then {
 	
 	fn_dropItem = compile preprocessFileLineNumbers "\z\addons\dayz_code\compile\fn_dropItem.sqf";
 	fn_dynamicTool = compile preprocessFileLineNumbers "\z\addons\dayz_code\compile\fn_dynamicTool.sqf";
+	fn_exitSwim = compile preprocessFileLineNumbers "\z\addons\dayz_code\compile\fn_exitSwim.sqf";
 	fn_nearWaterHole = compile preprocessFileLineNumbers "\z\addons\dayz_code\compile\fn_nearWaterHole.sqf";
 	player_zombieCheck = compile preprocessFileLineNumbers "\z\addons\dayz_code\compile\player_zombieCheck.sqf";	//Run on a players computer, checks if the player is near a zombie
 	player_zombieAttack = compile preprocessFileLineNumbers "\z\addons\dayz_code\compile\player_zombieAttack.sqf";	//Run on a players computer, causes a nearby zombie to attack them

SQF/dayz_code/system/player_monitor.fsm

@@ -995,6 +995,7 @@ class FSM
                          "	player setPosATL [_setPos select 0,_setPos select 1,DZE_HaloSpawnHeight];" \n
                          "} else {" \n
                          "	player setPosATL _setPos;" \n
+                         "	if (surfaceIsWater respawn_west_original) then {player call fn_exitSwim;};" \n
                          "};" \n
                          "" \n
                          "player setVelocity [0,0,0.5];" \n

SQF/dayz_server/init/server_functions.sqf

@@ -268,16 +268,4 @@ array_reduceSize = {
 
 // Precise base building 1.0.5
 call compile preprocessFileLineNumbers "\z\addons\dayz_server\compile\kk_functions.sqf";
-#include "mission_check.sqf"
+#include "mission_check.sqf"
-
-/*
-	Create platform if respawn_west position is in water
-	Makes sure player is standing instead of swimming when teleported to land or air
-*/
-private "_platform";
-if (surfaceIsWater respawn_west_original) then {
-	_platform = createVehicle ["Land_Dirthump01",[0,0,0],[],0,"CAN_COLLIDE"];
-	_platform setPosASL [respawn_west_original select 0, respawn_west_original select 1, -0.1];
-	_platform setVehicleInit "this enableSimulation false;this allowDamage false;";
-	processInitCommands;
-};