Сборник полезных скриптов

Вводим команду /macro

Даем имя/иконку и далее прописываем сам макрос.

_______________________________________
Случайная материлка-ругалка

/script s={"Умри, противный!","Сколько за тебя нынче Хонору дадут?","Хенде Хох!","Что в голову взбредет..."}; SendChatMessage(s[math.random(getn(s))], "SAY")

Моментальное подтверждение квеста! Без ожидания скроллинга!

/script AcceptQuest()

_______________________________________
Вот макрос шаманам для того чтобы хилить себя(не нужно выбирать самого себя).После хила противник обратно становится целью
/target yourname;
/cast Lesser Healing Wave(Rank 6);
/script TargetLastEnemy();

В скобках уровень заклинания.

_______________________________________

А это умный Хил для Друида.

/script r=10;H=UnitHealthMax("target")-UnitHealth("target");SR={41,97,213,393,617,799,1004,1285,1621,1989};for i=r,1,-1 do if (H>(SR[i])) then CastSpellByName("Healing Touch(Rank "..i..")");break;end;end;

Если цель-союзник,то макрос кастует лечение такого ранга,чтобы полностью вылечить цель.Но ваш союзник должен быть в вашей группе.
Вы должны кликнуть на макрос потом на цель.
Если уровень вашего лечения не 10 то сюда r=10,вместо цифры вставьте максимальный уровень вашего лечения.

_______________________________________

Charge для воина.Плюс в том что макрос сам меняет стойку на нужную.

/script
texture,name,isActive,isCastable = GetShapeshiftFormInfo(1);
if isActive then CastSpellByName("Charge(Rank 3)");
else CastSpellByName("Battle Stance()");
end;

Disarm для воина.Также сам менят стойку.

/script
texture,name,isActive,isCastable = GetShapeshiftFormInfo(2);
if isActive then CastSpellByName("Disarm()");
else CastSpellByName("Defensive Stance()");
end;

overpower для воина

/script
texture,name,isActive,isCastable = GetShapeshiftFormInfo(1);
if isActive then CastSpellByName("Overpower(Rank 3)");
else CastSpellByName("Battle Stance()");
end;

_____________________________________

Для рога

/script GCP=GetComboPoints();
/script if (GCP < 5) then CastSpellByName("Sinister Strike(Rank #") else CastSpellByName("Eviscerate(Rank #)"); end

Если у вас меньше 5 комб поинтов кастует Sinister strike.Когда становится больше то Evisceratе
Вместо #-уровень заклинания.

_____________________________________

Для рога.Позволяет применять бинты не теряя Комбо поинтов.

/script UseContainerItem(0,1);
/script if( SpellIsTargeting() ) then TargetUnit("player"); end

(0,1);-это-номер сумки(первая цифра) и слота в этой сумке(вторая)
Ваши сумки нумеруются так:
[4][3][2][1][0] 0-Бэкпак,1-первая сумка и т.д
Клетки нумеруются следующим образом:
Для Бэкпака:
[ 1][ 2][ 3][ 4]
[ 5][ 6][ 7][ 8]
[ 9][10][11][12]
[13][14][15][16]
;
Для 6 слотовой сумки
[1][2]
[3][4][5][6]

И т.д.(сами разберётесь)
Кстати эта нумерация пригодится для всех классов,в частности для замены оружия паладина.

_____________________________________

Команды для пета:

Список всех команд пету

/script PetAggressiveMode();
/script PetDefensiveMode();
/script PetPassiveMode();
/script PetFollow();
/script PetAttack();
/script PetStopAttack();
/script CastPetAction(X);

Для последней строки, X – номер заклинания пета в панели управления петом.

_____________________________________

Колдовство заклинаний на ближайшую цели с проверкой кол-ва % здоровья цели:
Приведу пример на основе каста хилиерских заклинаний на ближайшие цели с проверкой на кол-во здоровья цели, макрос лечит ближайшую дружественную цель со здоровьем ниже 70%, проверяются только ближайшие 40 целей.

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

_____________________________________

Быстрое использование Бинтов на самого себя:

/target [Player Name]

/script UseContainerItem(#, #);

/script TargetLastEnemy();

_____________________________________

Сообщения в различные чаты:

/script SendChatMessage("all ...","say ...","common ...")

_____________________________________

ВАЖНЕЙШИЙ МАКРОС ДЛЯ РОГОВ!

/cast Gouge
.save
/cast Stealth

Этот макрос для правильной работы гоужа, после стана входит сразуже в стелс.
Работает на негр мобов и плееров!!!

_____________________________________

Отключение имен игроков / npc:
Полезный макрос, для снятия нагрузки с экрана и любителям скриншотов

Для имен игроков:

/script if ( GetCVar("UnitNamePlayer") == "1" ) then SetCVar("UnitNamePlayer",0) else SetCVar("UnitNamePlayer",1) end

Для имен npc:

/script if ( GetCVar("UnitNameNPC") == "1" ) then SetCVar("UnitNameNPC",0) else SetCVar("UnitNameNPC",1) end

_____________________________________

Макросы для уничтожения тотемов:
Простейший вариант:

/target Totem

/cast Moonfire(Rank 1)

Более сложный вариант:

/script u=UnitName;

s=strfind;

t="target";

for i = 1,10,1 do TargetNearestEnemy()

if (not UnitCanAttack("player",t))then

break;

end;

if ((s(u(t),"Totem") or s(u(t),"Ward")) and not s(UnitCreatureType(t),"Human")) then

CastSpellByName("Shoot");

break;

end;

end;
____________________________________

Пример макроса для друида:

Nature's Swiftness + Healing Touch – без глобального кулдауна:

/cast Nature's Swiftness

/script SpellStopCasting();

/cast Healing Touch(Rank 10)

/script if ( SpellIsTargeting() ) then SpellTargetUnit ("player"); end

____________________________________

Макрос отправляющий висперы, о прекращении атаки игрокам партии, монстра которого вы хотите полиморфить:

/cast Polymorph

/script local n,p,t=UnitName,"party","target" for i=2,5 do if n(p..i) then if

UnitIsUnit(p..i..t,t) then SendChatMessage("I am about to sheep your target, please change

targets.","WHISPER",nil,n(p..i)) end end end

З.Ы. подойдет не только магу

_____________________________________

Для паладина:

Авто-бафф дружественных целей использующих Ману – Wisdom Blessing и остальных, включая себя – Might Blessing:

/script power = UnitPowerType("target"); if ( power == 0 ) then CastSpellByName("Blessing of Wisdom") else CastSpellByName("Blessing of Might") end; if ( SpellIsTargeting() ) then CastSpellByName("Blessing of Might"); TargetUnit("player"); end;

_____________________________________

Для варлока:

Колдовство страха и одновременное отключение атаки пета:

/cast Fear(Rank #)

/script PetFollow();

_____________________________________

Макрос печатающий цели квеста в пати-чат:

/script i = GetNumQuestLeaderBoards(); for j = 1, i, 1 do a1, a2, a3 = GetQuestLogLeaderBoard(j); SendChatMesssage(a1, "PARTY"); end;

Источник