Использование Lua скриптов. - Страница 67 - Форум

Страница 67 из 87 « 1 2 … 65 66 67 68 69 … 86 87 »
Модератор форума: staford11

Использование Lua скриптов.

s3ek

Скаут

Репутация: 2

Цитата PaulDousen (

)

s3ek, /run if LineOfSight(цель) then каст end

К сожалению строчка с таким условием не работает вообще sad

/run if LineOfSight("Заклинание") then CastSpellByName("Заклинание","focus") end

Сообщение # 1981 написано 01.12.2016 в 00:15

prn

Скаут

Репутация: 3

Из готовых скриптов есть на
3.3.5а Бдк фул пве ротация + автокики

4.3.4 ферал пве ротация + решифты(под каст ханта испугать зверя и замедления)+сбитие кастов+циклоны+ корни+ хилки вообщем все спелы на автопилоте под 2с 3с арену

4.3.4 энх перестановка томемов автодиспел злых бафов ,тотемы антифир и граундинг под конец кастов все спелы на авто

5.x.x ретрик и вар ,у вара все спелы вписаны авторефлект автозамедление +макс дпс в цель +сбитие кастов

6.2.3 вот тут самое интересное
баланс дру все спелы на авто + фишки(циклоны с учетом диминишинга на цели те не кидает 2 раза подряд циклон в 1 цель авторешифт чтобы уходить от меликов когда они вблизи)+ учет всех арена таргетов если они за колоннами те скрипт незацикливается если цель вне зоны доступа или за колонной + самая последняя разработка сова для бг (авто перепрыг на разные таргеты и мультидот по всем с максимальным дпс + учет количества целей и автопереключение на ротацию в одиночную цель если все апдотаны)

ферал- циклоны диминишиг ну и все спелы прописаны

адк- все спелы + сбитие каста от пета от самого дк

ну и так из простого автокики, рефлекты, граундинг под касты,также реакция на мгновенные касты типа автошвд у приста или каста антифира в кинутый инстанный фир или каста антисала в маговскую антимагию , открытие роги новой при попытке сапа,отмены каста своего если цель или цели на арене прожали что-то типа рефлекта,также первое открытие рог на арене если два в стелсе(отлично работало на дреноре ферал без проблем открывал любых рог с 98% на других не тестил)

скину расскажу как установить и запускать ну и перепишу если что-то не понравится или надо будет поменять
за работу с вас услуга по прокачке чара придется потратить 7 часов пока я сплю и сам не смогу играть smile

хочу получить первого на сервере
обращайтесь время до 18.00 мск субботы

Сообщение # 1982 написано 01.12.2016 в 15:10

RUSisakov

Скаут

Репутация: 0

ребят киньте макрос на запомненую цель картошку шамы с проверкой её на наличие картошки

Сообщение # 1983 написано 01.12.2016 в 19:49

ganus1993

Сержант

Репутация: 84

ЦитатаRUSisakov (

)

ребят киньте макрос на запомненую цель картошку шамы с проверкой её на наличие картошки

/run f=0; if UnitExists("focus") then for i=1,40 do d={UnitBuff("focus",i)}; if d~=nil and d[1]=="Щит земли" and d[8]=="player" and d[4]>1 and d[7]-GetTime()>=60 then f=1; break end end if f==0 then RunMacroText("/cast [@focus] Щит земли") end end;

Пишу макросы и профили PQR
Моя подборка пве скриптов-ротаций 3.3.5

Сообщение # 1984 написано 02.12.2016 в 07:04

RUSisakov

Скаут

Репутация: 0

ребят дайте ссылку для профилей 3.3.5 для PQR пол интернета облазил ни чего не нашол PVE Ротаций

Сообщение # 1985 отредактировано RUSisakov - Понедельник, 05.12.2016, 22:34

Eligoslol

Тёмный™

Репутация: 783

Поделитесь пожалуйста профилями для фури вара PvE под 3.3.5а, так же нуждаюсь в скриптах на армса (автокика будет достаточно).

Сообщение # 1986 написано 07.12.2016 в 12:51

sanfishman22

Капрал

Репутация: 5

за 67 страниц уже испысаны множество ротаций пве и автокиков, поищите и найдёте

Сообщение # 1987 написано 08.12.2016 в 12:42

gas_

Скаут

Репутация: 0

люди, тема такая. есть bindpad. sdm выдает множество ошибок, вообщем его не трогать. работаем с bindpad. как разбить скрипт на части. что то вроде
if UnitBuff(какойто баф) then заставить скрипт нажать кнопку, на которую забинден другой скрипт, на примере bindpad CLICK BindPadMacro:1
ибо места не хватает. описал крайне упрощенно, но нужно именно так. спасибо

Сообщение # 1988 отредактировано gas_ - Вторник, 13.12.2016, 00:36

Midvay3

Скаут

Репутация: 0

function Inter(self, elapsed)
for a=1,3 do
local spell, , , , , endTime, , , interrupt = UnitCastingInfo("party"..a)
local enabled = GetSpellCooldown("Очищение")
local inRange = IsSpellInRange("Очищение","party1")
if UnitDebuff("party1", "Глубокая заморозка","Страх","Кулак правосудия","Молот правосудия","Изгнание зла","Превращение","Замораживающая ловушка","Ментальный крик") then
if enabled==0 then
if inRange==1 then
RunMacro("Диспел")
end
end
end
end
end
CreateFrame("Frame", "InterFrame")
InterFrame:SetScript("OnUpdate", Inter)

Нук знатоки скриптов скажите. Будет ли работать тако скрипт на диспел, переделаный из скрипта (Интервейт)

Сообщение # 1989 написано 18.12.2016 в 18:54

PaulDousen

Рыцарь

Репутация: 47

Midvay3, нет

Сообщение # 1990 написано 20.12.2016 в 03:20

sess

Скаут

Репутация: 0

Цитата PaulDousen (

)

local losframe = CreateFrame("Frame")local lostable = {}
local function LineOfSight(target)
losframe:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED")
function LOSFRAMEOnEvent(self,event,...)
if event=="COMBAT_LOG_EVENT_UNFILTERED" then
local _, subEvent, _, sourceGUID, _, _, _, _, _, _, _, _, _, _, spellFailed = ...
if subEvent == "SPELL_CAST_FAILED" and sourceGUID == UnitGUID("player") then
if spellFailed == SPELL_FAILED_LINE_OF_SIGHT
then
lostable [target]= {t = GetTime() + 1.5}
end
end
end
end
losframe:SetScript("OnEvent",LOSFRAMEOnEvent)
if lostable [target]then
if lostable[target].t <= GetTime() then
lostable [target]= nil
return true
end
return false
else
return true
end
end

Функция проверки лоса, уже не первый раз кидаю, но почему-то все просят каждый раз

Цитата

/run if LineOfSight(цель) then каст end

Message: [string "return LineOfSight(target)"]:1: attempt to call global 'LineOfSight' (a nil value)

функции LineOfSight нет
скрипт нерабочий
лучше такое не кидать, не проверив сначала

Сообщение # 1991 отредактировано sess - Вторник, 20.12.2016, 13:53

PaulDousen

Рыцарь

Репутация: 47

sess, скрипт рабочий. Не моя проблема, что кто-то, не знает базовых основ для использования.

Лучше подобных комментариев не оставлять, если нет навыков для проверки.

Сообщение # 1992 написано 21.12.2016 в 11:24

kosten74

Скаут

Репутация: 0

на патч 5.4.8 скрипты на дк пойдут?

Сообщение # 1993 написано 21.12.2016 в 23:12

sanfishman22

Капрал

Репутация: 5

ребят, где ошибка подскажите? вроде всё верно, но не юзает команду взять, 3.3.5 контэнт

Код

/run CastSpellByName("!Автоматическая стрельба");s="Глушащий выстрел";if(GetSpellCooldown(s)==0)then CastSpellByName(s)end;s="Убийственный выстрел";if(GetSpellCooldown(s)==0 and IsUsableSpell(s))then CastSpellByName(s)end;RunMacro("Hunt2")

Код

/run cd=GetSpellCooldown;s="Выстрел химеры";if(cd(s)==0)then CastSpellByName(s)end;s="Прицельный выстрел"; if(cd(s)==0)then CastSpellByName(s)end;s="Команда \"Взять!"; if(cd(s)==0)then CastSpellByName(s)end;CastSpellByName("Верный выстрел")

мозги кипят уже, единственный вариант пока только так:

Код

/cast Команда "Взять!"
/run CastSpellByName("!Автоматическая стрельба");s="Глушащий выстрел";if(GetSpellCooldown(s)==0)then CastSpellByName(s)end;s="Убийственный выстрел";if(GetSpellCooldown(s)==0 and IsUsableSpell(s))then CastSpellByName(s)end;RunMacro("Hunt2")

Код

/run cd=GetSpellCooldown;s="Выстрел химеры";if(cd(s)==0)then CastSpellByName(s)end;s="Прицельный выстрел";if(cd(s)==0)then CastSpellByName(s)end;CastSpellByName("Верный выстрел")

Сообщение # 1994 отредактировано sanfishman22 - Четверг, 22.12.2016, 12:21

ganus1993

Сержант

Репутация: 84

sanfishman22,

Код

/run if GetSpellCooldown("Убийственный выстрел")==0 and IsUsableSpell("Убийственный выстрел") and IsSpellInRange("Убийственный выстрел","target") and UnitHealth("target")/UnitHealthMax("target")<0.2 then CastSpellByName("Убийственный выстрел") end
/run if UnitAffectingCombat("player") and UnitExists("focus") and GetSpellCooldown("Перенаправление")==0 and IsSpellInRange("Перенаправление","focus") then RunMacroText("/cast [@focus] Перенаправление") end
/run if (not UnitDebuff("target", "Укус змеи", nil, "PLAYER")) then RunMacroText("/cast Укус змеи") end
/run local _,d,_ = GetSpellCooldown("Глушащий выстрел") if (d == 0) then CastSpellByName("Глушащий выстрел") end
/run local _,d,_ = GetSpellCooldown("Выстрел химеры") if (d == 0) then CastSpellByName("Выстрел химеры") end
/run local _,d,_ = GetSpellCooldown("Прицельный выстрел") if (d == 0) then CastSpellByName("Прицельный выстрел") end
/run local _,d,_ = GetSpellCooldown("Верный выстрел") if (d == 0) then CastSpellByName("Верный выстрел") end
/startattack

Проверки к остальным спеллам можете сделать по аналогии с килшотом, лень полностью прописывать все.

Пишу макросы и профили PQR
Моя подборка пве скриптов-ротаций 3.3.5

Сообщение # 1995 отредактировано ganus1993 - Четверг, 22.12.2016, 15:32

Urchikstd3

Скаут

Репутация: 0

Ребят, может кто подсказать луа анлокер для 7.0.3 файршторм, а то EWT не анлочит почему то.
И собственно сам скрипт на дк чтоб при проке килмашины он юзал ледяную косу, если прока нет,то уничтожение?

Сообщение # 1996 написано 22.12.2016 в 21:29

roooj

Скаут

Репутация: 0

Доброго всем времени суток
Есть умелец, который может написать скрипты для воина для 5.4.8?

Сообщение # 1997 написано 23.12.2016 в 01:54

RUSisakov

Скаут

Репутация: 0

Есть у каво скрипт на ротацию совы 3.3.5 ато мой скрипт маленько кривовато работает

Цитата

/run if (not UnitDebuff("target", "Волшебный огонь"))then CastSpellByName("Волшебный огонь") end
/run if (not UnitDebuff("target", "Лунный огонь", nil, "PLAYER"))then CastSpellByName("Лунный огонь") end
/run if (not UnitDebuff("target", "Рой насекомых", nil, "PLAYER"))then CastSpellByName("Рой насекомых") end
/run if UnitBuff("player","Лунное затмение") then CastSpellByName("Звездный огонь") else CastSpellByName("Гнев") end

Или доработайте этот чтобы после конца прока( Лунное затмение ) он бил (Звездный огонь) до прока ( Солнечное затмение )

Сообщение # 1998 отредактировано RUSisakov - Понедельник, 26.12.2016, 22:58

ganus1993

Сержант

Репутация: 84

Цитата

Есть у каво скрипт на ротацию совы 3.3.5 ато мой скрипт маленько кривовато работает

Код

/run RegisterCVar("Затмение","Гнев")
/run if not UnitDebuff('target','Волшебный огонь') and UnitHealth('target')>150000 and not UnitDebuff('target','Волшебный огонь (Зверь)') then CastSpellByName('Волшебный огонь') end
/run d={UnitDebuff('target','Лунный огонь')}if(d[8]~='player') then CastSpellByName('Лунный огонь') end
/run b={UnitDebuff('target','Рой насекомых')}if(b[8]~='player') then CastSpellByName('Рой насекомых') end
/run if UnitBuff("player","Лунное затмение") then SetCVar("Затмение","Звездный огонь") else if UnitBuff("player","Солнечное затмение") then SetCVar("Затмение","Гнев") end end
/run CastSpellByName(GetCVar("Затмение"))

Чет я сегодня добрый:)

Пишу макросы и профили PQR
Моя подборка пве скриптов-ротаций 3.3.5

Сообщение # 1999 написано 27.12.2016 в 11:59

sanfishman22

Капрал

Репутация: 5

вроде всё так, но у совы чуть по другому. Не нужно поддерживать 2 доты, почитай талант "Озлобенный рой насекомых" который пишет о том, что когда цель под "Роем насекомых" то гнев нанесёт на 3% больше урона, и его нужно юзать под прок Солнечного затмения, так же и с лунным затмением, держим только 1 доту во время нужного нам прока. Разве что написать написать что бы, при проке солнечного затмения не юзал "лунный огонь" пока не закончится прок луны и так же с лунным затмением и роем насекомых, ну это для идеала. А так то можно и этот юзать)
На счёт

Цитата ganus1993 (

)

меня интересовала ошибка в моём макросе) а так то всё ясно)

Код

/run local n,_,_,_,_,_,x = UnitDebuff("target","Прикосновение вампира") if not UnitDebuff("target", "Прикосновение вампира", nil, "PLAYER") then RunMacroText("/castsequence reset=2 Прикосновение вампира") end if UnitDebuff("target","Прикосновение вампира") and -1*(GetTime()-x) <= 1.02 then RunMacroText("/castsequence reset=2 Прикосновение вампира") end

уже и castsequence reset леплю туда, но бывает часто что по второму разу кастует, из-за пинга я так понимаю?неуспевает понимать что дота уже висит, но castsequence reset не работает почему то, как можно по другому решить проблему?

Сообщение # 2000 отредактировано sanfishman22 - Пятница, 30.12.2016, 00:35

RUSisakov

Скаут

Репутация: 0

вроди не кастует 2 раза

Цитата

/run if (not UnitDebuff("target", "Всепожирающая чума", nil, "PLAYER"))then RunMacroText("/cast Всепожирающая чума") end
/run if (not UnitDebuff("target", "Прикосновение вампира", nil, "PLAYER"))then RunMacroText("/castsequence reset=8/target Прикосновение вампира, Прик") end
/run local _,a,_ = GetSpellCooldown("Пытка разума") if (a == 0) then RunMacroText("/cast [nochanneling:Пытка разума] Пытка разума ") end
/run if (not UnitDebuff("target", "Слово Тьмы: Боль", nil, "PLAYER"))then RunMacroText("/cast Слово Тьмы: Боль") end

Сообщение # 2001 написано 30.12.2016 в 02:23

sanfishman22

Капрал

Репутация: 5

Цитата RUSisakov (

)

вроди не кастует 2 раза

всё, спасибо. Ясно стало, надо было спелл дописать левый какойто на кастэквенс) спасибо

Добавлено (31.12.2016, 10:27)
---------------------------------------------
sanfishman22, sanfishman22, sanfishman22, sanfishman22,

Цитата sanfishman22 (

)

if(cd(s)==0)then CastSpellByName(s)end;s="Команда \"Взять!"; if(cd(s)==0)then CastSpellByName(s)end;

Где ошибка с "Команда "Взять!"" ?

Сообщение # 2002 написано 31.12.2016 в 10:27

ganus1993

Сержант

Репутация: 84

Цитата sanfishman22 (

)

Где ошибка с "Команда "Взять!"" ?

А нафига для этой способности мудрить, просто добавил в конец макроса
/cast Команда "Взять!"

Там как я понимаю из-за двойных ковычек не хочет реагировать,хз

Пишу макросы и профили PQR
Моя подборка пве скриптов-ротаций 3.3.5

Сообщение # 2003 написано 01.01.2017 в 17:16

PaulDousen

Рыцарь

Репутация: 47

Цитата sanfishman22 (

)

Где ошибка с "Команда "Взять!"" ?

Кавычки не закрыл
Лучше кастовать через ID

Сообщение # 2004 написано 03.01.2017 в 15:40

RUSisakov

Скаут

Репутация: 0

дайте пли3 скрипт на поддержку частицы света на 3апомненой цели

Сообщение # 2005 написано 04.01.2017 в 05:26

ganus1993

Сержант

Репутация: 84

Цитата RUSisakov (

)

дайте пли3 скрипт на поддержку частицы света на 3апомненой цели

Код

Если фокус существует, фокус живой,фокус на радиусе действия и на фокусе нет нашей частицы (вдруг холипалов больше одного) или она кончиться меньше чем через 10с кастует частицу по фокусу.
Нужное время обновления напишешь сам если не устраивает или совсем уберешь.

Пишу макросы и профили PQR
Моя подборка пве скриптов-ротаций 3.3.5

Сообщение # 2006 отредактировано ganus1993 - Среда, 04.01.2017, 07:49

RUSisakov

Скаут

Репутация: 0

чот не канает жму не чего не происходит (3.3.5 циркуль)

Цитата

/run v=0 c={UnitBuff("focus","Частица света", nil, "PLAYER")}; if c[7]~=nil then v=c[7]-GetTime(); if UnitExists("focus") and UnitIsDeadOrGhost("focus")~=1 and UnitInRange("focus")==1 and (v==0 or v<10) then RunMacroText("/cast [@focus] Частица света") end
Если фокус существует, фокус живой,фокус на радиусе действия и на фокусе нет нашей частицы (вдруг холипалов больше одного) или она кончиться меньше чем через 10с кастует частицу по фокусу.
Нужное время обновления напишешь сам если не устраивает или совсем уберешь

Сообщение # 2007 отредактировано RUSisakov - Четверг, 05.01.2017, 06:39

ganus1993

Сержант

Репутация: 84

Цитата RUSisakov (

)

чот не канает жму не чего не происходит (3.3.5 циркуль)

я наверно забыл закрыть одно условие end
Добавь в конец ещё один end
сейчас на своем пале протестирую отпишу

Добавлено (05.01.2017, 09:23)
---------------------------------------------

Код

/run v=0 c={UnitBuff("focus","Частица Света", nil, "PLAYER")}; if c[7]~=nil then v=c[7]-GetTime() end
/run if UnitExists("focus") and UnitIsDeadOrGhost("focus")~=1 and UnitInRange("focus")==1 and (v==0 or v<10) then RunMacroText("/cast [@focus] Частица Света") end

Вот так у меня работает

Пишу макросы и профили PQR
Моя подборка пве скриптов-ротаций 3.3.5

Сообщение # 2008 отредактировано ganus1993 - Четверг, 05.01.2017, 09:11

rfdead

Капрал

Репутация: -5

Код

local FDG, _, _, _, _, _, timer = UnitBuffID("focus", 53601, "player")
local focus = UnitExists("focus")

if checkSpell(53601, "focus") then
    if FDG ~= nil then
        if timer - GetTime() < 5 then
            CastSpellByID(53563)
        end
    end
end

Вот так реализуется частица по фокусу в PQR по крайней мере

Добавлено (05.01.2017, 11:18)
---------------------------------------------
А есть у кого нибудь скрипт на инти контроль пала??? имеется ввиду когда фокус или таргет кастует овцу или жабу то под конец каста в напа кастуется священная жертва , если жертва на кд то длань жертвенности ?

Обитаю тут https://vk.com/headik или тут https://vk.com/pqrwowlk
Имеется множество PQR Профилей, или займусь написанием профиля именно под вас

Сообщение # 2009 написано 05.01.2017 в 11:18

RUSisakov

Скаут

Репутация: 0

ganus1993 Всё работает спасибо!

Цитата

Сообщение # 2010 написано 05.01.2017 в 11:21

Использование Lua скриптов.

Страница 67 из 87
«
1
2
…
65
66
67
68
69
…
86
87
»

Вход на портал