Модератор форума: staford11  
Использование Lua скриптов.
Den40rus
Скаут
Цитата PaulDousen ()
Для проверки попал ли бы селектом в нужный ответ введи /script print(select(5,UnitDebuff("player","Черная чума")))
Первыми в чате должны появиться цифры времени до окончания


В чате вводится общее количество времени дебаффа ( т.е. 21 секунда всегда )

Добавлено (08.01.2015, 21:23)
---------------------------------------------

Цитата PaulDousen ()
if select(5,UnitDebuff("player","Черная чума") >= 20


Ввожу макрос и все начинает лагать ужасно и ничего не работает(
Сообщение # 421 написано 08.01.2015 в 21:23
Kelwin
Сержант
Den40rus, я не читал все страницы и посты этой темы и не особо хочу это делать, поэтому опишите что Вы ожидаете от скрипта.

Прочитав предыдущий пост, могу лишь сказать, что получить время до окончания действия дебаффа можно следующим способом:
Код
local name, _, _, _, _, duration, expires = UnitDebuff("player", "Черная чума")  
local SpellTimeLeft = expires - GetTime()

в переменной SpellTimeLeft содержится время до окончания действия дебаффа.
Сообщение # 422 написано 08.01.2015 в 22:04
Den40rus
Скаут
Цитата Kelwin ()
я не читал все страницы и посты этой темы и не особо хочу это делать, поэтому опишите что Вы ожидаете от скрипта.

Прочитав предыдущий пост, могу лишь сказать, что получить время до окончания действия дебаффа можно следующим способом:
Код
local name, _, _, _, _, duration, expires = UnitDebuff("player", "Черная чума")  
local SpellTimeLeft = expires - GetTime()

в переменной SpellTimeLeft содержится время до окончания действия дебаффа.


Привет есть рабочий скрипт

Deduff = CreateFrame("Frame", "DeBuffFrame", UIParent);
Deduff:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED");
Deduff:SetScript("OnEvent", function(self, event, arg1, arg2, ...)
if(event=="COMBAT_LOG_EVENT_UNFILTERED") then
if UnitDebuff("player","Молот правосудия") or UnitDebuff("player","Смерч") or UnitDebuff("player","Удар по почкам") then
local enabled = GetSpellCooldown("Каждый за себя")
if enabled == 0 then
RunMacroText("/use Каждый за себя")
end
end
end
end)

Хочется чтобы дебафы снемались спустя например 2 секунды а не сразу ...
Сообщение # 423 написано 08.01.2015 в 22:07
Kelwin
Сержант
Я советовал несколькими постами ранее сделать скрипт через OnUpdate, вот реализация. Кода многовато(по сравнению с вашей версией), но зато минимум фризов и работает как часы.
Код
local timer = 0  --эту переменную не изменять
local TimeAfter = 2 --переменная содержит необходимую задержку после получения дебаффа. Можно изменять
local FSpName = "Каждый за себя"    --переменная содержит название заклинания, которым снимается контроль. Можно изменять
function DeBuffFrame_OnUpdate(self,elapsed)
   timer = timer + elapsed
   if timer < TimeAfter then
    return
   else
    CastSpellByName(FSpName)
    timer = 0
    DeBuffFrame:SetScript("OnUpdate",nil)
   end
end

function DeBuffFrame_OnEvent(self,event,...)   
   if event == "COMBAT_LOG_EVENT_UNFILTERED" then   
    if UnitDebuff("player","Молот правосудия") or UnitDebuff("player","Смерч") or UnitDebuff("player","Удар по почкам") then   
     local enabled = GetSpellCooldown(FSpName)   
     if enabled == 0 then
      if not DeBuffFrame:GetScript("OnUpdate") then
       DeBuffFrame:SetScript("OnUpdate", DeBuffFrame_OnUpdate)
      end
     end   
    end   
   end   
end
CreateFrame("Frame", "DeBuffFrame");   
DeBuffFrame:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED");   
DeBuffFrame:SetScript("OnEvent", DeBuffFrame_OnEvent)

Приятного использования!

Добавлено (08.01.2015, 22:55)
---------------------------------------------
Этот скрипт можно усовершенствовать, добавить много разных вкусняшек и проверок, но я и так помог достаточно. Доработка за Вами, господа wink
Сообщение # 424 отредактировано Kelwin - Четверг, 08.01.2015, 23:36
Kelwin
Сержант
Цитата Necrofobianx ()
Вот поэтому и не знаю,как бы запихнуть на 1 макрос 3 абилки эти чтобы все юзались..

Одновременно - никак.
Сообщение # 425 написано 09.01.2015 в 14:44
Kelwin
Сержант
Цитата Necrofobianx ()
А если через castsequience ?

Можно.
Сообщение # 426 написано 10.01.2015 в 14:45
izikata
Скаут
подскажите есть чтонибуть на авторефлект заклинаний контроля и тд?
Сообщение # 427 отредактировано izikata - Воскресенье, 11.01.2015, 00:58
jonnykager
Скаут
чем можно заменить сдм скажите?
Сообщение # 428 написано 12.01.2015 в 12:17
Kelwin
Сержант
Код
if GetSpellCooldown("Тотем заземления") == 0 then
      TargetUnit(self.unit)  
      CastSpellByName("Тотем заземления")  
end
Сообщение # 429 написано 12.01.2015 в 22:27
temaivaaaa
Скаут
Ребята перерырл всю тему и весь вовжп , дайти скрипт на кик вару с авто сменой пухи и щита
Сообщение # 430 написано 13.01.2015 в 18:05
Kelwin
Сержант
Пробуй.
Сообщение # 431 отредактировано Kelwin - Среда, 14.01.2015, 03:24
temaivaaaa
Скаут
Извеняюсь все нашел спасибо)

Добавлено (13.01.2015, 19:27)
---------------------------------------------

Цитата Kelwin ()
Пробуй.



Я тут влез немножко =)
Выдаёт в игре Макрос заблокирован его могут юзать только Bllizard что с этим делать)? но граунд ставится
Сообщение # 432 написано 13.01.2015 в 19:27
Pyromanyak
Скаут
Посоны, для оффки есть анлокеры со скриптами?
Сообщение # 433 написано 14.01.2015 в 01:19
Kelwin
Сержант
Цитата Necrofobianx ()
Проверил то,что ты мне скинул - не работает! Просто ничего не юзается.

