Files
DayZ-Epoch/dayz_server/compile/server_publishVehicle.sqf
2013-01-20 09:36:43 -06:00

134 lines
3.8 KiB
Plaintext

private["_object","_worldspace","_location","_dir","_character","_tent","_class","_id","_uid","_dam","_hitpoints","_selection","_array","_damage","_randFuel","_fuel","_key","_result","_outcome","_totaldam","_parts","_retry","_done","_spawnDMG"];
//[_veh,[_dir,_location],"V3S_Civ",true]
_object = _this select 0;
_worldspace = _this select 1;
_class = _this select 2;
_spawnDMG = _this select 3;
_characterID = _this select 4;
_fuel = 1;
_damage = 0;
_array = [];
diag_log ("PUBLISH: Attempt " + str(_object));
_dir = _worldspace select 0;
_location = _worldspace select 1;
//Generate UID
_uid = _worldspace call dayz_objectUID2;
// _uid = format["%1%2",dayZ_instance,_uid];
if (_spawnDMG) then {
_fuel = 0;
if (getNumber(configFile >> "CfgVehicles" >> _class >> "isBicycle") != 1) then {
// Create randomly damaged parts
_totaldam = 0;
_hitpoints = _object call vehicle_getHitpoints;
{
_dam = 0;
if(["Body",_x,false] call fnc_inString) then {
_dam = call generate_new_damage;
};
if(["Engine",_x,false] call fnc_inString) then {
_dam = call generate_exp_damage;
};
if(["HRotor",_x,false] call fnc_inString) then {
_dam = call generate_new_damage;
};
if(["Fuel",_x,false] call fnc_inString) then {
_dam = call generate_exp_damage;
};
if(["Wheel",_x,false] call fnc_inString) then {
_dam = call generate_new_damage;
};
if(["Glass",_x,false] call fnc_inString) then {
_dam = call generate_new_damage;
};
_selection = getText(configFile >> "cfgVehicles" >> _class >> "HitPoints" >> _x >> "name");
if (_dam > 0) then {
_array set [count _array,[_selection,_dam]];
_totaldam = _totaldam + _dam;
};
} forEach _hitpoints;
// just set low base dmg - may change later
_damage = 0;
// 50% chance that vehicle will have a little gas
_randFuel = random(1);
if(_randFuel > 0.5) then {
_fuel = random(0.5);
};
};
};
//Send request
_key = format["CHILD:308:%1:%2:%3:%4:%5:%6:%7:%8:%9:",dayZ_instance, _class, _damage , _characterID, _worldspace, [], _array, _fuel,_uid]; // Change this to dynamic parts damage and fuel
diag_log ("HIVE: WRITE: "+ str(_key));
_key call server_hiveWrite;
_done = false;
_retry = 0;
// TODO: Needs major overhaul
while {_retry < 15} do {
// GET DB ID
_key = format["CHILD:388:%1:",_uid];
diag_log ("HIVE: WRITE: "+ str(_key));
_result = _key call server_hiveReadWrite;
_outcome = _result select 0;
if (_outcome == "PASS") then {
_oid = _result select 1;
_object setVariable ["ObjectID", _oid, true];
diag_log("CUSTOM: Selected " + str(_oid));
_done = true;
_retry = 100;
} else {
diag_log("CUSTOM: trying again to get id for: " + str(_uid));
_done = false;
_retry = _retry + 1;
};
};
if(!_done) exitWith { deleteVehicle _object; diag_log("CUSTOM: failed to get id for : " + str(_uid)); };
// disable marker later
//_marker = createMarker [str(_location) , _location];
//_marker setMarkerShape "ICON";
//_marker setMarkerType "DOT";
//_marker setMarkerText (typeOf _object);
//_marker setMarkerColor "ColorBlue";
// try this instead of commented out ID code above
// worked except vehicle pos was not saved
// _object setVariable ["ObjectUID", _uid, true];
_object setVariable ["lastUpdate",time];
_object setVariable ["CharacterID", _characterID, true];
_object setDamage _damage;
// Set Hits after ObjectID is set
{
_selection = _x select 0;
_dam = _x select 1;
if (_selection in dayZ_explosiveParts and _dam > 0.8) then {_dam = 0.8};
[_object,_selection,_dam] call object_setFixServer;
} forEach _array;
_object setvelocity [0,0,1];
_object setFuel _fuel;
_id = _object spawn fnc_vehicleEventHandler;
dayz_serverObjectMonitor set [count dayz_serverObjectMonitor,_object];
diag_log ("PUBLISH: Created " + (_class) + " with ID " + str(_uid));