Exiles/coa-details
3
0
Fork 0
Code Pull Requests Actions Packages Releases 2 Wiki Activity
Files
0ce5fc7f06eb400fbff2b96064e5155863f36681
coa-details/functions/link.lua
T
Tercio f7fc5dfec3 - More improvements on parser and custom displays. 
- Create Details! Forge, /details forge.
2015-05-05 17:40:14 -03:00

1320 lines
43 KiB
Lua
Raw Blame History

local _detalhes = _G._detalhes
--> default weaktable
_detalhes.weaktable = {__mode = "v"}
--weak auras
local group_prototype = {
["xOffset"] = -678.999450683594,
["yOffset"] = 212.765991210938,
["id"] = "Details! Aura Group",
["grow"] = "RIGHT",
["controlledChildren"] = {},
["animate"] = true,
["border"] = "None",
["anchorPoint"] = "CENTER",
["regionType"] = "dynamicgroup",
["sort"] = "none",
["actions"] = {},
["space"] = 0,
["background"] = "None",
["expanded"] = true,
["constantFactor"] = "RADIUS",
["trigger"] = {
["type"] = "aura",
["spellIds"] = {},
["unit"] = "player",
["debuffType"] = "HELPFUL",
["names"] = {},
},
["borderOffset"] = 16,
["animation"] = {
["start"] = {
["type"] = "none",
["duration_type"] = "seconds",
},
["main"] = {
["type"] = "none",
["duration_type"] = "seconds",
},
["finish"] = {
["type"] = "none",
["duration_type"] = "seconds",
},
},
["align"] = "CENTER",
["rotation"] = 0,
["frameStrata"] = 1,
["width"] = 199.999969482422,
["height"] = 20,
["stagger"] = 0,
["radius"] = 200,
["numTriggers"] = 1,
["backgroundInset"] = 0,
["selfPoint"] = "LEFT",
["load"] = {
["use_combat"] = true,
["race"] = {
["multi"] = {},
},
["talent"] = {
["multi"] = {},
},
["role"] = {
["multi"] = {},
},
["spec"] = {
["multi"] = {},
},
["class"] = {
["multi"] = {},
},
["size"] = {
["multi"] = {},
},
},
["untrigger"] = {},
}
local icon_prototype = {
["yOffset"] = -10.08984375,
["xOffset"] = -3.2294921875,
["fontSize"] = 14,
["displayStacks"] = "%s",
["parent"] = "Details! Aura Group",
["color"] = {1, 1, 1, 1},
["stacksPoint"] = "BOTTOMRIGHT",
["regionType"] = "icon",
["untrigger"] = {},
["anchorPoint"] = "CENTER",
["icon"] = true,
["numTriggers"] = 1,
["customTextUpdate"] = "update",
["id"] = "UNNAMED",
["actions"] = {},
["fontFlags"] = "OUTLINE",
["stacksContainment"] = "INSIDE",
["zoom"] = 0,
["auto"] = false,
["animation"] = {
["start"] = {
["duration_type"] = "seconds",
["type"] = "preset",
["preset"] = "grow",
},
["main"] = {
["duration_type"] = "seconds",
["type"] = "preset",
["preset"] = "pulse",
},
["finish"] = {
["duration_type"] = "seconds",
["type"] = "none",
},
},
["trigger"] = {
["type"] = "aura",
["spellId"] = "0",
["subeventSuffix"] = "_CAST_START",
["custom_hide"] = "timed",
["event"] = "Health",
["subeventPrefix"] = "SPELL",
["debuffClass"] = "magic",
["use_spellId"] = true,
["spellIds"] = {},
["name_operator"] = "==",
["fullscan"] = true,
["unit"] = "player",
["names"] = {
"", -- [1]
},
["debuffType"] = "HARMFUL",
},
["desaturate"] = false,
["frameStrata"] = 1,
["stickyDuration"] = false,
["width"] = 192,
["font"] = "Friz Quadrata TT",
["inverse"] = false,
["selfPoint"] = "CENTER",
["height"] = 192,
["displayIcon"] = "Interface\\Icons\\Spell_Holiday_ToW_SpiceCloud",
["load"] = {
["use_combat"] = true,
["race"] = {
["multi"] = {
},
},
["talent"] = {
["multi"] = {
},
},
["role"] = {
["multi"] = {
},
},
["spec"] = {
["multi"] = {
},
},
["class"] = {
["multi"] = {
},
},
["size"] = {
["multi"] = {
},
},
},
["textColor"] = {
1, -- [1]
1, -- [2]
1, -- [3]
1, -- [4]
},
}
local actions_prototype = {
["start"] = {
["do_glow"] = true,
["glow_action"] = "show",
["do_sound"] = true,
["glow_frame"] = "WeakAuras:Crystalline Barrage Step",
["sound"] = "Interface\\AddOns\\WeakAuras\\Media\\Sounds\\WaterDrop.ogg",
["sound_channel"] = "Master",
},
["finish"] = {},
}
local debuff_prototype = {
["cooldown"] = false,
["trigger"] = {
["spellId"] = "0",
["unit"] = "",
["spellIds"] = {},
["debuffType"] = "HARMFUL",
["names"] = {""},
},
}
local buff_prototype = {
["cooldown"] = false,
["trigger"] = {
["spellId"] = "0",
["unit"] = "",
["spellIds"] = {},
["debuffType"] = "HELPFUL",
["names"] = {""},
},
}
local cast_prototype = {
["trigger"] = {
["type"] = "event",
["spellId"] = "0",
["subeventSuffix"] = "_CAST_SUCCESS",
["unevent"] = "timed",
["duration"] = "4",
["event"] = "Combat Log",
["subeventPrefix"] = "SPELL",
["use_spellId"] = true,
}
}
local stack_prototype = {
["trigger"] = {
["countOperator"] = ">=",
["count"] = "0",
["useCount"] = true,
},
}
local sound_prototype = {
["actions"] = {
["start"] = {
["do_sound"] = true,
["sound"] = "Interface\\Quiet.ogg",
["sound_channel"] = "Master",
},
},
}
local chat_prototype = {
["actions"] = {
["start"] = {
["message"] = "",
["message_type"] = "SAY",
["do_message"] = true,
},
},
}
local text_prototype = {
["fontSize"] = 20,
["displayStacks"] = "",
["stacksPoint"] = "BOTTOM",
["stacksContainment"] = "OUTSIDE",
}
local glow_prototype = {
["actions"] = {
["start"] = {
["do_glow"] = true,
["glow_frame"] = "",
["glow_action"] = "show",
},
},
}
function _detalhes:CreateWeakAura (spellid, use_spellid, spellname, name, icon_texture, target, stacksize, sound, chat, icon_text, icon_glow, encounter_id)
--> check if wa is installed
if (not WeakAuras or not WeakAurasSaved) then
return
end
--> check if there is a group for our auras
if (not WeakAurasSaved.displays ["Details! Aura Group"]) then
local group = _detalhes.table.copy ({}, group_prototype)
WeakAuras.Add (group)
end
--> create the icon table
local icon = _detalhes.table.copy ({}, icon_prototype)
if (encounter_id) then
icon.load.use_encounterid = true
icon.load.encounterid = tostring (encounter_id)
end
icon.id = name
icon.displayIcon = icon_texture
if (target) then
if (target == 1) then --Debuff on Player
local add = _detalhes.table.copy ({}, debuff_prototype)
add.trigger.spellId = tostring (spellid)
add.trigger.spellIds[1] = spellid
add.trigger.names [1] = spellname
add.trigger.unit = "player"
_detalhes.table.deploy (icon, add)
elseif (target == 2) then --Debuff on Target
local add = _detalhes.table.copy ({}, debuff_prototype)
add.trigger.spellId = tostring (spellid)
add.trigger.spellIds[1] = spellid
add.trigger.names[1] = spellname
add.trigger.unit = "target"
_detalhes.table.deploy (icon, add)
elseif (target == 3) then --Debuff on Focus
local add = _detalhes.table.copy ({}, debuff_prototype)
add.trigger.spellId = tostring (spellid)
add.trigger.spellIds[1] = spellid
add.trigger.names[1] = spellname
add.trigger.unit = "focus"
_detalhes.table.deploy (icon, add)
elseif (target == 11) then --Buff on Player
local add = _detalhes.table.copy ({}, buff_prototype)
add.trigger.spellId = tostring (spellid)
add.trigger.spellIds[1] = spellid
add.trigger.names[1] = spellname
add.trigger.unit = "player"
_detalhes.table.deploy (icon, add)
elseif (target == 12) then --Buff on Target
local add = _detalhes.table.copy ({}, buff_prototype)
add.trigger.spellId = tostring (spellid)
add.trigger.spellIds[1] = spellid
add.trigger.names[1] = spellname
add.trigger.unit = "target"
_detalhes.table.deploy (icon, add)
elseif (target == 13) then --Buff on Focus
local add = _detalhes.table.copy ({}, buff_prototype)
add.trigger.spellId = tostring (spellid)
add.trigger.spellIds[1] = spellid
add.trigger.names[1] = spellname
add.trigger.unit = "focus"
_detalhes.table.deploy (icon, add)
elseif (target == 21) then --Spell Cast Started
local add = _detalhes.table.copy ({}, cast_prototype)
add.trigger.spellId = tostring (spellid)
add.trigger.spellName = spellname
add.trigger.subeventSuffix = "_CAST_START"
if (not use_spellid) then
add.trigger.use_spellName = true
add.trigger.use_spellId = false
end
_detalhes.table.deploy (icon, add)
elseif (target == 22) then --Spell Cast Successful
local add = _detalhes.table.copy ({}, cast_prototype)
add.trigger.spellId = tostring (spellid)
add.trigger.spellName = spellname
if (not use_spellid) then
add.trigger.use_spellName = true
add.trigger.use_spellId = false
end
_detalhes.table.deploy (icon, add)
end
else
icon.trigger.spellId = tostring (spellid)
icon.trigger.name = spellname
tinsert (icon.trigger.spellIds, spellid)
end
--> if is a regular auras withour using spells ids
if (not use_spellid) then
icon.trigger.use_spellId = false
icon.trigger.fullscan = false
icon.trigger.spellId = nil
icon.trigger.spellIds = {}
end
--> check stack size
if (stacksize and stacksize >= 1) then
stacksize = floor (stacksize)
local add = _detalhes.table.copy ({}, stack_prototype)
add.trigger.count = tostring (stacksize)
_detalhes.table.deploy (icon, add)
end
--> using sound
if (sound and sound ~= "" and not sound:find ("Quiet.ogg")) then
local add = _detalhes.table.copy ({}, sound_prototype)
add.actions.start.sound = sound
_detalhes.table.deploy (icon, add)
end
--> chat message
if (chat and chat ~= "") then
local add = _detalhes.table.copy ({}, chat_prototype)
add.actions.start.message = chat
_detalhes.table.deploy (icon, add)
end
if (icon_text and icon_text ~= "") then
local add = _detalhes.table.copy ({}, text_prototype)
add.displayStacks = icon_text
_detalhes.table.deploy (icon, add)
end
--> check if already exists a aura with this name
if (WeakAurasSaved.displays [icon.id]) then
for i = 2, 100 do
if (not WeakAurasSaved.displays [icon.id .. " (" .. i .. ")"]) then
icon.id = icon.id .. " (" .. i .. ")"
break
end
end
end
--> check is is using glow effect
if (icon_glow) then
local add = _detalhes.table.copy ({}, glow_prototype)
add.actions.start.glow_frame = "WeakAuras:" .. icon.id
_detalhes.table.deploy (icon, add)
end
--> add the aura on our group
tinsert (WeakAurasSaved.displays ["Details! Aura Group"].controlledChildren, icon.id)
--> add the aura
WeakAuras.Add (icon)
--> check if the options panel has loaded
local options_frame = WeakAuras.OptionsFrame and WeakAuras.OptionsFrame()
if (options_frame) then
if (options_frame and not options_frame:IsShown()) then
WeakAuras.ToggleOptions()
end
WeakAuras.NewDisplayButton (icon)
end
end
function _detalhes:OpenAuraPanel (spellid, spellname, spellicon, encounterid)
spellname = select (1, GetSpellInfo (spellid))
if (not DetailsAuraPanel) then
local f = CreateFrame ("frame", "DetailsAuraPanel", UIParent, "ButtonFrameTemplate")
f:SetSize (300, 420)
f:SetPoint ("center", UIParent, "center")
f:SetFrameStrata ("HIGH")
f:SetToplevel (true)
f:SetMovable (true)
tinsert (UISpecialFrames, "DetailsAuraPanel")
f:SetScript ("OnMouseDown", function(self, button)
if (self.isMoving) then
return
end
if (button == "RightButton") then
self:Hide()
else
self:StartMoving()
self.isMoving = true
end
end)
f:SetScript ("OnMouseUp", function(self, button)
if (self.isMoving and button == "LeftButton") then
self:StopMovingOrSizing()
self.isMoving = nil
end
end)
f.TitleText:SetText ("Create Aura")
f.portrait:SetTexture ([[Interface\CHARACTERFRAME\TEMPORARYPORTRAIT-FEMALE-BLOODELF]])
local fw = _detalhes:GetFramework()
--aura name
local name_label = fw:CreateLabel (f, "Aura Name: ", nil, nil, "GameFontNormal")
local name_textentry = fw:CreateTextEntry (f, _detalhes.empty_function, 150, 20, "AuraName", "$parentAuraName")
name_textentry:SetPoint ("left", name_label, "right", 2, 0)
f.name = name_textentry
--spellname
local spellname_label = fw:CreateLabel (f, "Spell Name: ", nil, nil, "GameFontNormal")
local spellname_textentry = fw:CreateTextEntry (f, _detalhes.empty_function, 150, 20, "SpellName", "$parentSpellName")
spellname_textentry:SetPoint ("left", spellname_label, "right", 2, 0)
f.spellname = spellname_textentry
spellname_textentry.tooltip = "Spell/Debuff/Buff to be tracked."
--spellid
local auraid_label = fw:CreateLabel (f, "Spell Id: ", nil, nil, "GameFontNormal")
local auraid_textentry = fw:CreateTextEntry (f, _detalhes.empty_function, 150, 20, "AuraSpellId", "$parentAuraSpellId")
auraid_textentry:Disable()
auraid_textentry:SetPoint ("left", auraid_label, "right", 2, 0)
--use spellid
local usespellid_label = fw:CreateLabel (f, "Use SpellId: ", nil, nil, "GameFontNormal")
local aura_use_spellid = fw:CreateSwitch (f, function(_, _, state) if (state) then auraid_textentry:Enable() else auraid_textentry:Disable() end end, false, nil, nil, nil, nil, "UseSpellId")
aura_use_spellid:SetPoint ("left", usespellid_label, "right", 2, 0)
aura_use_spellid.tooltip = "Use the spell id instead of the spell name, for advanced users."
--aura icon
local icon_label = fw:CreateLabel (f, "Icon: ", nil, nil, "GameFontNormal")
local icon_button_func = function (texture)
f.IconButton.icon.texture = texture
end
local icon_pick_button = fw:NewButton (f, nil, "$parentIconButton", "IconButton", 20, 20, function() fw:IconPick (icon_button_func, true) end)
local icon_button_icon = fw:NewImage (icon_pick_button, [[Interface\ICONS\TEMP]], 19, 19, "background", nil, "icon", "$parentIcon")
icon_pick_button:InstallCustomTexture()
icon_pick_button:SetPoint ("left", icon_label, "right", 2, 0)
icon_button_icon:SetPoint ("left", icon_label, "right", 2, 0)
f.icon = icon_button_icon
--target
local aura_on_icon = [[Interface\Buttons\UI-GroupLoot-DE-Down]]
local aura_on_table = {
{label = "Debuff on You", value = 1, icon = aura_on_icon},
{label = "Debuff on Target", value = 2, icon = aura_on_icon},
{label = "Debuff on Focus", value = 3, icon = aura_on_icon},
{label = "Buff on You", value = 11, icon = aura_on_icon},
{label = "Buff on Target", value = 12, icon = aura_on_icon},
{label = "Buff on Focus", value = 13, icon = aura_on_icon},
{label = "Spell Cast Started", value = 21, icon = aura_on_icon},
{label = "Spell Cast successful", value = 22, icon = aura_on_icon},
}
local aura_on_options = function()
return aura_on_table
end
local aura_on = fw:CreateDropDown (f, aura_on_options, 1, 150, 20, "AuraOnDropdown", "$parentAuraOnDropdown")
local aura_on_label = fw:CreateLabel (f, "Trigger: ", nil, nil, "GameFontNormal")
aura_on:SetPoint ("left", aura_on_label, "right", 2, 0)
--stack
local stack_slider = fw:NewSlider (f, f, "$parentStackSlider", "StackSlider", 150, 20, 0, 30, 1, 0)
local stack_label = fw:CreateLabel (f, "Stack Size: ", nil, nil, "GameFontNormal")
stack_slider:SetPoint ("left", stack_label, "right", 2, 0)
stack_slider.tooltip = "Minimum amount of stacks to trigger the aura."
--sound effect
local play_sound = function (self, fixedParam, file)
PlaySoundFile (file, "Master")
end
local sort = function (t1, t2)
return t1.name < t2.name
end
local titlecase = function (first, rest)
return first:upper()..rest:lower()
end
local iconsize = {14, 14}
local sound_options = function()
local t = {{label = "No Sound", value = "", icon = [[Interface\Buttons\UI-GuildButton-MOTD-Disabled]], iconsize = iconsize}}
local sounds = {}
for name, soundFile in pairs (LibStub:GetLibrary("LibSharedMedia-3.0"):HashTable ("sound")) do
name = name:gsub ("(%a)([%w_']*)", titlecase)
sounds [#sounds+1] = {name = name, file = soundFile}
end
table.sort (sounds, sort)
for _, sound in ipairs (sounds) do
tinsert (t, {label = sound.name, value = sound.file, icon = [[Interface\Buttons\UI-GuildButton-MOTD-Up]], onclick = play_sound, iconsize = iconsize})
end
return t
end
local sound_effect = fw:CreateDropDown (f, sound_options, 1, 150, 20, "SoundEffectDropdown", "$parentSoundEffectDropdown")
local sound_effect_label = fw:CreateLabel (f, "Play Sound: ", nil, nil, "GameFontNormal")
sound_effect:SetPoint ("left", sound_effect_label, "right", 2, 0)
sound_effect.tooltip = "Sound played when the aura triggers."
--say something
local say_something_label = fw:CreateLabel (f, "/Say: ", nil, nil, "GameFontNormal")
local say_something = fw:CreateTextEntry (f, _detalhes.empty_function, 150, 20, "SaySomething", "$parentSaySomething")
say_something:SetPoint ("left", say_something_label, "right", 2, 0)
say_something.tooltip = "Your character /say this phrase when the aura triggers."
--aura text
local aura_text_label = fw:CreateLabel (f, "Icon Text: ", nil, nil, "GameFontNormal")
local aura_text = fw:CreateTextEntry (f, _detalhes.empty_function, 150, 20, "AuraText", "$parentAuraText")
aura_text:SetPoint ("left", aura_text_label, "right", 2, 0)
aura_text.tooltip = "Text shown at aura's icon right side."
--apply glow
local useglow_label = fw:CreateLabel (f, "Glow Effect: ", nil, nil, "GameFontNormal")
local useglow = fw:CreateSwitch (f, function(self, _, state)
if (state and self.glow_test) then
self.glow_test:Show()
self.glow_test.animOut:Stop()
self.glow_test.animIn:Play()
elseif (self.glow_test) then
self.glow_test.animIn:Stop()
self.glow_test.animOut:Play()
end
end, false, nil, nil, nil, nil, "UseGlow")
useglow:SetPoint ("left", useglow_label, "right", 2, 0)
useglow.tooltip = "Do not rename the aura on WeakAuras options panel or the glow effect may not work."
useglow.glow_test = CreateFrame ("frame", "DetailsAuraTextGlowTest", useglow.widget, "ActionBarButtonSpellActivationAlert")
useglow.glow_test:SetPoint ("topleft", useglow.widget, "topleft", -20, 2)
useglow.glow_test:SetPoint ("bottomright", useglow.widget, "bottomright", 20, -2)
useglow.glow_test:Hide()
--aura addon
local addon_options = function()
local t = {}
if (WeakAuras) then
tinsert (t, {label = "Weak Auras 2", value = "WA", icon = [[Interface\AddOns\WeakAuras\icon]]})
end
return t
end
local aura_addon = fw:CreateDropDown (f, addon_options, 1, 150, 20, "AuraAddonDropdown", "$parentAuraAddonDropdown")
local aura_addon_label = fw:CreateLabel (f, "Addon: ", nil, nil, "GameFontNormal")
aura_addon:SetPoint ("left", aura_addon_label, "right", 2, 0)
--create
local create_func = function()
local name = f.AuraName.text
local spellname = f.SpellName.text
local use_spellId = f.UseSpellId.value
local spellid = f.AuraSpellId.text
local icon = f.IconButton.icon.texture
local target = f.AuraOnDropdown.value
local stacksize = f.StackSlider.value
local sound = f.SoundEffectDropdown.value
local chat = f.SaySomething.text
local addon = f.AuraAddonDropdown.value
local icon_text = f.AuraText.text
local icon_glow = f.UseGlow.value
local eid = DetailsAuraPanel.encounterid
if (addon == "WA") then
_detalhes:CreateWeakAura (spellid, use_spellId, spellname, name, icon, target, stacksize, sound, chat, icon_text, icon_glow, eid)
else
_detalhes:Msg ("No Aura Addon selected. Addons currently supported: WeakAuras 2.")
end
f:Hide()
end
local create_button = fw:CreateButton (f, create_func, 106, 16, "Create Aura")
create_button:InstallCustomTexture()
local cancel_button = fw:CreateButton (f, function() name_textentry:ClearFocus(); f:Hide() end, 106, 16, "Cancel")
cancel_button:InstallCustomTexture()
create_button:SetIcon ([[Interface\Buttons\UI-CheckBox-Check]], nil, nil, nil, {0.125, 0.875, 0.125, 0.875}, nil, 4, 2)
cancel_button:SetIcon ([[Interface\Buttons\UI-GroupLoot-Pass-Down]], nil, nil, nil, {0.125, 0.875, 0.125, 0.875}, nil, 4, 2)
local x_start = 20
local y_start = 21
name_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*1) + (50)) * -1)
aura_on_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*2) + (50)) * -1)
spellname_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*3) + (60)) * -1)
auraid_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*4) + (60)) * -1)
usespellid_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*5) + (60)) * -1)
icon_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*6) + (70)) * -1)
stack_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*7) + (70)) * -1)
sound_effect_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*8) + (70)) * -1)
say_something_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*9) + (70)) * -1)
aura_text_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*10) + (70)) * -1)
useglow_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*11) + (70)) * -1)
aura_addon_label:SetPoint ("topleft", f, "topleft", x_start, ((y_start*13) + (60)) * -1)
create_button:SetPoint ("topleft", f, "topleft", x_start, ((y_start*15) + (60)) * -1)
cancel_button:SetPoint ("topright", f, "topright", x_start*-1, ((y_start*15) + (60)) * -1)
end
DetailsAuraPanel.spellid = spellid
DetailsAuraPanel.encounterid = encounterid
DetailsAuraPanel.name.text = spellname .. " (d!)"
DetailsAuraPanel.spellname.text = spellname
DetailsAuraPanel.AuraSpellId.text = tostring (spellid)
DetailsAuraPanel.icon.texture = spellicon
DetailsAuraPanel.UseGlow.glow_test.animIn:Stop()
DetailsAuraPanel.UseGlow.glow_test.animOut:Play()
DetailsAuraPanel.UseGlow:SetValue (false)
DetailsAuraPanel.AuraOnDropdown:Select (1, true)
DetailsAuraPanel.StackSlider:SetValue (0)
DetailsAuraPanel.SoundEffectDropdown:Select (1, true)
DetailsAuraPanel.AuraText:SetText ("")
DetailsAuraPanel.SaySomething:SetText ("")
DetailsAuraPanel:Show()
end
------------------------------------------------------------------------------------------------------------------
--> get the total of damage and healing of this phase
function _detalhes:OnCombatPhaseChanged()
local current_combat = _detalhes:GetCurrentCombat()
local current_phase = current_combat.PhaseData [#current_combat.PhaseData][1]
local phase_damage_container = current_combat.PhaseData.damage [current_phase]
local phase_healing_container = current_combat.PhaseData.heal [current_phase]
local phase_damage_section = current_combat.PhaseData.damage_section
local phase_healing_section = current_combat.PhaseData.heal_section
if (not phase_damage_container) then
phase_damage_container = {}
current_combat.PhaseData.damage [current_phase] = phase_damage_container
end
if (not phase_healing_container) then
phase_healing_container = {}
current_combat.PhaseData.heal [current_phase] = phase_healing_container
end
for index, damage_actor in ipairs (_detalhes.cache_damage_group) do
local phase_damage = damage_actor.total - (phase_damage_section [damage_actor.nome] or 0)
phase_damage_section [damage_actor.nome] = damage_actor.total
phase_damage_container [damage_actor.nome] = (phase_damage_container [damage_actor.nome] or 0) + phase_damage
end
for index, healing_actor in ipairs (_detalhes.cache_healing_group) do
local phase_heal = healing_actor.total - (phase_healing_section [healing_actor.nome] or 0)
phase_healing_section [healing_actor.nome] = healing_actor.total
phase_healing_container [healing_actor.nome] = (phase_healing_container [healing_actor.nome] or 0) + phase_heal
end
end
function _detalhes:BossModsLink()
if (_G.DBM) then
local dbm_callback_phase = function (event, msg)
local mod = _detalhes.encounter_table.DBM_Mod
if (not mod) then
local id = _detalhes:GetEncounterIdFromBossIndex (_detalhes.encounter_table.mapid, _detalhes.encounter_table.id)
if (id) then
for index, tmod in ipairs (DBM.Mods) do
if (tmod.id == id) then
_detalhes.encounter_table.DBM_Mod = tmod
mod = tmod
end
end
end
end
local phase = mod and mod.vb and mod.vb.phase
if (phase and _detalhes.encounter_table.phase ~= phase) then
--_detalhes:Msg ("Current phase:", phase)
_detalhes:OnCombatPhaseChanged()
_detalhes.encounter_table.phase = phase
local cur_combat = _detalhes:GetCurrentCombat()
local time = cur_combat:GetCombatTime()
if (time > 5) then
tinsert (cur_combat.PhaseData, {phase, time})
end
_detalhes:SendEvent ("COMBAT_ENCOUNTER_PHASE_CHANGED", nil, phase)
end
end
local dbm_callback_pull = function (event, mod, delay, synced, startHp)
_detalhes.encounter_table.DBM_Mod = mod
_detalhes.encounter_table.DBM_ModTime = time()
end
DBM:RegisterCallback ("DBM_Announce", dbm_callback_phase)
DBM:RegisterCallback ("pull", dbm_callback_pull)
end
LoadAddOn ("BigWigs_Core")
if (BigWigs and not _G.DBM) then
BigWigs:Enable()
function _detalhes:BigWigs_Message (event, module, key, text)
--print ("new bigwigs message...")
if (key == "stages") then
local phase = text:gsub (".*%s", "")
phase = tonumber (phase)
--print ("Phase Changed!", phase)
if (phase and type (phase) == "number" and _detalhes.encounter_table.phase ~= phase) then
--_detalhes:Msg ("Current phase:", phase)
_detalhes:OnCombatPhaseChanged()
_detalhes.encounter_table.phase = phase
local cur_combat = _detalhes:GetCurrentCombat()
local time = cur_combat:GetCombatTime()
if (time > 5) then
tinsert (cur_combat.PhaseData, {phase, time})
end
_detalhes:SendEvent ("COMBAT_ENCOUNTER_PHASE_CHANGED", nil, phase)
end
end
end
BigWigs.RegisterMessage (_detalhes, "BigWigs_Message")
end
end
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--> details auras
local aura_prototype = {
name = "",
type = "DEBUFF",
target = "player",
boss = "0",
icon = "",
stack = 0,
sound = "",
sound_channel = "",
chat = "",
chat_where = "SAY",
chat_extra = "",
}
function _detalhes:CreateDetailsAura (name, auratype, target, boss, icon, stack, sound, chat)
local aura_container = _detalhes.details_auras
--already exists
if (aura_container [name]) then
_detalhes:Msg ("Aura name already exists.")
return
end
--create the new aura
local new_aura = _detalhes.table.copy ({}, aura_prototype)
new_aura.type = auratype or new_aura.type
new_aura.target = auratype or new_aura.target
new_aura.boss = boss or new_aura.boss
new_aura.icon = icon or new_aura.icon
new_aura.stack = math.max (stack or 0, new_aura.stack)
new_aura.sound = sound or new_aura.sound
new_aura.chat = chat or new_aura.chat
_detalhes.details_auras [name] = new_aura
return new_aura
end
function _detalhes:CreateAuraListener()
local listener = _detalhes:CreateEventListener()
function listener:on_enter_combat (event, combat, encounterId)
end
function listener:on_leave_combat (event, combat)
end
listener:RegisterEvent ("COMBAT_PLAYER_ENTER", "on_enter_combat")
listener:RegisterEvent ("COMBAT_PLAYER_LEAVE", "on_leave_combat")
end
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--> forge
function _detalhes:OpenForge()
if (not DetailsForge) then
local fw = _detalhes:GetFramework()
local lower = string.lower
--main frame
local f = CreateFrame ("frame", "DetailsForge", UIParent, "ButtonFrameTemplate")
f:SetSize (900, 600)
f.TitleText:SetText ("Details! Forge")
--f.portrait:SetTexture ([[Interface\CHARACTERFRAME\TEMPORARYPORTRAIT-FEMALE-BLOODELF]])
f.portrait:SetTexture ([[Interface\ICONS\INV_Misc_ReforgedArchstone_01]])
f:SetPoint ("center", UIParent, "center")
f:SetFrameStrata ("HIGH")
f:SetToplevel (true)
f:SetMovable (true)
tinsert (UISpecialFrames, "DetailsAuraPanel")
f:SetScript ("OnMouseDown", function(self, button)
if (self.isMoving) then
return
end
if (button == "RightButton") then
self:Hide()
else
self:StartMoving()
self.isMoving = true
end
end)
f:SetScript ("OnMouseUp", function(self, button)
if (self.isMoving and button == "LeftButton") then
self:StopMovingOrSizing()
self.isMoving = nil
end
end)
--modules
local all_modules = {}
local spell_already_added = {}
f:SetScript ("OnHide", function()
for _, module in ipairs (all_modules) do
if (module.data) then
wipe (module.data)
end
end
wipe (spell_already_added)
end)
local no_func = function()end
local nothing_to_show = {}
local current_module
local buttons = {}
function f:InstallModule (module)
if (module and type (module) == "table") then
tinsert (all_modules, module)
end
end
local all_players_module = {
name = "All Players",
desc = "Show a list of all player actors",
filters_widgets = function()
if (not DetailsForgeAllPlayersFilterPanel) then
local w = CreateFrame ("frame", "DetailsForgeAllPlayersFilterPanel", f)
w:SetSize (600, 20)
w:SetPoint ("topleft", f, "topleft", 120, -40)
local label = w:CreateFontString (nil, "overlay", "GameFontHighlightSmall")
label:SetText ("Player Name: ")
label:SetPoint ("left", w, "left", 5, 0)
local entry = fw:CreateTextEntry (w, nil, 120, 20, "entry", "DetailsForgeAllPlayersNameFilter")
entry:SetHook ("OnTextChanged", function() f:refresh() end)
entry:SetPoint ("left", label, "right", 2, 0)
end
return DetailsForgeAllPlayersFilterPanel
end,
search = function()
local t = {}
local filter = DetailsForgeAllPlayersNameFilter:GetText()
for _, actor in ipairs (_detalhes:GetCombat("current"):GetActorList (DETAILS_ATTRIBUTE_DAMAGE)) do
if (actor:IsGroupPlayer()) then
if (filter ~= "") then
filter = lower (filter)
local actor_name = lower (actor:name())
if (actor_name:find (filter)) then
t [#t+1] = actor
end
else
t [#t+1] = actor
end
end
end
return t
end,
header = {
{name = "Index", width = 40, type = "text", func = no_func},
{name = "Name", width = 150, type = "entry", func = no_func},
{name = "Class", width = 100, type = "entry", func = no_func},
{name = "GUID", width = 230, type = "entry", func = no_func},
{name = "Flag", width = 100, type = "entry", func = no_func},
},
fill_panel = false,
fill_gettotal = function (self) return #self.module.data end,
fill_fillrows = function (index, self)
local data = self.module.data [index]
if (data) then
return {
index,
data:name() or "",
data:class() or "",
data.serial or "",
"0x" .. _detalhes:hex (data.flag_original)
}
else
return nothing_to_show
end
end,
fill_name = "DetailsForgeAllPlayersFillPanel",
}
f:InstallModule (all_players_module)
-----------------------------------------------
local all_pets_module = {
name = "All Pets",
desc = "Show a list of all pet actors",
filters_widgets = function()
if (not DetailsForgeAllPetsFilterPanel) then
local w = CreateFrame ("frame", "DetailsForgeAllPetsFilterPanel", f)
w:SetSize (600, 20)
w:SetPoint ("topleft", f, "topleft", 120, -40)
--
local label = w:CreateFontString (nil, "overlay", "GameFontHighlightSmall")
label:SetText ("Pet Name: ")
label:SetPoint ("left", w, "left", 5, 0)
local entry = fw:CreateTextEntry (w, nil, 120, 20, "entry", "DetailsForgeAllPetsNameFilter")
entry:SetHook ("OnTextChanged", function() f:refresh() end)
entry:SetPoint ("left", label, "right", 2, 0)
--
local label = w:CreateFontString (nil, "overlay", "GameFontHighlightSmall")
label:SetText ("Owner Name: ")
label:SetPoint ("left", entry.widget, "right", 20, 0)
local entry = fw:CreateTextEntry (w, nil, 120, 20, "entry", "DetailsForgeAllPetsOwnerFilter")
entry:SetHook ("OnTextChanged", function() f:refresh() end)
entry:SetPoint ("left", label, "right", 2, 0)
end
return DetailsForgeAllPetsFilterPanel
end,
search = function()
local t = {}
local filter_petname = DetailsForgeAllPetsNameFilter:GetText()
local filter_ownername = DetailsForgeAllPetsOwnerFilter:GetText()
for _, actor in ipairs (_detalhes:GetCombat("current"):GetActorList (DETAILS_ATTRIBUTE_DAMAGE)) do
if (actor.owner) then
local can_add = true
if (filter_petname ~= "") then
filter_petname = lower (filter_petname)
local actor_name = lower (actor:name())
if (not actor_name:find (filter_petname)) then
can_add = false
end
end
if (filter_ownername ~= "") then
filter_ownername = lower (filter_ownername)
local actor_name = lower (actor.ownerName)
if (not actor_name:find (filter_ownername)) then
can_add = false
end
end
if (can_add) then
t [#t+1] = actor
end
end
end
return t
end,
header = {
{name = "Index", width = 40, type = "text", func = no_func},
{name = "Name", width = 150, type = "entry", func = no_func},
{name = "Owner", width = 150, type = "entry", func = no_func},
{name = "NpcID", width = 60, type = "entry", func = no_func},
{name = "GUID", width = 100, type = "entry", func = no_func},
{name = "Flag", width = 100, type = "entry", func = no_func},
},
fill_panel = false,
fill_gettotal = function (self) return #self.module.data end,
fill_fillrows = function (index, self)
local data = self.module.data [index]
if (data) then
return {
index,
data:name():gsub ("(<).*(>)", "") or "",
data.ownerName or "",
_detalhes:GetNpcIdFromGuid (data.serial),
data.serial or "",
"0x" .. _detalhes:hex (data.flag_original)
}
else
return nothing_to_show
end
end,
fill_name = "DetailsForgeAllPetsFillPanel",
}
f:InstallModule (all_pets_module)
-----------------------------------------------
local all_enemies_module = {
name = "All Enemies",
desc = "Show a list of all enemies actors",
filters_widgets = function()
if (not DetailsForgeAllEnemiesFilterPanel) then
local w = CreateFrame ("frame", "DetailsForgeAllEnemiesFilterPanel", f)
w:SetSize (600, 20)
w:SetPoint ("topleft", f, "topleft", 120, -40)
--
local label = w:CreateFontString (nil, "overlay", "GameFontHighlightSmall")
label:SetText ("Enemy Name: ")
label:SetPoint ("left", w, "left", 5, 0)
local entry = fw:CreateTextEntry (w, nil, 120, 20, "entry", "DetailsForgeAllEnemiesNameFilter")
entry:SetHook ("OnTextChanged", function() f:refresh() end)
entry:SetPoint ("left", label, "right", 2, 0)
end
return DetailsForgeAllEnemiesFilterPanel
end,
search = function()
local t = {}
local filter = DetailsForgeAllEnemiesNameFilter:GetText()
for _, actor in ipairs (_detalhes:GetCombat("current"):GetActorList (DETAILS_ATTRIBUTE_DAMAGE)) do
if (actor:IsNeutralOrEnemy()) then
if (filter ~= "") then
filter = lower (filter)
local actor_name = lower (actor:name())
if (actor_name:find (filter)) then
t [#t+1] = actor
end
else
t [#t+1] = actor
end
end
end
return t
end,
header = {
{name = "Index", width = 40, type = "text", func = no_func},
{name = "Name", width = 150, type = "entry", func = no_func},
{name = "NpcID", width = 60, type = "entry", func = no_func},
{name = "GUID", width = 230, type = "entry", func = no_func},
{name = "Flag", width = 100, type = "entry", func = no_func},
},
fill_panel = false,
fill_gettotal = function (self) return #self.module.data end,
fill_fillrows = function (index, self)
local data = self.module.data [index]
if (data) then
return {
index,
data:name(),
_detalhes:GetNpcIdFromGuid (data.serial),
data.serial or "",
"0x" .. _detalhes:hex (data.flag_original)
}
else
return nothing_to_show
end
end,
fill_name = "DetailsForgeAllEnemiesFillPanel",
}
f:InstallModule (all_enemies_module)
-----------------------------------------------
local EncounterSpellEvents = EncounterDetailsDB and EncounterDetailsDB.encounter_spells
local all_spells_module = {
name = "All Spells",
desc = "Show a list of all spells used",
filters_widgets = function()
if (not DetailsForgeAllSpellsFilterPanel) then
local w = CreateFrame ("frame", "DetailsForgeAllSpellsFilterPanel", f)
w:SetSize (600, 20)
w:SetPoint ("topleft", f, "topleft", 120, -40)
--
local label = w:CreateFontString (nil, "overlay", "GameFontHighlightSmall")
label:SetText ("Spell Name: ")
label:SetPoint ("left", w, "left", 5, 0)
local entry = fw:CreateTextEntry (w, nil, 120, 20, "entry", "DetailsForgeAllSpellsNameFilter")
entry:SetHook ("OnTextChanged", function() f:refresh() end)
entry:SetPoint ("left", label, "right", 2, 0)
--
local label = w:CreateFontString (nil, "overlay", "GameFontHighlightSmall")
label:SetText ("Caster Name: ")
label:SetPoint ("left", entry.widget, "right", 20, 0)
local entry = fw:CreateTextEntry (w, nil, 120, 20, "entry", "DetailsForgeAllSpellsCasterFilter")
entry:SetHook ("OnTextChanged", function() f:refresh() end)
entry:SetPoint ("left", label, "right", 2, 0)
end
return DetailsForgeAllSpellsFilterPanel
end,
search = function()
local t = {}
local filter_name = DetailsForgeAllSpellsNameFilter:GetText()
local filter_caster = DetailsForgeAllSpellsCasterFilter:GetText()
local combat = _detalhes:GetCombat("current")
local containers = {combat:GetActorList (DETAILS_ATTRIBUTE_DAMAGE), combat:GetActorList (DETAILS_ATTRIBUTE_HEAL),
combat:GetActorList (DETAILS_ATTRIBUTE_ENERGY)}
wipe (spell_already_added)
for _, container in ipairs (containers) do
for _, actor in ipairs (container) do
local can_add = true
if (filter_caster ~= "") then
filter_caster = lower (filter_caster)
local actor_name = lower (actor:name())
if (not actor_name:find (filter_caster)) then
can_add = false
end
end
if (can_add) then
for spellid, spell in pairs (actor:GetSpellList()) do
can_add = true
if (filter_name ~= "") then
filter_name = lower (filter_name)
local spellname = lower (select (1, GetSpellInfo (spellid)) or "-")
if (not spellname:find (filter_name)) then
can_add = false
end
end
if (can_add and not spell_already_added [spellid]) then
spell_already_added [spellid] = true
tinsert (t, {spell, actor})
end
end
end
end
end
return t
end,
header = {
{name = "Index", width = 40, type = "text", func = no_func},
{name = "Name", width = 150, type = "entry", func = no_func},
{name = "SpellID", width = 60, type = "entry", func = no_func},
{name = "School", width = 60, type = "entry", func = no_func},
{name = "Caster", width = 100, type = "entry", func = no_func},
{name = "Event", width = 300, type = "entry", func = no_func},
},
fill_panel = false,
fill_gettotal = function (self) return #self.module.data end,
fill_fillrows = function (index, self)
local data = self.module.data [index]
if (data) then
local events = ""
if (EncounterSpellEvents and EncounterSpellEvents [data[1].id]) then
for token, _ in pairs (EncounterSpellEvents [data[1].id].token) do
token = token:gsub ("SPELL_", "")
events = events .. token .. ", "
end
events = events:sub (1, #events - 3)
end
return {
index,
select (1, GetSpellInfo (data[1].id)) or "",
data[1].id or "",
_detalhes:GetSpellSchoolFormatedName (data[1].spellschool) or "",
data[2]:name(),
events
}
else
return nothing_to_show
end
end,
fill_name = "DetailsForgeAllSpellsFillPanel",
}
f:InstallModule (all_spells_module)
-----------------------------------------------
local select_module = function (module_number)
if (current_module ~= module_number) then
local module = all_modules [current_module]
if (module) then
local filters = module.filters_widgets()
filters:Hide()
local fill_panel = module.fill_panel
fill_panel:Hide()
end
end
for index, button in ipairs (buttons) do
button.textcolor = "white"
end
buttons[module_number].textcolor = "orange"
local module = all_modules [module_number]
if (module) then
current_module = module_number
local fillpanel = module.fill_panel
if (not fillpanel) then
fillpanel = fw:NewFillPanel (f, module.header, module.fill_name, nil, 740, 480, module.fill_gettotal, module.fill_fillrows, false)
fillpanel:SetPoint (120, -80)
fillpanel.module = module
module.fill_panel = fillpanel
end
local filters = module.filters_widgets()
filters:Show()
local data = module.search()
module.data = data
fillpanel:Show()
fillpanel:Refresh()
end
end
function f:refresh()
select_module (current_module)
end
for i = 1, #all_modules do
local module = all_modules [i]
local b = fw:CreateButton (f, select_module, 120, 12, module.name, i)
b.tooltip = module.desc
b.textalign = "<"
b:SetPoint ("topleft", f, "topleft", 10, (i*16*-1) - 67)
tinsert (buttons, b)
end
select_module (1)
end
DetailsForge:Show()
end
--_detalhes:ScheduleTimer ("OpenForge", 3)
View Git Blame Copy Permalink