1. Включи отображение lua ошибок в интерфейсе.
2. Учись заниматься отладкой при помощи print.
3. "Просто ничего не юзается" не бывает, используй предыдущие 2 пункта, чтобы выяснить причину.

P.S. Перед тестированием попробуй запустить скрипт 2 раза. И скопируй скрипт из под спойлера еще раз. Удачи smile
Сообщение # 434 отредактировано Kelwin - Среда, 14.01.2015, 03:29
Evisceratos
Скаут
function Kick(self, elapsed)
local spell, _, _, _, _, endTime, _, _, interrupt = UnitCastingInfo("target")
local enabled = GetSpellCooldown("Удар щитом")
local inRange = IsSpellInRange("Удар щитом", "target")
if spell then
if interrupt == false and enabled == 0 and inRange == 1 then
RunMacro("Shieldbashkick")
end
end
end
CreateFrame("Frame", "KickFrame")
KickFrame:SetScript("OnUpdate", Kick)

Всем привет хотел бы узнать можно сделать этот скрипт как у Дк , то есть сбивать каст не мгновенно , подставлял эти строки как с заморозкой разума не работает

local finish = endTime/1000 - GetTime()
if finish <= 0.6 then

если не сложно киньте готовый кто знает буду благодарен
Сообщение # 435 отредактировано Evisceratos - Среда, 14.01.2015, 14:25
Kelwin
Сержант
Цитата Evisceratos ()
этот скрипт как у Дк

Скрипт как у дк кинь.
Сообщение # 436 написано 14.01.2015 в 14:44
Evisceratos
Скаут
Цитата Kelwin ()
Скрипт как у дк кинь.

function Kick(self, elapsed)
local spell, _, _, _, _, endTime, _, _, interrupt = UnitCastingInfo("target")
local enabled = GetSpellCooldown("Заморозка разума")
local inRange = IsSpellInRange("Заморозка разума", "target")
if spell then
if interrupt == false and enabled == 0 and inRange == 1 then
local finish = endTime/1000 - GetTime()
if finish <= 0.6 then
RunMacroText("/cast Заморозка разума")
end
end
end
end
CreateFrame("Frame", "KickFrame")
KickFrame:SetScript("OnUpdate", Kick)

на 1 странице
Сообщение # 437 написано 14.01.2015 в 16:23
light117
Рыцарь
Заменяешь из скрипта дк названия спелов, и RunMacroText("/cast Заморозка разума") на RunMacro("Shieldbashkick") ну и макрос "Shieldbashkick" сделай и все вроде
Нажатие на кнопку "запомнить пароль" не поможет вам запомнить пароль
Сообщение # 438 написано 14.01.2015 в 17:21
Kelwin
Сержант
Цитата Evisceratos ()
RunMacro("Shieldbashkick")

Меня интересует содержимое этого макроса тоже.
Сообщение # 439 написано 14.01.2015 в 17:37
temaivaaaa
Скаут
Цитата Necrofobianx ()
tema,если тебе нужно для циркуля то гагарин 1.7 на этом форуме тебе нужен,а если другие сервера то подойдет AccLua,опять же на этом форуме найдешь

Создал еще 1 твинка такаяже шляпа
http://immage.biz/images/2015/01/14/C8mK69.jpg
И гагарин и Прожект дизаблер нечего не помогает от окошка , скрипт работает но оно дико мешает кто что может посоветовать)?

Добавлено (14.01.2015, 18:47)
---------------------------------------------

Цитата Necrofobianx ()
tema,если тебе нужно для циркуля то гагарин 1.7 на этом форуме тебе нужен,а если другие сервера то подойдет AccLua,опять же на этом форуме найдешь

