local unpack, pairs, ipairs = unpack, pairs, ipairs;
local ssub = string.sub;
local min = math.min;
-local UnitName, UnitInRange, UnitDebuff = UnitName, UnitInRange, UnitDebuff;
+local UnitName, UnitClass = UnitName, UnitClass;
+local UnitInRange, UnitDebuff, UnitIsCharmed = UnitInRange, UnitDebuff, UnitIsCharmed;
local UnitPower, UnitPowerMax, UnitPowerType = UnitPower, UnitPowerMax, UnitPowerType;
local UnitHealth, UnitHealthMax = UnitHealth, UnitHealthMax;
local UnitInParty, UnitInRaid = UnitInParty, UnitInRaid;
local UnitGetIncomingHeals, UnitGetTotalAbsorbs = UnitGetIncomingHeals, UnitGetTotalAbsorbs;
-local UnitGetTotalHealAbsorbs = UnitGetTotalHealAbsorbs;
+local UnitThreatSituation, GetThreatStatusColor = UnitThreatSituation, GetThreatStatusColor;
local UnitIsDeadOrGhost, UnitIsConnected = UnitIsDeadOrGhost, UnitIsConnected;
+local UnitHasIncomingResurrection = UnitHasIncomingResurrection;
+local UnitGetTotalHealAbsorbs = UnitGetTotalHealAbsorbs;
local IsInGroup, IsInRaid = IsInGroup, IsInRaid;
-local UnitIsCharmed = UnitIsCharmed;
local CTimerAfter = C_Timer.After;
-local UnitClass = UnitClass;
-local UnitHasIncomingResurrection = UnitHasIncomingResurrection;
-local UnitThreatSituation, GetThreatStatusColor = UnitThreatSituation, GetThreatStatusColor;
local RAID_CLASS_COLORS = RAID_CLASS_COLORS;
-local CreateFrame, RegisterStateDriver, RegisterUnitWatch = CreateFrame, RegisterStateDriver, RegisterUnitWatch;
-local SPELL_POWER_MANA = SPELL_POWER_MANA;
-local checkIndicators = OmaCheckIndicators;
+
+local Frames = OmaFrames;
+local Indicators = OmaIndicators;
+local checkIndicators = Indicators.CheckIndicators;
local CFrame = CreateFrame("Frame", "OmaCFrame", UIParent);
local party = {};
local raid = {};
-local positions = {"TOPRIGHT", "BOTTOMLEFT"};
local updaters = {};
--- configurable settings
-local width, height = 80, 40;
-local anchorX, anchorY = 0, -330;
-local indSize = 14;
-local baseColor = {0, 0, 0};
-local bgColor = {0.7, 0.7, 0.7};
-local healthColor = {0.3, 0.3, 0.3};
-local shieldColor = {0, 0.7, 1};
-local shieldhlColor = {0.5, 0.8, 1};
-local healpredColor = {0.5, 0.6, 0.5};
-local healabsorbColor = {0.1, 0.1, 0.1};
-local overlayColorDispel = {1, 0.5, 0, 0.5};
-local overlayColorCharm = {0.8, 0, 1, 0.5};
-local overlayColorAlert = {1, 0, 0, 0.5};
-local powerColors = {
- [SPELL_POWER_MANA] = {0, 0.5, 1},
- [SPELL_POWER_RAGE] = {1, 0, 0},
- [SPELL_POWER_FOCUS] = {1, 0.5, 0},
- [SPELL_POWER_ENERGY] = {1, 0.8, 0},
- [SPELL_POWER_RUNIC_POWER] = {0.9, 0, 0.1},
-};
--- watch to not remove mana entry
-setmetatable(powerColors, {__index = function(t) return t[SPELL_POWER_MANA] end});
+local width, height = Frames.Width, Frames.Height;
+local anchorX, anchorY = Frames.AnchorX, Frames.AnchorY;
+local baseColor = Frames.BaseColor;
+local overlayColorDispel = Frames.OverlayColorDispel;
+local overlayColorCharm = Frames.OverlayColorCharm;
+local overlayColorAlert = Frames.OverlayColorAlert;
+local powerColors = Frames.PowerColors;
local function updateHealth(frame, unit)
local current, max = UnitHealth(unit), frame.health.max;
end
end
-local function unitEvent(self, event, ...)
- local arg1, arg2, arg3, arg4 = ...;
- if event == "UNIT_HEALTH" or event == "UNIT_HEALTH_FREQUENT" then
- updateHealth(self, arg1);
- updateShield(self, arg1);
- updateHealAbsorb(self, arg1);
+local eventFuncs = {
+ ["UNIT_HEALTH"] = function(frame, unit)
+ updateHealth(frame, unit);
+ updateShield(frame, unit);
+ updateHealAbsorb(frame, unit);
-- no heal prediction update, that doesn't overflow too much
- elseif event == "UNIT_POWER" then
- updatePower(self, arg1);
- elseif event == "UNIT_AURA" then
- updateAuras(self, arg1);
- elseif event == "UNIT_ABSORB_AMOUNT_CHANGED" then
- updateShield(self, arg1);
- elseif event == "UNIT_HEAL_PREDICTION" then
- updateHealPred(self, arg1);
- elseif event == "UNIT_HEAL_ABSORB_AMOUNT_CHANGED" then
- updateHealAbsorb(self, arg1);
- elseif event == "UNIT_THREAT_SITUATION_UPDATE" then
- updateAggro(self, arg1);
- elseif event == "UNIT_MAXHEALTH" then
- updateMaxHealth(self, arg1);
- elseif event == "UNIT_MAXPOWER" then
- updateMaxPower(self, arg1);
- elseif event == "UNIT_DISPLAYPOWER" then
- updatePowerColor(self, arg1);
- elseif event == "INCOMING_RESURRECT_CHANGED" then
+ end,
+ ["UNIT_POWER"] = function(frame, unit)
+ updatePower(frame, unit);
+ end,
+ ["UNIT_AURA"] = function(frame, unit)
+ updateAuras(frame, unit);
+ end,
+ ["UNIT_HEAL_PREDICTION"] = function(frame, unit)
+ updateHealPred(frame, unit);
+ end,
+ ["UNIT_ABSORB_AMOUNT_CHANGED"] = function(frame, unit)
+ updateShield(frame, unit);
+ end,
+ ["UNIT_HEAL_ABSORB_AMOUNT_CHANGED"] = function(frame, unit)
+ updateHealAbsorb(frame, unit);
+ end,
+ ["UNIT_THREAT_SITUATION_UPDATE"] = function(frame, unit)
+ updateAggro(frame, unit);
+ end,
+ ["UNIT_MAXHEALTH"] = function(frame, unit)
+ updateMaxHealth(frame, unit);
+ end,
+ ["UNIT_MAXPOWER"] = function(frame, unit)
+ updateMaxPower(frame, unit);
+ end,
+ ["UNIT_DISPLAYPOWER"] = function(frame, unit)
+ updatePowerColor(frame, unit);
+ end,
+ ["UNIT_NAME_UPDATE"] = function(frame, unit)
+ updateName(frame, unit);
+ end,
+ ["UNIT_CONNECTION"] = function(frame, unit)
+ updateHealth(frame, unit);
+ end,
+ ["INCOMING_RESURRECT_CHANGED"] = function(frame, unit)
-- TODO have an icon
- updateHealth(self, arg1);
- elseif event == "UNIT_NAME_UPDATE" then
- updateName(self, arg1);
- elseif event == "PARTY_MEMBER_ENABLE" or event == "PARTY_MEMBER_DISABLE" then
+ updateHealth(frame, unit);
+ end,
+ ["PARTY_MEMBER_ENABLE"] = function(frame)
-- new power info possibly (FrameXML/CompactUnitFrame.lua)
- updateMaxPower(self, self.unit);
- updatePowerColor(self, self.unit);
- elseif event == "UNIT_CONNECTION" then
- updateHealth(self, arg1);
- elseif event == "UPDATE_ALL_BARS" then
- updateMaxHealth(self, arg1);
- updateMaxPower(self, arg1);
- --updateHealth(self, arg1); -- MaxHealth covers this
- --updatePower(self, arg1); -- MaxPower covers this
- updateAuras(self, arg1);
- updateShield(self, arg1);
- updateHealPred(self, arg1);
- updateHealAbsorb(self, arg1);
- updatePowerColor(self, arg1);
- updateName(self, arg1);
- end
+ updateMaxPower(frame, frame.unit);
+ updatePowerColor(frame, frame.unit);
+ end,
+ ["UPDATE_ALL_BARS"] = function(frame, unit)
+ updateMaxHealth(frame, unit);
+ updateMaxPower(frame, unit);
+ --updateHealth(frame, unit); -- MaxHealth covers this
+ --updatePower(frame, unit); -- MaxPower covers this
+ updateAuras(frame, unit);
+ updateShield(frame, unit);
+ updateHealPred(frame, unit);
+ updateHealAbsorb(frame, unit);
+ updatePowerColor(frame, unit);
+ updateAggro(frame, unit);
+ updateName(frame, unit);
+ end,
+};
+eventFuncs["UNIT_HEALTH_FREQUENT"] = eventFuncs["UNIT_HEALTH"];
+eventFuncs["PARTY_MEMBER_DISABLE"] = eventFuncs["PARTY_MEMBER_ENABLE"];
+local function unitEvent(self, event, ...)
+ local arg1, arg2, arg3, arg4 = ...;
+ eventFuncs[event](self, arg1);
end
local function unitUpdate(self, elapsed)
-- events are taken from FrameXML/CompactUnitFrame.lua
-- TODO vehicle support, ready check support, raid marker support,
-- player flags support (/afk, /dnd)
+ -- TODO only update for vehicle events here
frame:RegisterEvent("PARTY_MEMBER_ENABLE");
frame:RegisterEvent("PARTY_MEMBER_DISABLE");
frame:RegisterUnitEvent("UNIT_HEALTH", unit);
if vis then
frame:Show();
frame:SetScript("OnUpdate", unitUpdate);
- frame:UnregisterAllEvents();
- registerEvents(frame, frame.unit);
+ --frame:UnregisterAllEvents();
+ --registerEvents(frame, frame.unit);
-- wait one frame to update data
-- create function if needed to pass arguments to unitEvent
local func = updaters[frame];
else
frame:Hide();
frame:SetScript("OnUpdate", nil);
- frame:UnregisterAllEvents();
+ --frame:UnregisterAllEvents();
end;
end
end
end
-local function setupIndicators(frame)
- frame.inds = CreateFrame("Frame", nil, frame);
- frame.inds:SetAllPoints();
- frame.inds:Hide();
- for _, pos in pairs(positions) do
- frame.inds[pos] = frame.inds:CreateTexture(nil, "OVERLAY");
- frame.inds[pos]:SetPoint(pos, frame.inds, pos);
- frame.inds[pos]:SetWidth(indSize);
- frame.inds[pos]:SetHeight(indSize);
- frame.inds[pos]:SetTexture("Interface\\AddOns\\OmaRF\\images\\rhomb");
- frame.inds[pos]:SetVertexColor(1, 0, 0);
- frame.inds[pos]:Hide();
- frame.inds[pos].text = frame.inds:CreateFontString(nil, "OVERLAY", "GameFontHighlight");
- frame.inds[pos].text:SetPoint("BOTTOMRIGHT", frame.inds[pos], "BOTTOMRIGHT");
- frame.inds[pos].text:Hide();
- end
- frame.major = CreateFrame("Frame", nil, frame);
- frame.major:SetPoint("TOPLEFT", frame, "TOPLEFT", 4, -indSize + 4);
- frame.major:SetPoint("BOTTOMRIGHT", frame, "BOTTOMRIGHT");
- for i = 1,3 do
- frame.major[i] = frame.major:CreateTexture(nil, "OVERLAY");
- if i == 1 then
- frame.major[i]:SetPoint("TOPLEFT", frame.major, "TOPLEFT");
- else
- frame.major[i]:SetPoint("TOPLEFT", frame.major[i-1], "TOPLEFT");
- end
- frame.major[i]:SetWidth(indSize*2);
- frame.major[i]:SetHeight(indSize*2);
- frame.major[i]:Hide();
- frame.major[i].text = frame.major:CreateFontString(nil, "OVERLAY", "GameFontHighlight");
- frame.major[i].text:SetPoint("BOTTOMRIGHT", frame.major[i], "BOTTOMRIGHT");
- frame.major[i].text:Hide();
- frame.major[i].stack = frame.major:CreateFontString(nil, "OVERLAY", "GameFontHighlight");
- frame.major[i].stack:SetPoint("TOPLEFT", frame.major[i], "TOPLEFT");
- frame.major[i].stack:Hide();
- end
-end
-
-local function setupFrame(frame, secure, unit)
- -- create visuals
- secure:SetWidth(width+2);
- frame:SetWidth(width+2);
- frame.base = frame:CreateTexture(nil, "BACKGROUND");
- frame.base:SetAllPoints();
- frame.base:SetColorTexture(unpack(baseColor));
- frame.background = frame:CreateTexture(nil, "BACKGROUND", nil, 1);
- frame.background:SetPoint("TOPLEFT", frame, "TOPLEFT", 1, -1);
- frame.background:SetPoint("BOTTOMRIGHT", frame, "BOTTOMRIGHT", -1, 1);
- frame.background:SetColorTexture(unpack(bgColor));
- frame.health = frame:CreateTexture(nil, "BORDER");
- frame.health:SetTexture("Interface\\RaidFrame\\Raid-Bar-Hp-Fill");
- frame.health:SetPoint("TOPLEFT", frame.background, "TOPLEFT");
- frame.health:SetPoint("BOTTOMLEFT", frame.background, "BOTTOMLEFT", 0, 2);
- frame.health:SetVertexColor(unpack(healthColor));
- frame.health:SetWidth(width);
- frame.health.max = UnitHealthMax(unit);
- frame.mana = frame:CreateTexture(nil, "BORDER");
- frame.mana:SetPoint("TOPLEFT", frame.background, "BOTTOMLEFT", 0, 2);
- frame.mana:SetPoint("BOTTOMLEFT", frame.background, "BOTTOMLEFT");
- frame.mana:SetColorTexture(1, 1, 1);
- frame.mana:SetWidth(width);
- frame.mana.max = UnitPowerMax(unit);
- frame.shield = frame:CreateTexture(nil, "BORDER");
- frame.shield:SetPoint("TOPLEFT", frame.health, "TOPRIGHT");
- frame.shield:SetPoint("BOTTOMLEFT", frame.health, "BOTTOMRIGHT");
- frame.shield:SetColorTexture(unpack(shieldColor));
- frame.shield:Hide();
- frame.shieldhl = frame:CreateTexture(nil, "ARTWORK");
- frame.shieldhl:SetPoint("TOPLEFT", frame.background, "TOPRIGHT", -1, 0);
- frame.shieldhl:SetPoint("BOTTOMRIGHT", frame.background, "BOTTOMRIGHT", 1, 0);
- frame.shieldhl:SetColorTexture(unpack(shieldhlColor));
- frame.shieldhl:Hide();
- frame.healpred = frame:CreateTexture(nil, "ARTWORK");
- frame.healpred:SetPoint("TOPLEFT", frame.health, "TOPRIGHT");
- frame.healpred:SetPoint("BOTTOMLEFT", frame.health, "BOTTOMRIGHT");
- frame.healpred:SetColorTexture(unpack(healpredColor));
- frame.healpred:Hide();
- frame.healabsorb = frame:CreateTexture(nil, "ARTWORK");
- frame.healabsorb:SetPoint("TOPRIGHT", frame.health, "TOPRIGHT");
- frame.healabsorb:SetPoint("BOTTOMRIGHT", frame.health, "BOTTOMRIGHT");
- frame.healabsorb:SetColorTexture(unpack(healabsorbColor));
- frame.healabsorb:Hide();
- frame.overlay = frame:CreateTexture(nil, "ARTWORK", nil, 1);
- frame.overlay:SetPoint("TOPLEFT", frame.background, "TOPLEFT");
- frame.overlay:SetPoint("BOTTOMRIGHT", frame.background, "BOTTOMRIGHT", 0, 2);
- frame.overlay:Hide();
- frame.name = frame:CreateFontString(nil, "OVERLAY", "GameFontHighlight");
- frame.name:SetPoint("CENTER", frame.background, "CENTER", 0, 11);
- frame.text = frame:CreateFontString(nil, "OVERLAY", "GameFontHighlight");
- frame.text:SetFont(STANDARD_TEXT_FONT, 13);
- frame.text:SetPoint("CENTER", frame.background, "CENTER", 0, -1);
- frame.text:Hide();
- setupIndicators(frame);
- -- set attributes
- secure:RegisterForClicks("AnyDown");
- secure:SetAttribute("type1", "spell"); -- left click
- secure:SetAttribute("type2", "spell"); -- right click
- secure:SetAttribute("shift-type1", "spell"); -- shift left click
- secure:SetAttribute("shift-type2", "spell"); -- shift right click
- secure:SetAttribute("ctrl-type1", "spell"); -- ctrl left click
- secure:SetAttribute("alt-type2", "spell"); -- alt right click
- secure:SetAttribute("alt-shift-type1", "spell"); -- alt+shift left click
- secure:SetAttribute("alt-shift-type2", "spell"); -- alt+shift right click
- secure:SetAttribute("spell1", "Holy Light");
- secure:SetAttribute("spell2", "Bestow Faith");
- secure:SetAttribute("shift-spell1", "Flash of Light");
- secure:SetAttribute("shift-spell2", "Light of the Martyr");
- secure:SetAttribute("ctrl-spell1", "Cleanse");
- secure:SetAttribute("alt-spell2", "Lay on Hands");
- secure:SetAttribute("alt-shift-spell1", "Beacon of Light");
- secure:SetAttribute("alt-shift-spell2", "Beacon of Faith");
- -- rest give target and menu
- secure:SetAttribute("*type1", "target");
- secure:SetAttribute("*type2", "togglemenu");
-end
-
-local function initializeParty()
- local secure = CreateFrame("Button", "OmaPartySecure0", CFrame, "SecureUnitButtonTemplate");
- local frame = CreateFrame("Frame", "OmaParty0", CFrame);
- local unit = "player";
- secure:SetAttribute("unit", unit);
- secure:SetPoint("TOPLEFT", CFrame, "TOPLEFT");
- secure:SetHeight(height+2);
- frame.unit = unit;
- frame:SetPoint("TOPLEFT", CFrame, "TOPLEFT");
- frame:SetHeight(height+2);
- frame:SetScript("OnEvent", unitEvent);
- frame:Hide();
- setupFrame(frame, secure, unit);
- RegisterStateDriver(secure, "visibility", "[@player,group:raid] hide; show");
- party[0] = {secure=secure, frame=frame};
- for i = 1,4 do
- local secure = CreateFrame("Button", "OmaPartySecure"..i, CFrame, "SecureUnitButtonTemplate");
- local frame = CreateFrame("Frame", "OmaParty"..i, CFrame);
- local unit = "party"..i;
- secure:SetAttribute("unit", unit);
- secure:SetPoint("TOPLEFT", party[i-1].secure, "TOPRIGHT");
- secure:SetPoint("BOTTOMLEFT", party[i-1].secure, "BOTTOMRIGHT");
- frame.unit = unit;
- frame:SetPoint("TOPLEFT", party[i-1].frame, "TOPRIGHT");
- frame:SetPoint("BOTTOMLEFT", party[i-1].frame, "BOTTOMRIGHT");
- frame:SetScript("OnEvent", unitEvent);
- frame:Hide();
- setupFrame(frame, secure, unit);
- RegisterUnitWatch(secure);
- party[i] = {secure=secure, frame=frame};
- end
-end
-
-local function initializeRaid()
- local secure = CreateFrame("Button", "OmaRaidSecure1", CFrame, "SecureUnitButtonTemplate");
- local frame = CreateFrame("Frame", "OmaRaid1", CFrame);
- local unit = "raid1";
- secure:SetAttribute("unit", unit);
- secure:SetPoint("TOPLEFT", CFrame, "TOPLEFT");
- secure:SetHeight(height+2);
- frame.unit = unit;
- frame:SetPoint("TOPLEFT", CFrame, "TOPLEFT");
- frame:SetHeight(height+2);
- frame:SetScript("OnEvent", unitEvent);
- frame:Hide();
- setupFrame(frame, secure, unit);
- RegisterUnitWatch(secure);
- raid[1] = {secure=secure, frame=frame};
- for y = 1,7 do
- local i = y*5+1;
- local secure = CreateFrame("Button", "OmaRaidSecure"..i, CFrame, "SecureUnitButtonTemplate");
- local frame = CreateFrame("Frame", "OmaRaid"..i, CFrame);
- local unit = "raid"..i;
- secure:SetAttribute("unit", unit);
- secure:SetPoint("TOPLEFT", raid[i-5].secure, "BOTTOMLEFT");
- secure:SetHeight(height+2);
- frame.unit = unit;
- frame:SetPoint("TOPLEFT", raid[i-5].frame, "BOTTOMLEFT");
- frame:SetHeight(height+2);
- frame:SetScript("OnEvent", unitEvent);
- frame:Hide();
- setupFrame(frame, secure, unit);
- RegisterUnitWatch(secure);
- raid[i] = {secure=secure, frame=frame};
- end
- for y = 0,7 do
- for x = 1,4 do
- local i = y*5+x+1;
- local secure = CreateFrame("Button", "OmaRaidSecure"..i, CFrame, "SecureUnitButtonTemplate");
- local frame = CreateFrame("Frame", "OmaRaid"..i, CFrame);
- local unit = "raid"..i;
- secure:SetAttribute("unit", unit);
- secure:SetPoint("TOPLEFT", raid[i-1].secure, "TOPRIGHT");
- secure:SetPoint("BOTTOMLEFT", raid[i-1].secure, "BOTTOMRIGHT");
- frame.unit = unit;
- frame:SetPoint("TOPLEFT", raid[i-1].frame, "TOPRIGHT");
- frame:SetPoint("BOTTOMLEFT", raid[i-1].frame, "BOTTOMRIGHT");
- frame:SetScript("OnEvent", unitEvent);
- frame:Hide();
- setupFrame(frame, secure, unit);
- RegisterUnitWatch(secure);
- raid[i] = {secure=secure, frame=frame};
- end
- end
-end
-
local function initialize()
CFrame:SetPoint("CENTER", nil, "CENTER", anchorX, anchorY);
CFrame:SetHeight((height+2)*8);
CFrame:SetWidth((width+2)*5+1); -- extra pixel for shield overflow
- initializeParty();
- initializeRaid();
+ Frames.InitializeParty(CFrame, party, unitEvent);
+ Frames.InitializeRaid(CFrame, raid, unitEvent);
end
+CFrame:RegisterEvent("ADDON_LOADED");
CFrame:RegisterEvent("PLAYER_LOGIN");
CFrame:RegisterEvent("PLAYER_ENTERING_WORLD");
CFrame:RegisterEvent("GROUP_ROSTER_UPDATE");
updateGroup();
elseif event == "PLAYER_LOGIN" then
initialize();
+ elseif event == "ADDON_LOADED" then
+ -- loaded
end
end);