Страница 81 из 81«12798081
Модератор форума: staford11 
Форум » Хитрости Пиратских серверов » Читы для WoW » Использование Lua скриптов.
Использование Lua скриптов.
raeras
Скаут
Ребят, подскажите макрос на lua, который имитирует castsequence, но нажимать его нужно будет только один раз. i.e: 
/castsequence spell1, spell2, ... , spelln
Сообщение # 2401 написано 21.07.2017 в 17:13
mikel17
Скаут
Помогите пожалуйста , сделать скрипт для вара на авто ярость берсерка , 3.3.5|PQR, я пытался переделать скрипт на автодиспел, но не работает.
Вот , что получилось -

function Berserker(self, elapsed)
local v1, v2, v3
v1 = { "player" }
for i = 1, #v1 do
if UnitExists(v1) and UnitCanAttack("player", v1) == nil and UnitDebuff(v1,"Смерч") == nil then
v2 = {"Ментальный крик", "Страх", "Вой ужаса", "Покаяние", "Устрашающий крик"}
v3 = {"Ментальный крик", "Страх", "Вой ужаса", "Покаяние", "Устрашающий крик"}
for j = 1, #v2 do
CastSpellByName("Ярость берсерка", v1)
end
end
for j = 1, #v3 do
if UnitHealth(v1) / UnitHealthMax(v1) * 100 >= 1 and UnitDebuff(v1, v3
) and GetSpellCooldown("Ярость берсерка") <= 2 and IsSpellInRange("Ярость берсерка", v1) == 1 then
CastSpellByName("Ярость берсерка", v1
)
end
end
end
end
end

CreateFrame("Frame", "BerserkerFrame")
BerserkerFrame:SetScript("OnUpdate", Berserker)
Сообщение # 2402 отредактировано mikel17 - Суббота, 22.07.2017, 11:36
alimali
Скаут
поцаны, а че пкр уже не в моде? слышал что сейчас есть патчи на гкд, эт реально??
Сообщение # 2403 написано 22.07.2017 в 15:24
ganus1993
Сержант
mikel17, перемудрил конечно:) не гарантирую что все будет работать , но всеже...

function Berserker(self, elapsed)
if UnitDebuff("player","Ментальный крик") or UnitDebuff("player","Страх") or UnitDebuff("player","Вой ужаса") or UnitDebuff("player","Покаяние") or UnitDebuff("player","Устрашающий крик") then
local enabled = GetSpellCooldown("Ярость берсерка")
if enabled == 0 and not UnitDebuff("player","Смерч") then   ----- тут докинешь нужные дебафы
CastSpellByName("Ярость берсерка")
end
end
end
CreateFrame("Frame", "BerserkerFrame")
BerserkerFrame:SetScript("OnUpdate", Berserker)

