---Dispella

dStuff = {
["dispelannouncement"] = {
enable = true,
justify = "CENTER",
fontsize = 16,
textcolor = "|cff00ff00",
},

font = "Fonts\\FRIZQT__.ttf",
}

local f = CreateFrame("MessageFrame", "dDispelFrame", UIParent)
f:SetPoint("TOP", 0, -220)
f:SetSize(200, 100)
f:SetFont(dStuff.font, dStuff.dispelannouncement.fontsize)
f:SetShadowOffset(1, -1)
f:SetShadowColor(0,0,0)
f:SetTimeVisible(2)
f:SetBackdrop({bgFile = "Interface\\ChatFrame\\ChatFrameBackground"})
f:SetBackdropColor(0,0,0,0)
f:SetMovable(true)
f:SetFrameStrata("HIGH")
f:SetInsertMode("TOP")
f:SetJustifyH(dStuff.dispelannouncement.justify)
f:SetClampedToScreen(true)
f:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED")
f:SetScript("OnEvent", function(self, event, ...)
local timestamp, eventType, _, sourceGUID, sourceName, sourceFlags, sourceRaidFlags, destGUID, destName, destFlags, destRaidFlags, spellID, spellName = ...
if (eventType == "SPELL_DISPEL" or eventType == "SPELL_STOLEN") and sourceName == UnitName("player") then
f:AddMessage("- "..dStuff.dispelannouncement.textcolor..select(16, ...), 1, 1, 1)
end
end)

--Necrotic Tracker--
CreateFrame('GameTooltip', 'NecroticTooltip', nil, 'GameTooltipTemplate'):SetOwner(WorldFrame, 'ANCHOR_NONE')

local function GetNecroticStrikeAbsorption(buff)
NecroticTooltip:ClearLines()
NecroticTooltip:SetUnitDebuff('player', buff:GetID())
return tonumber(NecroticTooltipTextLeft2:GetText():match('.* (%d+%s?) .*'))
end

local function short(n)
return n >= 1000 and ('%dk'):format(floor(n / 1000)) or
n >= 100 and ('%dh'):format(floor(n / 100 )) or n
end

local NecroticStrike = GetSpellInfo(73975)

hooksecurefunc('AuraButton_Update', function(buttonName, index, filter)
if UnitAura('player', index, filter) ~= NecroticStrike then return end

local buff = _G[ buttonName .. index ]
local absorption = GetNecroticStrikeAbsorption(buff)

if absorption then
buff.count:SetText(short(absorption))
buff.count:Show()
return true
end
end)

---Target/FocusHp %---
local registerOnShow = function(frame) frame:RegisterEvent("UNIT_HEALTH") end
local unregisterOnHide = function(frame) frame:UnregisterEvent("UNIT_HEALTH") end

local healthUpdate = function(frame, _, unit)
if not unit or unit == frame.target then
local hp = UnitHealth(frame.target)
if hp > 0 then
hp = hp / UnitHealthMax(frame.target) * 100
frame.text:SetFormattedText("%.1f%%", hp)
else
frame.text:SetText("0%")
end
end
end

local t_hpFrame = CreateFrame("Frame", "TargetPercent", TargetFrameHealthBar)
t_hpFrame:SetPoint("LEFT", TargetFrameHealthBar, "LEFT", -48, 0)
t_hpFrame:SetWidth(50)
t_hpFrame:SetHeight(20)
t_hpFrame.text = t_hpFrame:CreateFontString("TargetPercentText", "OVERLAY")
t_hpFrame.text:SetAllPoints(t_hpFrame)
t_hpFrame.text:SetFontObject(TextStatusBarText)
t_hpFrame.text:SetJustifyH("RIGHT")
t_hpFrame:RegisterEvent("PLAYER_TARGET_CHANGED")
t_hpFrame:SetScript("OnShow", registerOnShow)
t_hpFrame:SetScript("OnHide", unregisterOnHide)
t_hpFrame:RegisterForDrag("LeftButton")
t_hpFrame:SetClampedToScreen(true)
t_hpFrame:SetScript("OnDragStart", startDrag)
t_hpFrame:SetScript("OnDragStop", stopDrag)
t_hpFrame:SetScript("OnEvent", healthUpdate)
t_hpFrame.target = "target"

