OmaUF/Auras.lua

   1 -- Auras.lua
   2 local _;
   3 local CreateFrame = CreateFrame;
   4 local UnitAura = UnitAura;
   5 local GameTooltip = GameTooltip;
   6
   7 local auraFilters = {"HELPFUL", "HARMFUL"};
   8
   9 local M = {};
  10 OmaUFAuras = M;
  11
  12 local function updateTooltip(frame)
  13     if GameTooltip:IsOwned(frame) then
  14         GameTooltip:SetUnitAura(frame.unit, frame.index, frame.filter);
  15     else
  16         frame:SetScript("OnUpdate", nil);
  17     end
  18 end
  19
  20 local function showTooltip(frame)
  21     -- tooltip handling from FrameXML/TargetFrame.xml
  22     GameTooltip:SetOwner(frame, "ANCHOR_BOTTOMRIGHT", 15, -25);
  23     GameTooltip:SetUnitAura(frame.unit, frame.index, frame.filter);
  24     frame:SetScript("OnUpdate", updateTooltip);
  25 end
  26
  27 local function hideTooltip(frame)
  28     GameTooltip:Hide();
  29     frame:SetScript("OnUpdate", nil);
  30 end
  31
  32 local function createAura(parent, prev, anchor, name, unit)
  33     local aura = CreateFrame("Frame", name, parent);
  34     aura:SetPoint("TOPLEFT", prev, anchor);
  35     aura:SetWidth(20);
  36     aura:SetHeight(20);
  37     aura.icon = aura:CreateTexture(nil, "ARTWORK");
  38     aura.icon:SetAllPoints();
  39     aura.stack = aura:CreateFontString(nil, "OVERLAY", "NumberFontNormalSmall");
  40     aura.stack:SetPoint("BOTTOMRIGHT");
  41     aura.cd = CreateFrame("Cooldown", name.."CD", aura, "CooldownFrameTemplate");
  42     aura.cd:SetReverse(true);
  43     aura.cd:SetHideCountdownNumbers(true);
  44     aura.cd:SetAllPoints();
  45     aura.unit = unit;
  46     aura:SetScript("OnEnter", showTooltip);
  47     aura:SetScript("OnLeave", hideTooltip);
  48     aura:Hide();
  49     return aura;
  50 end
  51
  52 function M.CreateAuraFrame(parent, unit)
  53     local name = parent:GetName().."Auras";
  54     parent.auras = CreateFrame("Frame", name, parent);
  55     parent.auras:SetPoint("TOPLEFT", parent, "BOTTOMLEFT", 0, -8);
  56     parent.auras:SetWidth(10);
  57     parent.auras:SetHeight(10);
  58     local i = 1;
  59     -- max auras per row
  60     for x=1,10 do
  61         local auraName = name..i;
  62         if i == 1 then
  63             parent.auras[i] = createAura(parent.auras, parent.auras, "TOPLEFT", auraName, unit);
  64         else
  65             parent.auras[i] = createAura(parent.auras, parent.auras[i-1], "TOPRIGHT", auraName, unit);
  66         end
  67         i = i + 1;
  68     end
  69     -- max rows
  70     for y=0,0 do
  71         for x=1,10 do
  72             local auraName = name..i;
  73             parent.auras[i] = createAura(parent.auras, parent.auras[y*10+x], "BOTTOMLEFT", auraName, unit);
  74             i = i + 1;
  75         end
  76     end
  77 end
  78
  79 function M.UpdateAuras(frame, unit)
  80     local auras = frame.auras;
  81     local icon, count, duration, expires, caster, id;
  82     local pos = 1;
  83     for _, filter in ipairs(auraFilters) do
  84         local i = 1;
  85         while true do
  86             _, _, icon, count, _, duration, expires, caster, _, _, id = UnitAura(unit, i, filter);
  87             if not id or not auras[pos] then break end
  88             -- aura filter self-applied, player-applied, list of important auras TODO
  89             local aura = auras[pos];
  90             aura.icon:SetTexture(icon);
  91             aura.index = i;
  92             aura.filter = filter;
  93             if count > 1 then
  94                 aura.stack:SetText(count);
  95                 aura.stack:Show();
  96             else
  97                 aura.stack:Hide();
  98             end
  99             if expires > 0 then
 100                 aura.cd:SetCooldown(expires - duration, duration);
 101             else
 102                 aura.cd:Hide();
 103             end
 104             aura:Show();
 105             pos = pos + 1;
 106             i = i + 1;
 107         end
 108     end
 109
 110     while auras[pos] do
 111         if not auras[pos]:IsShown() then return end
 112         auras[pos]:Hide();
 113         pos = pos + 1;
 114     end
 115 end