Mercurial > wow > worldplan

annotate WorldPlan.lua @ 7:34d9fbf7af20

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