Mercurial > wow > worldplan

annotate WorldQuests.lua @ 71:d6c0bed32c51

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed bounty highlighting and changed quests matching the selected bounty to have a yellow highlight, while quests matching any ongoing bounty are highlighted blue
author Nenue
date Wed, 05 Apr 2017 12:44:19 -0400
parents 31de7e9e7849
children 6db0b9696936
rev   line source
Nenue@33 1 -- WorldPlan
Nenue@33 2 -- WorldQuests.lua
Nenue@33 3 -- Created: 11/2/2016 3:40 PM
Nenue@33 4 -- %file-revision%
Nenue@40 5 local _, db = ...
Nenue@45 6 local Module = WorldPlanQuestsMixin
Nenue@33 7
Nick@64 8 local _G = _G
Nenue@33 9 local MC_GetNumZones, MC_GetZoneInfo = C_MapCanvas.GetNumZones, C_MapCanvas.GetZoneInfo
Nenue@33 10 local TQ_GetQuestsForPlayerByMapID = C_TaskQuest.GetQuestsForPlayerByMapID -- This function is not yet documented
Nenue@33 11 local TQ_GetQuestZoneID = C_TaskQuest.GetQuestZoneID
Nick@64 12 local TQ_IsActive = C_TaskQuest.IsActive
Nick@64 13 local pairs, ipairs, tinsert, tremove, wipe = pairs, ipairs, tinsert, tremove, table.wipe
Nick@64 14 local GetTaskInfo, GetTasksTable, HaveQuestData = GetTaskInfo, GetTasksTable, HaveQuestData
Nick@64 15 local GetTime = GetTime
Nenue@69 16 local SpellCanTargetQuest, IsQuestIDValidSpellTarget = SpellCanTargetQuest, IsQuestIDValidSpellTarget
Nick@64 17 local tonumber, abs = tonumber, math.abs
Nick@64 18 local GetQuestLogRewardInfo = GetQuestLogRewardInfo
Nick@64 19 local GetCurrentMapAreaID, GetMapInfo, GetMapNameByID = GetCurrentMapAreaID, GetMapInfo, GetMapNameByID
Nick@64 20
Nenue@67 21
Nenue@40 22 local print = DEVIAN_WORKSPACE and function(...) _G.print('WorldQuests', ...) end or function() end
Nenue@40 23 local rprint = DEVIAN_WORKSPACE and function(...) _G.print('WQRefresh', ...) end or function() end
Nenue@33 24 local qprint = DEVIAN_WORKSPACE and function(...) _G.print('POI', ...) end or function() end
Nenue@33 25 local wprint = DEVIAN_WORKSPACE and function(...) _G.print('WP', ...) end or function() end
Nenue@35 26 local mprint = DEVIAN_WORKSPACE and function(...) _G.print('Canvas', ...) end or function() end
Nenue@33 27
Nenue@69 28 local ToggleButton = {}
Nenue@69 29 local callbacks = {}
Nenue@40 30 local PinBaseIndex = 1200
Nenue@33 31 local BROKEN_ISLES_ID, DALARAN_ID, AZSUNA_ID, VALSHARAH_ID, HIGHMOUNTAIN_ID, STORMHEIM_ID, SURAMAR_ID, EOA_ID = 1007, 1014, 1015,1018, 1024, 1017, 1033, 1096
Nenue@33 32 local WORLD_QUEST_MAPS = { [DALARAN_ID] = 'Dalaran70', [AZSUNA_ID] = 'Azsuna', [VALSHARAH_ID] = "Val'sharah",
Nenue@33 33 [HIGHMOUNTAIN_ID] = 'Highmountain', [STORMHEIM_ID] = 'Stormheim', [SURAMAR_ID] = 'Suramar', [EOA_ID] = 'EyeOfAszhara', }
Nenue@33 34
Nenue@33 35 local REWARD_CASH = WORLD_QUEST_REWARD_TYPE_FLAG_GOLD
Nenue@33 36 local REWARD_ARTIFACT_POWER = WORLD_QUEST_REWARD_TYPE_FLAG_ARTIFACT_POWER
Nenue@33 37 local REWARD_GEAR = WORLD_QUEST_REWARD_TYPE_FLAG_EQUIPMENT
Nenue@33 38 local REWARD_CURRENCY = WORLD_QUEST_REWARD_TYPE_FLAG_ORDER_RESOURCES
Nenue@33 39 local REWARD_REAGENT = WORLD_QUEST_REWARD_TYPE_FLAG_MATERIALS
Nenue@66 40 local SCALE_FACTORS = {
Nenue@66 41 0.25, 0.7, 1
Nenue@66 42 }
Nenue@33 43
Nenue@69 44 local currentScale = WorldMapDetailFrame:GetScale()
Nenue@69 45 local canTargetQuests
Nenue@65 46 local numShown = 0
Nenue@65 47 local numLoaded = 0
Nenue@69 48 local isDataLoaded = true
Nenue@69 49 local numOverlays = 1
Nenue@66 50 local scaleConstant = 1
Nenue@45 51 Module.TasksByID = {}
Nenue@33 52
Nenue@33 53 --%debug%
Nenue@33 54 local SetTimedCallbackForAllPins = function(seconds, callback)
Nenue@33 55 C_Timer.After(seconds, function()
Nenue@33 56 for id, pin in pairs(WorldPlanQuests.QuestsByID) do
Nenue@33 57 callback(pin)
Nenue@33 58 end
Nenue@33 59 end)
Nenue@33 60 end
Nenue@33 61
Nenue@45 62 function Module:OnUpdate(sinceLast)
Nenue@67 63
Nenue@67 64 if self.filtersDirty or self.isStale then
Nenue@40 65 self:Refresh()
Nenue@40 66 end
Nenue@67 67 if #db.UpdatedPins >= 1 then
Nenue@67 68 print('|cFF00FF88pending updates', #db.UpdatedPins)
Nenue@67 69 self:UpdateQueuedPins()
Nenue@67 70 end
Nenue@67 71
Nenue@40 72 end
Nenue@40 73
Nenue@52 74
Nenue@45 75 function Module:Setup()
Nenue@40 76 print('|cFFFF4400'..self:GetName()..':Setup()')
Nenue@33 77 for mapID, mapName in pairs(WORLD_QUEST_MAPS) do
Nenue@40 78 db.QuestsByZone[mapID] = {}
Nenue@33 79 end
Nenue@69 80 for target, arg in pairs(callbacks) do
Nenue@69 81 print(type(target))
Nenue@69 82 if type(target) == 'table' then
Nenue@71 83 local callerName = target:GetName() or tostring(target)
Nenue@69 84 for name, method in pairs(arg) do
Nenue@69 85 print(callerName, arg)
Nenue@69 86 hooksecurefunc(target, name, function(...)
Nenue@71 87 self:OnSecureHook(callerName .. '.' .. name, method, ...)
Nenue@69 88 end)
Nenue@69 89 end
Nenue@69 90 else
Nenue@69 91 hooksecurefunc(target, function(...)
Nenue@69 92 self:OnSecureHook(target, arg, ...)
Nenue@69 93 end)
Nenue@69 94 end
Nenue@69 95 end
Nenue@65 96
Nenue@65 97 self.Status = CreateFrame('Frame', nil, self)
Nenue@65 98 self.Status:SetPoint('TOPLEFT', WorldMapPOIFrame, 'TOPLEFT', 0, 0)
Nenue@65 99 self.Status:SetPoint('BOTTOMRIGHT', WorldMapPOIFrame, 'TOPRIGHT', 0, -4)
Nenue@65 100 self.Status.t = self.Status:CreateTexture(nil, 'OVERLAY')
Nenue@65 101 self.Status.b = self.Status:CreateTexture(nil, 'BACKGROUND')
Nenue@65 102 self.Status.b:SetColorTexture(0,0,0,.25)
Nenue@65 103 self.Status.b:SetAllPoints(self.Status)
Nenue@65 104 self.Status.t:SetColorTexture(1,1,1,.5)
Nenue@65 105 self.Status.t:SetPoint('TOP')
Nenue@65 106 self.Status.t:SetPoint('BOTTOM')
Nenue@65 107 self.Status.t:SetPoint('LEFT')
Nenue@65 108 local translationEnd, translationStart
Nenue@65 109 self.Status:SetScript('OnUpdate', function(status)
Nenue@65 110 local translateTo
Nenue@65 111 if numLoaded < numShown then
Nenue@65 112 translateTo = numLoaded/numShown * status:GetWidth()
Nenue@65 113 status.t:SetWidth(translateTo)
Nenue@65 114 else
Nenue@65 115 translateTo = numShown * status:GetWidth()
Nenue@65 116 status.t:SetWidth(translateTo)
Nenue@65 117 end
Nenue@65 118 end)
Nenue@67 119
Nenue@67 120 self:SetAllPoints(WorldMapPOIFrame)
Nenue@67 121 for k,v in pairs( ToggleButton) do
Nenue@67 122 self.Toggle:SetScript(k,v)
Nenue@67 123 end
Nenue@67 124 self:Show()
Nenue@67 125 end
Nenue@69 126 callbacks.ClickWorldMapActionButton = function(WorldQuests)
Nenue@69 127 WorldQuests:GetUsedPOIs()
Nenue@69 128 end
Nenue@69 129 callbacks.WorldMap_UpdateQuestBonusObjectives = function(WorldQuests)
Nenue@69 130 WorldQuests:GetUsedPOIs()
Nenue@69 131 end
Nenue@69 132 callbacks.WorldMapFrame_UpdateMap = function(WorldQuests)
Nenue@69 133 WorldQuests:RefreshIfChanged()
Nenue@69 134 end
Nenue@69 135 callbacks.WorldMapScrollFrame_ReanchorQuestPOIs = function (WorldQuests)
Nenue@69 136 WorldQuests:RefreshIfChanged()
Nenue@69 137 end
Nenue@69 138 callbacks[WorldMapFrame.UIElementsFrame.BountyBoard] = {
Nenue@69 139 SetSelectedBountyIndex = function(WorldQuests)
Nenue@69 140 WorldQuests:UpdateBountyInfo()
Nenue@71 141 WorldQuests:Refresh(true)
Nenue@69 142 end
Nenue@69 143 }
Nenue@69 144 callbacks[WorldMapFrame.UIElementsFrame.ActionButton] = {
Nenue@69 145 UpdateCastingState = function(WorldQuests)
Nenue@69 146 WorldQuests:Refresh(true)
Nenue@69 147 end
Nenue@69 148 }
Nenue@69 149
Nenue@67 150
Nenue@67 151 local GetQuestBountyInfoForMapID, GetQuestLogTitle, GetQuestLogIndexByID, IsQuestFlaggedCompleted = GetQuestBountyInfoForMapID, GetQuestLogTitle, GetQuestLogIndexByID, IsQuestFlaggedCompleted
Nenue@67 152 function Module:UpdateBountyInfo()
Nenue@71 153 print('|cFF00FF88BountyInfo()|r')
Nenue@67 154 wipe(db.BountyInfo)
Nenue@67 155 db.selectedBounty = nil
Nenue@67 156
Nenue@67 157 local selectedBounty = WorldMapFrame.UIElementsFrame.BountyBoard:GetSelectedBountyIndex()
Nenue@67 158 local bounties, numBounties = GetQuestBountyInfoForMapID(db.currentMapID)
Nenue@67 159
Nenue@67 160 for index, data in ipairs(bounties) do
Nenue@67 161 if data.factionID then
Nenue@67 162 data.title = GetQuestLogTitle(GetQuestLogIndexByID(data.questID))
Nenue@67 163 data.complete = IsQuestFlaggedCompleted(data.questID)
Nenue@71 164 if not data.complete then
Nenue@71 165 db.BountyInfo[data.factionID] = data
Nenue@71 166 print('bounty', data.factionID, data.title, data.complete)
Nenue@71 167 if index == selectedBounty then
Nenue@71 168 db.selectedBounty = data
Nenue@71 169 end
Nenue@67 170 end
Nenue@71 171
Nenue@67 172 end
Nenue@67 173 end
Nenue@67 174
Nenue@67 175 for questID, pin in pairs(db.QuestsByID) do
Nenue@67 176 local doUpdate
Nenue@71 177 if pin.factionID then
Nenue@71 178 if db.BountyInfo[pin.factionID] then
Nenue@71 179 print(pin.questID, pin.factionID, db.BountyInfo[pin.factionID], pin.isCriteria)
Nenue@67 180 pin.isCriteria = true
Nenue@67 181 doUpdate = true
Nenue@71 182 else
Nenue@67 183 doUpdate = true
Nenue@67 184 pin.isCriteria = nil
Nenue@67 185 end
Nenue@71 186
Nenue@67 187 end
Nenue@71 188
Nenue@71 189
Nenue@67 190 if doUpdate then
Nenue@67 191 if pin:IsVisible() then
Nenue@67 192 pin:Refresh()
Nenue@67 193 else
Nenue@67 194 pin.isStale = true
Nenue@67 195 end
Nenue@67 196 end
Nenue@67 197 end
Nenue@67 198 db.BountyUpdate = nil
Nenue@67 199 end
Nenue@67 200
Nenue@49 201 function Module:OnConfigUpdate()
Nenue@67 202 print('|cFFFFFF00OnConfigUpdate()|r')
Nenue@49 203 if db.Config.FadeWhileGrouped then
Nenue@49 204 db.PinAlpha = 0.15
Nenue@49 205 else
Nenue@49 206 db.PinAlpha = 1
Nenue@49 207 end
Nenue@67 208
Nenue@67 209 if not db.Config.EnablePins then
Nenue@67 210 for _, pin in pairs(db.QuestsByID) do
Nenue@67 211 pin:SetShown(false)
Nenue@67 212 end
Nenue@67 213 end
Nenue@67 214
Nenue@67 215 ToggleButton.OnShow(self.Toggle)
Nenue@49 216 end
Nenue@49 217
Nenue@45 218 local InternalHideButton = function(button, index)
Nenue@45 219 button:Hide()
Nenue@45 220 if button.questID and db.QuestsByID[button.questID] then
Nenue@45 221 if db.QuestsByID[button.questID].used and not db.QuestsByID[button.questID].filtered then
Nenue@45 222 db.QuestsByID[button.questID]:SetShown(true)
Nenue@45 223 end
Nenue@45 224 end
Nenue@45 225 end
Nenue@45 226 local InternalShowButton = function(button, index)
Nenue@45 227 button:Show()
Nenue@45 228 if button.questID and db.QuestsByID[button.questID] then
Nenue@45 229 db.QuestsByID[button.questID]:SetShown(false)
Nenue@45 230 end
Nenue@45 231 end
Nenue@33 232
Nenue@69 233 db.UsedPOIs = {}
Nenue@69 234 function Module:GetUsedPOIs()
Nenue@69 235 db.canTargetQuests = SpellCanTargetQuest()
Nenue@69 236 local func = db.canTargetQuests and InternalShowButton or InternalHideButton
Nenue@69 237 wipe(db.UsedPOIs)
Nenue@45 238 for i = 1, NUM_WORLDMAP_TASK_POIS do
Nenue@45 239 local button = _G['WorldMapFrameTaskPOI'..i]
Nenue@45 240 if button and button.worldQuest then
Nenue@45 241 func(button, i)
Nenue@69 242 db.UsedPOIs[button.questID] = button
Nenue@45 243 end
Nenue@45 244 end
Nenue@45 245 end
Nenue@40 246
Nenue@69 247 function Module:OnSecureHook(callbackName, func, ...)
Nenue@69 248 rprint('|cFFFF4400'..callbackName..'|r', ...)
Nenue@69 249 func(self, ...)
Nenue@45 250 end
Nenue@40 251
Nenue@33 252 local defaults = {}
Nenue@40 253 local REWARD_UNKNOWN = 768
Nenue@45 254 function Module:OnLoad()
Nenue@40 255 print('|cFFFF4400'..self:GetName()..':OnLoad()')
Nenue@33 256
Nenue@48 257 self:SetParent(WorldMapPOIFrame)
Nenue@33 258 WorldPlan:AddHandler(self, defaults)
Nenue@33 259
Nenue@33 260 for areaID, fileName in pairs(WORLD_QUEST_MAPS) do
Nenue@40 261 db.QuestsByZone[areaID] = {}
Nenue@33 262 end
Nenue@33 263
Nenue@41 264 -- WORLD_MAP_UPDATE and PLAYER_ENTERING_WORLD are passed down from a higher level
Nenue@33 265 self:RegisterEvent('WORLD_QUEST_COMPLETED_BY_SPELL')
Nenue@55 266 self:RegisterEvent('SUPER_TRACKED_QUEST_CHANGED')
Nenue@33 267 self:RegisterEvent('SKILL_LINES_CHANGED')
Nick@62 268 self:RegisterEvent('CURRENT_SPELL_CAST_CHANGED')
Nenue@69 269 self:RegisterEvent('ARTIFACT_UPDATE')
Nenue@33 270 end
Nenue@33 271
Nenue@67 272 function Module:OnMapInfo(isBrokenIsle, isZoomedOut, mapAreaID, isNewMap, isMapOpen)
Nenue@67 273
Nenue@67 274 print('|cFFFFFF00'..self:GetName()..':OnMapInfo()|r, mapAreaID =', mapAreaID,'visible =', isMapOpen, 'changed =', isNewMap)
Nenue@67 275
Nenue@67 276 if db.BountyUpdate then
Nenue@67 277 self:UpdateBountyInfo()
Nenue@67 278 end
Nenue@67 279 if isNewMap then
Nenue@67 280 print('|cFF00FF88refreshing for changed map')
Nenue@67 281 if isMapOpen then
Nenue@67 282 self:Refresh(true)
Nenue@67 283 else
Nenue@67 284 self.isStale = true
Nenue@67 285 end
Nenue@54 286 end
Nenue@56 287
Nenue@41 288 end
Nenue@65 289 local superTrackedQuestID
Nenue@45 290 function Module:OnEvent (event, ...)
Nenue@40 291
Nenue@40 292 print('|cFFFFFF00'..self:GetName()..':OnEvent() '..event..'|r', GetTime(), ...)
Nenue@69 293 if (event == 'QUEST_LOG_UPDATE') then
Nenue@69 294 if self:IsVisible() then
Nenue@69 295 self:Refresh()
Nenue@69 296 else
Nenue@40 297 self.isStale = true
Nenue@33 298 end
Nenue@33 299 print('WorldMapFrame', WorldMapFrame:IsVisible(), 'hasUpdates:', self.isStale)
Nenue@33 300 elseif event == 'WORLD_QUEST_COMPLETED_BY_SPELL' then
Nenue@33 301 local questID = ...
Nenue@40 302 if questID and db.QuestsByID[questID] then
Nenue@40 303 self:ReleasePin(db.QuestsByID[questID])
Nenue@40 304 rprint('|cFFFF4400release|r', questID)
Nenue@33 305 end
Nenue@65 306 elseif event == 'SKILL_LINES_CHANGED' or event == 'CURRENT_SPELL_CAST_CHANGED' then
Nick@62 307 self:Refresh()
Nenue@59 308 elseif event == 'ARTIFACT_UPDATE' then
Nenue@59 309 local ak = C_ArtifactUI.GetArtifactKnowledgeMultiplier()
Nenue@59 310 if ak and (ak ~= self.akLevel) then
Nick@62 311 print('push artifact knowledge update', self.akLevel, 'to', ak)
Nenue@59 312 self.akLevel = ak
Nick@62 313 for index, pin in pairs( db.QuestsByID) do
Nenue@69 314 if pin.rewardType == REWARD_ARTIFACT_POWER then
Nenue@69 315 pin.dataLoaded = nil
Nenue@69 316 end
Nick@62 317 end
Nenue@59 318 end
Nenue@65 319 elseif event == 'SUPER_TRACKED_QUEST_CHANGED' then
Nenue@65 320 if superTrackedQuestID and db.QuestsByID[superTrackedQuestID] then
Nenue@65 321 db.QuestsByID[superTrackedQuestID].isStale = true
Nenue@65 322 end
Nenue@65 323 local newID = GetSuperTrackedQuestID()
Nenue@65 324 if newID and db.QuestsByID[newID] then
Nenue@65 325 db.QuestsByID[newID].isStale = true
Nenue@65 326 end
Nenue@33 327 end
Nenue@33 328 end
Nenue@33 329
Nenue@40 330 local totalPins = 0
Nenue@33 331 local TQ_GetQuestLocation = C_TaskQuest.GetQuestLocation
Nenue@45 332 function Module:AcquirePin (info)
Nenue@40 333 local questID = info.questId
Nenue@40 334 if not questID then
Nenue@40 335 return nil
Nenue@40 336 end
Nenue@40 337
Nenue@40 338 if not QuestUtils_IsQuestWorldQuest(questID) then
Nenue@40 339 return nil
Nenue@40 340 end
Nenue@40 341
Nenue@49 342 -- if we're grabbing a pin, the filters need to be checked
Nenue@40 343 local pin = db.QuestsByID[questID]
Nenue@33 344 if not pin then
Nenue@40 345 local numFree = #db.FreePins
Nenue@33 346 if numFree >= 1 then
Nenue@40 347 pin = tremove(db.FreePins, numFree)
Nenue@33 348 --print('|cFF00FF00Re-using', pin:GetName())
Nenue@33 349 else
Nenue@40 350 totalPins = totalPins + 1
Nenue@69 351 local name = 'WorldPlanQuestMarker' .. numOverlays
Nenue@33 352 --print('|cFF00FF00Creating', name)
Nenue@33 353 pin = CreateFrame('Frame', name, WorldMapPOIFrame, 'WorldPlanQuestPin')
Nenue@33 354
Nenue@33 355 pin:SetFrameStrata('HIGH')
Nenue@33 356 pin.GetTypeInfo = function(frame, typeID)
Nenue@33 357 return self:GetTypeInfo(typeID)
Nenue@33 358 end
Nenue@40 359 pin:SetID(totalPins)
Nenue@69 360 numOverlays = numOverlays + 1
Nenue@33 361 --pin.iconBorder:SetVertexColor(0,0,0,1)
Nenue@33 362 end
Nenue@40 363 pin.questID = questID
Nenue@40 364 pin.worldQuest = true
Nenue@40 365 pin.throttle = 1
Nenue@33 366 pin.isNew = true
Nenue@33 367 pin.currentWidth = nil
Nenue@40 368 db.QuestsByID[questID] = pin
Nenue@40 369 tinsert(db.UsedPins, pin)
Nenue@40 370 end
Nenue@33 371
Nenue@40 372 if pin and info then
Nenue@40 373 pin.inProgress = info.inProgress
Nenue@40 374 pin.floor = info.floor
Nenue@40 375 pin.numObjectives = info.numObjectives or 0
Nenue@40 376 if info.x and info.y then
Nenue@40 377 pin.x = info.x or pin.x
Nenue@40 378 pin.y = info.y or pin.y
Nenue@40 379 rprint('|cFFFF4400coords|r', info.x, info.y)
Nenue@40 380 end
Nenue@40 381 end
Nenue@33 382
Nick@62 383 if (not pin.dataLoaded) then
Nenue@65 384 local dataLoaded = pin:GetData()
Nenue@65 385 isDataLoaded = (isDataLoaded and dataLoaded)
Nick@63 386 WorldPlan.dataFlush = true
Nenue@49 387 end
Nenue@49 388
Nenue@66 389
Nick@64 390 pin.isActive = TQ_IsActive(questID)
Nenue@57 391 pin:CheckFilterRules()
Nenue@49 392 rprint(pin:GetID(), pin.filtered, pin.used)
Nenue@49 393
Nenue@40 394 return pin
Nenue@33 395 end
Nenue@33 396
Nenue@33 397 -- remove from index and add it to the recycling heap
Nenue@45 398 function Module:ReleasePin (pin)
Nenue@33 399
Nenue@40 400 local id = pin.questID
Nenue@33 401 if id then
Nenue@40 402 db.QuestsByID[id] = nil
Nenue@40 403
Nenue@40 404 for i, zone in pairs(db.QuestsByZone) do
Nenue@33 405 print('-', i, zone[i])
Nenue@33 406 zone[id] = nil
Nenue@33 407 end
Nenue@40 408 db.TasksByID[id] = nil
Nenue@33 409 end
Nick@64 410 pin.isActive = nil
Nick@64 411 pin.dataLoaded = nil
Nick@62 412 pin:HideFrames()
Nenue@40 413 tinsert(db.FreePins, pin)
Nenue@40 414
Nick@63 415 WorldPlan.dataFlush = true
Nenue@40 416 print('|cFF00FF00-'.. (pin.mapID and GetMapNameByID(pin.mapID) or '???') ..'|r', id, pin.title)
Nenue@33 417 end
Nenue@33 418
Nick@64 419
Nenue@45 420 function Module:GetBonusObjectives()
Nenue@40 421
Nenue@40 422
Nenue@40 423 local tasksTable = GetTasksTable()
Nenue@40 424 if tasksTable ~= nil then
Nenue@40 425 print('|cFF00FF88'..self:GetName()..':BonusObjectives()|r ')
Nenue@40 426 self.numTasks = #tasksTable
Nenue@40 427 for i, taskID in ipairs(tasksTable) do
Nenue@40 428 if not QuestUtils_IsQuestWorldQuest(taskID) then
Nenue@40 429 local info = db.TasksByID[taskID]
Nenue@40 430 if not info then
Nenue@40 431 local isInArea, isOnMap, numObjectives, taskName, displayAsObjective = GetTaskInfo(taskID)
Nenue@40 432 if isOnMap then
Nenue@40 433 print(' * '..i, taskID, GetTaskInfo(taskID))
Nenue@40 434 info = {
Nenue@40 435 questID = taskID,
Nenue@40 436 numObjectives = numObjectives,
Nenue@40 437 title = taskName,
Nenue@40 438 isInArea = isInArea,
Nenue@40 439 isOnMap = isOnMap,
Nenue@40 440 displayAsObjective = displayAsObjective,
Nenue@40 441 worldQuest = false,
Nenue@40 442 isPending = false,
Nenue@40 443 isNew = true,
Nenue@40 444 }
Nenue@40 445
Nenue@40 446
Nenue@40 447 db.TasksByID[taskID] = info
Nenue@40 448
Nenue@40 449 local pin = self:AcquirePin(taskID)
Nenue@40 450 for k,v in pairs(info) do
Nenue@40 451 pin[k] = v
Nenue@40 452 end
Nenue@40 453 pin:GetBonusObjectiveInfo(info)
Nenue@40 454 end
Nenue@40 455 end
Nenue@40 456 end
Nenue@40 457
Nenue@40 458
Nenue@40 459 end
Nenue@40 460 end
Nenue@40 461 end
Nenue@40 462
Nenue@40 463
Nenue@40 464 -- use tooltip object to extract item details
Nenue@45 465 function Module:GetRewardHeader(questID)
Nenue@40 466 local name, icon, quantity, quality, _, itemID = GetQuestLogRewardInfo(1, questID)
Nenue@40 467 local scanner = _G.WorldPlanTooltip
Nenue@40 468 local print = qprint
Nenue@40 469 if not itemID then
Nenue@40 470 return
Nenue@40 471 end
Nenue@49 472 qprint('GetRewardHeader', questID)
Nenue@40 473
Nenue@40 474 scanner:SetOwner(WorldPlan, "ANCHOR_NONE")
Nenue@40 475 scanner:SetItemByID(itemID)
Nenue@40 476 scanner:Show()
Nenue@40 477 local ttl1 = _G['WorldPlanTooltipTextLeft1']
Nenue@40 478 local ttl2 = _G['WorldPlanTooltipTextLeft2']
Nenue@40 479 local ttl3 = _G['WorldPlanTooltipTextLeft3']
Nenue@40 480 local ttl4 = _G['WorldPlanTooltipTextLeft4']
Nenue@40 481 --print(ttl2, ttl3, ttl4)
Nenue@40 482 if ttl2 then
Nenue@40 483 local text = ttl2:GetText()
Nenue@40 484 -- Artifact Power
Nenue@40 485 --print(text)
Nenue@40 486 if text then
Nenue@40 487 if text:match("|cFFE6CC80") then
Nenue@40 488 --print('AP token!', text)
Nenue@40 489 local power
Nenue@40 490 if ttl4 then
Nenue@40 491 local text = ttl4:GetText()
Nenue@40 492 --print('tip line 4', text)
Nenue@40 493 if text then
Nenue@40 494 power = text:gsub("%p", ""):match("%d+")
Nenue@40 495 power = tonumber(power)
Nenue@40 496 end
Nenue@40 497
Nenue@40 498 end
Nenue@40 499 return REWARD_ARTIFACT_POWER, "Interface\\ICONS\\inv_7xp_inscription_talenttome01", power, name, itemID, quality
Nenue@40 500 elseif text:match("Item Level") then
Nenue@40 501 --print('equipment!', text)
Nenue@40 502 quantity = text:match("Item Level ([%d\+]+)")
Nenue@40 503 return REWARD_GEAR, icon, quantity, name, itemID, quality
Nenue@40 504 elseif text:match("Crafting Reagent") then
Nenue@49 505 qprint('|cFFFF4400it is a reagent', text)
Nenue@40 506 return REWARD_REAGENT, icon, quantity, name, itemID, quality
Nenue@40 507 end
Nenue@40 508 end
Nenue@40 509 end
Nenue@40 510
Nenue@40 511 if ttl3 then
Nenue@40 512 local text = ttl3:GetText()
Nenue@40 513 if text and text:match("Crafting Reagent") then
Nenue@49 514 qprint('|cFFFF4400it is a reagent', text)
Nenue@40 515 return REWARD_REAGENT, icon, quantity, name, itemID, quality
Nenue@40 516 end
Nenue@40 517 end
Nenue@40 518 return 128, icon, quantity, name, itemID, quality
Nenue@40 519 end
Nenue@67 520
Nenue@67 521 -- pins are queued by their OnUpdate and are ostensibly already visible, we just need to fix the zoom and anchor
Nenue@67 522 function Module:UpdateQueuedPins()
Nenue@67 523 print('|cFF00FF88UpdateQueuedPins()')
Nenue@67 524 local pin = tremove(db.UpdatedPins)
Nenue@67 525 while pin do
Nenue@67 526 pin:CheckFilterRules()
Nenue@67 527
Nenue@67 528 local scaleFactor = SCALE_FACTORS[(pin.dataLoaded and not pin.filtered) and scaleConstant or 1]
Nenue@67 529 print(pin.title, pin.dataLoaded and not pin.filtered, scaleFactor)
Nenue@71 530 if pin.used then
Nenue@71 531 pin:SetAnchor(nil, pin.x, pin.y, self.hostWidth, self.hostHeight, scaleFactor)
Nenue@71 532 if pin.isNew then
Nenue@71 533 pin:OnShow()
Nenue@71 534 end
Nenue@69 535 end
Nenue@69 536
Nenue@67 537 pin = tremove(db.UpdatedPins)
Nenue@69 538
Nenue@67 539 end
Nenue@67 540 end
Nenue@67 541
Nenue@33 542 -- create of update quest pins for a map and its underlying zones
Nenue@45 543 function Module:UpdateWorldQuests (mapID)
Nenue@40 544
Nenue@40 545 mapID = mapID or db.currentMapID
Nenue@33 546 if not mapID then
Nenue@33 547 -- info not available yet
Nenue@33 548 return
Nenue@33 549 end
Nenue@33 550
Nenue@66 551 local scalingConstant = 1
Nenue@66 552 local style = DEFAULT_STYLE
Nenue@66 553 if self.dataLoaded then
Nenue@66 554 style = REWARD_TYPE_STYLES[self.rewardType]
Nenue@66 555 scalingConstant = db.isContinentMap and 2 or 3
Nenue@66 556 end
Nenue@66 557
Nenue@66 558 local pinScale = SCALE_FACTORS[scalingConstant]
Nenue@66 559 print(pinScale)
Nenue@66 560 self:SetScale(pinScale)
Nenue@66 561 self.Overlay:SetScale(pinScale)
Nenue@34 562
Nenue@40 563 print('|cFF00FF88'..self:GetName()..':UpdateWorldQuests()|r', 'map:', mapID, 'realMap:', db.currentMapID)
Nenue@33 564
Nenue@40 565
Nenue@40 566 self.isStale = nil
Nenue@40 567 print('|cFF00FFFFContinent:|r', BROKEN_ISLES_ID, GetMapNameByID(BROKEN_ISLES_ID))
Nenue@40 568 self.isRecursed = true
Nenue@40 569 for i = 1, MC_GetNumZones(BROKEN_ISLES_ID) do
Nenue@40 570 local submapID, name, depth = MC_GetZoneInfo(BROKEN_ISLES_ID, i)
Nenue@40 571 local taskInfo = TQ_GetQuestsForPlayerByMapID(submapID, BROKEN_ISLES_ID)
Nenue@40 572 if taskInfo then
Nenue@40 573 local zoneName = GetMapNameByID(submapID)
Nenue@40 574 print('|cFF00FFFF Zone:|r', submapID, zoneName, #taskInfo)
Nenue@40 575 db.QuestsByZone[submapID] = db.QuestsByZone[submapID] or {}
Nenue@40 576 for i, info in ipairs(taskInfo) do
Nenue@40 577 if HaveQuestData(info.questId) then
Nenue@40 578 rprint('|cFF44FF44update|r', info.questId, zoneName)
Nenue@40 579 local questID = info.questId
Nenue@40 580 local pin = self:AcquirePin(questID)
Nenue@40 581 local pin = db.QuestsByID[questID]
Nenue@40 582 if pin then
Nenue@40 583 pin.isStale = true
Nenue@40 584 if pin.isPending then
Nenue@40 585 self.isPending = true
Nenue@40 586 end
Nenue@40 587 end
Nenue@40 588 else
Nenue@40 589 rprint('|cFFFF4400no data|r', info.questId, zoneName)
Nenue@40 590 end
Nenue@33 591 end
Nenue@33 592 end
Nenue@33 593 end
Nenue@33 594
Nenue@40 595 self:GetBonusObjectives()
Nenue@40 596
Nenue@40 597 print(' hasUpdate:', self.isStale, 'isPending:', self.isPending, 'timer:', (self.OnNext and 'waiting' or ''))
Nenue@40 598 --WorldPlan.isStale = (self.isStale or WorldPlan.isStale)
Nenue@40 599 if self.isStale and self:IsVisible() then
Nenue@40 600 self:Refresh()
Nenue@40 601 end
Nick@63 602
Nenue@40 603 end
Nenue@40 604
Nenue@45 605 function Module:Report()
Nenue@40 606 for i, pin in ipairs(db.UsedPins) do
Nenue@40 607 db:print(i, pin.questID, pin.title)
Nenue@33 608 end
Nenue@33 609
Nenue@40 610 for id, pin in pairs(db.QuestsByID) do
Nenue@40 611 db:print(id, pin.worldQuestType, pin.rewardType, pin.title)
Nenue@40 612 end
Nenue@33 613 end
Nenue@33 614
Nenue@67 615 local bountiesInitialized
Nenue@67 616 function Module:Refresh(...)
Nenue@67 617 rprint('|cFF00FF88'..self:GetName()..':Refresh()|r', ...)
Nenue@67 618 print('|cFF00FF88'..self:GetName()..':Refresh()|r', ...)
Nenue@34 619 if not self:IsVisible() then
Nenue@40 620 print(' not visible, flag for later')
Nenue@34 621 self.isStale = true
Nenue@57 622 return self:MarkAllPins()
Nenue@40 623 end
Nenue@67 624 if not db.Config.EnablePins then
Nenue@69 625 numShown = 0
Nenue@67 626 return
Nenue@67 627 end
Nenue@67 628
Nenue@67 629
Nick@60 630 wprint(' |cFF00FF88'..self:GetName()..':Refresh()|r')
Nenue@40 631
Nenue@66 632 scaleConstant = db.isContinentMap and 2 or 3
Nenue@40 633 for index, pin in pairs(db.QuestsByID) do
Nenue@40 634 pin.used = nil
Nenue@40 635 end
Nenue@40 636
Nenue@69 637 canTargetQuests = SpellCanTargetQuest()
Nenue@69 638 self:UpdateAnchors()
Nick@60 639
Nenue@69 640 -- calculate quests shown
Nenue@65 641 numShown = 0
Nenue@65 642 numLoaded = 0
Nick@60 643 for questID, pin in pairs(db.QuestsByID) do
Nick@60 644 local oV = pin:IsShown()
Nick@60 645 if pin.used then
Nick@60 646 pin.throttle = 1
Nick@60 647 if oV == false then
Nenue@67 648 rprint('|cFF00FF00cleanup +|r', questID, pin.title)
Nick@60 649 end
Nick@60 650 pin:SetShown(true)
Nenue@65 651 numShown = numShown + 1
Nenue@65 652 if pin.dataLoaded then
Nenue@65 653 numLoaded = numLoaded + 1
Nenue@65 654 end
Nenue@65 655
Nick@60 656 else
Nick@60 657 if oV == true then
Nenue@67 658 rprint('|cFFFF4400 -|r', questID, pin.title)
Nick@60 659 end
Nenue@69 660 pin.hideReason = "Not used in map area " .. (db.currentMapID)
Nick@62 661 pin:HideFrames()
Nick@60 662 end
Nick@60 663 end
Nick@60 664
Nenue@71 665
Nenue@71 666 self:UpdateBountyInfo()
Nenue@71 667
Nenue@67 668 print(numShown, 'shown', numLoaded, 'loaded')
Nenue@65 669 if numShown > numLoaded then
Nenue@65 670 self.Status:Show()
Nenue@65 671 end
Nenue@65 672
Nenue@65 673
Nenue@40 674 self.isStale = nil
Nenue@54 675 self.sizesDirty = nil
Nenue@66 676 self.isZoomDirty = nil
Nenue@40 677 end
Nenue@40 678
Nenue@69 679 function Module:RefreshIfChanged()
Nenue@69 680 local scaleCheck = WorldMapDetailFrame:GetScale()
Nenue@69 681 if scaleCheck ~= currentScale then
Nenue@69 682 print('|cFF00FF88scale changed from', currentScale, 'to', scaleCheck)
Nenue@69 683 self:Refresh()
Nenue@69 684 currentScale = scaleCheck
Nenue@69 685 elseif self.isStale then
Nenue@69 686 print('|cFF00FF88isStale flag was set')
Nenue@69 687 self:Refresh()
Nenue@69 688 end
Nenue@69 689 end
Nenue@69 690
Nenue@40 691 -- update visibility states of all pins
Nenue@57 692 function Module:MarkAllPins(pins)
Nenue@57 693 print(' |cFFFFFF00'..self:GetName()..':MarkAllPins()|r', pins)
Nenue@40 694 pins = pins or db.QuestsByID
Nenue@40 695 for questID, pin in pairs(pins) do
Nenue@40 696 pin.isStale = true
Nenue@40 697 rprint('|cFF00FF00filter', pin.questID, pin.filtered, 'used:', pin.used)
Nenue@40 698 end
Nenue@40 699 end
Nenue@40 700
Nenue@45 701 function Module:UpdateQuestButton(info, mapID)
Nenue@40 702 local questID, x, y = info.questId, info.x, info.y
Nenue@40 703 local pin = self:AcquirePin(info)
Nenue@40 704 if not pin then
Nenue@34 705 return
Nenue@34 706 end
Nenue@34 707
Nenue@67 708 --print(' |- ', pin.questID, pin.title)
Nenue@57 709 rprint('|cFF00FF00update|r', pin.questID, pin.title)
Nenue@40 710 if x and y then
Nenue@66 711 local scaleFactor = SCALE_FACTORS[(pin.dataLoaded and not pin.filtered) and scaleConstant or 1]
Nenue@49 712 pin:SetFrameLevel(PinBaseIndex+pin:GetID())
Nenue@57 713 pin.owningFrame = WorldMapFrame
Nenue@66 714 pin:SetAnchor(WorldMapPOIFrame, x, y, self.hostWidth, self.hostHeight, scaleFactor)
Nenue@54 715 --tinsert(self.UsedPositions, pin)
Nenue@40 716 end
Nenue@66 717
Nenue@66 718 if self:IsVisible() and (pin.isStale) then
Nenue@57 719 pin:Refresh()
Nenue@54 720 end
Nenue@69 721
Nenue@40 722 if mapID then
Nenue@40 723 if not db.QuestsByZone[mapID] then
Nenue@40 724 db.QuestsByZone[mapID] = {}
Nenue@40 725 end
Nenue@40 726 db.QuestsByZone[mapID][questID] = pin
Nenue@33 727 end
Nenue@33 728 end
Nenue@33 729
Nenue@69 730 -- Updates quest markers in taskInfo while associating them with the given map
Nenue@69 731 function Module:UpdateQuestsForMap(taskInfo, mapID)
Nenue@49 732 rprint('Map', GetMapNameByID(mapID), GetMapNameByID(db.currentMapID))
Nenue@40 733 for index, info in pairs(taskInfo) do
Nenue@40 734 self:UpdateQuestButton(info, mapID)
Nenue@40 735 end
Nenue@40 736 end
Nenue@33 737
Nenue@69 738 -- Used to refresh the visible quest markers
Nick@60 739 function Module:UpdateAnchors ()
Nenue@40 740 wipe(self.UsedPositions)
Nick@60 741 print(' |cFF00FF00'..self:GetName()..':UpdateAnchors()')
Nenue@57 742 self.hostWidth, self.hostHeight = WorldMapPOIFrame:GetSize()
Nenue@40 743 self.nudgeThrescholdX = 16/self.hostWidth
Nenue@40 744 self.nudgeThrescholdY = 16/self.hostHeight
Nenue@67 745
Nenue@67 746 rprint('|cFF00FF00'..self:GetName()..':UpdateAnchors()')
Nenue@33 747 local mapFileName, textureHeight, textureWidth, isMicroDungeon, microDungeonMapName = GetMapInfo()
Nenue@33 748 if isMicroDungeon then
Nenue@33 749 return
Nenue@33 750 end
Nenue@69 751
Nenue@65 752 isDataLoaded = true
Nenue@67 753 local taskInfo = TQ_GetQuestsForPlayerByMapID(db.currentMapID)
Nenue@40 754 if taskInfo then
Nenue@69 755 self:UpdateQuestsForMap(taskInfo, db.currentMapID)
Nenue@33 756 end
Nenue@67 757 local numZones = MC_GetNumZones(db.currentMapID)
Nenue@33 758 if numZones then
Nenue@33 759 for i = 1, numZones do
Nenue@67 760 local mapAreaID = MC_GetZoneInfo(db.currentMapID, i)
Nenue@67 761 local taskInfo = TQ_GetQuestsForPlayerByMapID(mapAreaID, db.currentMapID)
Nenue@40 762 if taskInfo then
Nenue@69 763 self:UpdateQuestsForMap(taskInfo, mapAreaID)
Nenue@40 764 end
Nenue@33 765 end
Nenue@33 766 end
Nenue@33 767 end
Nenue@33 768
Nenue@67 769 function ToggleButton:OnShow()
Nenue@67 770 self:SetChecked(db.Config.EnablePins and true or false)
Nenue@67 771 end
Nenue@67 772 function ToggleButton:OnClick()
Nenue@67 773 print(self:GetChecked())
Nenue@67 774 db.Config.EnablePins = self:GetChecked()
Nenue@67 775 _G.WorldPlan:OnConfigUpdate()
Nenue@67 776 end