local f_hpFrame = CreateFrame("Frame", "FocusPercent", FocusFrameHealthBar)
f_hpFrame:SetPoint("LEFT", FocusFrameHealthBar, "LEFT", -46, 0)
f_hpFrame:SetWidth(50)
f_hpFrame:SetHeight(20)
f_hpFrame.text = f_hpFrame:CreateFontString("FocusPercentText", "OVERLAY")
f_hpFrame.text:SetAllPoints(f_hpFrame)
f_hpFrame.text:SetFontObject(TextStatusBarText)
f_hpFrame.text:SetJustifyH("RIGHT")
f_hpFrame:RegisterEvent("PLAYER_FOCUS_CHANGED")
f_hpFrame:SetScript("OnShow", registerOnShow)
f_hpFrame:SetScript("OnHide", unregisterOnHide)
f_hpFrame:RegisterForDrag("LeftButton")
f_hpFrame:SetClampedToScreen(true)
f_hpFrame:SetScript("OnDragStart", startDrag)
f_hpFrame:SetScript("OnDragStop", stopDrag)
f_hpFrame:SetScript("OnEvent", healthUpdate)
f_hpFrame.target = "focus"

local bossHealthUpdate = function(frame)
local hp = UnitHealth(frame.target)
if hp > 0 then
hp = hp / UnitHealthMax(frame.target) * 100
frame.text:SetFormattedText("%.1f%%", hp)
else
frame.text:SetText("0%")
end
end

---Editbox on top---
ChatFrame1EditBox:ClearAllPoints()
ChatFrame1EditBox:SetPoint('BOTTOMRIGHT', _G.ChatFrame1, 'TOPRIGHT', 0, 20)
ChatFrame1EditBox:SetPoint('BOTTOMLEFT', _G.ChatFrame1, 'TOPLEFT', 0, 5)

--Party full Debuffs--

for i=1,4 do
local f = _G["PartyMemberFrame"..i]
f:UnregisterEvent("UNIT_AURA")
local g = CreateFrame("Frame")
g:RegisterEvent("UNIT_AURA")
g:SetScript("OnEvent",function(self,event,a1)
if a1 == f.unit then
RefreshDebuffs(f,a1,20,nil,1)
else
if a1 == f.unit.."pet" then
PartyMemberFrame_RefreshPetDebuffs(f)
end
end
end)
local b = _G[f:GetName().."Debuff1"]
b:ClearAllPoints()
b:SetPoint("TOPLEFT",48,-30)

for j=5,20 do
local l = f:GetName().."Debuff"

local n = l..j
local c = CreateFrame("Frame",n,f,"PartyDebuffFrameTemplate")
c:SetPoint("LEFT",_G[l..(j-1)],"RIGHT",1,0)

end
end

--Focuser--
local modifier = "alt"
local mouseButton = "1"

local function SetFocusHotkey(frame)
frame:SetAttribute(modifier.."-type"..mouseButton,"focus")
end

local function CreateFrame_Hook(type, name, parent, template)
if template == "SecureUnitButtonTemplate" then
SetFocusHotkey(_G[name])
end
end

hooksecurefunc("CreateFrame", CreateFrame_Hook)

local f = CreateFrame("CheckButton", "FocuserButton", UIParent, "SecureActionButtonTemplate")
f:SetAttribute("type1","macro")
f:SetAttribute("macrotext","/focus mouseover")
SetOverrideBindingClick(FocuserButton,true,modifier.."-BUTTON"..mouseButton,"FocuserButton")

local duf = {
PlayerFrame,
PetFrame,
PartyMemberFrame1,
PartyMemberFrame2,
PartyMemberFrame3,
PartyMemberFrame4,
PartyMemberFrame1PetFrame,
PartyMemberFrame2PetFrame,
PartyMemberFrame3PetFrame,
PartyMemberFrame4PetFrame,
TargetFrame,
TargetofTargetFrame,
ArenaEnemyFrame1,
ArenaEnemyFrame2,
ArenaEnemyFrame3,
ArenaEnemyFrame4,
ArenaEnemyFrame5,
ArenaEnemyFrame1PetFrame,
ArenaEnemyFrame2PetFrame,
ArenaEnemyFrame3PetFrame,
ArenaEnemyFrame4PetFrame,
ArenaEnemyFrame5PetFrame,
}

for i,frame in pairs(duf) do
SetFocusHotkey(frame)
end