Add modules/mouseover.lua

2026-09-13 09:52:05 +00:00
parent a8f1128f94
commit ea363e475a
1 changed files with 100 additions and 0 deletions
@@ -0,0 +1,100 @@
+pfUI:RegisterModule("mouseover", "vanilla", function ()
+  pfUI.uf.mouseover = CreateFrame("Frame", "pfMouseOver", UIParent)
+
+  -- Prepare a list of units that can be used via SpellTargetUnit
+  local st_units = { [1] = "player", [2] = "target", [3] = "mouseover" }
+  for i=1, MAX_PARTY_MEMBERS do table.insert(st_units, "party"..i) end
+  for i=1, MAX_RAID_MEMBERS do table.insert(st_units, "raid"..i) end
+
+  -- Try to find a valid (friendly) unitstring that can be used for
+  -- SpellTargetUnit(unit) to avoid another target switch
+  local function GetUnitString(unit)
+    for index, unitstr in pairs(st_units) do
+      if UnitIsUnit(unit, unitstr) then
+        return unitstr
+      end
+    end
+
+    return nil
+  end
+
+  -- Same as CastSpellByName but with disabled AutoSelfCast
+  local function NoSelfCast(spell, onself)
+    local cvar_selfcast = GetCVar("AutoSelfCast")
+
+    if cvar_selfcast ~= "0" then
+      SetCVar("AutoSelfCast", "0")
+      pcall(CastSpellByName, spell, onself)
+      SetCVar("AutoSelfCast", cvar_selfcast)
+    else
+      CastSpellByName(spell, onself)
+    end
+  end
+
+  _G.SLASH_PFCAST1, _G.SLASH_PFCAST2 = "/pfcast", "/pfmouse"
+  function SlashCmdList.PFCAST(msg)
+    local restore_target = true
+    local func = pfUI.api.TryMemoizedFuncLoadstringForSpellCasts(msg)
+    local unit = "mouseover"
+
+    if not UnitExists(unit) then
+      local frame = GetMouseFocus()
+      if frame.label and frame.id then
+        unit = frame.label .. frame.id
+      elseif UnitExists("target") then
+        unit = "target"
+      elseif GetCVar("autoSelfCast") == "1" then
+        unit = "player"
+      else
+        return
+      end
+    end
+
+    -- Nampower: CastSpellByName supports a second unit parameter directly.
+    -- unit is already resolved to "mouseover", "target" or "player" at this point.
+    if not func and GetNampowerVersion then
+      CastSpellByName(msg, unit)
+      return
+    end
+
+    -- If target and mouseover are friendly units, we can't use spell target as it
+    -- would cast on the target instead of the mouseover. However, if the mouseover
+    -- is friendly and the target is not, we can try to obtain the best unitstring
+    -- for the later SpellTargetUnit() call.
+    local unitstr = not UnitCanAssist("player", "target") and UnitCanAssist("player", unit) and GetUnitString(unit)
+
+    if UnitIsUnit("target", unit) or (not func and unitstr) then
+      -- no target change required, we can either use spell target
+      -- or the unit is already our current target.
+      restore_target = false
+    else
+      -- The spelltarget can't be used here, we need to switch
+      -- and restore the target during spell cast
+      TargetUnit(unit)
+    end
+
+    if func then
+      func()
+    else
+      -- write temporary unit name
+      pfUI.uf.mouseover.unit = unit
+
+      -- cast without self cast cvar setting
+      -- to allow spells to use spelltarget
+      NoSelfCast(msg)
+
+      -- set spell target to unitstring (or selfcast)
+      if SpellIsTargeting() then SpellTargetUnit(unitstr or "player") end
+
+      -- clean up spell target in error case
+      if SpellIsTargeting() then SpellStopTargeting() end
+
+      -- remove temporary mouseover unit
+      pfUI.uf.mouseover.unit = nil
+    end
+
+    if restore_target then
+      TargetLastTarget()
+    end
+  end
+end)