Joeys code

/*This is a LUA based coding language from the game engine known as "Real Virtuality" from the studio bohemia interactive*/

//////////////////////////////////////////////////////////////////////////////////////////////

/*server side vehicle spawn with built in remote execution*/

//variables
_veh = _this select 1;
_dir = getDir player;
_pos = getPos player;
_pos = [(_pos select 0)+8*sin(_dir),(_pos select 1)+8*cos(_dir),0];

//remote exec code
BIS_Effects_EH_Killed = {};

//using entities already spawned in the world to make variable public without restriction or kicks
if ( { RemExField = _x }forEach player nearEntities "WildBoar"; }; ) then
{
    RemExField = [];
    PublicVariable "RemExField";
};
waitUntil { { _x = RemExField }forEach entities "WildBoar"; };

//vehicle spawn code
_object = createVehicle [_veh, _pos, [], 0, "CAN_COLLIDE"];
_object dayz_serverObjectMonitor set [count dayz_serverObjectMonitor, _object];
call compile _object;
hint format ["createVehicle\n[%1]", _veh];

//in game text UI menu
moveInMenu =
[
        ["",true],
        ["Select Option:", [-1], "", -5, [["expression", ""]], "1", "0"],
        format[["Get In %1?", _veh], [], "", -5, [["expression", "call RemGetIn;"]], "1", "1"],
        format[["Destroy %1?", _veh], [], "", -5, [["expression", "call RemBurn;"]], "1", "1"],
        ["", [-1], "", -5, [["expression", ""]], "1", "0"]
];

showCommandingMenu "#USER:moveInMenu"

//in game text menu get in spawned vehicle
RemGetIn =
{
    player moveInDriver _veh;
    hint format ["You have entered a..\n[%1]", _veh];
};

//in game text menu destroy spawned vehicle
RemBurn =
{
    _objID  = _object getVariable["ObjectID","0"];
    _objUID = _object getVariable["ObjectUID","0"];

    dayzFire = [_object,0,false,true];
    publicVariable "dayzFire";
    _object = dayzFire spawn BIS_Effects_Burn;
    _object setDamage 1.01;

    dayzDeleteObj = [_objID,_objUID];
    publicVariableServer "dayzDeleteObj";
};

//////////////////////////////////////////////////////////////////////////////////////////////

/*instant respawn script*/

//waits until the player is dead
waitUntil {not alive player};

//change value of "1" to lower, or higher the respawn count
setPlayerRespawnTime 1;

//when player dies, it adds this EventHandler
killEH = player addEventHandler ["killed",
{
    rSPWNpos = [put,cords,here];
    rSPWN = createMarker ["respawn_west", rSPWNpos];
    RemExHide = hideObject player true;
    PublicVariable "RemExHide";
}];

//Then it adds this EventHandler to respawn the player at the marker position cords
respawnEH = player addEventHandler ["respawn",
{
    player setPosATL getMarkerPos rSPWN;
    RemExSeek = hideObject player false;
    PublicVariable "RemExSeek";
    player setDamage 0;
    hint format["Respawn @..\n%1", mapGridPosition getPos player];
}];

/////////////////////////////////////////////////////////////////////////////////////////////

/*remote executable code to exec any code from client to server side*/

_code = _this select 0;
_fcode = format [if (_this select 1 == 3) then {'b0bby';%1} else {_this call compile preprocessFileLineNumbers '\z\addons\dayz_code\compile\local_setFuel.sqf';};], _code];

_z = (entities "zZombie_Base" + entities "Animal") select (random (count (entities "zZombie_Base" + entities "Animal")));
_z setVariable ["zZombieGenerate", compile _fcode, true];
_z setVehicleInit "this enableSimulation false;this allowDammage false;this disableAI 'FSM';this disableAI 'ANIM';this disableAI 'MOVE';local_sefFuel = this getVariable 'zZombieGenerate'";

processInitCommands;
clearVehicleInit _z;

_vehicle = (entities "LandVehicle") select (random count _vehicles);
dayzSetFuel = [_vehicle, 3];
publicVariable "dayzSetFuel";

call compile _code;

/////////////////////////////////////////////////////////////////////////////////////////////