Макросы для Друида

[nxtlvl]

БАФЫ:

Баф корни, а потом лапка (почему-то корни после лапки не работают)

/script z=0;for i=1,16 do t=UnitBuff("target", i) if (t and string.find(t,"Thorns")) or (t and string.find(t,"Mark of the Wild")) then z=1 end end; if z==1 then CastSpellByName("Mark of the Wild") else CastSpellByName("Thorns");end;

---

Баф + баф по контролу (требуется нажатие курсором по иконке с зажатым Ctrl)

/script c=IsControlKeyDown()if©then CastSpellByName("Thorns()");else CastSpellByName("Mark of the Wild()");end;

---

КОШКА/МЕДВЕДЬ:

Кошка удар со спины стелс/без стелса (важен порядок строк)

/cast ”Ravage()”;
/cast “Shred”();

---

Если нет 5 комбо кастует Глубокую рану. Если есть, то Разорвать. (виды ударов и количество комбо меняйте по желанию)

/script CN=CastSpellByName;if (GetComboPoints()>=5) then CN("Rip");end;if UnitMana("Player")>=35 then CN("Rake");end

---

Глубокая рана + цапнуть по контролу(требуется нажатие курсором по иконке с зажатым Ctrl)

/script c=IsControlKeyDown()if©then CastSpellByName("Rake()");else CastSpellByName("Claw()");end;

---

Тигриное неистовство и Полоснуть

/script i=1;m=0;while(UnitBuff("player",i)~=nil) do if(strfind(UnitBuff("player",i),"Ability_Mount_Jun gleTiger")~=nil) then m=1; end;i=i+1;end; c=CastSpellByName; if(m==1) then c("Claw");else c("Tiger's Fury");end;

---

Накинуться и Полоснуть

/script i=1;m=0;while(UnitBuff("player",i)~=nil) do if(strfind(UnitBuff("player",i),"Ability_Ambush")~ =nil) then m=1; end;i=i+1;end; c=CastSpellByName; if(m==1) then c("Ravage");else c("Shred");end;

---

Глубокая рана/Цапнуть

/script i=1;m=0;while(UnitDebuff("target",i)~=nil) do if(strfind(UnitDebuff("target",i),"Ability_Druid_D isembowel")~=nil) then m=1; end;i=i+1;end; c=CastSpellByName; if(m==1) then c("Claw");else c("Rake");end;

---

Облик медведя/Рывок

/script bI, bN, bIA = GetShapeshiftFormInfo(1); if bIA then CastSpellByName"Feral Charge" else CastShapeshiftForm(1) end /script cI, cN, cIA = GetShapeshiftFormInfo(3); if cIA then CastShapeshiftForm(3) end

---

Цапнуть/Свирепый укус при 5 кп

/script if IsShiftKeyDown() then CastSpellByName("Ferocious Bite") end /script if GetComboPoints()==5 then CastSpellByName("Ferocious Bite") else CastSpellByName("Claw");end

---

Облик медведя

/script local s,_ for i=1,5 do _,_,s=GetShapeshiftFormInfo(i)if s then CastShapeshiftForm(i)break end end if not s then CastShapeshiftForm(1) end

---

Облик кошки/Невидимость

/script bI, bN, bIA = GetShapeshiftFormInfo(3); if bIA then CastSpellByName"Prowl" else CastShapeshiftForm(3) end

ЛЕЧЕНИЕ:

Исцеление себя без потери цели

/script TargetUnit("player")
/cast rejuvenation
/script TargetLastTarget()

---

Исцеление танка без потери цели (значение "party2" меняем в зависимости от места танка в группе)

/script TargetUnit("party2")
/cast rejuvenation
/script TargetLastTarget()

---

Лечение если нет такого (проверяет на наличие ХОТа)

/script fred = 0 for i=1,16 do if UnitBuff("target", i) then if string.find(UnitBuff("target", i), "Rejuvenation") then fred = 1 end end end if fred == 0 then CastSpellByName("Rejuvenation") end

---

Лечение если жизни меньше 70% у 10 близ целей

/script for i=1,10 do TargetNearestFriend(); if UnitHealth("target")/UnitHealthMax("target") < 0.7 then if UnitIsPlayer("target") then CastSpellByName("Rejuvenation") end end end; TargetLastEnemy();

---

Спам лунного огня

/script k=0;a="Interface\\Icons\\Spell_Nature_StarFall";fo r i=1,3 do if(a==UnitDebuff("target",i)) then k=1;end;end;if(k~=1) then CastSpellByName("Moonfire(Rank 10)") else CastSpellByName("Moonfire(Rank 9)");end; [HR]

[Кепчик]

Облик медведя

/script local s,_ for i=1,5 do _,_,s=GetShapeshiftFormInfo(i)if s then CastShapeshiftForm(i)break end end if not s then CastShapeshiftForm(1) end

спасибо, очень полезный скрипт и работает на ру клиенте
если поменять CastShapeshiftForm(1) на 3 то получиться для кота

[Zico-Zico]

/script for i=1,10 do TargetNearestFriend(); if UnitHealth("target")/UnitHealthMax("target") < 0.7 then if UnitIsPlayer("target") then CastSpellByName("Rejuvenation") end end end; TargetLastEnemy();

можно ли этот макрос расширить до 40 целей с проверкой на наличие ХОТа?

[Могриф]

спасибо, очень полезный скрипт и работает на ру клиенте
если поменять CastShapeshiftForm(1) на 3 то получиться для кота

у меня не пашет!!! что дает это макрос??


Кошка удар со спины стелс/без стелса (важен порядок строк)

/cast ”Ravage()”;
/cast “Shred”();
этот тоже не пашет

[Pa3peIIIeHue]

Можно ли создать макрос на друида, чтобы с его помощью входил в форму кошки/медведя, но при повторном нажатии не выходил из формы? Можно ещё было бы с приёмом каким-то связать.

[ecelop]

какого куя они все на англиском языке ?