Создал еще 1 твинка такаяже шляпа
http://immage.biz/images/2015/01/14/C8mK69.jpg
И гагарин и Прожект дизаблер нечего не помогает от окошка , скрипт работает но оно дико мешает кто что может посоветовать)?
Через супер дупер макро писал
Сообщение # 440 написано 14.01.2015 в 18:47
light117
Рыцарь
Цитата Kelwin ()
Меня интересует содержимое этого макроса тоже.

Обычный макрос на одевание щита с одноручкой и сбитие каста (не играю за вара, так что этого макроса нету) Примерно там /equip пуха /equip щит /cast удар щитом (вроде так) ну и название соответственно макроса - то что указано в скрипте
Попробуй вникнуть в суть скрипта - при определенном действии и условиях он запускает твой макрос - тот, которым ты в обычное время без скриптов можешь сбить каст

Добавлено (14.01.2015, 19:27)
---------------------------------------------

Цитата temaivaaaa ()
И гагарин и Прожект дизаблер нечего не помогает от окошка , скрипт работает но оно дико мешает кто что может посоветовать)?

Попробуй запустив гагарина прописать /reload
Нажатие на кнопку "запомнить пароль" не поможет вам запомнить пароль
Сообщение # 441 написано 14.01.2015 в 19:27
Kelwin
Сержант
Цитата temaivaaaa ()
Через супер дупер макро писал

Ты через скрипт пишешь?
Сообщение # 442 написано 14.01.2015 в 19:29
Evisceratos
Скаут
Цитата Kelwin ()
Меня интересует содержимое этого макроса тоже.


/cast [nostance:3, equipped: щиты] Удар щитом; [stance:3] Зуботычина;
/equipslot [nostance:3, noequipped: щиты] 16 Тесак разгневанного гладиатора
/equipslot [nostance:3, noequipped: щиты] 17 Осадный щит разгневанного гладиатора
Сообщение # 443 отредактировано Evisceratos - Среда, 14.01.2015, 20:11
light117
Рыцарь
Цитата Evisceratos ()
/cast [nostance:3, equipped: щиты] Удар щитом; [stance:3] Зуботычина;
/equipslot [nostance:3, noequipped: щиты] 16 Тесак разгневанного гладиатора
/equipslot [nostance:3, noequipped: щиты] 17 Осадный щит разгневанного гладиатора

Разве сначала не equip а только после него cast? или разницы нет
Нажатие на кнопку "запомнить пароль" не поможет вам запомнить пароль
Сообщение # 444 написано 14.01.2015 в 20:14
Kelwin
Сержант
Цитата light117 ()
Разве сначала не equip а только после него cast? или разницы нет

[equipped: щиты] - это условие. Каст производится только если условие выполняется.
Сообщение # 445 написано 14.01.2015 в 20:34
Evisceratos
Скаут
Так кто нибудь даст ответ или скрипт, на вара не в 0.01 сбивание а в 0.04 примерно ?
Сообщение # 446 написано 14.01.2015 в 21:12
Evisceratos
Скаут
Цитата Necrofobianx ()
0.01 не может быть,как и 0.04,мб ты имел в виду 0.4 сек с начала и до окончания каста,если так то 1 страница темы,почитай в самом верху,огосподи...


я уже разобрался и сдела , что мне надо.Да именно 0.4 я имел виду на 1 странице для дк только с него и переделал
Сообщение # 447 написано 14.01.2015 в 22:37
temaivaaaa
Скаут
Цитата Kelwin ()
Ты через скрипт пишешь?

Da

Добавлено (14.01.2015, 23:11)
---------------------------------------------

Цитата Necrofobianx ()
Так кто нибудь даст ответ или скрипт, на вара не в 0.01 сбивание а в 0.04 примерно ?

0.01 не может быть,как и 0.04,мб ты имел в виду 0.4 сек с начала и до окончания каста,если так то 1 страница темы,почитай в самом верху,огосподи...

Это не дк а вар , он пока оденит пуху пройдет 0.09s а дальше кик работать не будет ибо будет уже 0.5
Сообщение # 448 написано 14.01.2015 в 23:11
h3yAlias
Чемпион
Пацаны ребята
В топике были скрипты на автофейк каста и сало на мага, чарж+автокик на вара, авторефлект контролля на вара
Если да, скиньте ссылку плз
2 часа ночи как никак
Сообщение # 449 написано 15.01.2015 в 02:11
light117
Рыцарь
Появляется впечатление, что часть пользователей не может понять простого объяснения и желает чтобы им предоставили готовую версию. И еще часть пользователей что не может разблокировать луа..
P.S. Я нихера не смыслю в луа, да и вообще в языках программирования, но тупо прочитать скрипт и переделать его из готовых вариантов у меня не составило труда
Нажатие на кнопку "запомнить пароль" не поможет вам запомнить пароль
Сообщение # 450 написано 15.01.2015 в 14:51
Поиск: