/run if GetSpellCooldown("Правосудие мудрости")==0 then if 100* UnitPower("player") / UnitPowerMax("player") < 35 then CastSpellByName("Правосудие мудрости","target") else CastSpellByName("Правосудие справедливости","target") end end

/run if (not UnitDebuff("target", "Прикосновение вампира", nil, "PLAYER")) and (not UnitChannelInfo("player","Пытка разума")) then RunMacroText("/cast Прикосновение вампира") end

/run if (not UnitDebuff("target", "Прикосновение вампира", nil, "PLAYER")) and (not UnitChannelInfo("player","Пытка разума")) then RunMacroText("/castsequence reset=2 Прикосновение вампира,Всепожирающая чума") end

SpellBase = {"Лик смерти", "Глубокая заморозка", "Превращение", "Молот правосудия", "Глубинный ужас"}
SpellFrame = CreateFrame("Frame", "FrameSpell", UIParent);
SpellFrame:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED");
SpellFrame:SetScript("OnEvent", function(self, event, arg1, arg2, ...)
if(event=="COMBAT_LOG_EVENT_UNFILTERED") then
    for s = 1,#SpellBase do
    local name = UnitName("player")
    if arg2 == "SPELL_CAST_SUCCESS" and name ~= arg4 and name == arg7 and arg10 == SpellBase[s] then
     local enabled = GetSpellCooldown("Тотем заземления")
     if enabled == 0 then
      CastSpellByName("Тотем заземления")
      print(arg1,arg2,...)
     end
    end
    end
end
end)SpellBase = {"Лик смерти", "Глубокая заморозка", "Превращение", "Молот правосудия","Глубинный ужас"}
SpellFrame = CreateFrame("Frame", "FrameSpell", UIParent);
SpellFrame:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED");
SpellFrame:SetScript("OnEvent", function(self, event, arg1, arg2, ...)
if(event=="COMBAT_LOG_EVENT_UNFILTERED") then
    for s = 1,#SpellBase do
    local name = UnitName("player")
    if arg2 == "SPELL_CAST_SUCCESS" and name ~= arg4 and name == arg7 and arg10 == SpellBase[s] then
     local enabled = GetSpellCooldown("Тотем заземления")
     if enabled == 0 then
      CastSpellByName("Тотем заземления")
      print(arg1,arg2,...)
     end
    end
    end
end
end)

if not tLOS then tLOS={} end
if not fLOS then fLOS=CreateFrame("Frame") end

function LineOfSight(target)
local updateRate=3
--local x1, y1 = PQR_UnitInfo(target)
fLOS:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED")
function fLOSOnEvent(self,event,...)
if event=="COMBAT_LOG_EVENT_UNFILTERED" then
local cLOG={...}
if cLOG and cLOG[2] and cLOG[2]=="SPELL_CAST_FAILED" then
local player=UnitGUID("player") or ""
if cLOG[4] and cLOG[4]==player then
if cLOG[15] then
if cLOG[15]==SPELL_FAILED_LINE_OF_SIGHT
or cLOG[15]==SPELL_FAILED_NOT_INFRONT
or cLOG[15]==SPELL_FAILED_OUT_OF_RANGE
or cLOG[15]==SPELL_FAILED_UNIT_NOT_INFRONT
or cLOG[15]==SPELL_FAILED_UNIT_NOT_BEHIND
or cLOG[15]==SPELL_FAILED_NOT_BEHIND
or cLOG[15]==SPELL_FAILED_MOVING
or cLOG[15]==SPELL_FAILED_IMMUNE
or cLOG[15]==SPELL_FAILED_FLEEING
or cLOG[15]==SPELL_FAILED_BAD_TARGETS
--or cLOG[15]==SPELL_FAILED_NO_MOUNTS_ALLOWED
or cLOG[15]==SPELL_FAILED_STUNNED
or cLOG[15]==SPELL_FAILED_SILENCED
or cLOG[15]==SPELL_FAILED_NOT_IN_CONTROL
--or cLOG[15]==Your vision of the target is obscured?
then
--tinsert(tLOS,{unit=target,time=GetTime(),x=x1,y=y1})
tinsert(tLOS,{unit=target,time=GetTime()})
end
end
end
else
if #tLOS > 0 then
table.sort(tLOS,function(x,y) return x.time>y.time end)
for i=1,#tLOS do
local time=tLOS[i].time or GetTime()
if GetTime()>time+updateRate then
tremove(tLOS,i)
end
end
end
end
end
end
fLOS:SetScript("OnEvent",fLOSOnEvent)
if #tLOS > 0 then
for i=1,#tLOS do
if tLOS and tLOS[i] and tLOS[i].unit==target
--and (tLOS[i].x - 5) <= x1 and (tLOS[i].x + 5) >= x1 and (tLOS[i].y - 5) <= y1 and (tLOS[i].y + 5) >= y1
then
--PQR_WriteToChat("\124cFFFF55FFLoS Name: "..UnitName(target))
return true
end
end
end
end