Mercurial > wow > worldplan

annotate WorldQuests.lua @ 45:db570c6a0ffb v1.0-rc12

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
- Fixed filter buttons losing their anchor after FlightMap interactions - Fixed flickering tooltips - Fixed a source of hangs while opening the world map, particularly in non-Broken-Isle continents. - Workaround for World Map Action Button: Temporarily activate blizzard POI buttons while a quest-targeting spell is on the cursor.
author Nenue
date Mon, 26 Dec 2016 10:20:52 -0500
parents 77c2ffb5c7f5
children 733785e306a3
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
Nenue@33 8 local MC_GetNumZones, MC_GetZoneInfo = C_MapCanvas.GetNumZones, C_MapCanvas.GetZoneInfo
Nenue@33 9 local TQ_GetQuestsForPlayerByMapID = C_TaskQuest.GetQuestsForPlayerByMapID -- This function is not yet documented
Nenue@33 10 local TQ_GetQuestZoneID = C_TaskQuest.GetQuestZoneID
Nenue@33 11 local GetMapInfo = GetMapInfo
Nenue@40 12 local print = DEVIAN_WORKSPACE and function(...) _G.print('WorldQuests', ...) end or function() end
Nenue@40 13 local rprint = DEVIAN_WORKSPACE and function(...) _G.print('WQRefresh', ...) end or function() end
Nenue@33 14 local qprint = DEVIAN_WORKSPACE and function(...) _G.print('POI', ...) end or function() end
Nenue@33 15 local wprint = DEVIAN_WORKSPACE and function(...) _G.print('WP', ...) end or function() end
Nenue@35 16 local mprint = DEVIAN_WORKSPACE and function(...) _G.print('Canvas', ...) end or function() end
Nenue@45 17 local pairs = pairs
Nenue@33 18
Nenue@40 19 local PinBaseIndex = 1200
Nenue@33 20 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 21 local WORLD_QUEST_MAPS = { [DALARAN_ID] = 'Dalaran70', [AZSUNA_ID] = 'Azsuna', [VALSHARAH_ID] = "Val'sharah",
Nenue@33 22 [HIGHMOUNTAIN_ID] = 'Highmountain', [STORMHEIM_ID] = 'Stormheim', [SURAMAR_ID] = 'Suramar', [EOA_ID] = 'EyeOfAszhara', }
Nenue@33 23
Nenue@33 24 local REWARD_CASH = WORLD_QUEST_REWARD_TYPE_FLAG_GOLD
Nenue@33 25 local REWARD_ARTIFACT_POWER = WORLD_QUEST_REWARD_TYPE_FLAG_ARTIFACT_POWER
Nenue@33 26 local REWARD_GEAR = WORLD_QUEST_REWARD_TYPE_FLAG_EQUIPMENT
Nenue@33 27 local REWARD_CURRENCY = WORLD_QUEST_REWARD_TYPE_FLAG_ORDER_RESOURCES
Nenue@33 28 local REWARD_REAGENT = WORLD_QUEST_REWARD_TYPE_FLAG_MATERIALS
Nenue@33 29
Nenue@33 30
Nenue@33 31 local numPins = 0
Nenue@33 32 local NumPinFrames = 1
Nenue@45 33 Module.TasksByID = {}
Nenue@33 34
Nenue@33 35 --%debug%
Nenue@33 36 local SetTimedCallbackForAllPins = function(seconds, callback)
Nenue@33 37 C_Timer.After(seconds, function()
Nenue@33 38 for id, pin in pairs(WorldPlanQuests.QuestsByID) do
Nenue@33 39 callback(pin)
Nenue@33 40 end
Nenue@33 41 end)
Nenue@33 42 end
Nenue@33 43
Nenue@45 44 function Module:OnUpdate(sinceLast)
Nenue@40 45 if self.filtersDirty or self.isStale then
Nenue@40 46 self:Refresh()
Nenue@40 47 end
Nenue@40 48 end
Nenue@40 49
Nenue@45 50 function Module:Setup()
Nenue@40 51 print('|cFFFF4400'..self:GetName()..':Setup()')
Nenue@33 52
Nenue@33 53 for mapID, mapName in pairs(WORLD_QUEST_MAPS) do
Nenue@40 54 db.QuestsByZone[mapID] = {}
Nenue@33 55 end
Nenue@33 56
Nenue@45 57 hooksecurefunc("ClickWorldMapActionButton", function () self:OnClickWorldMapActionButton() end)
Nenue@45 58 hooksecurefunc("WorldMapScrollFrame_ReanchorQuestPOIs", function () self:Refresh() end)
Nenue@45 59 hooksecurefunc("WorldMap_UpdateQuestBonusObjectives", function () self:OnUpdateQuestBonusObjectives() end)
Nenue@45 60 end
Nenue@33 61
Nenue@45 62 local InternalHideButton = function(button, index)
Nenue@45 63 button:Hide()
Nenue@45 64 if button.questID and db.QuestsByID[button.questID] then
Nenue@45 65 if db.QuestsByID[button.questID].used and not db.QuestsByID[button.questID].filtered then
Nenue@45 66 db.QuestsByID[button.questID]:SetShown(true)
Nenue@45 67 end
Nenue@45 68 end
Nenue@45 69 end
Nenue@45 70 local InternalShowButton = function(button, index)
Nenue@45 71 button:Show()
Nenue@45 72 if button.questID and db.QuestsByID[button.questID] then
Nenue@45 73 db.QuestsByID[button.questID]:SetShown(false)
Nenue@45 74 end
Nenue@45 75 end
Nenue@33 76
Nenue@45 77 function Module:OnUpdateQuestBonusObjectives()
Nenue@45 78 print('|cFFFF4400WorldMap_UpdateQuestBonusObjectives')
Nenue@45 79 local func = SpellCanTargetQuest() and InternalShowButton or InternalHideButton
Nenue@45 80 print(SpellCanTargetQuest())
Nenue@45 81 for i = 1, NUM_WORLDMAP_TASK_POIS do
Nenue@45 82 local button = _G['WorldMapFrameTaskPOI'..i]
Nenue@45 83 if button and button.worldQuest then
Nenue@45 84 func(button, i)
Nenue@45 85 end
Nenue@45 86 end
Nenue@45 87 end
Nenue@40 88
Nenue@45 89 function Module:OnClickWorldMapActionButton()
Nenue@45 90 self.IsTargeting = SpellCanTargetQuest()
Nenue@45 91 self:OnUpdateQuestBonusObjectives()
Nenue@45 92 end
Nenue@40 93
Nenue@33 94 local defaults = {}
Nenue@40 95 local REWARD_UNKNOWN = 768
Nenue@45 96 function Module:OnLoad()
Nenue@40 97 print('|cFFFF4400'..self:GetName()..':OnLoad()')
Nenue@33 98
Nenue@40 99 self:SetParent(WorldMapFrame)
Nenue@33 100 WorldPlan:AddHandler(self, defaults)
Nenue@33 101
Nenue@40 102 local rgbWhite = {1, 1, 1 }
Nenue@40 103 WorldPlan:AddTypeInfo(self, REWARD_UNKNOWN, { r = 1, g = 1, b = 1})
Nenue@33 104 WorldPlan:AddTypeInfo(self, REWARD_REAGENT, { r = 0, g = 1, b = 1 })
Nenue@33 105 WorldPlan:AddTypeInfo(self, REWARD_ARTIFACT_POWER, { r = 1, g = .25, b = .5, hasNumeric = true, numberRGB = rgbWhite })
Nenue@33 106 WorldPlan:AddTypeInfo(self, REWARD_GEAR, { r = .1, g = .2, b = 1 })
Nenue@33 107 WorldPlan:AddTypeInfo(self, REWARD_CURRENCY, { r = 1, g = 1, b = 0, hasNumeric = true, numberRGB = {1,1,0}, })
Nenue@40 108 WorldPlan:AddTypeInfo(self, REWARD_CASH, { r = 1, g = 1, b = .32, pinMask = false, rewardMask = false })
Nenue@33 109
Nenue@33 110 for areaID, fileName in pairs(WORLD_QUEST_MAPS) do
Nenue@40 111 db.QuestsByZone[areaID] = {}
Nenue@33 112 end
Nenue@33 113
Nenue@41 114 -- WORLD_MAP_UPDATE and PLAYER_ENTERING_WORLD are passed down from a higher level
Nenue@33 115 self:RegisterEvent('WORLD_QUEST_COMPLETED_BY_SPELL')
Nenue@33 116 self:RegisterEvent('SKILL_LINES_CHANGED')
Nenue@33 117
Nenue@33 118 WorldMapPOIFrame = _G.WorldMapPOIFrame
Nenue@33 119
Nenue@33 120 end
Nenue@33 121
Nenue@45 122 function Module:OnMapInfo()
Nenue@43 123 if self:IsVisible() then
Nenue@43 124 self:Refresh()
Nenue@43 125 else
Nenue@43 126 self.isStale = true
Nenue@43 127 end
Nenue@41 128 end
Nenue@41 129
Nenue@45 130 function Module:OnEvent (event, ...)
Nenue@40 131
Nenue@40 132 print('|cFFFFFF00'..self:GetName()..':OnEvent() '..event..'|r', GetTime(), ...)
Nenue@41 133 if event == 'QUEST_LOG_UPDATE' then
Nenue@33 134 local questID, added = ...
Nenue@33 135 if questID and added then
Nenue@33 136 local questPOI = self:AcquirePin(questID)
Nenue@40 137 questPOI:GetQuestInfo()
Nenue@40 138 questPOI.isStale = true
Nenue@40 139 self.isStale = true
Nenue@33 140 else
Nenue@40 141 self:Refresh(true)
Nenue@33 142 end
Nenue@33 143 print('WorldMapFrame', WorldMapFrame:IsVisible(), 'hasUpdates:', self.isStale)
Nenue@33 144 elseif event == 'WORLD_QUEST_COMPLETED_BY_SPELL' then
Nenue@33 145 local questID = ...
Nenue@40 146 if questID and db.QuestsByID[questID] then
Nenue@40 147 self:ReleasePin(db.QuestsByID[questID])
Nenue@40 148 rprint('|cFFFF4400release|r', questID)
Nenue@33 149 end
Nenue@33 150 elseif event == 'SKILL_LINES_CHANGED' then
Nenue@40 151 self:SetFilteredPins()
Nenue@33 152 end
Nenue@33 153 end
Nenue@33 154
Nenue@40 155 local totalPins = 0
Nenue@33 156 local TQ_GetQuestLocation = C_TaskQuest.GetQuestLocation
Nenue@45 157 function Module:AcquirePin (info)
Nenue@40 158 local questID = info.questId
Nenue@40 159 if not questID then
Nenue@40 160 return nil
Nenue@40 161 end
Nenue@40 162
Nenue@40 163 if not QuestUtils_IsQuestWorldQuest(questID) then
Nenue@40 164 return nil
Nenue@40 165 end
Nenue@40 166
Nenue@40 167
Nenue@40 168 local pin = db.QuestsByID[questID]
Nenue@33 169 if not pin then
Nenue@40 170 local numFree = #db.FreePins
Nenue@33 171 if numFree >= 1 then
Nenue@40 172 pin = tremove(db.FreePins, numFree)
Nenue@33 173 --print('|cFF00FF00Re-using', pin:GetName())
Nenue@33 174 else
Nenue@40 175 totalPins = totalPins + 1
Nenue@33 176 local name = 'WorldPlanQuestMarker' .. NumPinFrames
Nenue@33 177 --print('|cFF00FF00Creating', name)
Nenue@33 178 pin = CreateFrame('Frame', name, WorldMapPOIFrame, 'WorldPlanQuestPin')
Nenue@33 179
Nenue@33 180 pin:SetFrameStrata('HIGH')
Nenue@33 181 pin.GetTypeInfo = function(frame, typeID)
Nenue@33 182 return self:GetTypeInfo(typeID)
Nenue@33 183 end
Nenue@40 184 pin:SetID(totalPins)
Nenue@33 185 NumPinFrames = NumPinFrames + 1
Nenue@33 186 --pin.iconBorder:SetVertexColor(0,0,0,1)
Nenue@33 187 end
Nenue@40 188 pin.questID = questID
Nenue@40 189 pin.worldQuest = true
Nenue@40 190 pin.throttle = 1
Nenue@33 191 pin.isNew = true
Nenue@33 192 pin.currentWidth = nil
Nenue@40 193 db.QuestsByID[questID] = pin
Nenue@40 194 tinsert(db.UsedPins, pin)
Nenue@40 195 end
Nenue@33 196
Nenue@40 197 if pin and info then
Nenue@40 198 pin.inProgress = info.inProgress
Nenue@40 199 pin.floor = info.floor
Nenue@40 200 pin.numObjectives = info.numObjectives or 0
Nenue@40 201 if info.x and info.y then
Nenue@40 202 pin.x = info.x or pin.x
Nenue@40 203 pin.y = info.y or pin.y
Nenue@40 204 rprint('|cFFFF4400coords|r', info.x, info.y)
Nenue@40 205 end
Nenue@40 206 end
Nenue@33 207
Nenue@40 208 pin:GetData()
Nenue@40 209 C_TaskQuest.RequestPreloadRewardData(info.questId)
Nenue@40 210 return pin
Nenue@33 211 end
Nenue@33 212
Nenue@33 213 -- remove from index and add it to the recycling heap
Nenue@45 214 function Module:ReleasePin (pin)
Nenue@33 215
Nenue@40 216 local id = pin.questID
Nenue@33 217 if id then
Nenue@40 218 db.QuestsByID[id] = nil
Nenue@40 219
Nenue@40 220 for i, zone in pairs(db.QuestsByZone) do
Nenue@33 221 print('-', i, zone[i])
Nenue@33 222 zone[id] = nil
Nenue@33 223 end
Nenue@40 224 db.TasksByID[id] = nil
Nenue@33 225 end
Nenue@40 226 pin:SetShown(false)
Nenue@33 227 pin:ClearAllPoints()
Nenue@40 228 tinsert(db.FreePins, pin)
Nenue@40 229
Nenue@40 230 print('|cFF00FF00-'.. (pin.mapID and GetMapNameByID(pin.mapID) or '???') ..'|r', id, pin.title)
Nenue@33 231 end
Nenue@33 232
Nenue@45 233 function Module:GetBonusObjectives()
Nenue@40 234
Nenue@40 235
Nenue@40 236 local tasksTable = GetTasksTable()
Nenue@40 237 if tasksTable ~= nil then
Nenue@40 238 print('|cFF00FF88'..self:GetName()..':BonusObjectives()|r ')
Nenue@40 239 self.numTasks = #tasksTable
Nenue@40 240 for i, taskID in ipairs(tasksTable) do
Nenue@40 241 if not QuestUtils_IsQuestWorldQuest(taskID) then
Nenue@40 242 local info = db.TasksByID[taskID]
Nenue@40 243 if not info then
Nenue@40 244 local isInArea, isOnMap, numObjectives, taskName, displayAsObjective = GetTaskInfo(taskID)
Nenue@40 245 if isOnMap then
Nenue@40 246 print(' * '..i, taskID, GetTaskInfo(taskID))
Nenue@40 247 info = {
Nenue@40 248 questID = taskID,
Nenue@40 249 numObjectives = numObjectives,
Nenue@40 250 title = taskName,
Nenue@40 251 isInArea = isInArea,
Nenue@40 252 isOnMap = isOnMap,
Nenue@40 253 displayAsObjective = displayAsObjective,
Nenue@40 254 worldQuest = false,
Nenue@40 255 isPending = false,
Nenue@40 256 isNew = true,
Nenue@40 257 }
Nenue@40 258
Nenue@40 259
Nenue@40 260 db.TasksByID[taskID] = info
Nenue@40 261
Nenue@40 262 local pin = self:AcquirePin(taskID)
Nenue@40 263 for k,v in pairs(info) do
Nenue@40 264 pin[k] = v
Nenue@40 265 end
Nenue@40 266 pin:GetBonusObjectiveInfo(info)
Nenue@40 267 end
Nenue@40 268 end
Nenue@40 269 end
Nenue@40 270
Nenue@40 271
Nenue@40 272 end
Nenue@40 273 end
Nenue@40 274 end
Nenue@40 275
Nenue@40 276
Nenue@40 277
Nenue@40 278
Nenue@40 279 -- use tooltip object to extract item details
Nenue@45 280 function Module:GetRewardHeader(questID)
Nenue@40 281 local name, icon, quantity, quality, _, itemID = GetQuestLogRewardInfo(1, questID)
Nenue@40 282 local scanner = _G.WorldPlanTooltip
Nenue@40 283 local print = qprint
Nenue@40 284 if not itemID then
Nenue@40 285 return
Nenue@40 286 end
Nenue@40 287 --print('GetRewardHeader', questID)
Nenue@40 288
Nenue@40 289 scanner:SetOwner(WorldPlan, "ANCHOR_NONE")
Nenue@40 290 scanner:SetItemByID(itemID)
Nenue@40 291 scanner:Show()
Nenue@40 292 local ttl1 = _G['WorldPlanTooltipTextLeft1']
Nenue@40 293 local ttl2 = _G['WorldPlanTooltipTextLeft2']
Nenue@40 294 local ttl3 = _G['WorldPlanTooltipTextLeft3']
Nenue@40 295 local ttl4 = _G['WorldPlanTooltipTextLeft4']
Nenue@40 296 --print(ttl2, ttl3, ttl4)
Nenue@40 297 if ttl2 then
Nenue@40 298 local text = ttl2:GetText()
Nenue@40 299 -- Artifact Power
Nenue@40 300 --print(text)
Nenue@40 301 if text then
Nenue@40 302 if text:match("|cFFE6CC80") then
Nenue@40 303 --print('AP token!', text)
Nenue@40 304 local power
Nenue@40 305 if ttl4 then
Nenue@40 306 local text = ttl4:GetText()
Nenue@40 307 --print('tip line 4', text)
Nenue@40 308 if text then
Nenue@40 309 power = text:gsub("%p", ""):match("%d+")
Nenue@40 310 power = tonumber(power)
Nenue@40 311 end
Nenue@40 312
Nenue@40 313 end
Nenue@40 314 return REWARD_ARTIFACT_POWER, "Interface\\ICONS\\inv_7xp_inscription_talenttome01", power, name, itemID, quality
Nenue@40 315 elseif text:match("Item Level") then
Nenue@40 316 --print('equipment!', text)
Nenue@40 317 quantity = text:match("Item Level ([%d\+]+)")
Nenue@40 318 return REWARD_GEAR, icon, quantity, name, itemID, quality
Nenue@40 319 elseif text:match("Crafting Reagent") then
Nenue@40 320 --print('|cFFFF4400it is a reagent', text)
Nenue@40 321 return REWARD_REAGENT, icon, quantity, name, itemID, quality
Nenue@40 322 end
Nenue@40 323 end
Nenue@40 324 end
Nenue@40 325
Nenue@40 326 if ttl3 then
Nenue@40 327 local text = ttl3:GetText()
Nenue@40 328 if text and text:match("Crafting Reagent") then
Nenue@40 329 --print('|cFFFF4400it is a reagent', text)
Nenue@40 330 return REWARD_REAGENT, icon, quantity, name, itemID, quality
Nenue@40 331 end
Nenue@40 332 end
Nenue@40 333 return 128, icon, quantity, name, itemID, quality
Nenue@40 334 end
Nenue@40 335
Nenue@40 336 local GetCurrentMapAreaID, GetMapNameByID= GetCurrentMapAreaID, GetMapNameByID
Nenue@40 337 local wipe, pairs = wipe, pairs
Nenue@33 338 -- create of update quest pins for a map and its underlying zones
Nenue@45 339 function Module:UpdateWorldQuests (mapID)
Nenue@40 340
Nenue@40 341 mapID = mapID or db.currentMapID
Nenue@33 342 if not mapID then
Nenue@33 343 -- info not available yet
Nenue@33 344 return
Nenue@33 345 end
Nenue@33 346
Nenue@34 347
Nenue@40 348 print('|cFF00FF88'..self:GetName()..':UpdateWorldQuests()|r', 'map:', mapID, 'realMap:', db.currentMapID)
Nenue@33 349
Nenue@40 350
Nenue@40 351 self.isStale = nil
Nenue@40 352 print('|cFF00FFFFContinent:|r', BROKEN_ISLES_ID, GetMapNameByID(BROKEN_ISLES_ID))
Nenue@40 353 self.isRecursed = true
Nenue@40 354 for i = 1, MC_GetNumZones(BROKEN_ISLES_ID) do
Nenue@40 355 local submapID, name, depth = MC_GetZoneInfo(BROKEN_ISLES_ID, i)
Nenue@40 356 local taskInfo = TQ_GetQuestsForPlayerByMapID(submapID, BROKEN_ISLES_ID)
Nenue@40 357 if taskInfo then
Nenue@40 358 local zoneName = GetMapNameByID(submapID)
Nenue@40 359 print('|cFF00FFFF Zone:|r', submapID, zoneName, #taskInfo)
Nenue@40 360 db.QuestsByZone[submapID] = db.QuestsByZone[submapID] or {}
Nenue@40 361 for i, info in ipairs(taskInfo) do
Nenue@40 362 if HaveQuestData(info.questId) then
Nenue@40 363 rprint('|cFF44FF44update|r', info.questId, zoneName)
Nenue@40 364 local questID = info.questId
Nenue@40 365 local pin = self:AcquirePin(questID)
Nenue@40 366 local pin = db.QuestsByID[questID]
Nenue@40 367 if pin then
Nenue@40 368 pin.isStale = true
Nenue@40 369 if pin.isPending then
Nenue@40 370 self.isPending = true
Nenue@40 371 end
Nenue@40 372 end
Nenue@40 373 else
Nenue@40 374 rprint('|cFFFF4400no data|r', info.questId, zoneName)
Nenue@40 375 end
Nenue@33 376 end
Nenue@33 377 end
Nenue@33 378 end
Nenue@33 379
Nenue@40 380 self:GetBonusObjectives()
Nenue@40 381
Nenue@40 382 print(' hasUpdate:', self.isStale, 'isPending:', self.isPending, 'timer:', (self.OnNext and 'waiting' or ''))
Nenue@40 383 --WorldPlan.isStale = (self.isStale or WorldPlan.isStale)
Nenue@40 384 if self.isStale and self:IsVisible() then
Nenue@40 385 self:Refresh()
Nenue@40 386 end
Nenue@40 387 end
Nenue@40 388
Nenue@45 389 function Module:Report()
Nenue@40 390 for i, pin in ipairs(db.UsedPins) do
Nenue@40 391 db:print(i, pin.questID, pin.title)
Nenue@33 392 end
Nenue@33 393
Nenue@40 394 for id, pin in pairs(db.QuestsByID) do
Nenue@40 395 db:print(id, pin.worldQuestType, pin.rewardType, pin.title)
Nenue@40 396 end
Nenue@33 397 end
Nenue@33 398
Nenue@45 399 function Module:Refresh(fromUser)
Nenue@40 400 self.currentMapID = GetCurrentMapAreaID()
Nenue@40 401 print('|cFF00FF88'..self:GetName()..':Refresh()|r', fromUser or '|cFFFFFF00internal')
Nenue@34 402 if not self:IsVisible() then
Nenue@40 403 print(' not visible, flag for later')
Nenue@34 404 self.isStale = true
Nenue@40 405 return
Nenue@40 406 end
Nenue@40 407 wprint(' |cFF00FF88'..self:GetName()..':Refresh()|r', fromUser or '|cFFFFFF00internal')
Nenue@40 408
Nenue@40 409 for index, pin in pairs(db.QuestsByID) do
Nenue@40 410 pin.used = nil
Nenue@40 411 end
Nenue@40 412
Nenue@40 413 self:SetFilteredPins(db.QuestsByID)
Nenue@40 414 self:UpdateAnchors(nil, fromUser)
Nenue@40 415 self:Cleanup (fromUser)
Nenue@40 416 self.isStale = nil
Nenue@40 417 end
Nenue@40 418
Nenue@40 419 -- update visibility states of all pins
Nenue@45 420 function Module:SetFilteredPins(pins)
Nenue@40 421 print(' |cFFFFFF00'..self:GetName()..':SetFilteredPins()|r', pins)
Nenue@40 422 pins = pins or db.QuestsByID
Nenue@40 423 for questID, pin in pairs(pins) do
Nenue@40 424 pin.filtered = pin:IsFiltered()
Nenue@40 425 pin.isStale = true
Nenue@40 426 rprint('|cFF00FF00filter', pin.questID, pin.filtered, 'used:', pin.used)
Nenue@40 427 end
Nenue@40 428 end
Nenue@40 429
Nenue@40 430 local abs = math.abs
Nenue@45 431 function Module:UpdateQuestButton(info, mapID)
Nenue@40 432 local questID, x, y = info.questId, info.x, info.y
Nenue@40 433 local pin = self:AcquirePin(info)
Nenue@40 434 if not pin then
Nenue@34 435 return
Nenue@34 436 end
Nenue@34 437
Nenue@33 438
Nenue@40 439 print('~ ', pin.mapID, pin.questID, pin.title)
Nenue@40 440 rprint('|cFF00FF00update|r', x, y, pin.title)
Nenue@40 441 pin:IsShowable()
Nenue@40 442
Nenue@40 443 if x and y then
Nenue@40 444
Nenue@40 445 pin.x = x
Nenue@40 446 pin.y = y
Nenue@40 447 pin:SetFrameLevel(PinBaseIndex+numPins)
Nenue@40 448 pin:SetPoint('CENTER', self.hostFrame, 'TOPLEFT', self.hostWidth * pin.x, -self.hostHeight * pin.y)
Nenue@40 449 pin.throttle = 1
Nenue@40 450 pin:SetShown(pin.used)
Nenue@40 451 tinsert(self.UsedPositions, pin)
Nenue@40 452 end
Nenue@40 453 pin.owningFrame = self.hostFrame
Nenue@40 454 pin:SetParent(self.hostFrame)
Nenue@40 455
Nenue@40 456 if mapID then
Nenue@40 457 if not db.QuestsByZone[mapID] then
Nenue@40 458 db.QuestsByZone[mapID] = {}
Nenue@40 459 end
Nenue@40 460 db.QuestsByZone[mapID][questID] = pin
Nenue@33 461 end
Nenue@33 462 end
Nenue@33 463
Nenue@45 464 function Module:UpdateMap(taskInfo, mapID)
Nenue@40 465 print('Map', GetMapNameByID(mapID), GetMapNameByID(self.currentMapID))
Nenue@40 466 for index, info in pairs(taskInfo) do
Nenue@40 467 self:UpdateQuestButton(info, mapID)
Nenue@40 468 end
Nenue@40 469 end
Nenue@33 470
Nenue@45 471 function Module:UpdateAnchors (fromUser)
Nenue@40 472
Nenue@40 473
Nenue@40 474 wipe(self.UsedPositions)
Nenue@40 475 print(' |cFF00FF00'..self:GetName()..':UpdateAnchors()', fromUser)
Nenue@40 476 self.hostFrame = WorldMapPOIFrame
Nenue@40 477 self.hostWidth, self.hostHeight = self.hostFrame:GetSize()
Nenue@40 478 self.nudgeThrescholdX = 16/self.hostWidth
Nenue@40 479 self.nudgeThrescholdY = 16/self.hostHeight
Nenue@40 480 local print = rprint
Nenue@40 481 print('|cFF00FF00'..self:GetName()..':UpdateAnchors()', fromUser)
Nenue@33 482 local mapFileName, textureHeight, textureWidth, isMicroDungeon, microDungeonMapName = GetMapInfo()
Nenue@33 483 if isMicroDungeon then
Nenue@33 484 return
Nenue@33 485 end
Nenue@33 486
Nenue@40 487 numPins = 0
Nenue@40 488 local taskInfo = TQ_GetQuestsForPlayerByMapID(self.currentMapID)
Nenue@40 489 if taskInfo then
Nenue@40 490 self:UpdateMap(taskInfo, self.currentMapID)
Nenue@33 491 end
Nenue@40 492 local numZones = MC_GetNumZones(self.currentMapID)
Nenue@33 493 if numZones then
Nenue@33 494 for i = 1, numZones do
Nenue@40 495 local mapAreaID = MC_GetZoneInfo(self.currentMapID, i)
Nenue@40 496 local taskInfo = TQ_GetQuestsForPlayerByMapID(mapAreaID, self.currentMapID)
Nenue@40 497 if taskInfo then
Nenue@40 498 self:UpdateMap(taskInfo, mapAreaID)
Nenue@40 499 end
Nenue@33 500 end
Nenue@33 501 end
Nenue@40 502 if self.filtersDirty then
Nenue@40 503 self:SetFilteredPins(db.QuestsByID)
Nenue@33 504 end
Nenue@33 505 end
Nenue@33 506
Nenue@33 507 -- shows, animates, or hides pins based on their current visibility flags
Nenue@45 508 function Module:Cleanup (fromUser)
Nenue@40 509
Nenue@35 510 print('|cFFFFFF00'..self:GetName()..':Cleanup()|r')
Nenue@40 511 local print = rprint
Nenue@40 512 print('|cFFFFFF00'..self:GetName()..':Cleanup()|r')
Nenue@40 513 --local showQuestPOI = db.Config.EnablePins
Nenue@40 514 for questID, pin in pairs(db.QuestsByID) do
Nenue@40 515 local oV = pin:IsShown()
Nenue@40 516 if pin.used then
Nenue@45 517
Nenue@40 518 pin.throttle = 1
Nenue@40 519 if oV == false then
Nenue@40 520 print('|cFF00FF00cleanup +|r', questID, pin.title)
Nenue@40 521 end
Nenue@40 522 else
Nenue@40 523 if oV == true then
Nenue@40 524 print('|cFFFF4400 -|r', questID, pin.title)
Nenue@40 525 end
Nenue@40 526 end
Nenue@45 527 pin:SetShown(pin.used or false)
Nenue@33 528
Nenue@40 529 if pin.worldQuest and (not C_TaskQuest.IsActive(pin.questID)) then
Nenue@40 530 self:ReleasePin(pin)
Nenue@40 531 end
Nenue@40 532 pin.isStale = true
Nenue@33 533 end
Nenue@33 534 end
Nenue@33 535