how do i make the server delete bodies after a certain ammount of time?

[piff]

the dead bodies are lagging and I would like to remove them after 15 minutes time,

 

[TheDave72]

A friend gave me this a while back "extra_cleanup.fsm":

// Dayz Custom cleanup script


if (isServer) then {
[] spawn
{
waitUntil {!(isNil "sm_done")};

_lastUpdate = diag_tickTime;
_lastZombieCheck = diag_tickTime;
_lastNeedUpdate = diag_tickTime;
_lastDeadCheck = diag_tickTime;
_lastFPSCleanup = diag_tickTime;
_lastItemCheck = diag_tickTime;

while {true} do {
if (((diag_tickTime - _lastUpdate) > 600)) then
{
_lastUpdate = diag_tickTime;
private ["_date","_dateNum","_diff","_result","_outcome"];
_result = "CHILD:307:" call server_hiveReadWrite;
_outcome = _result select 0;
if(_outcome == "PASS") then {
_date = _result select 1;
_dateNum = dateToNumber(_date);
_diff = ( _dateNum - dateToNumber (date) )*365*24*60;
if ( abs(_diff)>5 ) then {
setDate _date;
dayzSetDate = _date;
publicVariable "dayzSetDate";
};
};
};
if ((count needUpdate_objects) > 0 && (diag_tickTime -_lastNeedUpdate>40)) then
{
_lastNeedUpdate = diag_tickTime;
{
needUpdate_objects = needUpdate_objects - [_x];
[_x,"all", true] call server_updateObject;

} forEach needUpdate_objects;
};
if ((diag_tickTime - _lastZombieCheck) > 360) then {
_lastZombieCheck = diag_tickTime;
{
if (local _x) then {
_x enableSimulation false;
_myGroupX = group _x;
_x removeAllMPEventHandlers "mpkilled";
_x removeAllMPEventHandlers "mphit";
_x removeAllMPEventHandlers "mprespawn";
_x removeAllEventHandlers "FiredNear";
_x removeAllEventHandlers "HandleDamage";
_x removeAllEventHandlers "Killed";
_x removeAllEventHandlers "Fired";
_x removeAllEventHandlers "GetOut";
_x removeAllEventHandlers "Local";
clearVehicleInit _x;
deleteVehicle _x;
deleteGroup _myGroupX;
_x = nil;
};
} forEach allMissionObjects "Animal";

//Disable Zombie Server Side Simulation
{
if (local _x) then {
_x enableSimulation false;
_myGroupX = group _x;
_x removeAllMPEventHandlers "mpkilled";
_x removeAllMPEventHandlers "mphit";
_x removeAllMPEventHandlers "mprespawn";
_x removeAllEventHandlers "FiredNear";
_x removeAllEventHandlers "HandleDamage";
_x removeAllEventHandlers "Killed";
_x removeAllEventHandlers "Fired";
_x removeAllEventHandlers "GetOut";
_x removeAllEventHandlers "Local";
clearVehicleInit _x;
deleteVehicle _x;
deleteGroup _myGroupX;
_x = nil;
};

} forEach entities "zZombie_Base";
};

if (((diag_tickTime - _lastItemCheck) > 450)) then
{
_lastItemCheck = diag_tickTime;
private ["_delQty","_keep","_nearby","_myGroupX","_delQtyAnimalR","_delQtyAnimal","_xtypeanimal","_missionObjs","_qty","_animaltype"];

//Server Cleanup
_missionObjs = allMissionObjects "ReammoBox";
_qty = count _missionObjs;
{
if ((local _x) or (_qty > 750)) then {
// set to true if you have sidemissions
_keep = _x getVariable ["permaLoot",false];
_nearby = {isPlayer _x} count (_x nearEntities [["CAManBase"], 100]);
if ( (!_keep) && (_nearby==0) ) then {
deleteVehicle _x;
_x = nil;
};
};
} forEach _missionObjs;
};

//Player Groups Cleanup
{
if (count units _x==0) then {
deleteGroup _x;
_x = nil;
};
} forEach allGroups;

{
_myGroupX = group _x;
_x removeAllMPEventHandlers "mpkilled";
_x removeAllMPEventHandlers "mphit";
_x removeAllMPEventHandlers "mprespawn";
_x removeAllEventHandlers "FiredNear";
_x removeAllEventHandlers "HandleDamage";
_x removeAllEventHandlers "Killed";
_x removeAllEventHandlers "Fired";
_x removeAllEventHandlers "GetOut";
_x removeAllEventHandlers "Local";
clearVehicleInit _x;
deleteVehicle _x;
deleteGroup _myGroupX;
_x = nil;
} forEach entities "Seagull";
sleep 5;
};
};
};

(Just put it in your dayz_server.pbo under "system" and add this at the bottom of your server_functions.sqf:

#include "\z\addons\dayz_server\system\extra_cleanup.fsm";

You might want to tweak the intervals to your liking.