private ["_vfxstate","_dmg","_pdmg","_dstate","_epicenter","_DynamicBlur"];
_epicenter = _this select 0;
_range = _this select 1;

_vfxstate = 0;
_dstate = 0;
_pdmg = 0;
_dmg = 0;

while {true} do
{
    _objects=list _epicenter;
    if (count _objects>0) then
    {
        {if ((!alive _x) or (!(_x isKindOf "MAN")) or (_x isKindOf "bloodsucker") or (_x isKindOf "gsc_scientist1")or (_x isKindOf "gsc_scientist2"))then {_objects=_objects-[_x];};}ForEach _objects;
        {
            if ((_x distance _epicenter)<_range) then
            {
                if (local _x) then
                {
                    _dmg = (_x getVariable "DAP_RADIATION_DAMAGE");
                    if (isNil("_dmg")) then {_dmg = 0; _x setVariable ["DAP_RADIATION_DAMAGE",0];};

                    _dmg = (_dmg + 0.025);
                    if (_x == player) then {_pdmg = _pdmg + 0.025};
                
                    _x setVariable ["DAP_RADIATION_DAMAGE",_dmg];
                    _x setDammage ((damage _x)+0.025);
                };
            };
        
        }ForEach _objects;
    };
    
    _pos = (_epicenter modelToWorld [0,0,0]);
    _manpos = (player modelToWorld [0,0,0]);
    _dist=(player distance [_pos select 0, _pos select 1, _manpos select 2]);

    if (_dist<=(_range+25) and (player hasWeapon "DAP_DETECTOR") and (_dstate==0)) then
    {
        _epicenter setVariable ["DAP_DETECTOR_STATE",1];
        [_epicenter,_range,1] execVM "DAPANOMALIES\Scripts\Detector.sqf";
        _dstate=1;
    };
    
    if (_dist>(_range+25) and (player hasWeapon "DAP_DETECTOR") and (_dstate==1)) then
    {
        _epicenter setVariable ["DAP_DETECTOR_STATE",0];
        _dstate=0;
    };

    if ((_dist<=_range) and (!(player isKindOf "DAP_MutantBase")) and (!(player isKindOf "DAP_ZombieBase"))) then
    {
        if (_vfxstate==0) then
        {
            _DynamicBlur = ppEffectCreate ["dynamicBlur", 465];
            _DynamicBlur ppEffectEnable true;
            _DynamicBlur ppEffectCommit 0.1;
            _vfxstate=1;
        
        };
        
        _fxb=(_pdmg*3);
        _DynamicBlur ppEffectCommit 0.1;
        _DynamicBlur ppEffectAdjust [_fxb];
    };
    
    if ((_dist>_range) and (!(player isKindOf "DAP_MutantBase"))and (!(player isKindOf "DAP_ZombieBase")) and (_vfxstate==1)) then
    {
            ppEffectDestroy _DynamicBlur;
            _vfxstate = 0;
            _pdmg = 0;
    };
    
    sleep 1;
};

private ["_state","_dist","_range"];

_epicenter = _this select 0;
_range = _this select 1;
_type = _this select 2;

_beepcount=_range;

_state = _epicenter getVariable "DAP_DETECTOR_STATE";

if (_type==0) then {
    While {(_state==1)} do
    {
        _state = _epicenter getVariable "DAP_DETECTOR_STATE";
        _pos = (_epicenter modelToWorld [0,0,0]);
        _manpos = (player modelToWorld [0,0,0]);
        _dist=(player distance [_pos select 0, _pos select 1, _manpos select 2]);
        _beepcount=_beepcount+2.5;
        if (_dist<=(_range+25) and (_beepcount>=_dist)and (player hasWeapon "DAP_DETECTOR")) then {PlaySound "dap_beep_detector";_beepcount=_range;};

        sleep 0.25;
    };
};
if (_type==1) then {
    While {(_state==1)} do
    {
        _state = _epicenter getVariable "DAP_DETECTOR_STATE";
        _pos = (_epicenter modelToWorld [0,0,0]);
        _manpos = (player modelToWorld [0,0,0]);
        _dist=(player distance [_pos select 0, _pos select 1, _manpos select 2]);
        _beepcount=_beepcount+2.5;
        if (_dist<=(_range+25) and (_beepcount>=_dist)and (player hasWeapon "DAP_DETECTOR")) then {PlaySound "dap_beep_geiger";_beepcount=_range;};

        sleep 0.25;
    };
};