tpw_furniture_fnc_delete.sqf

_modloc = _this select 0;
_range = _this select 1;
for "_i" from 0 to count tpw_furniture_houses - 1 do
    {
    _bld = tpw_furniture_houses select _i;
    if (_bld distance _modloc <= _range) then
        {
            {
            deletevehicle _x;
            sleep 0.05;
            } count (_bld getvariable "tpw_spawned");
        _bld setvariable ["tpw_furnished",1];
        _bld setvariable ["tpw_spawned",[]];
        //tpw_furniture_houses set [_i,-1];
        tpw_furniture_houses deleteAt _i;
        };
    };