Mercurial > wow > worldplan

annotate WorldPlan.lua @ 13:06c9a30d48da

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
WorldQuests: - Filter interface controls reverted: Left-click to single out a category value, right-click to exclude. Hold shift to set multiple inclusion rules.
author Nenue
date Mon, 24 Oct 2016 04:37:07 -0400
parents a2b623043970
children 54adb0d4938b
rev   line source
Nenue@0 1 -- Veneer
Nenue@0 2 -- WorldPlan.lua
Nenue@0 3 -- Created: 8/16/2016 8:19 AM
Nenue@0 4 -- %file-revision%
Nenue@0 5 --[[
Nenue@0 6 Summary:
Nenue@0 7 Adds reward icons to the world quest POI markers, and adds said markers to the continent map.
Nenue@0 8
Nenue@0 9 Issues:
Nenue@0 10 Dalaran quests aren't visible until that map has been specifically viewed by the player.
Nenue@0 11 --]]
Nenue@0 12
Nenue@0 13 WorldPlanCore = {}
Nenue@0 14 WorldPlanPOIMixin = {}
Nenue@0 15 WorldPlanFilterPinMixin = {}
Nenue@0 16 local WorldPlanFlightMapMixin = setmetatable({}, {__tostring = function() return 'FlightMapHandler' end})
Nenue@0 17 local WorldQuests = setmetatable({ QuestsByID = {}, freePins = {} }, {__tostring = function() return 'QuestHandler' end})
Nenue@0 18 local FilterBar = setmetatable({ SummaryHeaders = {} }, {__tostring = function() return 'FilterBar' end})
Nenue@0 19
Nenue@0 20 local WorldPlan = WorldPlanCore
Nenue@0 21 local QuestPOI = WorldPlanPOIMixin
Nenue@0 22 local FilterPin = WorldPlanFilterPinMixin
Nenue@0 23 local WP_VERSION = "1.0"
Nenue@0 24
Nenue@9 25 local db
Nenue@0 26 local print = DEVIAN_WORKSPACE and function(...) _G.print('WP', ...) end or function() end
Nenue@7 27 local qprint = DEVIAN_WORKSPACE and function(...) _G.print('POI', ...) end or function() end
Nenue@7 28 local iprint = DEVIAN_WORKSPACE and function(...) _G.print('ItemScan', ...) end or function() end
Nenue@9 29 local wqprint = DEVIAN_WORKSPACE and function(...) _G.print('WorldQuests', ...) end or function() end
Nenue@9 30 local fbprint = DEVIAN_WORKSPACE and function(...) _G.print('FilterBar', ...) end or function() end
Nenue@7 31
Nenue@0 32 local wipe, tremove, tinsert, pairs, floor, tContains = table.wipe, table.remove, table.insert, pairs, floor, tContains
Nenue@0 33 local TQ_GetQuestInfoByQuestID = C_TaskQuest.GetQuestInfoByQuestID -- Return the name of a quest with a given ID
Nenue@0 34 local TQ_GetQuestsForPlayerByMapID = C_TaskQuest.GetQuestsForPlayerByMapID -- This function is not yet documented
Nenue@0 35 local TQ_GetQuestTimeLeftMinutes = C_TaskQuest.GetQuestTimeLeftMinutes
Nenue@0 36 local TQ_RequestPreloadRewardData = C_TaskQuest.RequestPreloadRewardData
Nenue@0 37 local TQ_GetQuestLocation = C_TaskQuest.GetQuestLocation
Nenue@0 38 local TQ_IsActive = C_TaskQuest.IsActive
Nenue@0 39 local ITEM_QUALITY_COLORS = ITEM_QUALITY_COLORS
Nenue@0 40 local WorldMap_DoesWorldQuestInfoPassFilters = WorldMap_DoesWorldQuestInfoPassFilters
Nenue@0 41 local QuestMapFrame_IsQuestWorldQuest = QuestMapFrame_IsQuestWorldQuest
Nenue@0 42 local GameTooltip = GameTooltip
Nenue@0 43 local GetItemIcon = GetItemIcon
Nenue@0 44
Nenue@0 45
Nenue@0 46 local GetMapInfo, QuestPOIGetIconInfo = GetMapInfo, QuestPOIGetIconInfo
Nenue@0 47 local GetQuestTagInfo, HaveQuestData = GetQuestTagInfo, HaveQuestData
Nenue@0 48 local GetNumQuestLogRewards, GetNumQuestLogRewardCurrencies, GetQuestLogRewardMoney = GetNumQuestLogRewards, GetNumQuestLogRewardCurrencies, GetQuestLogRewardMoney
Nenue@0 49 local GetQuestLogRewardInfo, GetQuestLogRewardCurrencyInfo, GetMoneyString = GetQuestLogRewardInfo, GetQuestLogRewardCurrencyInfo, GetMoneyString
Nenue@0 50
Nenue@0 51 local GetCurrentMapAreaID, GetMapNameByID, GetSuperTrackedQuestID = GetCurrentMapAreaID, GetMapNameByID, GetSuperTrackedQuestID
Nenue@0 52 local MC_GetNumZones, MC_GetZoneInfo = C_MapCanvas.GetNumZones, C_MapCanvas.GetZoneInfo
Nenue@0 53
Nenue@0 54
Nenue@0 55 local PinBaseIndex = 1600
Nenue@0 56 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@0 57
Nenue@0 58 -- maps where we do our own anchors
Nenue@0 59 local CONTINENT_MAPS = { [BROKEN_ISLES_ID] = BROKEN_ISLES_ID, }
Nenue@0 60 local WORLD_QUEST_MAPS = { [DALARAN_ID] = 'Dalaran70', [AZSUNA_ID] = 'Azsuna', [VALSHARAH_ID] = "Val'sharah",
Nenue@0 61 [HIGHMOUNTAIN_ID] = 'Highmountain', [STORMHEIM_ID] = 'Stormheim', [SURAMAR_ID] = 'Suramar', [EOA_ID] = 'EyeOfAszhara', }
Nenue@0 62 -- default color templates
Nenue@0 63 local ARTIFACT_COLOR = ITEM_QUALITY_COLORS[LE_ITEM_QUALITY_ARTIFACT]
Nenue@0 64 local MONEY_COLOR = {hex ='|cFFFFFF00', r=1, g=1, b=0}
Nenue@0 65 local COMMON_COLOR = ITEM_QUALITY_COLORS[LE_ITEM_QUALITY_COMMON]
Nenue@0 66
Nenue@0 67 local ICON_UNKNOWN = "Interface\\ICONS\\inv_misc_questionmark"
Nenue@0 68 local ICON_MONEY = "Interface\\Buttons\\UI-GroupLoot-Coin-Up"
Nenue@0 69
Nenue@0 70 local POI_BORDER_MASK = "Interface\\Minimap\\UI-Minimap-Background"
Nenue@0 71 local POI_BORDER_FILL = "Interface\\BUTTONS\\YELLOWORANGE64"
Nenue@0 72 local POI_BORDER_BLUE = "Interface\\BUTTONS\\GRADBLUE"
Nenue@0 73 local POI_BORDER_RED = "Interface\\BUTTONS\\RedGrad64"
Nenue@0 74 local POI_BORDER_YELLOW = "Interface\\BUTTONS\\YELLOWORANGE64"
Nenue@0 75 local POI_BORDER_GREEN = "Interface\\BUTTONS\\GREENGRAD64"
Nenue@0 76
Nenue@0 77 local REWARD_CASH = 1001
Nenue@0 78 local REWARD_ARTIFACT_POWER = 1002
Nenue@0 79 local REWARD_GEAR = 1003
Nenue@0 80 local REWARD_CURRENCY = 1004
Nenue@0 81 local REWARD_ITEM = 1005
Nenue@0 82 local REWARD_REAGENT = 1006
Nenue@0 83
Nenue@0 84 local POI_DEFAULT_TYPE = {
Nenue@0 85 a = 1,
Nenue@0 86 r = 1, g = 1, b = 1,
Nenue@0 87 x = 0, y = 0,
Nenue@0 88 desaturated = true,
Nenue@0 89 mask = POI_BORDER_MASK,
Nenue@0 90 texture = POI_BORDER_FILL,
Nenue@0 91 continent = {
Nenue@0 92 PinSize = 18,
Nenue@0 93 Border = 3,
Nenue@0 94 TrackingBorder = 2,
Nenue@0 95 TagSize = 6,
Nenue@0 96 TimeleftStage = 3,
Nenue@0 97 },
Nenue@0 98 zone = {
Nenue@0 99 PinSize = 22,
Nenue@0 100 Border = 3,
Nenue@0 101 TrackingBorder = 2,
Nenue@0 102 TagSize = 12,
Nenue@0 103 TimeleftStage = 3,
Nenue@0 104 },
Nenue@0 105 minimized = {
Nenue@0 106 PinSize = 4,
Nenue@0 107 Border = 1,
Nenue@0 108 TrackingBorder = 2,
Nenue@0 109 NoIcon = true,
Nenue@0 110 TimeleftStage = 1,
Nenue@0 111 }
Nenue@0 112 }
Nenue@0 113 local POI_REWARD_TYPE = setmetatable({}, {
Nenue@0 114 __newindex = function(t, k, v)
Nenue@0 115 if type(v) == 'table' then
Nenue@0 116 setmetatable(v, {__index = POI_DEFAULT_TYPE})
Nenue@0 117 end
Nenue@0 118 rawset(t,k,v)
Nenue@0 119 end
Nenue@0 120 })
Nenue@0 121 local POI_FILTER_STYLE = setmetatable({
Nenue@0 122 continentBorder = 2,
Nenue@0 123 zoneBorder = 2,
Nenue@0 124 }, {__index = POI_DEFAULT_TYPE})
Nenue@0 125
Nenue@0 126 local LE_QUEST_TAG_TYPE_PVP = LE_QUEST_TAG_TYPE_PVP
Nenue@0 127 local LE_QUEST_TAG_TYPE_PET_BATTLE = LE_QUEST_TAG_TYPE_PET_BATTLE
Nenue@0 128 local LE_QUEST_TAG_TYPE_DUNGEON = LE_QUEST_TAG_TYPE_DUNGEON
Nenue@0 129 local LE_QUEST_TAG_TYPE_PROFESSION = LE_QUEST_TAG_TYPE_PROFESSION
Nenue@0 130 local LE_QUEST_TAG_TYPE_NORMAL = LE_QUEST_TAG_TYPE_NORMAL
Nenue@0 131
Nenue@0 132 -- Pin color/display variables
Nenue@0 133 POI_REWARD_TYPE[REWARD_ITEM] = {
Nenue@0 134 r = 1, g = 1, b = 1,
Nenue@0 135 }
Nenue@0 136 POI_REWARD_TYPE[REWARD_REAGENT] = {
Nenue@0 137 r = 0, g = 1, b = 1,
Nenue@0 138 }
Nenue@0 139 POI_REWARD_TYPE[REWARD_ARTIFACT_POWER] = {
Nenue@0 140 r = 1, g = .25, b = .5,
Nenue@0 141 showNumber = true,
Nenue@0 142 }
Nenue@0 143 POI_REWARD_TYPE[REWARD_GEAR] = {
Nenue@0 144 r = .1, g = .2, b = 1,
Nenue@0 145 }
Nenue@0 146 POI_REWARD_TYPE[REWARD_CURRENCY] = {
Nenue@0 147 r = 1, g = 1, b = 0,
Nenue@0 148 }
Nenue@0 149 POI_REWARD_TYPE[REWARD_CASH] = {
Nenue@0 150 r = 0, g = 0, b = 0,
Nenue@0 151 --x = 0, y = -1,
Nenue@0 152 --mask = ICON_MONEY,
Nenue@0 153 --continentBorder = 1,
Nenue@0 154 --zoneBorder = 1,
Nenue@0 155 }
Nenue@0 156
Nenue@0 157
Nenue@9 158
Nenue@9 159 local defaults = {
Nenue@9 160 defaultPinStyle = POI_DEFAULT_TYPE,
Nenue@9 161 rewardStyle = POI_REWARD_TYPE,
Nenue@9 162 filterStyle = POI_FILTER_STYLE,
Nenue@9 163 ShowAllProfessionQuests = true,
Nenue@9 164 DisplayContinentSummary = true,
Nenue@9 165 DisplayContinentPins = true,
Nenue@9 166 NotifyWhenNewQuests = true,
Nenue@9 167 EnablePins = true,
Nenue@9 168 FadeWhileGrouped = true,
Nenue@9 169 }
Nenue@9 170
Nenue@0 171 -- Summary header structure
Nenue@0 172 local POI_FILTER_OPTIONS = {
Nenue@0 173 { label = 'Filters', texture = "Interface\\WorldMap\\WorldMap-Icon" },
Nenue@0 174 { filterKey= 'rewardType', filterValue = REWARD_ARTIFACT_POWER, label = 'Artifact Power', texture = "Interface\\ICONS\\inv_7xp_inscription_talenttome01" },
Nenue@0 175 { filterKey= 'rewardType', filterValue = REWARD_CURRENCY,label = 'Currency', texture = "Interface\\ICONS\\inv_misc_elvencoins" },
Nenue@0 176 { filterKey= 'rewardType', filterValue = REWARD_ITEM, label = 'Item', texture = "Interface\\ICONS\\inv_crate_01" },
Nenue@0 177 { filterKey= 'rewardType', filterValue = REWARD_GEAR, label = 'Equipment', texture = "Interface\\ICONS\\garrison_bluearmorupgrade" },
Nenue@0 178 { filterKey= 'rewardType', filterValue = REWARD_REAGENT, label = 'Reagents', texture = 1417744 },
Nenue@0 179 { filterKey= 'rewardType', filterValue = REWARD_CASH, label = 'Reagents', texture = ICON_MONEY },
Nenue@0 180 { filterKey= 'worldQuestType', filterValue = LE_QUEST_TAG_TYPE_PVP, label = 'PvP', texture = "Interface\\Icons\\Ability_PVP_GladiatorMedallion", spacing = 10 },
Nenue@0 181 { filterKey= 'worldQuestType', filterValue = LE_QUEST_TAG_TYPE_PET_BATTLE, label = 'Pet Battle', texture = "Interface\\Icons\\PetJournalPortrait", },
Nenue@0 182 { filterKey= 'worldQuestType', filterValue = LE_QUEST_TAG_TYPE_DUNGEON, label = 'Dungeon', texture = "Interface\\LFGFRAME\\UI-LFR-PORTRAIT", },
Nenue@9 183 { filterKey= 'worldQuestType', filterValue = LE_QUEST_TAG_TYPE_PROFESSION, label = 'Profession', texture = "Interface\\ICONS\\70_professions_scroll_02", },
Nenue@0 184 }
Nenue@8 185 WorldPlanCore.BrokenIsleID = BROKEN_ISLES_ID
Nenue@8 186 WorldPlanCore.FilterStyle = POI_FILTER_STYLE
Nenue@8 187
Nenue@9 188 WorldPlanCore.FilterOptions = {}
Nenue@0 189
Nenue@9 190
Nenue@9 191 -- operating flags
Nenue@9 192 local superTrackedID
Nenue@9 193 local currentMapName
Nenue@9 194 local hasNewQuestPins
Nenue@9 195 local isContinentMap
Nenue@0 196 local numPins = 0
Nenue@0 197 local QuestsByZone = {}
Nenue@0 198 local QuestsByFaction = {}
Nenue@0 199 local QuestsByReward = {}
Nenue@0 200 local QuestsByTag = {}
Nenue@0 201 local QuestsByID = {}
Nenue@0 202 local QuestPositions = {}
Nenue@9 203 local FilterInclusions = {rewardType = {}, worldQuestType = {}, factionID = {}}
Nenue@1 204 local NotificationTypes = {}
Nenue@0 205 local ZoneInfo = {}
Nenue@0 206 local SummaryHeaders = {}
Nenue@0 207
Nenue@0 208 local FreePins = {}
Nenue@0 209 local NumPinFrames = 1
Nenue@0 210
Nenue@0 211 local hasPendingQuestData
Nenue@0 212 local notifyPlayed
Nenue@0 213 local scanner, wmtt, WorldMapPOIFrame
Nenue@0 214
Nenue@9 215 WorldPlanCore.QuestsByID = QuestsByID
Nenue@9 216 WorldPlanCore.QuestsByZone = QuestsByZone
Nenue@0 217
Nenue@0 218 local tasksQueue = {}
Nenue@0 219 local function OnNext (func)
Nenue@0 220 if #tasksQueue == 0 then
Nenue@0 221 _G.WorldPlan:SetScript('OnUpdate', function()
Nenue@0 222 local func = tremove(tasksQueue, 1)
Nenue@0 223 if func then
Nenue@0 224 func()
Nenue@0 225 end
Nenue@0 226 if #tasksQueue == 0 then
Nenue@0 227 _G.WorldPlan:SetScript('OnUpdate', nil)
Nenue@0 228 end
Nenue@0 229 end)
Nenue@0 230 end
Nenue@0 231 tinsert(tasksQueue, func)
Nenue@0 232 end
Nenue@0 233
Nenue@0 234 -- combines templates
Nenue@0 235 local function DoMixins(frame,...)
Nenue@0 236 for i = 1, select('#', ...) do
Nenue@0 237 for k,v in pairs(select(i,...)) do
Nenue@0 238 frame[k] = v
Nenue@0 239 end
Nenue@0 240 end
Nenue@0 241 return frame
Nenue@0 242 end
Nenue@0 243
Nenue@0 244 -- use tooltip object to extract item details
Nenue@0 245 local ParseItemReward = function(questID)
Nenue@0 246 local rewardType = REWARD_ITEM
Nenue@0 247 local name, icon, quantity, quality, _, itemID = GetQuestLogRewardInfo(1, questID)
Nenue@0 248 if not itemID then
Nenue@0 249 return REWARD_ITEM
Nenue@0 250 end
Nenue@0 251
Nenue@0 252 scanner:SetOwner(WorldPlan, "ANCHOR_NONE")
Nenue@0 253 scanner:SetItemByID(itemID)
Nenue@0 254 local ttl1 = _G['WorldPlanTooltipTextLeft1']
Nenue@0 255 local ttl2 = _G['WorldPlanTooltipTextLeft2']
Nenue@0 256 local ttl3 = _G['WorldPlanTooltipTextLeft3']
Nenue@0 257 local ttl4 = _G['WorldPlanTooltipTextLeft4']
Nenue@0 258 if ttl2 then
Nenue@0 259 local text = ttl2:GetText()
Nenue@0 260 -- Artifact Power
Nenue@0 261 if text and text:match("|cFFE6CC80") then
Nenue@0 262 --print('AP token!', text)
Nenue@0 263 local power
Nenue@0 264 if ttl4 then
Nenue@0 265 local text = ttl4:GetText()
Nenue@0 266 --print('tip line 4', text)
Nenue@0 267 if text then
Nenue@0 268 power = text:gsub("%p", ""):match("%d+")
Nenue@0 269 power = tonumber(power)
Nenue@0 270 end
Nenue@0 271
Nenue@0 272 end
Nenue@0 273 rewardType = REWARD_ARTIFACT_POWER
Nenue@0 274 icon = "Interface\\ICONS\\inv_7xp_inscription_talenttome01"
Nenue@0 275 quantity = power
Nenue@0 276 elseif text and text:match("Item Level") then
Nenue@0 277 --print('equipment!', text)
Nenue@0 278 rewardType = REWARD_GEAR
Nenue@0 279 quantity = text:match("Item Level ([%d\+]+)")
Nenue@0 280 end
Nenue@0 281 end
Nenue@0 282 if ttl3 then
Nenue@0 283 local text = ttl3:GetText()
Nenue@0 284 -- Crafting Reagent
Nenue@0 285 if text and text:match("Crafting Reagent") then
Nenue@0 286 --print('reagent', text)
Nenue@0 287 rewardType = REWARD_REAGENT
Nenue@0 288 end
Nenue@0 289 end
Nenue@0 290 iprint(' item:', name, rewardType, icon, quantity)
Nenue@0 291 return rewardType, icon, quantity, name, itemID
Nenue@0 292 end
Nenue@0 293
Nenue@0 294 -- update a masked texture without messing up its blending mask
Nenue@0 295 local SetMaskedTexture = function(region, file, mask)
Nenue@0 296 mask = mask or POI_BORDER_MASK
Nenue@0 297 region:SetMask(nil)
Nenue@0 298 region:SetTexture(file)
Nenue@0 299 region:SetMask(mask)
Nenue@0 300 end
Nenue@0 301
Nenue@0 302 -- tracking menu toggler
Nenue@0 303 local DropDown_OnClick = function(self)
Nenue@0 304 local key = self.value
Nenue@0 305 if key then
Nenue@0 306 if WorldPlanData[key] then
Nenue@0 307 WorldPlanData[key] = nil
Nenue@0 308 else
Nenue@0 309 WorldPlanData[key] = true
Nenue@0 310 end
Nenue@0 311 end
Nenue@9 312 WorldPlan:RefreshAll()
Nenue@0 313 end
Nenue@0 314
Nenue@0 315 function WorldPlan:print(...)
Nenue@0 316 local msg
Nenue@0 317 for i = 1, select('#', ...) do
Nenue@0 318 msg = (msg and (msg .. ' ') or '') .. tostring(select(i, ...))
Nenue@0 319 end
Nenue@0 320 DEFAULT_CHAT_FRAME:AddMessage("|cFF0088FFWorldPlan|r: " .. msg)
Nenue@0 321 end
Nenue@0 322
Nenue@0 323 function WorldPlan:OnLoad ()
Nenue@0 324 WorldPlan = self
Nenue@0 325 scanner = _G.WorldPlanTooltip
Nenue@0 326 wmtt = _G.WorldMapTooltip
Nenue@0 327 WorldMapPOIFrame = _G.WorldMapPOIFrame
Nenue@0 328
Nenue@0 329 WorldPlan:print('v'..WP_VERSION)
Nenue@0 330
Nenue@0 331 self:RegisterEvent("QUESTLINE_UPDATE")
Nenue@0 332 self:RegisterEvent("QUEST_LOG_UPDATE")
Nenue@0 333 self:RegisterEvent("WORLD_MAP_UPDATE")
Nenue@0 334 self:RegisterEvent("WORLD_QUEST_COMPLETED_BY_SPELL")
Nenue@0 335 self:RegisterEvent("SUPER_TRACKED_QUEST_CHANGED")
Nenue@0 336 self:RegisterEvent("SKILL_LINES_CHANGED")
Nenue@0 337 self:RegisterEvent("ARTIFACT_XP_UPDATE")
Nenue@0 338 self:RegisterEvent("ADDON_LOADED")
Nenue@0 339
Nenue@0 340 WorldPlan.modules = {
Nenue@0 341 WorldQuests, FilterBar, WorldPlanFlightMapMixin,
Nenue@0 342 }
Nenue@0 343 end
Nenue@0 344
Nenue@0 345 function WorldPlan:OnEvent (event, ...)
Nenue@0 346 print()
Nenue@0 347 print(event, ...)
Nenue@0 348 if event == 'ADDON_LOADED' then
Nenue@0 349 local addon = ...
Nenue@0 350 if addon == "Blizzard_FlightMap" then
Nenue@0 351 print('do mixin junk')
Nenue@0 352 self.OnFlightMapLoaded()
Nenue@0 353
Nenue@0 354 end
Nenue@0 355 if IsLoggedIn() and not self.initialized then
Nenue@0 356 self:Setup()
Nenue@0 357 end
Nenue@0 358 elseif event == 'WORLD_MAP_UPDATE' then
Nenue@9 359 self.currentMapID = GetCurrentMapAreaID()
Nenue@0 360 self:RefreshAll()
Nenue@0 361 end
Nenue@0 362 for i, module in ipairs(self.modules) do
Nenue@0 363 if module.OnEvent then
Nenue@0 364 print('forwarding to', tostring(module))
Nenue@0 365 module:OnEvent(event, ...)
Nenue@0 366 end
Nenue@0 367 end
Nenue@0 368 end
Nenue@0 369
Nenue@0 370
Nenue@0 371 function WorldPlan:Setup ()
Nenue@0 372 if not WorldPlanData then
Nenue@0 373 WorldPlanData = {key = 0 }
Nenue@0 374 end
Nenue@0 375 WorldPlanData.key = (WorldPlanData.key or 0) + 1
Nenue@0 376 self.db = WorldPlanData
Nenue@9 377 self.db.WorldQuests = self.db.WorldQuests or {}
Nenue@9 378 db = self.db
Nenue@9 379 for k,v in pairs(defaults) do
Nenue@9 380 db[k] = v
Nenue@9 381 end
Nenue@9 382
Nenue@9 383 self.currentMapID = GetCurrentMapAreaID()
Nenue@0 384
Nenue@0 385 for i, module in ipairs(self.modules) do
Nenue@9 386 module.db = self.db
Nenue@0 387 if module.Setup then module:Setup() end
Nenue@0 388 if not module.RegisterEvent then
Nenue@0 389 module.RegisterEvent = self.RegisterEvent
Nenue@0 390 end
Nenue@0 391 end
Nenue@0 392 self.initialized = true
Nenue@0 393
Nenue@9 394 hooksecurefunc("UIDropDownMenu_Initialize", self.OnDropDownInitialize)
Nenue@0 395 end
Nenue@0 396
Nenue@0 397 function WorldPlan:RefreshAll (forced)
Nenue@9 398 if not self.initialized then
Nenue@9 399 return
Nenue@9 400 end
Nenue@9 401
Nenue@9 402 POI_DEFAULT_TYPE = db.defaultPinStyle
Nenue@9 403 POI_REWARD_TYPE = db.rewardStyle
Nenue@9 404 POI_FILTER_STYLE = db.filterStyle
Nenue@9 405
Nenue@9 406
Nenue@9 407 for i, module in ipairs(self.modules) do
Nenue@9 408 if module.Reset then
Nenue@9 409 print(module, 'Reset()')
Nenue@9 410 module:Reset()
Nenue@9 411 end
Nenue@9 412 end
Nenue@9 413
Nenue@0 414 for i, module in ipairs(self.modules) do
Nenue@0 415 if module.Refresh then
Nenue@9 416 print(module, 'Refresh()')
Nenue@0 417 module:Refresh()
Nenue@0 418 end
Nenue@0 419 end
Nenue@9 420
Nenue@9 421 for i, module in ipairs(self.modules) do
Nenue@9 422 if module.Cleanup then
Nenue@9 423 print(module, 'Cleanup()')
Nenue@9 424 module:Cleanup()
Nenue@9 425 end
Nenue@9 426 end
Nenue@0 427 end
Nenue@0 428 function WorldPlan:UpdateAnchors ()
Nenue@0 429 for i, module in ipairs(self.modules) do
Nenue@0 430 if module.UpdateAnchors then
Nenue@0 431 module:UpdateAnchors()
Nenue@0 432 end
Nenue@0 433 end
Nenue@0 434 end
Nenue@0 435
Nenue@0 436 -- insert visual options into the tracking button menu
Nenue@0 437 WorldPlan.OnDropDownInitialize = function (self, callback, dropType)
Nenue@0 438 if self ~= WorldMapFrameDropDown then
Nenue@0 439 return
Nenue@0 440 end
Nenue@9 441 local db = WorldPlan.db
Nenue@0 442
Nenue@0 443 local info = UIDropDownMenu_CreateInfo()
Nenue@0 444 info.text = ""
Nenue@0 445 info.isTitle = true
Nenue@0 446 UIDropDownMenu_AddButton(info)
Nenue@0 447 info.text = "|cFF00AAFFWorldPlan|r"
Nenue@0 448 info.isTitle = true
Nenue@0 449 UIDropDownMenu_AddButton(info)
Nenue@0 450 info.isTitle = nil
Nenue@0 451 info.disabled = nil
Nenue@0 452 info.keepShownOnClick = true
Nenue@0 453 info.tooltipOnButton = 1
Nenue@0 454
Nenue@9 455 info.text = "Enable"
Nenue@9 456 info.isNotRadio = true
Nenue@9 457 info.value = "EnablePins"
Nenue@9 458 info.checked = db.EnablePins
Nenue@9 459 info.tooltipTitle = "Enable World Quest Overlays"
Nenue@9 460 info.tooltipText = "Toggle the detail layers here."
Nenue@9 461 info.func = DropDown_OnClick
Nenue@9 462 UIDropDownMenu_AddButton(info)
Nenue@9 463
Nenue@9 464 info.text = "Display All Profession Quests"
Nenue@0 465 info.isNotRadio = true
Nenue@0 466 info.value = "ShowAllProfessionQuests"
Nenue@9 467 info.checked = db.ShowAllProfessionQuests
Nenue@0 468 info.tooltipTitle = "Hidden Quests"
Nenue@0 469 info.tooltipText = "Display work order and profession-related quests that are skipped by the default UI."
Nenue@0 470 info.func = DropDown_OnClick
Nenue@0 471 UIDropDownMenu_AddButton(info)
Nenue@0 472
Nenue@0 473 info.text = "Show Continent Pins"
Nenue@0 474 info.isNotRadio = true
Nenue@0 475 info.value = "DisplayContinentPins"
Nenue@9 476 info.checked = db.DisplayContinentPins
Nenue@0 477 info.tooltipTitle = "Continent Pins"
Nenue@0 478 info.tooltipText = "Display quest pins on the continent map (may get cramped)."
Nenue@0 479 info.func = DropDown_OnClick
Nenue@0 480 UIDropDownMenu_AddButton(info)
Nenue@0 481
Nenue@0 482 info.text = "Show Summary"
Nenue@0 483 info.isNotRadio = true
Nenue@0 484 info.value = "DisplayContinentSummary"
Nenue@0 485 info.tooltipTitle = "Summary Bar"
Nenue@0 486 info.tooltipText = "Display a summary of active world quests. Note: requires directly viewing Broken Isle and Dalaran maps to gain complete info."
Nenue@9 487 info.checked = db.DisplayContinentSummary
Nenue@9 488 info.func = DropDown_OnClick
Nenue@9 489 UIDropDownMenu_AddButton(info)
Nenue@9 490
Nenue@9 491 info.text = "Fade In Groups"
Nenue@9 492 info.isNotRadio = true
Nenue@9 493 info.value = "FadeWhileGrouped"
Nenue@9 494 info.tooltipTitle = "Group Fade"
Nenue@9 495 info.tooltipText = "Reduce pin alpha when grouped, so player dots are easier to see."
Nenue@9 496 info.checked = db.DisplayContinentSummary
Nenue@0 497 info.func = DropDown_OnClick
Nenue@0 498 UIDropDownMenu_AddButton(info)
Nenue@0 499 end
Nenue@0 500
Nenue@0 501 function WorldQuests:Setup()
Nenue@0 502 -- refresh positions any time blizzard does so (i.e. mousewheel zoom)
Nenue@0 503 hooksecurefunc("WorldMapScrollFrame_ReanchorQuestPOIs", function()
Nenue@9 504 self:Refresh(true)
Nenue@0 505 end)
Nenue@0 506
Nenue@0 507 -- hide the original world quest POIs
Nenue@0 508 hooksecurefunc("WorldMap_UpdateQuestBonusObjectives", function()
Nenue@0 509 for i = 1, NUM_WORLDMAP_TASK_POIS do
Nenue@0 510 local button = _G['WorldMapFrameTaskPOI'..i]
Nenue@0 511 if button and button.worldQuest then
Nenue@0 512 button:Hide()
Nenue@0 513 end
Nenue@0 514 end
Nenue@0 515 end)
Nenue@0 516
Nenue@0 517 end
Nenue@0 518
Nenue@0 519 function WorldQuests:OnEvent (event, ...)
Nenue@0 520 print('|cFFFFFF00'..tostring(self)..':OnEvent()'..event..'|r', ...)
Nenue@0 521 if event == 'QUEST_LOG_UPDATE' then
Nenue@0 522 local questID, added = ...
Nenue@0 523 if questID and added then
Nenue@0 524 self:GetPinByQuestID(questID)
Nenue@0 525 else
Nenue@0 526 self:GetPinsForMap()
Nenue@0 527 end
Nenue@0 528 elseif event == 'WORLD_QUEST_COMPLETED_BY_SPELL' then
Nenue@0 529 local questID = ...
Nenue@0 530 if questID and QuestsByID[questID] then
Nenue@0 531 self:ReleasePin(QuestsByID[questID])
Nenue@0 532 end
Nenue@0 533 elseif event == 'SKILL_LINES_CHANGED' then
Nenue@9 534 self:Refresh(true)
Nenue@0 535 end
Nenue@0 536 end
Nenue@0 537
Nenue@0 538 function WorldQuests:AcquirePin (questID, pinTable)
Nenue@0 539 local pin = QuestsByID[questID]
Nenue@0 540 local isNew = false
Nenue@0 541 if not pin then
Nenue@0 542 isNew = true
Nenue@0 543 local numFree = #self.freePins
Nenue@0 544 if numFree >= 1 then
Nenue@0 545 pin = tremove(self.freePins, numFree)
Nenue@0 546 --print('|cFF00FF00Re-using', pin:GetName())
Nenue@0 547 else
Nenue@0 548 local name = 'WorldPlanQuestMarker' .. NumPinFrames
Nenue@0 549 --print('|cFF00FF00Creating', name)
Nenue@0 550 pin = CreateFrame('Frame', name, WorldMapPOIFrame, 'WorldPlanQuestPin')
Nenue@0 551 pin:SetFrameStrata('HIGH')
Nenue@0 552
Nenue@0 553 NumPinFrames = NumPinFrames + 1
Nenue@0 554
Nenue@0 555 --pin.iconBorder:SetVertexColor(0,0,0,1)
Nenue@0 556
Nenue@0 557 end
Nenue@0 558 QuestsByID[questID] = pin
Nenue@0 559 pin.isNew = true
Nenue@0 560 pin.currentWidth = nil
Nenue@0 561
Nenue@0 562 -- used by TaskPOI_x scripts
Nenue@0 563 pin.questID = questID
Nenue@0 564 pin.worldQuest = true
Nenue@7 565
Nenue@7 566 pin.Reset = function(self)
Nenue@7 567 WorldQuests:GetPinByQuestID(questID)
Nenue@7 568 end
Nenue@0 569 else
Nenue@0 570 --print('|cFF00FF00Using', pin:GetName())
Nenue@0 571 end
Nenue@0 572
Nenue@0 573 -- set display flags accordingly
Nenue@0 574 if pinTable then
Nenue@0 575 for k,v in pairs(pinTable) do
Nenue@0 576 pin[k] = v
Nenue@0 577 end
Nenue@0 578 end
Nenue@0 579 pin.throttle = nil
Nenue@0 580 pin.timeThreschold = nil
Nenue@0 581 return pin, isNew
Nenue@0 582 end
Nenue@0 583
Nenue@0 584 -- remove from index and add it to the recycling heap
Nenue@0 585 function WorldQuests:ReleasePin (pin)
Nenue@0 586
Nenue@0 587 local id = pin.questId
Nenue@0 588 if id then
Nenue@0 589 QuestsByID[id] = nil
Nenue@0 590 for i, zone in pairs(QuestsByZone) do
Nenue@0 591 print('-', i, zone[i])
Nenue@0 592 zone[id] = nil
Nenue@0 593 end
Nenue@0 594 end
Nenue@0 595 if pin.factionID then
Nenue@0 596 QuestsByFaction[pin.factionID][id] = nil
Nenue@0 597 end
Nenue@0 598 pin:Hide()
Nenue@0 599 pin:ClearAllPoints()
Nenue@0 600 tinsert(self.freePins, pin)
Nenue@0 601 print('|cFFFF4400Clearing out', pin:GetName(),id)
Nenue@0 602 end
Nenue@0 603
Nenue@0 604 -- create of update quest pins for a map and its underlying zones
Nenue@0 605 function WorldQuests:GetPinsForMap (mapID)
Nenue@9 606 local print = wqprint
Nenue@0 607 mapID = mapID or GetCurrentMapAreaID()
Nenue@0 608 superTrackedID = GetSuperTrackedQuestID()
Nenue@0 609 if not mapID then
Nenue@0 610 -- info not available yet
Nenue@0 611 return
Nenue@0 612 end
Nenue@0 613 if mapID == BROKEN_ISLES_ID then
Nenue@0 614 hasPendingQuestData = nil
Nenue@0 615 print('|cFF00FFFFRefreshQuestsForMap|r', mapID, GetMapNameByID(mapID), superTrackedID)
Nenue@0 616 self.fullSearch = true
Nenue@0 617 for i = 1, MC_GetNumZones(mapID) do
Nenue@0 618 local submapID, name, depth = MC_GetZoneInfo(mapID, i)
Nenue@0 619 self:GetPinsForMap(submapID)
Nenue@0 620 end
Nenue@0 621 self.fullSearch = nil
Nenue@0 622 elseif QuestsByZone[mapID] then
Nenue@0 623 local taskInfo = TQ_GetQuestsForPlayerByMapID(mapID)
Nenue@0 624 local quest = QuestsByZone[mapID]
Nenue@0 625 local numQuests = 0
Nenue@0 626 if taskInfo and #taskInfo >= 1 then
Nenue@0 627 print('|cFF00FFFFRefreshQuestsForMap|r', mapID, GetMapNameByID(mapID), #taskInfo)
Nenue@0 628 wipe(QuestsByZone[mapID])
Nenue@0 629 ZoneInfo[mapID] = taskInfo
Nenue@0 630 for taskID, info in pairs(taskInfo) do
Nenue@0 631 local questID = info.questId
Nenue@0 632
Nenue@0 633 info.mapID = mapID
Nenue@0 634 QuestsByZone[mapID][questID] = self:GetPinByQuestID(questID, info)
Nenue@0 635 numQuests = numQuests + 1
Nenue@0 636 end
Nenue@0 637 end
Nenue@0 638 end
Nenue@0 639 if hasNewQuestPins and not self.fullSearch then
Nenue@0 640 print('|cFF00FF00NEW PINS DO ANCHOR THINGS')
Nenue@9 641 self:Refresh (true)
Nenue@0 642 hasNewQuestPins = nil
Nenue@0 643 end
Nenue@0 644 end
Nenue@0 645
Nenue@0 646 -- create or update the pin using the given questID and C_TaskQuest results
Nenue@0 647 function WorldQuests:GetPinByQuestID (questID, taskInfo)
Nenue@0 648 if (QuestMapFrame_IsQuestWorldQuest (questID)) then
Nenue@0 649 local questTitle, rewardIcon, rewardName, rewardCount, rewardStyle, rewardType, itemID, quantity, quality, _
Nenue@0 650 local pin = self:AcquirePin(questID, taskInfo)
Nenue@0 651
Nenue@0 652 if pin.isNew then
Nenue@0 653 if not hasNewQuestPins then
Nenue@0 654 print('triggering new quest pins event')
Nenue@0 655 end
Nenue@0 656
Nenue@0 657 hasNewQuestPins = true
Nenue@0 658 end
Nenue@0 659
Nenue@0 660 if not HaveQuestData(questID) then
Nenue@0 661 print('|cFFFF4400Retrieval failed.')
Nenue@0 662 TQ_RequestPreloadRewardData(questID)
Nenue@0 663 hasPendingQuestData = true
Nenue@0 664 else
Nenue@9 665 wqprint('|cFF00FF88Quest Data Received|r')
Nenue@0 666 pin.mapID = pin.mapID or C_TaskQuest.GetQuestZoneID(questID)
Nenue@0 667
Nenue@0 668 -- set reward category
Nenue@0 669 local numRewards = GetNumQuestLogRewards(questID)
Nenue@0 670 local numCurrency = GetNumQuestLogRewardCurrencies(questID)
Nenue@0 671 local money = GetQuestLogRewardMoney(questID)
Nenue@0 672 if numRewards >= 1 then
Nenue@0 673 rewardType, rewardIcon, rewardCount, rewardName, itemID = ParseItemReward(questID)
Nenue@0 674 elseif numCurrency >= 1 then
Nenue@0 675 rewardName, rewardIcon, rewardCount = GetQuestLogRewardCurrencyInfo(1, questID)
Nenue@0 676 rewardType = REWARD_CURRENCY
Nenue@0 677 elseif money >= 1 then
Nenue@0 678 rewardIcon = ICON_MONEY
Nenue@0 679 rewardName = GetMoneyString(money)
Nenue@0 680 rewardType = REWARD_CASH
Nenue@0 681 end
Nenue@0 682 rewardStyle = POI_REWARD_TYPE[rewardType] or POI_DEFAULT_TYPE
Nenue@0 683
Nenue@0 684 pin.itemNumber = rewardCount or pin.itemNumber
Nenue@0 685 pin.rewardType = rewardType or REWARD_ITEM
Nenue@0 686 pin.style = rewardStyle
Nenue@0 687 QuestsByID[questID] = pin
Nenue@0 688
Nenue@0 689 -- title, faction, capped state
Nenue@0 690 local questTitle, factionID, capped = TQ_GetQuestInfoByQuestID(questID)
Nenue@0 691 if factionID then
Nenue@0 692 QuestsByFaction[factionID] = QuestsByFaction[factionID] or {}
Nenue@0 693 QuestsByFaction[factionID][questID] = pin
Nenue@0 694 end
Nenue@0 695 pin.title = questTitle or "|cFFFF0000Retrieving..."
Nenue@0 696 pin.factionID = factionID
Nenue@0 697 pin.capped = capped
Nenue@0 698
Nenue@0 699 -- set tag details
Nenue@0 700 local tagID, tagName, worldQuestType, rarity, isElite, tradeskillLineIndex = GetQuestTagInfo(questID);
Nenue@0 701 local tagAtlas
Nenue@0 702 if worldQuestType == LE_QUEST_TAG_TYPE_PET_BATTLE then
Nenue@0 703 tagAtlas = "worldquest-icon-petbattle"
Nenue@0 704 elseif worldQuestType == LE_QUEST_TAG_TYPE_PVP then
Nenue@0 705 tagAtlas = "worldquest-icon-pvp-ffa"
Nenue@0 706 elseif worldQuestType == LE_QUEST_TAG_TYPE_PROFESSION then
Nenue@0 707 local id = tradeskillLineIndex and select(7, GetProfessionInfo(tradeskillLineIndex))
Nenue@0 708 if id then
Nenue@0 709 tagAtlas = WORLD_QUEST_ICONS_BY_PROFESSION[id]
Nenue@0 710 end
Nenue@0 711 elseif worldQuestType == LE_QUEST_TAG_TYPE_DUNGEON then
Nenue@0 712 tagAtlas = "worldquest-icon-dungeon"
Nenue@0 713 end
Nenue@13 714
Nenue@0 715 pin.tagID = tagID
Nenue@0 716 pin.tagName = tagName
Nenue@0 717 pin.worldQuestType = worldQuestType
Nenue@0 718 pin.isElite = isElite
Nenue@0 719 pin.tradeskillLineIndex = tradeskillLineIndex
Nenue@0 720 pin.rarity = rarity
Nenue@0 721 pin.tagAtlas = tagAtlas
Nenue@0 722 end
Nenue@0 723
Nenue@0 724 -- flag unresolved info
Nenue@0 725 if not (rewardIcon and rewardName) then
Nenue@0 726 if not pin.isPending then
Nenue@0 727 pin.isPending = true
Nenue@0 728 TQ_RequestPreloadRewardData (questID)
Nenue@0 729 pin.rewardType = pin.rewardType or REWARD_ITEM
Nenue@0 730 pin.style = pin.style or POI_REWARD_TYPE[REWARD_ITEM]
Nenue@0 731
Nenue@0 732 if not hasPendingQuestData then
Nenue@0 733 hasPendingQuestData = true
Nenue@0 734 PlaySoundKitID(229)
Nenue@0 735 end
Nenue@0 736 --WorldPlan:print('|cFFFFFF00'..tostring(pin.title)..'|r waiting on texture info')
Nenue@0 737 end
Nenue@0 738 else
Nenue@0 739 if (rewardIcon and rewardName) then
Nenue@0 740 --WorldPlan:print('|cFF00FF00'..tostring(pin.title)..'|r has info', rewardIcon, rewardName)
Nenue@0 741 pin.hasUpdate = true
Nenue@0 742 end
Nenue@0 743 pin.isPending = nil
Nenue@0 744 end
Nenue@0 745 pin.itemTexture = rewardIcon or pin.itemTexture
Nenue@0 746 pin.itemName = rewardName or pin.itemName
Nenue@0 747
Nenue@0 748 qprint(' |cFF00FFFF'..questID..'|r:->', (HaveQuestData(questID) and "|cFF00FF00HaveQuestData" or "-"), (C_TaskQuest.IsActive(questID) and "|cFF88FF00IsActive|r" or ""))
Nenue@0 749 qprint(' ', pin.title, pin.itemTexture, 'rewardType:', pin.rewardType, 'tag:', pin.tagID, 'style', pin.style )
Nenue@0 750 end
Nenue@0 751 return QuestsByID[questID]
Nenue@0 752 end
Nenue@0 753
Nenue@0 754 function WorldQuests:Refresh(forced)
Nenue@9 755 local print = wqprint
Nenue@9 756 print('|cFF00FF88'..tostring(self)..':Refresh()|r')
Nenue@0 757 if not WorldMapPOIFrame:IsVisible() then
Nenue@0 758 return
Nenue@0 759 end
Nenue@9 760 if forced then
Nenue@9 761 self:Reset()
Nenue@9 762 end
Nenue@0 763 self:UpdateAnchors()
Nenue@9 764
Nenue@9 765 if forced then
Nenue@9 766 self:Cleanup ()
Nenue@9 767 end
Nenue@0 768 end
Nenue@0 769
Nenue@0 770 -- prepares elements for a map update
Nenue@0 771 function WorldQuests:Reset ()
Nenue@9 772 local print = wqprint
Nenue@9 773 print('|cFF00FF88'..tostring(self)..':Reset()|r')
Nenue@0 774 wipe(QuestPositions)
Nenue@0 775 wipe(QuestsByReward)
Nenue@0 776 wipe(QuestsByTag)
Nenue@0 777 for questID, pin in pairs(QuestsByID) do
Nenue@0 778 pin.used = nil
Nenue@0 779 end
Nenue@0 780 end
Nenue@0 781
Nenue@0 782 -- update visibility states of all pins
Nenue@0 783 function WorldQuests:UpdateAnchors (submapID)
Nenue@9 784 local print = wqprint
Nenue@9 785 local db = WorldPlan.db
Nenue@0 786 local mapFileName, textureHeight, textureWidth, isMicroDungeon, microDungeonMapName = GetMapInfo()
Nenue@0 787 if isMicroDungeon then
Nenue@0 788 return
Nenue@0 789 end
Nenue@0 790
Nenue@0 791 local currentMap = GetCurrentMapAreaID()
Nenue@0 792 local submapID = submapID or currentMap
Nenue@0 793
Nenue@9 794 if submapID == BROKEN_ISLES_ID and (not db.DisplayContinentPins) then
Nenue@0 795 print('not updating map for reasons')
Nenue@0 796 return
Nenue@0 797 end
Nenue@0 798 print('|cFF88FF00'..tostring(self)..':UpdateAnchors|r', submapID, GetMapNameByID(submapID), 'pin count:', numPins)
Nenue@0 799 local numZones = MC_GetNumZones(submapID)
Nenue@0 800 if numZones then
Nenue@0 801 for i = 1, numZones do
Nenue@0 802 local subMapID = MC_GetZoneInfo(submapID, i)
Nenue@0 803 self:UpdateAnchors(subMapID)
Nenue@0 804 end
Nenue@0 805 end
Nenue@0 806 local pins = QuestsByZone[submapID]
Nenue@0 807
Nenue@0 808 if pins then
Nenue@0 809 local hostFrame = WorldMapPOIFrame
Nenue@0 810 local mapWidth, mapHeight = hostFrame:GetSize()
Nenue@0 811 for questID, pin in pairs(pins) do
Nenue@9 812 pin:IsShowable()
Nenue@9 813 if pin.used then
Nenue@9 814 pin:SetFrameLevel(PinBaseIndex+ (pin.whiteListed and 200 or 0) +numPins)
Nenue@9 815 print('level', PinBaseIndex+ (pin.whiteListed and 200 or 0) +numPins)
Nenue@0 816 pin:SetAnchor(WorldMapPOIFrame, currentMap, mapWidth, mapHeight)
Nenue@0 817 numPins = numPins + 1
Nenue@0 818 end
Nenue@0 819 end
Nenue@0 820 end
Nenue@0 821 end
Nenue@0 822
Nenue@0 823 -- shows, animates, or hides pins based on their current visibility flags
Nenue@0 824 local debug_show = {}
Nenue@0 825 local debug_animate = {}
Nenue@0 826 local debug_hide = {}
Nenue@0 827 function WorldQuests:Cleanup ()
Nenue@9 828 local print = wqprint
Nenue@9 829 local showQuestPOI = db.EnablePins
Nenue@0 830 print('|cFFFFFF00'..tostring(self)..':Cleanup()|r')
Nenue@9 831 local mapID = GetCurrentMapAreaID()
Nenue@9 832 isContinentMap = (mapID == BROKEN_ISLES_ID)
Nenue@9 833
Nenue@0 834 wipe(debug_show)
Nenue@0 835 wipe(debug_animate)
Nenue@0 836 wipe(debug_hide)
Nenue@0 837 -- continent or zone sizing
Nenue@9 838 local fadeGrouped = (db.FadeWhileGrouped and IsInGroup())
Nenue@0 839
Nenue@0 840 numPins = 0
Nenue@0 841 for questID, pin in pairs(QuestsByID) do
Nenue@0 842 -- can we show it?
Nenue@0 843 if showQuestPOI and (pin.used) then
Nenue@9 844 pin:Refresh()
Nenue@0 845
Nenue@9 846 if fadeGrouped then
Nenue@9 847 pin:SetAlpha(0.25)
Nenue@9 848 else
Nenue@9 849 pin:SetAlpha(1)
Nenue@9 850 end
Nenue@0 851 -- is it a new quest?
Nenue@0 852 if pin.isNew then
Nenue@0 853 if not pin.isAnimating then
Nenue@0 854 pin.isAnimating = true
Nenue@0 855 OnNext(function()
Nenue@0 856 pin.isNew = nil
Nenue@0 857 pin:Show()
Nenue@0 858 pin.FadeIn:Play()
Nenue@0 859 end)
Nenue@0 860 if not notifyPlayed then
Nenue@1 861 for k,v in pairs(NotificationTypes) do
Nenue@1 862 if v[pin[k]] then
Nenue@1 863 notifyPlayed = true
Nenue@1 864 PlaySoundKitID(23404)
Nenue@1 865 end
Nenue@1 866 end
Nenue@0 867 end
Nenue@0 868 tinsert(debug_animate,questID)
Nenue@9 869 else
Nenue@9 870
Nenue@9 871 print('animating? ', questID, 'filtered:', pin.filtered)
Nenue@0 872 end
Nenue@1 873 -- trap new but animating pins here
Nenue@0 874 else
Nenue@0 875 -- hard show existing pin
Nenue@9 876 print('refresh #', questID, 'filtered:', pin.filtered)
Nenue@0 877 pin:Show()
Nenue@0 878 tinsert(debug_show,questID)
Nenue@0 879 end
Nenue@0 880 else
Nenue@9 881 if pin:IsShown() then
Nenue@9 882 tinsert(debug_hide,questID)
Nenue@9 883 end
Nenue@9 884 pin.isAnimating = nil
Nenue@9 885 pin.FadeIn:Stop()
Nenue@0 886 pin:Hide()
Nenue@0 887 end
Nenue@0 888 end
Nenue@0 889 print(' adding:', table.concat(debug_animate, ',' ))
Nenue@9 890 print(' refresh:', table.concat(debug_show, ',' ))
Nenue@9 891 print(' hiding:', table.concat(debug_hide, ',' ))
Nenue@0 892 hasNewQuestPins = nil
Nenue@1 893 notifyPlayed = nil
Nenue@0 894 end
Nenue@0 895
Nenue@0 896 -- data provider manipulations for the taxi map
Nenue@0 897 WorldPlan.OnFlightMapLoaded = function()
Nenue@0 898 if true then return end
Nenue@0 899 -- todo: figure out how to layer inside the map canvas
Nenue@0 900 local res = {}
Nenue@0 901 local t = {}
Nenue@0 902 for k,v in pairs(FlightMapFrame) do
Nenue@0 903 tinsert(res, tostring(k))
Nenue@0 904 end
Nenue@0 905
Nenue@0 906 table.sort(res)
Nenue@0 907 for i, k in ipairs(res) do
Nenue@0 908 print(k)
Nenue@0 909 end
Nenue@0 910 hooksecurefunc(FlightMapFrame, 'RefreshAll', function(self)
Nenue@0 911 print('|cFF0088FFWQDP RefreshAllData ', GetTime())
Nenue@0 912
Nenue@0 913 WorldPlan:GetPinsForMap(self:GetMapID())
Nenue@0 914
Nenue@0 915 for pin in self:EnumerateAllPins() do
Nenue@0 916 if pin.worldQuest then
Nenue@0 917 --print('got pin #', pin.questID)
Nenue@0 918 local wp = QuestsByID[pin.questID]
Nenue@0 919 if wp then
Nenue@0 920 wp:ClearAllPoints()
Nenue@0 921 wp:SetParent(FlightMapFrame.ScrollContainer)
Nenue@0 922 wp:SetFrameStrata('MEDIUM')
Nenue@0 923 wp:SetPoint('CENTER', pin, 'CENTER')
Nenue@0 924 wp:Show()
Nenue@0 925 end
Nenue@0 926 end
Nenue@0 927 end
Nenue@0 928 end)
Nenue@0 929 end
Nenue@0 930
Nenue@0 931
Nenue@0 932
Nenue@0 933 local throttle = 0
Nenue@0 934 local tooltip = CreateFrame ("GameTooltip", "VeneerWorldQuestsScanner", nil, "GameTooltipTemplate")
Nenue@0 935 local tooltipLine1 = _G['VeneerWorldQuestsScannerTextLeft1']
Nenue@0 936 local tooltipLine3 = _G['VeneerWorldQuestsScannerTextLeft3']
Nenue@0 937 local GetTime, mod = GetTime, mod
Nenue@0 938
Nenue@0 939
Nenue@0 940
Nenue@0 941
Nenue@9 942 function WorldQuests:FilterCheckByID(questID)
Nenue@9 943 local pin = WorldQuests:GetPinByQuestID(questID)
Nenue@9 944 return pin:IsShowable()
Nenue@0 945 end
Nenue@0 946
Nenue@0 947
Nenue@9 948 function QuestPOI:IsShowable ()
Nenue@9 949 local print = wqprint
Nenue@9 950 local db = WorldPlan.db
Nenue@0 951 local qType = self.worldQuestType
Nenue@0 952 local rType = self.rewardType
Nenue@0 953 self.filtered = nil
Nenue@9 954 self.whiteListed = nil
Nenue@9 955 self.used = true
Nenue@9 956
Nenue@0 957 local whiteListed, blackListed
Nenue@0 958 for filterKey, includes in pairs(FilterInclusions) do
Nenue@0 959 local controlValue = self[filterKey]
Nenue@13 960 if controlValue then
Nenue@13 961 if includes[controlValue] == nil then
Nenue@13 962 includes[controlValue] = true
Nenue@13 963 elseif includes[controlValue] == false then
Nenue@13 964 self.filtered = true
Nenue@13 965 break
Nenue@13 966 end
Nenue@0 967 end
Nenue@0 968 end
Nenue@0 969
Nenue@0 970 if not TQ_IsActive(self.questID) then
Nenue@9 971 self.used = nil
Nenue@0 972 end
Nenue@0 973 if qType == LE_QUEST_TAG_TYPE_PROFESSION then
Nenue@9 974 if not (db.ShowAllProfessionQuests or (self.tradeskillLineIndex and GetProfessionInfo(self.tradeskillLineIndex))) then
Nenue@9 975 self.used = nil
Nenue@0 976 end
Nenue@0 977 end
Nenue@9 978 print(' |cFFFF4400IsShowable()|r', self.used, self.filtered, self.title)
Nenue@9 979 return self.used, self.filtered
Nenue@0 980 end
Nenue@0 981
Nenue@0 982 function QuestPOI:UpdateTimer (timeLeft, timeType)
Nenue@0 983 print('|cFF0088FFUpdatePinTimer()|r')
Nenue@0 984 end
Nenue@0 985
Nenue@9 986 --- Fixes icons upon size update
Nenue@9 987 function QuestPOI:UpdateSize (style, subStyle)
Nenue@0 988 self.style = self.style or POI_DEFAULT_TYPE
Nenue@0 989 self.subStyle = self.subStyle or 'continent'
Nenue@0 990
Nenue@0 991 style = style or self.style
Nenue@0 992 subStyle = style[subStyle or self.subStyle]
Nenue@0 993
Nenue@0 994
Nenue@0 995 self.currentWidth = subStyle.PinSize
Nenue@0 996 self.borderSize = subStyle.Border
Nenue@0 997 self.trackingBorderSize = subStyle.TrackingBorder
Nenue@0 998 self.tagSize = subStyle.TagSize
Nenue@0 999 self.TimeleftStage = subStyle.TimeleftStage
Nenue@0 1000 self.NoIcon = subStyle.NoIcon
Nenue@0 1001
Nenue@0 1002 self:SetSize(self.currentWidth, self.currentWidth)
Nenue@0 1003
Nenue@0 1004 local iconBorder = self.iconBorder
Nenue@0 1005 local trackingBorder = self.supertrackBorder
Nenue@0 1006 local tag = self.tagIcon
Nenue@0 1007 local style = self.style or POI_DEFAULT_TYPE
Nenue@0 1008 local mask = style.mask or POI_BORDER_FILL
Nenue@0 1009
Nenue@0 1010 self.icon:SetMask(nil)
Nenue@0 1011 self.iconBorder:SetMask(nil)
Nenue@0 1012 self.supertrackBorder:SetMask(nil)
Nenue@0 1013
Nenue@0 1014
Nenue@0 1015 local borderWidth = self.borderSize
Nenue@0 1016 local trackingWidth = self.trackingBorderSize
Nenue@0 1017
Nenue@0 1018 iconBorder:ClearAllPoints()
Nenue@0 1019 iconBorder:SetPoint('BOTTOMLEFT', self, 'BOTTOMLEFT', -borderWidth + (style.x or 0), -borderWidth + (style.y or 0))
Nenue@0 1020 iconBorder:SetPoint('TOPRIGHT', self, 'TOPRIGHT', borderWidth + (style.x or 0), borderWidth + (style.y or 0))
Nenue@0 1021
Nenue@0 1022 trackingBorder:ClearAllPoints()
Nenue@0 1023 trackingBorder:SetPoint('BOTTOMLEFT', iconBorder, 'BOTTOMLEFT', -trackingWidth, -trackingWidth)
Nenue@0 1024 trackingBorder:SetPoint('TOPRIGHT', iconBorder, 'TOPRIGHT', trackingWidth, trackingWidth)
Nenue@0 1025
Nenue@0 1026 if self.tagSize then
Nenue@0 1027 tag:Show()
Nenue@0 1028 tag:ClearAllPoints()
Nenue@0 1029 tag:SetPoint('BOTTOMRIGHT', self, 'BOTTOMRIGHT', borderWidth, -borderWidth)
Nenue@0 1030 else
Nenue@0 1031 tag:Hide()
Nenue@0 1032 end
Nenue@0 1033
Nenue@9 1034 --qprint('using mask:', mask, self.name )
Nenue@0 1035 self.icon:SetMask(mask)
Nenue@9 1036 self.icon:SetTexture(self.icon:GetTexture())
Nenue@0 1037 self.iconBorder:SetMask(mask)
Nenue@0 1038 self.supertrackBorder:SetMask(mask)
Nenue@0 1039
Nenue@0 1040 if self.NoIcon then
Nenue@0 1041 self.icon:Hide()
Nenue@0 1042 else
Nenue@0 1043 self.icon:Show()
Nenue@0 1044 end
Nenue@0 1045
Nenue@0 1046 end
Nenue@0 1047
Nenue@0 1048
Nenue@0 1049 function FilterBar:OnEvent(event)
Nenue@0 1050 if event == 'QUEST_LOG_UPDATE' then
Nenue@0 1051 self:Refresh()
Nenue@0 1052 end
Nenue@0 1053 end
Nenue@0 1054
Nenue@0 1055 function FilterBar:PassesFilterSet(filterKey, pin)
Nenue@0 1056 local passesFilter = true
Nenue@0 1057 for filterKey, filters in pairs(QuestFilters) do
Nenue@0 1058 for rewardType, value in pairs(QuestFilters[filterKey]) do
Nenue@0 1059 if value == 1 and rewardType == pin[filterKey] then
Nenue@0 1060 passesFilter = true
Nenue@0 1061 elseif value == -1 and rewardType == pin[filterKey] then
Nenue@0 1062 passesFilter = false
Nenue@0 1063 end
Nenue@0 1064 end
Nenue@0 1065 end
Nenue@0 1066 return passesFilter
Nenue@0 1067 end
Nenue@0 1068
Nenue@9 1069
Nenue@9 1070 local bountyIndex
Nenue@0 1071 local debug_headers = {}
Nenue@9 1072
Nenue@9 1073 function FilterBar:Setup()
Nenue@9 1074 self:GetFilters()
Nenue@9 1075 end
Nenue@9 1076
Nenue@9 1077 function FilterBar:OnEvent(event,...)
Nenue@9 1078 if event == 'QUEST_LOG_UPDATE' then
Nenue@9 1079 self:Reset()
Nenue@9 1080 self:Refresh()
Nenue@9 1081 end
Nenue@9 1082 end
Nenue@9 1083
Nenue@9 1084 function FilterBar:GetFilters()
Nenue@9 1085
Nenue@9 1086 local print = fbprint
Nenue@9 1087 wipe(WorldPlan.FilterOptions)
Nenue@9 1088
Nenue@9 1089 for index, info in ipairs(POI_FILTER_OPTIONS) do
Nenue@9 1090 tinsert(WorldPlan.FilterOptions, info)
Nenue@9 1091 end
Nenue@9 1092 self.bounties, self.numBounties = GetQuestBountyInfoForMapID(WorldPlan.currentMapID)
Nenue@9 1093 self.BountyFilters = {}
Nenue@9 1094 for index, data in ipairs(self.bounties) do
Nenue@9 1095 local info = self.BountyFilters[index]
Nenue@9 1096 if not info then
Nenue@9 1097 info = {}
Nenue@9 1098 self.BountyFilters[index] = info
Nenue@9 1099 end
Nenue@9 1100
Nenue@9 1101 local questTitle = GetQuestLogTitle(GetQuestLogIndexByID(data.questID))
Nenue@9 1102
Nenue@9 1103 info.filterKey = 'factionID'
Nenue@9 1104 info.filterValue = data.factionID
Nenue@9 1105 info.label = questTitle
Nenue@9 1106 info.texture = data.icon
Nenue@9 1107 print('loading emissary', questTitle)
Nenue@9 1108 tinsert(WorldPlan.FilterOptions, info)
Nenue@9 1109 --{ filterKey= 'worldQuestType', filterValue = LE_QUEST_TAG_TYPE_PROFESSION, label = 'Profession', texture = "Interface\\LFGFRAME\\UI-LFR-PORTRAIT", },
Nenue@9 1110 end
Nenue@9 1111 end
Nenue@9 1112
Nenue@9 1113 function FilterBar:Reset()
Nenue@9 1114 self:GetFilters()
Nenue@9 1115 end
Nenue@9 1116
Nenue@9 1117 function FilterBar:Refresh(forced)
Nenue@9 1118 local print = fbprint
Nenue@0 1119 local blocks = self.SummaryHeaders
Nenue@9 1120 local relativeFrame = WorldMapFrame.UIElementsFrame.TrackingOptionsButton
Nenue@0 1121 local numHeaders = 0
Nenue@9 1122 print('|cFF00FF88'..tostring(self)..':Refresh()|r', 'currentMap=',WorldPlan.currentMapID)
Nenue@9 1123
Nenue@9 1124
Nenue@9 1125 local quests = QuestsByZone[WorldPlan.currentMapID] or QuestsByID
Nenue@9 1126
Nenue@9 1127
Nenue@9 1128 for index, info in ipairs(WorldPlan.FilterOptions) do
Nenue@0 1129 local numQuests = 0
Nenue@0 1130
Nenue@0 1131 for questID, pin in pairs(quests) do
Nenue@0 1132 if pin.used then
Nenue@0 1133 if not info.filterKey then
Nenue@0 1134 numQuests = numQuests + 1
Nenue@0 1135 elseif pin[info.filterKey] == info.filterValue then
Nenue@0 1136 numQuests = numQuests + 1
Nenue@0 1137 end
Nenue@0 1138 end
Nenue@0 1139 end
Nenue@9 1140 print(tostring(index).. ' ("'..tostring(info.label)..'" f('.. tostring(info.filterKey).. '='..tostring(info.filterValue) .. '), '..tostring(numQuests)..')')
Nenue@0 1141
Nenue@0 1142 if numQuests >= 1 then
Nenue@0 1143 numHeaders = numHeaders + 1
Nenue@0 1144 local button = blocks[numHeaders]
Nenue@0 1145 if not blocks[numHeaders] then
Nenue@0 1146 button = CreateFrame('Button', 'WorldPlanFilterButton'..numHeaders, WorldMapScrollFrame, 'WorldPlanFilterPin')
Nenue@0 1147 button.iconBorder:SetTexture(info.fill or POI_BORDER_FILL)
Nenue@0 1148 button.iconBorder:SetMask(info.mask or POI_BORDER_MASK)
Nenue@0 1149 button.iconBorder:SetDesaturated(info.desaturated)
Nenue@0 1150 button.supertrackBorder:SetTexture(info.fill or POI_BORDER_FILL)
Nenue@0 1151 button.supertrackBorder:SetMask(info.mask or POI_BORDER_MASK)
Nenue@0 1152 button.supertrackBorder:SetDesaturated(true)
Nenue@0 1153 blocks[numHeaders] = button
Nenue@0 1154 end
Nenue@0 1155
Nenue@0 1156 button:SetID(index)
Nenue@9 1157 button.spacing = ((info.filterKey ~= relativeFrame.filterKey) and 10) or 0
Nenue@9 1158 button.relativeFrame = relativeFrame
Nenue@0 1159 button:Refresh(info, (numHeaders == 1), numQuests)
Nenue@0 1160 button:Show()
Nenue@9 1161 print(' using', button.label:GetText())
Nenue@9 1162 relativeFrame = button
Nenue@0 1163 end
Nenue@0 1164
Nenue@0 1165 end
Nenue@9 1166
Nenue@9 1167 self.numHeaders = numHeaders
Nenue@9 1168 for i = numHeaders + 1, #WorldPlan.FilterOptions do
Nenue@9 1169 if self.SummaryHeaders[i] then
Nenue@9 1170 self.SummaryHeaders[i]:Hide()
Nenue@0 1171 end
Nenue@0 1172 end
Nenue@0 1173 end
Nenue@0 1174
Nenue@9 1175 function FilterBar:Cleanup()
Nenue@9 1176
Nenue@9 1177 -- hide trailing buttons
Nenue@9 1178 end
Nenue@9 1179
Nenue@0 1180
Nenue@0 1181 function FilterPin:Refresh(info, isFirst, numQuests)
Nenue@9 1182 local print = fbprint
Nenue@0 1183 isFirst = isFirst or self.isFirst
Nenue@0 1184 numQuests = numQuests or self.numQuests
Nenue@0 1185
Nenue@9 1186 if info then
Nenue@9 1187 self.isFirst = isFirst
Nenue@9 1188 self.numQuests = numQuests
Nenue@9 1189 self.filterKey = info.filterKey
Nenue@9 1190 self.filterValue = info.filterValue
Nenue@9 1191 self.tagID = info.tagID
Nenue@0 1192
Nenue@9 1193 self.icon:ClearAllPoints()
Nenue@9 1194 self.icon:SetTexture(info.texture)
Nenue@9 1195 self.icon:SetAllPoints(self)
Nenue@9 1196 self.supertrackBorder:Hide()
Nenue@9 1197 self.label:SetText(numQuests)
Nenue@9 1198 self:Show()
Nenue@9 1199 end
Nenue@0 1200
Nenue@0 1201
Nenue@9 1202 self.itemTexture = self.texture
Nenue@9 1203
Nenue@0 1204 if isFirst then
Nenue@9 1205 self:SetPoint('TOP', self.relativeFrame, 'BOTTOM', 0, -5)
Nenue@0 1206 else
Nenue@9 1207 self:SetPoint('TOPRIGHT', self.relativeFrame, 'BOTTOMRIGHT', 0, -(3*2 + 1 + (self.spacing or 0)))
Nenue@9 1208
Nenue@0 1209 end
Nenue@9 1210 print('anchor to', self.relativeFrame:GetName())
Nenue@0 1211
Nenue@0 1212 local r, g, b, a = 1,1,1,1
Nenue@0 1213 if self.filterKey then
Nenue@13 1214 if FilterInclusions[self.filterKey][self.filterValue] == nil then
Nenue@13 1215 FilterInclusions[self.filterKey][self.filterValue] = true
Nenue@13 1216 end
Nenue@13 1217
Nenue@13 1218
Nenue@0 1219 if FilterInclusions[self.filterKey][self.filterValue] == true then
Nenue@0 1220 r, g, b = 0, 1, 0
Nenue@13 1221 elseif FilterInclusions[self.filterKey][self.filterValue] == false then
Nenue@0 1222 r, g, b = 1, 0, 0
Nenue@0 1223 end
Nenue@0 1224 end
Nenue@0 1225 self.iconBorder:SetVertexColor(r, g, b, a)
Nenue@9 1226 self:UpdateSize()
Nenue@0 1227 end
Nenue@0 1228
Nenue@0 1229 function FilterPin:OnLoad()
Nenue@0 1230 self:RegisterForClicks('AnyUp')
Nenue@0 1231 self:SetFrameStrata('HIGH')
Nenue@0 1232 self:SetFrameLevel(151)
Nenue@0 1233 self:SetScript('OnUpdate', nil)
Nenue@0 1234 end
Nenue@0 1235
Nenue@0 1236 function FilterPin:OnUpdate ()
Nenue@0 1237
Nenue@0 1238 end
Nenue@0 1239
Nenue@0 1240 function FilterPin:OnLeave ()
Nenue@0 1241 if GameTooltip:IsOwned(self) then
Nenue@0 1242 GameTooltip:Hide()
Nenue@0 1243 end
Nenue@0 1244 end
Nenue@0 1245
Nenue@0 1246 -- shift-click: reset filter
Nenue@0 1247 -- click: rotate through include(1), exclude(-1), ignore(nil)
Nenue@0 1248 function FilterPin:OnClick (button)
Nenue@9 1249 local print = fbprint
Nenue@0 1250 local filterKey = self.filterKey
Nenue@0 1251 local filterValue = self.filterValue
Nenue@0 1252
Nenue@9 1253
Nenue@9 1254 local operation = opPrefix
Nenue@13 1255 local setInclude = (button == 'LeftButton')
Nenue@9 1256
Nenue@0 1257
Nenue@0 1258 if not filterKey then
Nenue@0 1259 -- resetting
Nenue@0 1260 for k,v in pairs(FilterInclusions) do
Nenue@0 1261 wipe(v)
Nenue@0 1262 end
Nenue@0 1263 else
Nenue@13 1264 FilterInclusions[filterKey][filterValue] = setInclude
Nenue@13 1265 if (not IsShiftKeyDown()) then
Nenue@13 1266 for k, info in ipairs(WorldPlan.FilterOptions) do
Nenue@9 1267 if (info.filterKey == filterKey) and (info.filterValue ~= filterValue) then
Nenue@13 1268 FilterInclusions[info.filterKey][info.filterValue] = (not setInclude)
Nenue@0 1269 end
Nenue@0 1270 end
Nenue@13 1271 end
Nenue@0 1272 end
Nenue@9 1273 print('|cFF00FF88Filter Update:', filterKey, filterValue, operation)
Nenue@0 1274 WorldPlan:RefreshAll()
Nenue@0 1275 end
Nenue@0 1276
Nenue@0 1277 --%debug%
Nenue@0 1278 local SetTimedCallbackForAllPins = function(seconds, callback)
Nenue@0 1279 C_Timer.After(seconds, function()
Nenue@0 1280 for id, pin in pairs(QuestsByID) do
Nenue@0 1281 callback(pin)
Nenue@0 1282 end
Nenue@0 1283 end)
Nenue@0 1284 end
Nenue@0 1285
Nenue@0 1286 SLASH_WORLDPLAN1 = "/worldplan"
Nenue@0 1287 SLASH_WORLDPLAN2 = "/wp"
Nenue@0 1288 SlashCmdList.WORLDPLAN = function()
Nenue@0 1289 print('command pop')
Nenue@0 1290 WorldPlan:GetPinsForMap()
Nenue@0 1291 WorldPlan:RefreshPins()
Nenue@0 1292
Nenue@0 1293 SetTimedCallbackForAllPins(0, function(self) self.FadeIn:Play() self.FlashIn:Play() end)
Nenue@0 1294 SetTimedCallbackForAllPins(5, function(self) self.PendingFade:Play() end)
Nenue@0 1295 SetTimedCallbackForAllPins(8, function(self) self.PendingFade:Stop() end)
Nenue@0 1296 end
Nenue@0 1297 --%end-debug%
Nenue@0 1298
Nenue@0 1299 for mapID, mapName in pairs(WORLD_QUEST_MAPS) do
Nenue@0 1300 QuestsByZone[mapID] = {}
Nenue@0 1301 end
Nenue@0 1302 for index, color in pairs(ITEM_QUALITY_COLORS) do
Nenue@0 1303 POI_REWARD_TYPE[index] = {
Nenue@0 1304 r = color.r, g = color.g, b = color.b,
Nenue@0 1305 hex = color.hex,
Nenue@0 1306 }
Nenue@0 1307 end