Автор |
Сообщение |
Unmercey
[0.1]
Сервер: Страж Смерти
Рейтинг поля боя: 1620
2х2: 2323
3х3: 2871
|
0
Скрипты Neilyo и не только
raxijke писал(а):
Я понимаю, что уже где-то было! Но все же, подскажите скрипты на такие же панельки. Ну не могу найти :(
MainMenuBarTexture0:Hide() MainMenuBarTexture1:Hide() MainMenuBarTexture2:Hide() MainMenuBarTexture3:Hide()
MainMenuMaxLevelBar0:Hide() MainMenuMaxLevelBar1:Hide() MainMenuMaxLevelBar2:Hide() MainMenuMaxLevelBar3:Hide()
p.s Как так панельки вправо переместить?)) потестил бы уж навернека
|
05 май 2015, 22:46 |
|
|
Niggas
[-0.2]
<Бехолдэрс>
Сервер: Черный Шрам
Рейтинг поля боя: 1523
2х2: 1363
3х3: 2006
5х5: 768
|
0
Скрипты Neilyo и не только
может кто сказать вот допустим макрос
/cast [nomod] Слово Тьмы: Боль; /cast [mod:ctrl] Божественная звезда; /cast [mod:shift,@player] Придание сил
как вписать к божественной звезде ещё допустим каскад, это талы, когда меняешь тал, чтобы они в макросе тоже менялись, пробывал через exists, но это не то, что надо..
вот второй такой же макрос, только с каскадом приходится каждый раз менять на панельке
/cast [nomod] Слово Тьмы: Боль; /cast [mod:ctrl] Каскад; /cast [mod:shift,@player] Придание сил
|
06 май 2015, 11:34 |
|
|
Prometh
[2.1]
<Крестьяне хотят в топ>
Сервер: Страж Смерти
Рейтинг поля боя: 1588
2х2: 1620
3х3: 1843
|
0
Скрипты Neilyo и не только
В WoD добавили новое [условие] для талантов.
Код: #showtooltip
/cast [talent:3/1] Кольцо мороза; [talent:3/3] Ледяная хватка
|
06 май 2015, 11:51 |
|
|
Niggas
[-0.2]
<Бехолдэрс>
Сервер: Черный Шрам
Рейтинг поля боя: 1523
2х2: 1363
3х3: 2006
5х5: 768
|
0
Скрипты Neilyo и не только
Prometh писал(а):
В WoD добавили новое [условие] для талантов.
Код: #showtooltip
/cast [talent:3/1] Кольцо мороза; [talent:3/3] Ледяная хватка
если будет выглядить макрос так /cast [nomod] Слово Тьмы: Боль; /cast [mod:ctrl] [talent:6/1] Каскад; [talent:6/2] Божественная звезда /cast [mod:shift,@player] Придание сил
то он не работает.
|
06 май 2015, 11:56 |
|
|
Prometh
[2.1]
<Крестьяне хотят в топ>
Сервер: Страж Смерти
Рейтинг поля боя: 1588
2х2: 1620
3х3: 1843
|
0
Скрипты Neilyo и не только
проверь на наличие биндов на ctrl+твоя кнопка и shift+твоя кнопка. может уже что-то забиньджено и поэтому не работает.
upd: Действительно проверил и 2ой спелл с mod:ctrl не хочет работать. Единственное что могу предложить это юзать:
Код: #showtooltip /cast [nomod] Слово Тьмы: Боль /cast [mod:shift, @player] Придание сил /cast [mod:ctrl] Каскад /cast [mod:ctrl] Божественная звезда
Но в таком случае кд Божественной звезды не будет мониторится в макросе. Еще можешь попробовать добавить старый скрипт:
Код: /script a=GetSpellInfo(121135); b=GetSpellInfo(110745) /run SetMacroSpell("НАЗВАНИЕ_МАКРОСА", GetSpellInfo(a) or GetSpellInfo(b))
Правда, сомневаюсь что влезет
|
06 май 2015, 12:38 |
|
|
Niggas
[-0.2]
<Бехолдэрс>
Сервер: Черный Шрам
Рейтинг поля боя: 1523
2х2: 1363
3х3: 2006
5х5: 768
|
0
Скрипты Neilyo и не только
Prometh писал(а):
проверь на наличие биндов на ctrl+твоя кнопка и shift+твоя кнопка. может уже что-то забиньджено и поэтому не работает.
upd: Действительно проверил и 2ой спелл с mod:ctrl не хочет работать. Единственное что могу предложить это юзать:
Код: #showtooltip /cast [nomod] Слово Тьмы: Боль /cast [mod:shift, @player] Придание сил /cast [mod:ctrl] Каскад /cast [mod:ctrl] Божественная звезда
Но в таком случае кд Божественной звезды не будет мониторится в макросе. Еще можешь попробовать добавить старый скрипт:
Код: /script a=GetSpellInfo(121135); b=GetSpellInfo(110745) /run SetMacroSpell("НАЗВАНИЕ_МАКРОСА", GetSpellInfo(a) or GetSpellInfo(b))
Правда, сомневаюсь что влезет
вот и я о чём, вообщем где только не искал, такой макрос вообще нереал сделать или если даже реал, никто его ещё не выкладывал куда, что пичально, буду перетаскивать каждый раз
|
06 май 2015, 13:41 |
|
|
witcher
[14.3]
|
0
Скрипты Neilyo и не только
|
06 май 2015, 20:31 |
|
|
Niggas
[-0.2]
<Бехолдэрс>
Сервер: Черный Шрам
Рейтинг поля боя: 1523
2х2: 1363
3х3: 2006
5х5: 768
|
0
Скрипты Neilyo и не только
|
06 май 2015, 20:35 |
|
|
Sundry
[-1.6]
|
0
Скрипты Neilyo и не только
Show Percent HP AND Health Number on Target and Focus Frame
Код:
Macro 1: /run TF=CreateFrame("Frame")TFHB=TargetFrameHealthBar.TextString;TTSB=TextStatusBar_CapDisplayOfNumericValue /run FF=CreateFrame("Frame")FFHB=FocusFrameHealthBar.TextString;TTSB=TextStatusBar_CapDisplayOfNumericValue Macro 2: /run TF:SetScript("OnUpdate", function(target)TFHB:SetText(TTSB(UnitHealth("target")).."/"..TTSB(UnitHealthMax("target")).." ("..format("%.0f", ((UnitHealth("target")/UnitHealthMax("target"))*100)).."%)") end) Macro 3: /run FF:SetScript("OnUpdate", function(focus)FFHB:SetText(TTSB(UnitHealth("focus")).."/"..TTSB(UnitHealthMax("focus")).." ("..format("%.0f", ((UnitHealth("focus")/UnitHealthMax("focus"))*100)).."%)") end)
Парни, не работает в дреноре, что поменять - исправить и что исправить, что бы сделать аддон?
|
13 май 2015, 19:37 |
|
|
Prometh
[2.1]
<Крестьяне хотят в топ>
Сервер: Страж Смерти
Рейтинг поля боя: 1588
2х2: 1620
3х3: 1843
|
0
Скрипты Neilyo и не только
В стандартных настройках потыкай, там можно поставить отображение в % и кол-ве HP/MP без скриптов.
|
13 май 2015, 20:30 |
|
|
Sundry
[-1.6]
|
0
Скрипты Neilyo и не только
Prometh писал(а):
В стандартных настройках потыкай, там можно поставить отображение в % и кол-ве HP/MP без скриптов.
Нашел, спасибо. Давно не играл, видимо после лича ввели.
|
13 май 2015, 21:41 |
|
|
Madwayz
[0.1]
<Белая Русь>
Сервер: Черный Шрам
2х2: 672
3х3: 1552
|
0
Скрипты Neilyo и не только
как использовать скрип на скрывание биндов и название макросов by Fernir?или подскажите как еще так можно сделать?
|
19 май 2015, 23:00 |
|
|
cyric
[0.6]
|
0
Скрипты Neilyo и не только
Прописать в любой LUA файл любого аддона 4 строчки:
Цитата: hooksecurefunc('ActionButton_UpdateHotkeys', function(self) local macro, hotkey = _G[self:GetName()..'Name'], _G[self:GetName()..'HotKey'] if macro and hotkey then macro:Hide() hotkey:Hide() end end)
Или можно в бартендере/доминусе поставить галочку "скрывать бинды и макросы"
з.ы:
не сработает вариант со строчками, если бинды и макросы синхронизируются с серверами.
Нужно сначала выполнить ассинхрон.
|
20 май 2015, 12:07 |
|
|
Madwayz
[0.1]
<Белая Русь>
Сервер: Черный Шрам
2х2: 672
3х3: 1552
|
0
Скрипты Neilyo и не только
cyric писал(а):
Прописать в любой LUA файл любого аддона 4 строчки:
Цитата: hooksecurefunc('ActionButton_UpdateHotkeys', function(self) local macro, hotkey = _G[self:GetName()..'Name'], _G[self:GetName()..'HotKey'] if macro and hotkey then macro:Hide() hotkey:Hide() end end)
Или можно в бартендере/доминусе поставить галочку "скрывать бинды и макросы"
з.ы:
не сработает вариант со строчками, если бинды и макросы синхронизируются с серверами.
Нужно сначала выполнить ассинхрон.
спасибо!!работает,правда как еще убрать бинды со спелов питомцев?
|
20 май 2015, 17:11 |
|
|
marelove
[3.4]
Сервер: Свежеватель Душ
Рейтинг поля боя: 2295
2х2: 2201
3х3: 2302
|
0
Скрипты Neilyo и не только
|
21 май 2015, 21:42 |
|
|
Nuuuuzdi
[0.1]
<К О Н Т Р О Л Ь>
Сервер: Король-лич
Рейтинг поля боя: 767
2х2: 1585
3х3: 2334
|
0
Скрипты Neilyo и не только
Ребят, почему у меня всегда прокает ошибка когда я кручу колесом символы?=( Это именно с моим аддоном! Может быть что-то неправильно прописано?
Скрипты
MainMenuBarLeftEndCap:Hide() MainMenuBarRightEndCap:Hide() PlayerPVPIcon:SetAlpha(0) TargetFrameTextureFramePVPIcon:SetAlpha(0) ActionBarUpButton:Hide() ActionBarDownButton:Hide() MainMenuBarPageNumber:Hide() CharacterBag3Slot:Hide() CharacterBag2Slot:Hide() CharacterBag1Slot:Hide() CharacterBag0Slot:Hide() LARGE_NUMBER_SEPERATOR = ","
for i=1,12 do _G["ActionButton"..i.."Name"]:SetAlpha(0) _G["MultiBarBottomLeftButton"..i.."Name"]:SetAlpha(0) _G["MultiBarRightButton"..i.."Name"]:SetAlpha(0) _G["MultiBarLeftButton"..i.."Name"]:SetAlpha(0) _G["ActionButton"..i.."HotKey"]:SetAlpha(0) _G["MultiBarBottomRightButton"..i.."HotKey"]:SetAlpha(0) _G["MultiBarBottomLeftButton"..i.."HotKey"]:SetAlpha(0) _G["MultiBarRightButton"..i.."HotKey"]:SetAlpha(0) _G["MultiBarLeftButton"..i.."HotKey"]:SetAlpha(0) end
MainMenuBarTexture0:Hide() MainMenuBarTexture1:Hide() MainMenuBarTexture2:Hide() MainMenuBarTexture3:Hide()
MainMenuBarLeftEndCap:Hide() MainMenuBarRightEndCap:Hide()
MainMenuMaxLevelBar0:Hide() MainMenuMaxLevelBar1:Hide() MainMenuMaxLevelBar2:Hide() MainMenuMaxLevelBar3:Hide()
BonusActionBarFrameTexture1:Hide() BonusActionBarFrameTexture2:Hide() BonusActionBarFrameTexture3:Hide() BonusActionBarFrameTexture4:Hide()
P.S Пробовал тыкать уже в готовые(популярные) аддоны, даже по частям! Все рпавно не помогает=(
|
22 май 2015, 17:01 |
|
|
witcher
[14.3]
|
1
Скрипты Neilyo и не только
Во-первых это скрипт времен катаклизма, во-вторых лучше кинь текст ошибки.
З.Ы. LARGE_NUMBER_SEPERATOR = "," скорее всего из-за этого.
Удали эту строчку и напиши вместо нее SetCVar('BreakUpLargeNumbers', 1) или SetCVar('BreakUpLargeNumbers', 0)
|
22 май 2015, 17:40 |
|
|
Nuuuuzdi
[0.1]
<К О Н Т Р О Л Ь>
Сервер: Король-лич
Рейтинг поля боя: 767
2х2: 1585
3х3: 2334
|
0
Скрипты Neilyo и не только
witcher писал(а):
Во-первых это скрипт времен катаклизма, во-вторых лучше кинь текст ошибки.
З.Ы. LARGE_NUMBER_SEPERATOR = "," скорее всего из-за этого.
Удали эту строчку и напиши вместо нее SetCVar('BreakUpLargeNumbers', 1) или SetCVar('BreakUpLargeNumbers', 0)
Сейчас попробую
P.S Помогло!)Спасибо, но запятой в демедже теперь нет!=(
Еще вопросик > раньше использовал defaultgladius, но щас он плохо работает с диминишингами и т.д, поэтому я заменил его и заметил , что пропали оповещения в чате о том, что я дал кс в каст, не подскажешь какие именно строчки в defaultgladius нужно копирнуть, чтобы вернуть это?
DefaultGladius
local trinkets = {} local events = CreateFrame("Frame") function events:ADDON_LOADED(addonName) if addonName ~= "Blizzard_ArenaUI" then return end ArenaEnemyFrame1:ClearAllPoints() ArenaEnemyFrame1:SetPoint("TOPRIGHT", UIParent, "TOPRIGHT", -500, -200) ArenaEnemyFrame1.SetPoint = function() end ArenaEnemyFrame2:ClearAllPoints() ArenaEnemyFrame2:SetPoint("BOTTOMLEFT", ArenaEnemyFrame1, "BOTTOMLEFT", 0, -50) ArenaEnemyFrame2.SetPoint = function() end ArenaEnemyFrame3:ClearAllPoints() ArenaEnemyFrame3:SetPoint("BOTTOMLEFT", ArenaEnemyFrame1, "BOTTOMLEFT", 0, -100) ArenaEnemyFrame3.SetPoint = function() end local arenaFrame, trinket for i = 1, MAX_ARENA_ENEMIES do arenaFrame = "ArenaEnemyFrame"..i trinket = CreateFrame("Cooldown", arenaFrame.."Trinket", ArenaEnemyFrames) trinket:SetPoint("TOPRIGHT", arenaFrame, 30, -6) trinket:SetSize(24, 24) trinket.icon = trinket:CreateTexture(nil, "BACKGROUND") trinket.icon:SetAllPoints() trinket.icon:SetTexture("Interface\\Icons\\inv_jewelry_trinketpvp_01") trinket:Hide() trinkets["arena"..i] = trinket end self:UnregisterEvent("ADDON_LOADED") end function events:UNIT_SPELLCAST_SUCCEEDED(unitID, spell, rank, lineID, spellID) if not trinkets[unitID] then return end if spellID == 59752 or spellID == 42292 then CooldownFrame_SetTimer(trinkets[unitID], GetTime(), 120, 1) SendChatMessage("Trinket used by: "..GetUnitName(unitID, true), "PARTY") elseif spellID == 7744 then CooldownFrame_SetTimer(trinkets[unitID], GetTime(), 45, 1) SendChatMessage("WotF used by: "..GetUnitName(unitID, true), "PARTY") end end function events:PLAYER_ENTERING_WORLD() local _, instanceType = IsInInstance() if instanceType == "arena" then self:RegisterEvent("UNIT_SPELLCAST_SUCCEEDED") elseif self:IsEventRegistered("UNIT_SPELLCAST_SUCCEEDED") then self:UnregisterEvent("UNIT_SPELLCAST_SUCCEEDED") for _, trinket in pairs(trinkets) do trinket:SetCooldown(0, 0) trinket:Hide() end end end SLASH_TESTAEF1 = "/testaef" SlashCmdList["TESTAEF"] = function(msg, editBox) if not IsAddOnLoaded("Blizzard_ArenaUI") then LoadAddOn("Blizzard_ArenaUI") end ArenaEnemyFrames:Show() local arenaFrame for i = 1, 3 do arenaFrame = _G["ArenaEnemyFrame"..i] arenaFrame.classPortrait:SetTexture("Interface\\TargetingFrame\\UI-Classes-Circles") arenaFrame.classPortrait:SetTexCoord(unpack(CLASS_ICON_TCOORDS["WARRIOR"])) arenaFrame.name:SetText("Dispelme") arenaFrame:Show() CooldownFrame_SetTimer(trinkets["arena"..i], GetTime(), 120, 1) end end events:SetScript("OnEvent", function(self, event, ...) return self[event](self, ...) end) events:RegisterEvent("ADDON_LOADED") events:RegisterEvent("PLAYER_ENTERING_WORLD")
DRt={{96294,339,16689,102359,128405,50245,4167,90327,54706,122,33395,116706,114404,115197,64695,63685,107566},{108194,91800,91797,22570,9005,5211,102795,117526,24394,90337,50519,44572,118271,119392,119381,122242,120086,853,119072,105593,1833,408,118905,30283,103131,20549},{91644,50541,117368,64044,51722,118093,676},{2637,99,1499,19386,118,113724,115078,105421,20066,9484,1776,6770,51514,107079},{1513,10326,8122,113792,2094,118699,5484,6358,115268,5246},{81261,34490,55021,102051,116709,31935,15487,703,24259,115782,6552,129597}} drx=86;drs=24;dp="RIGHT";dre="COMBAT_LOG_EVENT_UNFILTERED"drp="PLAYER_ENTERING_WORLD"dra="ARENA_OPPONENT_UPDATE"LoadAddOn("Blizzard_ArenaUI")function gaef(f,n)return _G["ArenaEnemyFrame"..n.."HealthBar"]end function rDR(f)f.e=1;f.t:SetTexture(nil)f.c:Hide()end function sDR(f)f.e=f.e+1;f.c:Show()end function gDRt(i,j)return _G["drc"..i..":"..j]end function runDR(f,n)CooldownFrame_SetTimer(f.c,GetTime(),18,1)eDR(f,n)sDR(f)oDR(n)end function eDR(f,n)local t=1;f:SetScript("OnUpdate",function(s,e)t=t+e;if(t>=18)then f:SetScript("OnUpdate",nil)rDR(f)oDR(n)end end)end function cDR(f,n,s)if f.e<4 then local _,_,t=GetSpellInfo(s)f.t:SetTexture(t)runDR(f,n)end end function oDR(n)local r=1;for j in ipairs(DRt)do local f=gDRt(n,j)f:SetPoint(dp,gaef(f,n),dp,drx+(r-1)*25,-2)r=r+1;end end function uDR(n,s)for i,t in ipairs(DRt)do for _,j in ipairs(t)do if s==j then cDR(gDRt(n,i),n,s)end end end end function DRc(i,j)local f=CreateFrame("Frame",nil,UIParent)f:SetSize(drs,drs)f.t=f:CreateTexture(nil,"BORDER")f.t:SetAllPoints(true)f.c=CreateFrame("Cooldown",nil,f)f.c:SetAllPoints(f)f.e=1 return f end function clDR(_,e,_,_,_,_,_,d,_,_,_,s)if(e=="SPELL_AURA_REMOVED" or e=="SPELL_AURA_REFRESH")then for i=1,5 do local ag=UnitGUID("arena"..i)if(ag ~= nil and d==ag)then uDR(i,s)end end end end function iDRt(o,m)for i=1,m do for j in ipairs(DRt)do local f=gDRt(i,j)rDR(f)if o then f:Show()end end end end for i=1,5 do for j in ipairs(DRt)do _G["drc"..i..":"..j]=DRc(i,j)end end dt=CreateFrame("Frame")dt:SetScript("OnEvent",function(_,e,...)if e==dre then clDR(...)elseif e==dra then iDRt(1,GetNumArenaOpponents())else iDRt(nil,5)end end)dt:RegisterEvent(dra)dt:RegisterEvent(drp)dt:RegisterEvent(dre)
local f = CreateFrame("Frame") local function Update(self, event, ...)
local pvpType = GetZonePVPInfo() f:UnregisterEvent("ZONE_CHANGED_NEW_AREA") if event == "COMBAT_LOG_EVENT_UNFILTERED" then local timestamp, eventType, _, sourceGUID, sourceName, sourceFlags, sourceRaidFlags, destGUID, destName, destFlags, _, spellID, spellName, _, extraskillID, extraSkillName = ... if eventType == "SPELL_INTERRUPT" and sourceName == UnitName("player") then SendChatMessage("Interrupted -> "..GetSpellLink(extraskillID).."!", "PARTY") end end end f:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED") f:RegisterEvent("ZONE_CHANGED_NEW_AREA") f:SetScript("OnEvent", Update)
local function Update(self, event, ...) if event == "UNIT_SPELLCAST_SUCCEEDED" then local unit, spellName, spellrank, spelline, spellID = ... if GetZonePVPInfo() == "arena" then if UnitIsEnemy("player", unit) and (spellID == 80167 or spellID == 94468 or spellID == 43183 or spellID == 57073 or spellName == "Trinken") then SendChatMessage(UnitName(unit).." is drinking.", "PARTY") end end end end
local f = CreateFrame("Frame") f:RegisterEvent("UNIT_SPELLCAST_SUCCEEDED") f:SetScript("OnEvent", Update)
|
22 май 2015, 17:54 |
|
|
Kromwel
[7.5]
|
0
Скрипты Neilyo и не только
Что-нибудь можно сделать, чтобы Омни СС не тикал на Близовском лузконтроле? А то дико бесит
|
22 май 2015, 18:37 |
|
|
witcher
[14.3]
|
1
Скрипты Neilyo и не только
Nuuuuzdi писал(а):
witcher писал(а):
Во-первых это скрипт времен катаклизма, во-вторых лучше кинь текст ошибки.
З.Ы. LARGE_NUMBER_SEPERATOR = "," скорее всего из-за этого.
Удали эту строчку и напиши вместо нее SetCVar('BreakUpLargeNumbers', 1) или SetCVar('BreakUpLargeNumbers', 0)
Сейчас попробую
P.S Помогло!)Спасибо, но запятой в демедже теперь нет!=(
Еще вопросик > раньше использовал defaultgladius, но щас он плохо работает с диминишингами и т.д, поэтому я заменил его и заметил , что пропали оповещения в чате о том, что я дал кс в каст, не подскажешь какие именно строчки в defaultgladius нужно копирнуть, чтобы вернуть это?
DefaultGladius
local trinkets = {} local events = CreateFrame("Frame") function events:ADDON_LOADED(addonName) if addonName ~= "Blizzard_ArenaUI" then return end ArenaEnemyFrame1:ClearAllPoints() ArenaEnemyFrame1:SetPoint("TOPRIGHT", UIParent, "TOPRIGHT", -500, -200) ArenaEnemyFrame1.SetPoint = function() end ArenaEnemyFrame2:ClearAllPoints() ArenaEnemyFrame2:SetPoint("BOTTOMLEFT", ArenaEnemyFrame1, "BOTTOMLEFT", 0, -50) ArenaEnemyFrame2.SetPoint = function() end ArenaEnemyFrame3:ClearAllPoints() ArenaEnemyFrame3:SetPoint("BOTTOMLEFT", ArenaEnemyFrame1, "BOTTOMLEFT", 0, -100) ArenaEnemyFrame3.SetPoint = function() end local arenaFrame, trinket for i = 1, MAX_ARENA_ENEMIES do arenaFrame = "ArenaEnemyFrame"..i trinket = CreateFrame("Cooldown", arenaFrame.."Trinket", ArenaEnemyFrames) trinket:SetPoint("TOPRIGHT", arenaFrame, 30, -6) trinket:SetSize(24, 24) trinket.icon = trinket:CreateTexture(nil, "BACKGROUND") trinket.icon:SetAllPoints() trinket.icon:SetTexture("Interface\\Icons\\inv_jewelry_trinketpvp_01") trinket:Hide() trinkets["arena"..i] = trinket end self:UnregisterEvent("ADDON_LOADED") end function events:UNIT_SPELLCAST_SUCCEEDED(unitID, spell, rank, lineID, spellID) if not trinkets[unitID] then return end if spellID == 59752 or spellID == 42292 then CooldownFrame_SetTimer(trinkets[unitID], GetTime(), 120, 1) SendChatMessage("Trinket used by: "..GetUnitName(unitID, true), "PARTY") elseif spellID == 7744 then CooldownFrame_SetTimer(trinkets[unitID], GetTime(), 45, 1) SendChatMessage("WotF used by: "..GetUnitName(unitID, true), "PARTY") end end function events:PLAYER_ENTERING_WORLD() local _, instanceType = IsInInstance() if instanceType == "arena" then self:RegisterEvent("UNIT_SPELLCAST_SUCCEEDED") elseif self:IsEventRegistered("UNIT_SPELLCAST_SUCCEEDED") then self:UnregisterEvent("UNIT_SPELLCAST_SUCCEEDED") for _, trinket in pairs(trinkets) do trinket:SetCooldown(0, 0) trinket:Hide() end end end SLASH_TESTAEF1 = "/testaef" SlashCmdList["TESTAEF"] = function(msg, editBox) if not IsAddOnLoaded("Blizzard_ArenaUI") then LoadAddOn("Blizzard_ArenaUI") end ArenaEnemyFrames:Show() local arenaFrame for i = 1, 3 do arenaFrame = _G["ArenaEnemyFrame"..i] arenaFrame.classPortrait:SetTexture("Interface\\TargetingFrame\\UI-Classes-Circles") arenaFrame.classPortrait:SetTexCoord(unpack(CLASS_ICON_TCOORDS["WARRIOR"])) arenaFrame.name:SetText("Dispelme") arenaFrame:Show() CooldownFrame_SetTimer(trinkets["arena"..i], GetTime(), 120, 1) end end events:SetScript("OnEvent", function(self, event, ...) return self[event](self, ...) end) events:RegisterEvent("ADDON_LOADED") events:RegisterEvent("PLAYER_ENTERING_WORLD")
DRt={{96294,339,16689,102359,128405,50245,4167,90327,54706,122,33395,116706,114404,115197,64695,63685,107566},{108194,91800,91797,22570,9005,5211,102795,117526,24394,90337,50519,44572,118271,119392,119381,122242,120086,853,119072,105593,1833,408,118905,30283,103131,20549},{91644,50541,117368,64044,51722,118093,676},{2637,99,1499,19386,118,113724,115078,105421,20066,9484,1776,6770,51514,107079},{1513,10326,8122,113792,2094,118699,5484,6358,115268,5246},{81261,34490,55021,102051,116709,31935,15487,703,24259,115782,6552,129597}} drx=86;drs=24;dp="RIGHT";dre="COMBAT_LOG_EVENT_UNFILTERED"drp="PLAYER_ENTERING_WORLD"dra="ARENA_OPPONENT_UPDATE"LoadAddOn("Blizzard_ArenaUI")function gaef(f,n)return _G["ArenaEnemyFrame"..n.."HealthBar"]end function rDR(f)f.e=1;f.t:SetTexture(nil)f.c:Hide()end function sDR(f)f.e=f.e+1;f.c:Show()end function gDRt(i,j)return _G["drc"..i..":"..j]end function runDR(f,n)CooldownFrame_SetTimer(f.c,GetTime(),18,1)eDR(f,n)sDR(f)oDR(n)end function eDR(f,n)local t=1;f:SetScript("OnUpdate",function(s,e)t=t+e;if(t>=18)then f:SetScript("OnUpdate",nil)rDR(f)oDR(n)end end)end function cDR(f,n,s)if f.e<4 then local _,_,t=GetSpellInfo(s)f.t:SetTexture(t)runDR(f,n)end end function oDR(n)local r=1;for j in ipairs(DRt)do local f=gDRt(n,j)f:SetPoint(dp,gaef(f,n),dp,drx+(r-1)*25,-2)r=r+1;end end function uDR(n,s)for i,t in ipairs(DRt)do for _,j in ipairs(t)do if s==j then cDR(gDRt(n,i),n,s)end end end end function DRc(i,j)local f=CreateFrame("Frame",nil,UIParent)f:SetSize(drs,drs)f.t=f:CreateTexture(nil,"BORDER")f.t:SetAllPoints(true)f.c=CreateFrame("Cooldown",nil,f)f.c:SetAllPoints(f)f.e=1 return f end function clDR(_,e,_,_,_,_,_,d,_,_,_,s)if(e=="SPELL_AURA_REMOVED" or e=="SPELL_AURA_REFRESH")then for i=1,5 do local ag=UnitGUID("arena"..i)if(ag ~= nil and d==ag)then uDR(i,s)end end end end function iDRt(o,m)for i=1,m do for j in ipairs(DRt)do local f=gDRt(i,j)rDR(f)if o then f:Show()end end end end for i=1,5 do for j in ipairs(DRt)do _G["drc"..i..":"..j]=DRc(i,j)end end dt=CreateFrame("Frame")dt:SetScript("OnEvent",function(_,e,...)if e==dre then clDR(...)elseif e==dra then iDRt(1,GetNumArenaOpponents())else iDRt(nil,5)end end)dt:RegisterEvent(dra)dt:RegisterEvent(drp)dt:RegisterEvent(dre)
local f = CreateFrame("Frame") local function Update(self, event, ...)
local pvpType = GetZonePVPInfo() f:UnregisterEvent("ZONE_CHANGED_NEW_AREA") if event == "COMBAT_LOG_EVENT_UNFILTERED" then local timestamp, eventType, _, sourceGUID, sourceName, sourceFlags, sourceRaidFlags, destGUID, destName, destFlags, _, spellID, spellName, _, extraskillID, extraSkillName = ... if eventType == "SPELL_INTERRUPT" and sourceName == UnitName("player") then SendChatMessage("Interrupted -> "..GetSpellLink(extraskillID).."!", "PARTY") end end end f:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED") f:RegisterEvent("ZONE_CHANGED_NEW_AREA") f:SetScript("OnEvent", Update)
local function Update(self, event, ...) if event == "UNIT_SPELLCAST_SUCCEEDED" then local unit, spellName, spellrank, spelline, spellID = ... if GetZonePVPInfo() == "arena" then if UnitIsEnemy("player", unit) and (spellID == 80167 or spellID == 94468 or spellID == 43183 or spellID == 57073 or spellName == "Trinken") then SendChatMessage(UnitName(unit).." is drinking.", "PARTY") end end end end
local f = CreateFrame("Frame") f:RegisterEvent("UNIT_SPELLCAST_SUCCEEDED") f:SetScript("OnEvent", Update)
Цитата: local f = CreateFrame("Frame") local function Update(self, event, ...)
local pvpType = GetZonePVPInfo() f:UnregisterEvent("ZONE_CHANGED_NEW_AREA") if event == "COMBAT_LOG_EVENT_UNFILTERED" then local timestamp, eventType, _, sourceGUID, sourceName, sourceFlags, sourceRaidFlags, destGUID, destName, destFlags, _, spellID, spellName, _, extraskillID, extraSkillName = ... if eventType == "SPELL_INTERRUPT" and sourceName == UnitName("player") then SendChatMessage("Interrupted -> "..GetSpellLink(extraskillID).."!", "PARTY") end end end f:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED") f:RegisterEvent("ZONE_CHANGED_NEW_AREA") f:SetScript("OnEvent", Update)
|
22 май 2015, 19:14 |
|