Mercurial > wow > worldplan

annotate WorldPlan.lua @ 8:802abb8a10ea

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