Форум гильдии Pompeya

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.


Вы здесь » Форум гильдии Pompeya » Полезное » Макросы


Макросы

Сообщений 1 страница 8 из 8

1

/script TargetNearestFriend()    --таргет зеленой цели

/run for i=1,10 do TargetNearestFriend() if UnitName("target") == "ИМЯ ЦЕЛИ" then break end end
/cast Атаковать                         --берет в таргет зеленую цель с приоритетом на прописанное имя

/script TargetUnit(non)       --сброс таргета

/run i=1; while i<180 do DeleteCursorItem(PickupBagItem(i)) i=i+1; end;       --выкидывает все, что лежит в сумке и шоп. сумке, возможно и в маг.преобразователе(не проверял), при закрытом банке банк не трогает , при открытом не пробовал.

/script SetTitleRequest(номер титула)          --устанавливает титул из скобок

/script DEFAULT_CHAT_FRAME:AddMessage(string.format('%d: %s', GetCurrentTitle()))       --пишет в чат номер нынешнего титула

/script ReloadUI();         -- обновляет аддоны без релога (обновляет чат и кикает с каналов)

/script if IsPetSummoned(1) then ReturnPet(1) else SummonPet(1) end    --вызывает пета по номеру из скобок если он не вызван и отзывает если вызван

/script for i=1,10,1 do StoreBuyItem(Х,1); end
/wait 6
/script for i=1,10,1 do StoreBuyItem(Х,1); end
/wait 6
/script for i=1,10,1 do StoreBuyItem(Х,1); end
/wait 6
/script for i=1,10,1 do StoreBuyItem(Х,1); end
/wait 6                                                             -- вместо Х пишем в какой ячейке у продавца лежит предмет, который этим макросом покупается 40 штук

/Script LeaveParty()                  -- покинуть группу

/run Bag=1; L=1; i=((Bag*30)-30)+L; n=1; while i<((Bag*30)-30)+180+L do PickupBagItem(GetBagItemInfo(i)); PickupBankItem(n); i=i+1; n=n+1; end; -- переносит содержимое банка в рюкзак

Отредактировано Zambak (2016-04-24 20:08:33)

0

2

function EarnReputation_OnLoad(this)
   InGameFrame = this
   this:RegisterEvent("LOADING_END")
   this:RegisterEvent("ZONE_CHANGED")
   --this:RegisterEvent("QUEST_COMPLETE")
   ER_FindEditMacro()
   for i = 1, 48 do
      local icnum,name,body=GetMacroInfo(i)
      if name == "название макроса" and body == "тело макроса" then
            PickupMacroItem(i)
            PickupAction(номер ячейки куда создается макрос)
            --DeleteCursorItem()
         end
         return
      end
   end
   for i = 1, 48 do
      if not HasMacro(i) then
         EditMacro(i, "название", номер рисунка на макросе, "тело")
            PickupMacroItem(i)
            PickupAction(номер ячейки)
            --DeleteCursorItem()
         end
         return
   SendWarningMsg("Error! Not find free slot for edit ER Macro.")
end;                                                                                                                       

текст можно всунуть в готовый аддон (у меня в авторайд),в документ формата луа. создает макросы на новосозданых персонажах(на старых персах не работает)

0

3

/run for i=1,24 do  if UnitBuff("player",i) == "    " then CancelPlayerBuff(i) end end
  снимает баф указанный в пустых кавычках после ==

Отредактировано Zambak (2016-04-22 11:36:37)

0

4

/run function LuaV_114777_114778() return false end       вызывает НПС портующего в даланис из обсидиана. квест делать не нужно

0

5

Макрос на  все бафы и плюхи одним  кликом. Очень  удобно  после  вайпа на  осаде. Макрос  можно использовать и для  других  целелей, Действует  по  принципу  активации я  чеек на  панели. Я  поставил себе и для  смены  шмота ПВП/ПВЕ.
Пример
/run UseAction(61)
/wait 1
/run UseAction(62)
/wait 1
/run UseAction(63)
/wait 1
/run UseAction(64)
/wait 1
/run UseAction(65)
/wait 1
/run UseAction(66)
/wait 1
/run UseAction(67)
/wait 1
/run UseAction(68)
/wait 3
/run UseAction(69)

wait 1   - Время эадержки в  сек. Если  задержки нет все равно  должно  стоять  1

В  скобках № ячейки.
Номера ячеек на Вашей панели в игре:
Main Bar: 1-20
Upper Bar: 21-40
Right Bar: 41-60
Left Bar: 61-80

0

6

Макрос юзнуть  геройку  из  пульта  одним  кликом

В  мире

/run UseItemByName ("Пульт")
/wait 0.2
/run ChoiceOption(5)
/wait 0.2
/run ChoiceOption(1)

В данже

/run UseItemByName ("Пульт")
/wait 0.2
/run ChoiceOption(6)
/wait 0.2
/run ChoiceOption(2)

На осаде
/run UseItemByName ("Пульт")
/wait 0.2
/run ChoiceOption(6)
/wait 0.2
/run ChoiceOption(2)

0

7

/run ChatFrame1:ClearAllAnchors() ChatFrame1:Show() ChatFrame1Tab:Show() ChatFrame1:SetAnchor('BOTTOMLEFT','BOTTOMLEFT','', 0,-30)

сброс настроек чата

Отредактировано Zambak (2016-04-25 22:05:54)

0

8

Макросы на открытие  почты  и  банка в любом месте

/script MailFrame:Show();

/script BankFrame:Show();

Можно  только  просматривать

0


Вы здесь » Форум гильдии Pompeya » Полезное » Макросы