function DAL.VAR.CheckDistanceA(pUnit)
    local id = pUnit:GetInstanceID() or 1
    DAL[id] = DAL[id] or {VAR={}}
    if DAL[id].VAR.Sinclari and pUnit:GetDistanceYards(DAL[id].VAR.Sinclari) > 50 then
        DAL[id].VAR.Sinclari:SendChatMessage(14,0,"Do not think to take my guardian away from me!")
        for _,v in pairs(pUnit:GetInRangeUnits()) do
            if v:IsAlive() then
                pUnit:CastSpellOnTarget(11, v)
            end
        end
    end
end