примерно так, допилишь проверишь самостоятельно
Пишу макросы
Сообщение # 2404 отредактировано ganus1993 - Воскресенье, 23.07.2017, 14:58
RUSisakov
Скаут
ребят кто-нибуть может написать макрос на смену валанира после её прока на травмуа после кд 60 сек он снова одевал валанир писать типо от этого макроса нет смысла не надо)
Сообщение # 2405 отредактировано RUSisakov - Среда, 26.07.2017, 16:01
Kieg
Капрал
На ювове начали банить за аддон SDM. Есть варианты как не поймать бан? Ренеймнил аддон - не помогло.
Сообщение # 2406 написано 24.07.2017 в 19:58
PaulDousen
Рыцарь
Kieg, написать свой, что бы наверняка.
Сообщение # 2407 написано 24.07.2017 в 21:29
sanfishman22
Скаут
Ребят, чот рою страницы, не найду для биндпада скрипта на рог, может знает кто страницу? или есть у кого? по приоритету:
Ловля ванишем всякой гадости, если ванишь кд то блайнд в ответ, если блайнд в кд то юзать рассовую людей. С меня +
под 3.3.5
Сообщение # 2408 отредактировано sanfishman22 - Вторник, 25.07.2017, 23:01
mikel17
Скаут
пытался переделать рефлект для пвара (на арена таргеты) но он почему-то срабатевает не всегда, 3.3.5а.
Код
function REFL(self, elapsed)
if UnitExists and UnitCastingInfo("arena1") then
local spell, _, _, _, _, endTime, _, _, interrupt = UnitCastingInfo("arena1")
local finish = endTime/1000 - GetTime()
local enabled = GetSpellCooldown("Отражение заклинания")
local enabled2 = GetSpellCooldown("Боевой крик")
local power = UnitPower("player")
local SpellBase = {"Сглаз","Стрела Хаоса","Смерч","Превращение","Страх","Выброс лавы"}  
for v=1,#SpellBase do                
if spell == SpellBase [v]and finish <= 0.6 then
if power < 15 and enabled2 == 0 then
CastSpellByName("Боевой крик")
elseif power > 15 then
if GetShapeshiftForm() ~= 1 and index ~= 2 then
CastSpellByName("Оборонительная стойка")
end  
if enabled == 0 then
if GetInventorySlotInfo("MainHandSlot") ~= 71362 then  -- здесь вместо 71362 вписываешь id своего однорука
EquipItemByName(71362)         -- здесь вместо 71362 вписываешь id своего однорука
EquipItemByName(67061)         -- здесь вместо 67061 вписываешь id своего щита
end
CastSpellByName("Отражение заклинания")
end  
end  
end  
end   
end    
end             
CreateFrame("Frame", "REFLFrame")
REFLFrame:SetScript("OnUpdate", REFL)

function REFL(self, elapsed)
if UnitExists and UnitCastingInfo("arena2") then
local spell, _, _, _, _, endTime, _, _, interrupt = UnitCastingInfo("arena2")
local finish = endTime/1000 - GetTime()
local enabled = GetSpellCooldown("Отражение заклинания")
local enabled2 = GetSpellCooldown("Боевой крик")
local power = UnitPower("player")
local SpellBase = {"Сглаз","Стрела Хаоса","Смерч","Превращение","Страх","Выброс лавы"}  
for v=1,#SpellBase do                
if spell == SpellBase [v]and finish <= 0.6 then
if power < 15 and enabled2 == 0 then
CastSpellByName("Боевой крик")
elseif power > 15 then
if GetShapeshiftForm() ~= 1 and index ~= 2 then
CastSpellByName("Оборонительная стойка")
end  
if enabled == 0 then
if GetInventorySlotInfo("MainHandSlot") ~= 71362 then  -- здесь вместо 71362 вписываешь id своего однорука
EquipItemByName(71362)         -- здесь вместо 71362 вписываешь id своего однорука
EquipItemByName(67061)         -- здесь вместо 67061 вписываешь id своего щита
end
CastSpellByName("Отражение заклинания")
end  
end  
end  
end   
end    
end             
CreateFrame("Frame", "REFLFrame")
REFLFrame:SetScript("OnUpdate", REFL)

function REFL(self, elapsed)
if UnitExists and UnitCastingInfo("arena3") then
local spell, _, _, _, _, endTime, _, _, interrupt = UnitCastingInfo("arena3")
local finish = endTime/1000 - GetTime()
local enabled = GetSpellCooldown("Отражение заклинания")
local enabled2 = GetSpellCooldown("Боевой крик")
local power = UnitPower("player")
local SpellBase = {"Сглаз","Стрела Хаоса","Смерч","Превращение","Страх","Выброс лавы"}  
for v=1,#SpellBase do                
if spell == SpellBase [v]and finish <= 0.6 then
if power < 15 and enabled2 == 0 then
CastSpellByName("Боевой крик")
elseif power > 15 then
if GetShapeshiftForm() ~= 1 and index ~= 2 then
CastSpellByName("Оборонительная стойка")
end  
if enabled == 0 then
if GetInventorySlotInfo("MainHandSlot") ~= 71362 then  -- здесь вместо 71362 вписываешь id своего однорука
EquipItemByName(71362)         -- здесь вместо 71362 вписываешь id своего однорука
EquipItemByName(67061)         -- здесь вместо 67061 вписываешь id своего щита
end
CastSpellByName("Отражение заклинания")
end  
end  
end  
end   
end    
end             
CreateFrame("Frame", "REFLFrame")
REFLFrame:SetScript("OnUpdate", REFL)
Сообщение # 2409 написано 26.07.2017 в 11:41
ganus1993
Сержант
Цитата mikel17 ()
пытался переделать рефлект для пвара (на арена таргеты) но он почему-то срабатевает не всегда, 3.3.5а.
UnitExists сигнатуры не указали
UnitExists("arena1")  UnitExists("arena2")  UnitExists("arena3")
все три функции одинаково названы, хотябы
REFL1 REFL2 REFL3
если писали для прото зачем нагромождения в виде смены стойки и оружия
зачем добавлять обновление крика во время каста при недостатке раги (up<15) ? просто бесполезный спам крика(расход up)
Пишу макросы
Сообщение # 2410 отредактировано ganus1993 - Среда, 26.07.2017, 12:44
mikel17
Скаут
Цитата ganus1993 ()
UnitExists сигнатуры не указалиUnitExists("arena1")  UnitExists("arena2")  UnitExists("arena3")
все три функции одинаково названы, хотябы
REFL1 REFL2 REFL3
на 1 таргет работает, на несколько - нет, если копировать со сменой названия - неработает
Код
function REFL(self, elapsed)
if UnitExists("target") and UnitCastingInfo("target") then
local spell, _, _, _, _, endTime, _, _, interrupt = UnitCastingInfo("target")
local finish = endTime/1000 - GetTime()
local enabled = GetSpellCooldown("Отражение заклинания")
local SpellBase = {"Сглаз","Стрела Хаоса","Смерч","Превращение","Страх","Выброс лавы"}  
for v=1,#SpellBase do                
if spell == SpellBase [v]and finish <= 0.6 then
if GetShapeshiftForm() ~= 1 and index ~= 2 then
CastSpellByName("Отражение заклинания")
end  
end  
end  
end
end

CreateFrame("Frame", "REFLFrame")
REFLFrame:SetScript("OnUpdate", REFL)
Сообщение # 2411 отредактировано mikel17 - Среда, 26.07.2017, 14:41
sanfishman22
Скаут
Цитата sanfishman22 ()
Ребят, чот рою страницы, не найду для биндпада скрипта на рог, может знает кто страницу? или есть у кого? по приоритету:Ловля ванишем всякой гадости, если ванишь кд то блайнд в ответ, если блайнд в кд то юзать рассовую людей. С меня +
под 3.3.5
На ванишь вроде как куча их, а именно такого чот не видно.  Макросы писать иф таргет каст и тд зен каст  тд... не канает) ибо через сдм тыкать надо. Местные умельцы подсобите
Сообщение # 2412 написано 26.07.2017 в 19:24
alexdubovyck
Скаут
Цитата alimali ()
поцаны, а че пкр уже не в моде? слышал что сейчас есть патчи на гкд, эт реально??


Как тебе такой?


+есть для варов, но можно сделать рейнджу любому классу:
Мой ютуб канал: www.youtube.com/user/alexdubovyck
Сообщение # 2413 отредактировано alexdubovyck - Среда, 26.07.2017, 23:31
Rimz
Скаут
Проблема в гагарине.Сделал все по инструкции ,выбрал функцию нажал пуск и выскочило окошко с текстом
can't attach the final part, probably something already attached to your game. Как решить эту проблему ?? Может есть какой-то аналог гагарину?
Сообщение # 2414 написано Вчера в 20:39
mikel17
Скаут
Цитата Rimz ()
Проблема в гагарине.Сделал все по инструкции ,выбрал функцию нажал пуск и выскочило окошко с текстом can't attach the final part, probably something already attached to your game. Как решить эту проблему ?? Может есть какой-то аналог гагарину?
Скорее всего у вас процессор AMD. Гагарин поддерживает только Intel. 
Есть альтернатива PriorityQueueRotation
Сообщение # 2415 написано Вчера в 20:43
Форум » Хитрости Пиратских серверов » Читы для WoW » Использование Lua скриптов.
Страница 81 из 81«12798081
Поиск: