local _,_,_,c,_,_,_,_,_=UnitBuff("target","Жизнецвет"); if UnitHealth("target")/UnitHealthMax("target")<0.75 and (c~=3) and not UnitBuff("player","Природная стремительность") and UnitExists("target") and UnitInRange("target")==3 and UnitIsDeadOrGhost("target")~=3 then CastSpellByName("Жизнецвет") end

if m>100 and UnitHealth(w) / UnitHealthMax(w) * 100 <= 99 and IsMounted() == nil and UnitChannelInfo("player")==nil and UnitCastingInfo("player")==nil and IsSpellInRange("Омоложение", w) == 1 and UnitBuff(w,"Омоложение") == nil and GetSpellCooldown("Омоложение")==0 then
CastSpellByName("Омоложение", w)
end

local function check(u)
   if IsSpellInRange("Слово силы: Щит",u) and not UnitDebuff(u, "Ослабленная душа") then
      for _,v ipairs({"метки Халиона", "чума", "осквернение Лича"}) do
         if UnitDebuff(u,v) then return true end 
      end
   end
end

for i=1,GetNumRaidMembers() do
   local u = "raid"..i
   if check(u) then CastSpellByName("Слово силы: Щит",u) end
end

local f = CreateFrame("frame")
f:SetScript("OnUpdate",function()
   for i=1,GetNumRaidMembers() do
      local u = "raid"..i
      if check(u) then CastSpellByName("Слово силы: Щит",u) end
   end
end)

/run t="raid"; nps=1; npe=GetNumRaidMembers(); if npe==0 then t="party"; nps=0; npe=GetNumPartyMembers() end; m=0; w=f; for i=nps,npe do if i==0 then tt="player" else tt=t..i end; if UnitExists(tt) and UnitInRange(tt)==1 and UnitIsDeadOrGhost(tt)~=1 and not UnitDebuff(tt,"Неконтролируемое бешенство") and not UnitDebuff(tt,"Ледяной склеп") and not UnitDebuff(tt,"Господство над разумом") and not UnitDebuff(tt,"Каменная хватка") and not UnitDebuff(tt,"Безумие") and not UnitDebuff(tt,"Морозная стрела") and not UnitDebuff("tt","Цепи Кел'Тузада") and not UnitDebuff(tt,"Изгнание") and not UnitDebuff(tt,"Смертельная рана") and not UnitDebuff(tt,"Изгнание Тьмы") and not UnitDebuff(tt,"Мутация") then a=UnitHealthMax(tt)-UnitHealth(tt); if a>m then m=a w=tt end end end; if m>100 then RunMacroText("/target "..w.."") end
/run if UnitHealth("target")/UnitHealthMax("target")<0.98 and UnitHealth("target")/UnitHealthMax("target")>0.82 and not UnitBuff("target", "Обновление",nil, "PLAYER") and GetSpellCooldown("Обновление")==0 and UnitExists("target") and UnitInRange("target")==1 and UnitIsDeadOrGhost("target")~=1 then CastSpellByName("Обновление") end
/run if UnitHealth("target")/UnitHealthMax("target")<0.88 and UnitBuff("player", "Всплеск света") and GetSpellCooldown("Быстрое исцеление")==0 and UnitExists("target") and UnitInRange("target")==1 and UnitIsDeadOrGhost("target")~=1 then CastSpellByName("Быстрое исцеление") end
/run if UnitHealth("target")/UnitHealthMax("target")<0.79 and GetSpellCooldown("Исповедь")==0 and UnitExists("target") and UnitInRange("target")==1 and UnitIsDeadOrGhost("target")~=1 and UnitPower("player")>4000 and target==Magalena then CastSpellByName("Исповедь") end
/run if UnitHealth("target")/UnitHealthMax("target")<0.80 and GetSpellCooldown("Связующее исцеление")==0 and UnitExists("target") and UnitInRange("target")==1 and UnitIsDeadOrGhost("target")~=1 and UnitPower("player")>5000 then CastSpellByName("Связующее исцеление") end
/run if UnitHealth("target")/UnitHealthMax("target") <=1 and IsSpellInRange("Слово силы: Щит", "target") and not UnitBuff("target", "Слово силы: Щит") and not UnitDebuff("target", "Ослабленная душа") then CastSpellByName("Слово силы: Щит","target") end