Quest ID tracking updated / Mainframe Fix

* Fixed how the main frame was stuttering
* Added auto detection to work better for quest IDS

Author: LoyalFTW

Modules/CustomTasks.lua

@@ -255,6 +255,101 @@ local function BuildQuestIdsText(questIds)
     return table.concat(values, ", ")
 end
 
+local function FormatQuestMoneyReward(copper)
+    copper = tonumber(copper) or 0
+    if GetMoneyString then
+        return GetMoneyString(copper, true)
+    end
+
+    return string.format("%dg", math.floor(copper / 10000))
+end
+
+local function HasLoadedQuestRewardData(questId)
+    if HaveQuestRewardData then
+        local ok, loaded = pcall(HaveQuestRewardData, questId)
+        if ok then
+            return loaded == true
+        end
+    end
+
+    if C_QuestLog and C_QuestLog.HasQuestRewardData then
+        local ok, loaded = pcall(C_QuestLog.HasQuestRewardData, questId)
+        if ok then
+            return loaded == true
+        end
+    end
+
+    return true
+end
+
+local function RequestQuestRewardData(questId)
+    if C_TaskQuest and C_TaskQuest.RequestPreloadRewardData then
+        pcall(C_TaskQuest.RequestPreloadRewardData, questId)
+    end
+
+    if C_QuestLog and C_QuestLog.RequestLoadQuestByID then
+        pcall(C_QuestLog.RequestLoadQuestByID, questId)
+    end
+end
+
+local function QueueRewardRefresh()
+    if not (MR and MR.ScheduleTimer) or MR._customTaskRewardRefreshTimer then
+        return
+    end
+
+    MR._customTaskRewardRefreshTimer = MR:ScheduleTimer(function()
+        MR._customTaskRewardRefreshTimer = nil
+        if MR.RefreshCustomTasksModule then
+            MR:RefreshCustomTasksModule()
+        end
+        if MR.RefreshUI then
+            MR:RefreshUI()
+        end
+    end, 1.5)
+end
+
+local function GetQuestMoneyReward(questId)
+    if GetQuestLogRewardMoney then
+        local ok, money = pcall(GetQuestLogRewardMoney, questId)
+        if ok and type(money) == "number" and money > 0 then
+            return money
+        end
+    end
+
+    if C_QuestLog and C_QuestLog.GetQuestRewardMoney then
+        local ok, money = pcall(C_QuestLog.GetQuestRewardMoney, questId)
+        if ok and type(money) == "number" and money > 0 then
+            return money
+        end
+    end
+
+    return 0
+end
+
+local function GetQuestRewardSummary(questIds)
+    if type(questIds) ~= "table" or #questIds == 0 then
+        return 0, false
+    end
+
+    local totalMoney = 0
+    local pending = false
+
+    for _, questId in ipairs(questIds) do
+        if not HasLoadedQuestRewardData(questId) then
+            pending = true
+            RequestQuestRewardData(questId)
+        else
+            totalMoney = totalMoney + GetQuestMoneyReward(questId)
+        end
+    end
+
+    if pending then
+        QueueRewardRefresh()
+    end
+
+    return totalMoney, pending
+end
+
 local function NormalizeBoolean(value)
     return value == true
 end
@@ -395,6 +490,8 @@ local function BuildSectionRows(rows, tasks, resetType, headerKey, addKey, heade
                     or (L["CustomTasks_ResetWeekly"] or "Weekly reset")
                 local questIds = NormalizeQuestIds(task.questIds)
                 local questIdText = BuildQuestIdsText(questIds)
+                local rewardCopper = GetQuestRewardSummary(questIds)
+                local rewardText = rewardCopper and rewardCopper > 0 and FormatQuestMoneyReward(rewardCopper) or nil
                 local encounterIds = NormalizeEncounterIds(task.encounterIds)
                 local encounterIdText = BuildEncounterIdsText(encounterIds)
                 local noteText
@@ -409,14 +506,18 @@ local function BuildSectionRows(rows, tasks, resetType, headerKey, addKey, heade
                         )
                     )
                 elseif questIds then
+                    local questNote = string.format(
+                        L["CustomTasks_QuestNote"] or "Auto-tracks quest completion for quest ID%s %s. Shift-left-click to edit. Shift-right-click to delete.",
+                        (#questIds == 1) and "" or "s",
+                        questIdText or ""
+                    )
+                    if rewardText then
+                        questNote = string.format("%s\nGold reward: %s", questNote, rewardText)
+                    end
                     noteText = string.format(
                         "%s\n%s",
                         resetLabel,
-                        string.format(
-                            L["CustomTasks_QuestNote"] or "Auto-tracks quest completion for quest ID%s %s. Shift-left-click to edit. Shift-right-click to delete.",
-                            (#questIds == 1) and "" or "s",
-                            questIdText or ""
-                        )
+                        questNote
                     )
                 else
                     noteText = string.format(
@@ -432,9 +533,11 @@ local function BuildSectionRows(rows, tasks, resetType, headerKey, addKey, heade
                 if diffCount >= 2 then effectiveMax = diffCount end
                 rows[#rows + 1] = {
                     key = rowKey,
-                    label = task.label,
+                    label = rewardText and ("|cffffd36a" .. task.label .. "|r") or task.label,
                     max = effectiveMax,
                     note = noteText,
+                    countText = rewardText,
+                    countColor = rewardText and { 1.00, 0.82, 0.30 } or nil,
                     toggleStatus = (task.max <= 1) and ((not questIds) or task.allowManualQuestClicks) and (not encounterIds),
                     questIds = questIds,
                     encounterIds = encounterIds,
@@ -464,6 +567,9 @@ local function BuildSectionRows(rows, tasks, resetType, headerKey, addKey, heade
                                 ),
                                 0.70, 0.90, 0.70, true
                             )
+                            if rewardText then
+                                tip:AddLine("Gold reward: " .. rewardText, 1.00, 0.82, 0.30, true)
+                            end
                             if task.allowManualQuestClicks then
                                 tip:AddLine(L["CustomTasks_QuestManualHint"] or "Manual clicking is enabled for this quest task.", 0.95, 0.82, 0.50, true)
                             end

Theme.lua

@@ -76,13 +76,13 @@ local SCRIPT_FONTS = {
 }
 
 local SCRIPT_RANGES = {
-    { 0x0400, 0x04FF, "ruRU" },   
-    { 0x1100, 0x11FF, "koKR" },   
-    { 0x3130, 0x318F, "koKR" },  
-    { 0x3400, 0x4DBF, nil      }, 
-    { 0x4E00, 0x9FFF, nil      }, 
-    { 0xAC00, 0xD7AF, "koKR" },   
-    { 0xF900, 0xFAFF, nil      }, 
+    { 0x0400, 0x04FF, "ruRU" },
+    { 0x1100, 0x11FF, "koKR" },
+    { 0x3130, 0x318F, "koKR" },
+    { 0x3400, 0x4DBF, nil      },
+    { 0x4E00, 0x9FFF, nil      },
+    { 0xAC00, 0xD7AF, "koKR" },
+    { 0xF900, 0xFAFF, nil      },
 }
 
 local function DetectScriptFont(text)

UI.lua

@@ -4585,6 +4585,10 @@ local function ApplyMainFrameAnchor(frame, anchorMode, preserveScreenPosition)
         return
     end
 
+    if MR and MR._mainFrameDragging then
+        return
+    end
+
     local pos = preserveScreenPosition and CaptureMainFrameAnchor(frame, anchorMode) or GetStoredMainFrameActiveAnchor()
     if not pos or not pos.point then
         frame:ClearAllPoints()
@@ -4786,7 +4790,10 @@ function MR:BuildUI()
     titleBar:EnableMouse(true)
     titleBar:RegisterForDrag("LeftButton")
     titleBar:SetScript("OnDragStart", function()
-        if not MR.db.profile.locked then f:StartMoving() end
+        if not MR.db.profile.locked then
+            MR._mainFrameDragging = true
+            f:StartMoving()
+        end
     end)
     titleBar:SetScript("OnDragStop", function()
         f:StopMovingOrSizing()
@@ -4797,6 +4804,7 @@ function MR:BuildUI()
                 MR._mainFrameMovedSinceExpand = true
             end
         end
+        MR._mainFrameDragging = false
     end)
     if MR.ApplyPanelHeaderAutoHide then MR:ApplyPanelHeaderAutoHide(f, titleBar) end