Скрипты Neilyo и не только  
Автор Сообщение






Сервер: Страж Смерти
Рейтинг поля боя: 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
Профиль Skype



<Бехолдэрс>


Сервер: Черный Шрам
Рейтинг поля боя: 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
Профиль



<Крестьяне хотят в топ>


Сервер: Страж Смерти
Рейтинг поля боя: 1588
2х2: 1620
3х3: 1843
0
Сообщение Скрипты Neilyo и не только

В WoD добавили новое [условие] для талантов.

Код:
#showtooltip

/cast [talent:3/1] Кольцо мороза; [talent:3/3] Ледяная хватка



06 май 2015, 11:51
Профиль



<Бехолдэрс>


Сервер: Черный Шрам
Рейтинг поля боя: 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
Профиль



<Крестьяне хотят в топ>


Сервер: Страж Смерти
Рейтинг поля боя: 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
Профиль



<Бехолдэрс>


Сервер: Черный Шрам
Рейтинг поля боя: 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
Профиль



<Имя Говорит Само за Себя>


Сервер: Гордунни
0
Сообщение Скрипты Neilyo и не только

может поможет, темка недавняя

http://www.reddit.com/r/wow/comments/2ts8f9/psa_theres_a_new_macro_conditional_in_wod_for/



06 май 2015, 20:31
Профиль



<Бехолдэрс>


Сервер: Черный Шрам
Рейтинг поля боя: 1523
2х2: 1363
3х3: 2006
5х5: 768
0
Сообщение Скрипты Neilyo и не только

witcher писал(а):

с модифером нету 



06 май 2015, 20:35
Профиль

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
Профиль



<Крестьяне хотят в топ>


Сервер: Страж Смерти
Рейтинг поля боя: 1588
2х2: 1620
3х3: 1843
0
Сообщение Скрипты Neilyo и не только

В стандартных настройках потыкай, там можно поставить отображение в % и кол-ве HP/MP без скриптов.



13 май 2015, 20:30
Профиль

0
Сообщение Скрипты Neilyo и не только

Prometh писал(а):

В стандартных настройках потыкай, там можно поставить отображение в % и кол-ве HP/MP без скриптов.


Нашел, спасибо. Давно не играл, видимо после лича ввели.



13 май 2015, 21:41
Профиль



<Белая Русь>


Сервер: Черный Шрам
2х2: 672
3х3: 1552
0
Сообщение Скрипты Neilyo и не только

как использовать скрип на скрывание биндов и название макросов by Fernir?или подскажите как еще так можно сделать?



19 май 2015, 23:00
Профиль

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
Профиль



<Белая Русь>


Сервер: Черный Шрам
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
Профиль






Сервер: Свежеватель Душ
Рейтинг поля боя: 2295
2х2: 2201
3х3: 2302
0
Сообщение Скрипты Neilyo и не только

никак



21 май 2015, 21:42
Профиль ICQ



<К О Н Т Р О Л Ь>


Сервер: Король-лич
Рейтинг поля боя: 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
Профиль



<Имя Говорит Само за Себя>


Сервер: Гордунни
1
Сообщение Скрипты Neilyo и не только

Во-первых это скрипт времен катаклизма, во-вторых лучше кинь текст ошибки.

З.Ы. LARGE_NUMBER_SEPERATOR = "," скорее всего из-за этого.

Удали эту строчку и напиши вместо нее SetCVar('BreakUpLargeNumbers', 1) или SetCVar('BreakUpLargeNumbers', 0)



22 май 2015, 17:40
Профиль



<К О Н Т Р О Л Ь>


Сервер: Король-лич
Рейтинг поля боя: 767
2х2: 1585
3х3: 2334
0
Сообщение Скрипты Neilyo и не только

witcher писал(а):

Во-первых это скрипт времен катаклизма, во-вторых лучше кинь текст ошибки.

З.Ы. LARGE_NUMBER_SEPERATOR = "," скорее всего из-за этого.

Удали эту строчку и напиши вместо нее SetCVar('BreakUpLargeNumbers', 1) или SetCVar('BreakUpLargeNumbers', 0)

Сейчас попробую

P.S Помогло!)Спасибо, но запятой в демедже теперь нет!=( 

 

Еще вопросик > раньше использовал 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
Профиль

0
Сообщение Скрипты Neilyo и не только

Что-нибудь можно сделать, чтобы Омни СС не тикал на Близовском лузконтроле? А то дико бесит



22 май 2015, 18:37
Профиль



<Имя Говорит Само за Себя>


Сервер: Гордунни
1
Сообщение Скрипты Neilyo и не только

Nuuuuzdi писал(а):

witcher писал(а):

Во-первых это скрипт времен катаклизма, во-вторых лучше кинь текст ошибки.

З.Ы. LARGE_NUMBER_SEPERATOR = "," скорее всего из-за этого.

Удали эту строчку и напиши вместо нее SetCVar('BreakUpLargeNumbers', 1) или SetCVar('BreakUpLargeNumbers', 0)

Сейчас попробую

P.S Помогло!)Спасибо, но запятой в демедже теперь нет!=( 

 

Еще вопросик > раньше использовал 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
Профиль
Начать новую тему Ответить на тему


Перейти:  

На сайте использованы материалы, принадлежащие Blizzard Entertainment. Копирование материалов возможно только c разрешения портала. В противном случае это будет называться уже другим словом.
Рейтинг@Mail.ru