Extract

if (isServer) then
{
hint "Extract Inbound to EZ Milan";

private _type = "rhs_ch_47f";
private _side = "WEST";
private _side2 = WEST;

private _crew = "B_Helipilot_F";
private _crewno = 3;

private _pos_Spawn = getMarkerPos "EX2_S";
_pos_Spawn vectorAdd [0,0,30];

private _EX1LZ = getpos LZ_MILA;

sleep 600;

private _EXH1 =  createVehicle [_type,_pos_Spawn,[],0,"FLY"];
_EXH1 engineOn true;
private _EXH1_G = createGroup [_side2, true];
private _EXH1_U = _EXH1_G createUnit [_crew, _pos_Spawn, [], 0, "NONE"];
private _EXH1_L = group _EXH1_U selectLeader _EXH1_U;
_EXH1_U moveindriver _EXH1;
private _Hcounter = 0;
while {_Hcounter < _crewno} do {
    _newHC = _crew createUnit [_pos_Spawn, _EXH1_G, "this moveinAny _EXH1;"];
    _Hcounter = _Hcounter + 1; };

EXH2 = _EXH1;
EXH2_G = _EXH1_G;

private _EXH1_DIR = _EXH1 getDir _EX1LZ;
_EXH1 setDir _EXH1_DIR;
_EXH1 setPos [(getPos _EXH1) select 0, (getpos _EXH1) select 1, 10];

_EXH1_G setCombatMode "BLUE";
_EXH1_G setBehaviour "CARELESS";
_EXH1_G setSpeedMode "FULL";


// [_EXH1_G, _EX1LZ, LZ_STAR] spawn BIS_fnc_wpLand;

_EXH1_W1 = _EXH1_G addWaypoint [_EX1LZ, 0];
_EXH1_W1 setWaypointType "LOAD";
_EXH1_W1 setwaypointstatements ["true", "(vehicle this) LAND 'GET IN';"];

fuckoff2 = 0;
_EXH1 addAction ["<t color='#00FF00'>LIFT</t>",{params ["_caller"]; fuckoff2 = fuckoff2 + 1;},[],1.5,true,true,"","true",5,false,"",""];
waitUntil {fuckoff2>0};

_EXH1_W2 = _EXH1_G addWaypoint [_pos_Spawn,0];
_EXH1_W2 setWaypointType "TR UNLOAD";

};