Mercurial > wow > worldplan

annotate QuestPOI.lua @ 36:21bcff08b0f4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
WorldPlan: - Quest pins are now placed on the flight map. Their visibility rules will mirror the filter options from the world map. - Filter controls polish: - First click negates other reward type filters. Subsequent clicks will then toggle individual reward types until the filters are reset via Right-click. - Adheres to the Blizzard CVars added in patch 7.1 - Numerous optimizations to how data and visual updates are handled; should see an even better load time, and snappier world map interaction. ClassPlan: - The 'Available Missions' list is now recorded. It can be reviewed by clicking on the mission list heading. - Information filtering by character and realm.
author Nenue
date Fri, 04 Nov 2016 01:40:39 -0400
parents 26dfa661daa7
children 78cf1f19856a
rev   line source
Nenue@7 1 -- WorldPlan
Nenue@7 2 -- QuestPOI.lua
Nenue@7 3 -- Created: 10/1/2016 7:21 PM
Nenue@7 4 -- %file-revision%
Nenue@7 5 --
Nenue@29 6
Nenue@29 7 local TQ_GetQuestInfoByQuestID = C_TaskQuest.GetQuestInfoByQuestID -- Return the name of a quest with a given ID
Nenue@7 8 local TQ_GetQuestLocation = C_TaskQuest.GetQuestLocation
Nenue@7 9 local TQ_GetQuestTimeLeftMinutes = C_TaskQuest.GetQuestTimeLeftMinutes
Nenue@9 10 local TQ_IsActive = C_TaskQuest.IsActive
Nenue@29 11 local TQ_RequestPreloadRewardData = C_TaskQuest.RequestPreloadRewardData
Nenue@7 12 local QuestPOIGetIconInfo, WorldMapPOIFrame = QuestPOIGetIconInfo, WorldMapPOIFrame
Nenue@33 13 local WorldMap_DoesWorldQuestInfoPassFilters = WorldMap_DoesWorldQuestInfoPassFilters
Nenue@33 14 local QuestMapFrame_IsQuestWorldQuest = QuestMapFrame_IsQuestWorldQuest
Nenue@33 15 local GameTooltip = GameTooltip
Nenue@33 16 local GetItemIcon = GetItemIcon
Nenue@7 17
Nenue@33 18 local print = DEVIAN_WORKSPACE and function(...) _G.print('POI', ...) end or function() end
Nenue@7 19 local qprint = DEVIAN_WORKSPACE and function(...) _G.print('POI', ...) end or function() end
Nenue@33 20 local wprint = DEVIAN_WORKSPACE and function(...) _G.print('WP', ...) end or function() end
Nenue@30 21 local wqprint = DEVIAN_WORKSPACE and function(...) _G.print('WorldQuests', ...) end or function() end
Nenue@7 22 local iprint = DEVIAN_WORKSPACE and function(...) _G.print('ItemScan', ...) end or function() end
Nenue@7 23 local QuestPOI = WorldPlanPOIMixin
Nenue@7 24
Nenue@9 25 local ICON_UNKNOWN = "Interface\\ICONS\\inv_misc_questionmark"
Nenue@9 26 local ICON_MONEY = "Interface\\Buttons\\UI-GroupLoot-Coin-Up"
Nenue@9 27
Nenue@9 28 local POI_BORDER_MASK = "Interface\\Minimap\\UI-Minimap-Background"
Nenue@9 29 local POI_BORDER_FILL = "Interface\\BUTTONS\\YELLOWORANGE64"
Nenue@9 30 local POI_BORDER_BLUE = "Interface\\BUTTONS\\GRADBLUE"
Nenue@9 31 local POI_BORDER_RED = "Interface\\BUTTONS\\RedGrad64"
Nenue@9 32 local POI_BORDER_YELLOW = "Interface\\BUTTONS\\YELLOWORANGE64"
Nenue@9 33 local POI_BORDER_GREEN = "Interface\\BUTTONS\\GREENGRAD64"
Nenue@9 34
Nenue@29 35 local REWARD_CASH = WORLD_QUEST_REWARD_TYPE_FLAG_GOLD
Nenue@29 36 local REWARD_ARTIFACT_POWER = WORLD_QUEST_REWARD_TYPE_FLAG_ARTIFACT_POWER
Nenue@29 37 local REWARD_GEAR = WORLD_QUEST_REWARD_TYPE_FLAG_EQUIPMENT
Nenue@29 38 local REWARD_CURRENCY = WORLD_QUEST_REWARD_TYPE_FLAG_ORDER_RESOURCES
Nenue@29 39 local REWARD_REAGENT = WORLD_QUEST_REWARD_TYPE_FLAG_MATERIALS
Nenue@29 40
Nenue@29 41
Nenue@29 42 local LE_QUEST_TAG_TYPE_PVP = LE_QUEST_TAG_TYPE_PVP
Nenue@29 43 local LE_QUEST_TAG_TYPE_PET_BATTLE = LE_QUEST_TAG_TYPE_PET_BATTLE
Nenue@29 44 local LE_QUEST_TAG_TYPE_DUNGEON = LE_QUEST_TAG_TYPE_DUNGEON
Nenue@29 45 local LE_QUEST_TAG_TYPE_PROFESSION = LE_QUEST_TAG_TYPE_PROFESSION
Nenue@29 46 local LE_QUEST_TAG_TYPE_NORMAL = LE_QUEST_TAG_TYPE_NORMAL
Nenue@29 47
Nenue@29 48 local LE_QUEST_TAG_TYPE_PVP = LE_QUEST_TAG_TYPE_PVP
Nenue@29 49 local LE_QUEST_TAG_TYPE_PET_BATTLE = LE_QUEST_TAG_TYPE_PET_BATTLE
Nenue@29 50 local LE_QUEST_TAG_TYPE_DUNGEON = LE_QUEST_TAG_TYPE_DUNGEON
Nenue@29 51 local LE_QUEST_TAG_TYPE_PROFESSION = LE_QUEST_TAG_TYPE_PROFESSION
Nenue@29 52 local LE_QUEST_TAG_TYPE_NORMAL = LE_QUEST_TAG_TYPE_NORMAL
Nenue@29 53
Nenue@31 54 local subStyles = {
Nenue@31 55 continent = {
Nenue@36 56 iconWidth = 14,
Nenue@36 57 borderWidth = 2,
Nenue@36 58 highlightWidth = 1,
Nenue@31 59 TagSize = 6,
Nenue@36 60 maxAlertLevel = 0,
Nenue@31 61 showNumber = false,
Nenue@31 62 numberFontObject = 'WorldPlanFont'
Nenue@31 63 },
Nenue@31 64 zone = {
Nenue@36 65 iconWidth = 22,
Nenue@36 66 borderWidth = 3,
Nenue@36 67 highlightWidth = 2,
Nenue@31 68 TagSize = 12,
Nenue@36 69 maxAlertLevel = 3,
Nenue@31 70 showNumber = true,
Nenue@31 71 numberFontObject = 'WorldPlanNumberFontThin'
Nenue@31 72 },
Nenue@31 73 minimized = {
Nenue@36 74 iconWidth = 4,
Nenue@36 75 borderWidth = 0,
Nenue@36 76 highlightWidth = 1,
Nenue@31 77 NoIcon = true,
Nenue@36 78 maxAlertLevel = 1,
Nenue@31 79 showNumber = false,
Nenue@31 80 }
Nenue@31 81 }
Nenue@31 82
Nenue@29 83 -- Pin color/display variables
Nenue@29 84
Nenue@33 85 local familiars = {
Nenue@33 86 [42159] = {npc = 106552, name = 'Nightwatcher Merayl'},
Nenue@33 87 [40277] = {npc = 97804, name = 'Tiffany Nelson'},
Nenue@33 88 [40298] = {npc = 99182, name = 'Sir Galveston'},
Nenue@33 89 [40282] = {npc= 99150, name = 'Grixis Tinypop'},
Nenue@33 90 [40278] = {npc = 98270, name = 'Robert Craig'},
Nenue@33 91 [48195] = {npc = 105250, name = 'Aulier'},
Nenue@33 92 [41990] = {npc = 105674, name = 'Varenne'},
Nenue@33 93 [41860] = {npc = 104970, name = 'Xorvasc'},
Nenue@33 94 [40299] = {npc = 99210, name = 'Bodhi Sunwayver'},
Nenue@33 95 [42442] = {npc = 107489, name = 'Amalia'},
Nenue@33 96 [40280] = {npc = 99077, name = 'Bredda Tenderhide'},
Nenue@33 97 [41687] = {npc = 104553, name = 'Odrogg'},
Nenue@33 98 [41944] = {npc = 105455, name = 'Trapper Jarrun'},
Nenue@33 99 [40337] = {npc = 97709, name = 'Master Tamer Flummox'},
Nenue@33 100 [40279] = {npc = 99035, name = 'Durian Strongfruit'}
Nenue@33 101 }
Nenue@33 102 local familiars_id = 9696
Nenue@33 103
Nenue@33 104
Nenue@33 105 -- update a masked texture without messing up its blending mask
Nenue@7 106
Nenue@7 107
Nenue@9 108 -- update a masked texture without messing up its blending mask
Nenue@9 109 local SetMaskedTexture = function(region, file, mask)
Nenue@33 110 mask = mask or "Interface\\Minimap\\UI-Minimap-Background"
Nenue@9 111 region:SetMask(nil)
Nenue@9 112 region:SetTexture(file)
Nenue@9 113 region:SetMask(mask)
Nenue@9 114 end
Nenue@7 115
Nenue@29 116
Nenue@29 117 -- use tooltip object to extract item details
Nenue@29 118 local ParseItemReward = function(questID)
Nenue@29 119 local name, icon, quantity, quality, _, itemID = GetQuestLogRewardInfo(1, questID)
Nenue@29 120 local scanner = _G.WorldPlanTooltip
Nenue@29 121 if not itemID then
Nenue@29 122 return
Nenue@29 123 end
Nenue@29 124
Nenue@29 125 scanner:SetOwner(WorldPlan, "ANCHOR_NONE")
Nenue@29 126 scanner:SetItemByID(itemID)
Nenue@29 127 scanner:Show()
Nenue@29 128 local ttl1 = _G['WorldPlanTooltipTextLeft1']
Nenue@29 129 local ttl2 = _G['WorldPlanTooltipTextLeft2']
Nenue@29 130 local ttl3 = _G['WorldPlanTooltipTextLeft3']
Nenue@29 131 local ttl4 = _G['WorldPlanTooltipTextLeft4']
Nenue@29 132 if ttl2 then
Nenue@29 133 local text = ttl2:GetText()
Nenue@29 134 -- Artifact Power
Nenue@29 135 if text then
Nenue@29 136 if text:match("|cFFE6CC80") then
Nenue@29 137 --print('AP token!', text)
Nenue@29 138 local power
Nenue@29 139 if ttl4 then
Nenue@29 140 local text = ttl4:GetText()
Nenue@29 141 --print('tip line 4', text)
Nenue@29 142 if text then
Nenue@29 143 power = text:gsub("%p", ""):match("%d+")
Nenue@29 144 power = tonumber(power)
Nenue@29 145 end
Nenue@29 146
Nenue@29 147 end
Nenue@31 148 return REWARD_ARTIFACT_POWER, "Interface\\ICONS\\inv_7xp_inscription_talenttome01", power, name, itemID, quality
Nenue@29 149 elseif text:match("Item Level") then
Nenue@29 150 --print('equipment!', text)
Nenue@29 151 quantity = text:match("Item Level ([%d\+]+)")
Nenue@31 152 return REWARD_GEAR, icon, quantity, name, itemID, quality
Nenue@29 153 elseif text:match("Crafting Reagent") then
Nenue@29 154 --print('|cFFFF4400it is a reagent', text)
Nenue@31 155 return REWARD_REAGENT, icon, quantity, name, itemID, quality
Nenue@29 156 end
Nenue@29 157 end
Nenue@29 158
Nenue@29 159 elseif ttl3 then
Nenue@29 160 local text = ttl3:GetText()
Nenue@29 161 if text:match("Crafting Reagent") then
Nenue@29 162 --print('|cFFFF4400it is a reagent', text)
Nenue@31 163 return REWARD_REAGENT, icon, quantity, name, itemID, quality
Nenue@29 164 end
Nenue@29 165 end
Nenue@31 166 return 128, icon, quantity, name, itemID, quality
Nenue@29 167 end
Nenue@29 168
Nenue@27 169 function WorldPlanPOIMixin:OnEnter()
Nenue@36 170 if not WorldMapFrame:IsVisible() then
Nenue@36 171 WorldMap_HijackTooltip(self)
Nenue@36 172 end
Nenue@36 173
Nenue@7 174 local completed = select(4,GetAchievementInfo(familiars_id))
Nenue@7 175 if not completed then
Nenue@7 176 if self.worldQuestType == LE_QUEST_TAG_TYPE_PET_BATTLE and familiars[self.questID] then
Nenue@7 177 WorldMapTooltip:SetOwner(self, 'ANCHOR_RIGHT')
Nenue@31 178 WorldMapTooltip:AddLine(self.title, 1, 1, 1)
Nenue@31 179 if self.quality then
Nenue@31 180 local c = ITEM_QUALITY_COLORS[self.quality]
Nenue@31 181 WorldMapTooltip:AddLine(" ")
Nenue@31 182 WorldMapTooltip:AddLine('Rewards')
Nenue@31 183 WorldMapTooltip:AddLine(self.itemName .. (self.quantity and (' x'..self.quantity) or ''), c.r, c.g, c.b)
Nenue@31 184 WorldMapTooltip:AddTexture(self.itemTexture)
Nenue@31 185
Nenue@31 186 local cLine = WorldMapTooltip:NumLines()
Nenue@31 187 local line = _G['WorldMapTooltipTextLeft'..cLine]
Nenue@31 188 local pline = _G['WorldMapTooltipTextLeft'..(cLine-1)]
Nenue@31 189 local icon = _G['WorldMapTooltipTexture'..(cLine-3)]
Nenue@31 190 icon:SetSize(24,24)
Nenue@31 191 icon:ClearAllPoints()
Nenue@31 192 icon:SetPoint('TOPLEFT', pline, 'BOTTOMLEFT', 0, -2)
Nenue@31 193 line:ClearAllPoints()
Nenue@31 194 line:SetPoint('TOPLEFT', icon, 'TOPRIGHT', 7, 0)
Nenue@31 195
Nenue@31 196 --- voodoo workaround for IDs getting coerced to string
Nenue@31 197 if type(self.itemTexture) == 'number' then
Nenue@31 198 icon:Show()
Nenue@31 199 icon:SetTexture(self.itemTexture)
Nenue@31 200 end
Nenue@31 201 end
Nenue@31 202
Nenue@31 203
Nenue@31 204 WorldMapTooltip:AddLine(" ") -- causes crash for some reason
Nenue@7 205 WorldMapTooltip:AddLine('Family Familiars')
Nenue@7 206 local trainer = familiars[self.questID].name
Nenue@7 207 local numCheevs = GetAchievementNumCriteria(familiars_id)
Nenue@7 208 for index = 1, numCheevs do
Nenue@7 209 local cheevName, cType, cCompleted, quantity, requiredQuantity, charName, flags, cheevID, quantityString, criteriaID = GetAchievementCriteriaInfo(familiars_id, index)
Nenue@7 210 local numTrainers = GetAchievementNumCriteria(cheevID)
Nenue@7 211 for subIndex = 1, numTrainers do
Nenue@7 212 local desc, cType, partCompleted = GetAchievementCriteriaInfo(cheevID, subIndex)
Nenue@7 213 if desc == trainer then
Nenue@7 214 if not partCompleted then
Nenue@7 215 local iconPath = select(10, GetAchievementInfo(cheevID))
Nenue@7 216 WorldMapTooltip:AddLine(cheevName)
Nenue@7 217 WorldMapTooltip:AddTexture(iconPath)
Nenue@7 218 end
Nenue@7 219 end
Nenue@7 220 end
Nenue@7 221 end
Nenue@7 222 WorldMapTooltip:Show()
Nenue@7 223 return
Nenue@7 224 end
Nenue@7 225 end
Nenue@7 226 TaskPOI_OnEnter(self)
Nenue@7 227 end
Nenue@27 228 function WorldPlanPOIMixin:OnLeave()
Nenue@35 229 WorldMap_RestoreTooltip()
Nenue@7 230 TaskPOI_OnLeave(self)
Nenue@7 231 end
Nenue@27 232 function WorldPlanPOIMixin:OnMouseDown()
Nenue@7 233 TaskPOI_OnClick(self)
Nenue@7 234 end
Nenue@7 235
Nenue@7 236
Nenue@29 237
Nenue@29 238 -- create or update the pin using the given questID and C_TaskQuest results
Nenue@29 239 function WorldPlanPOIMixin:RefreshData (info)
Nenue@29 240
Nenue@29 241 qprint('|cFF00FF88'..self:GetName()..':RefreshData()|r')
Nenue@29 242
Nenue@29 243 if info then
Nenue@29 244 self.inProgress = info.inProgress
Nenue@29 245 self.floor = info.floor
Nenue@29 246 self.numObjectives = info.numObjectives or 0
Nenue@30 247 if info.x and info.y then
Nenue@30 248 self.x = info.x or self.x
Nenue@30 249 self.y = info.y or self.y
Nenue@35 250 --qprint('|cFFFF4400applying taskInfo coords:', info.x, info.y)
Nenue@30 251 end
Nenue@30 252
Nenue@29 253 end
Nenue@29 254
Nenue@29 255
Nenue@29 256 local questID = self:GetID()
Nenue@29 257 local questTitle, rewardIcon, rewardName, rewardCount, rewardStyle, rewardType, itemID, quantity, quality, _
Nenue@33 258 local hasUpdate, isPending = (self.isStale or self.isNew), self.isPending
Nenue@29 259
Nenue@29 260
Nenue@29 261 if not HaveQuestData(questID) then
Nenue@29 262 TQ_RequestPreloadRewardData(questID)
Nenue@29 263 isPending = true
Nenue@29 264 else
Nenue@29 265
Nenue@29 266 -- set reward category
Nenue@29 267 local numRewards = GetNumQuestLogRewards(questID)
Nenue@29 268 local numCurrency = GetNumQuestLogRewardCurrencies(questID)
Nenue@29 269 local money = GetQuestLogRewardMoney(questID)
Nenue@29 270 if numRewards >= 1 then
Nenue@31 271 rewardType, rewardIcon, rewardCount, rewardName, itemID, quality = ParseItemReward(questID)
Nenue@29 272 elseif numCurrency >= 1 then
Nenue@29 273 rewardName, rewardIcon, rewardCount = GetQuestLogRewardCurrencyInfo(1, questID)
Nenue@29 274 rewardType = REWARD_CURRENCY
Nenue@29 275 elseif money >= 1 then
Nenue@29 276 rewardIcon = ICON_MONEY
Nenue@29 277 rewardName = GetMoneyString(money)
Nenue@29 278 rewardType = REWARD_CASH
Nenue@29 279 end
Nenue@30 280 rewardStyle = self:GetTypeInfo(rewardType)
Nenue@29 281
Nenue@29 282 self.itemNumber = rewardCount or self.itemNumber
Nenue@29 283 self.rewardType = rewardType or REWARD_ITEM
Nenue@29 284 self.style = rewardStyle
Nenue@31 285 self.quality = quality
Nenue@29 286
Nenue@29 287 -- title, faction, capped state
Nenue@29 288 local questTitle, factionID, capped = TQ_GetQuestInfoByQuestID(questID)
Nenue@29 289 self.factionID = factionID
Nenue@29 290 self.capped = capped
Nenue@29 291
Nenue@29 292 -- set tag details
Nenue@29 293 local tagID, tagName, worldQuestType, rarity, isElite, tradeskillLineIndex = GetQuestTagInfo(questID);
Nenue@29 294 local tagAtlas
Nenue@29 295 if worldQuestType == LE_QUEST_TAG_TYPE_PET_BATTLE then
Nenue@29 296 tagAtlas = "worldquest-icon-petbattle"
Nenue@29 297 elseif worldQuestType == LE_QUEST_TAG_TYPE_PVP then
Nenue@29 298 tagAtlas = "worldquest-icon-pvp-ffa"
Nenue@29 299 elseif worldQuestType == LE_QUEST_TAG_TYPE_PROFESSION then
Nenue@29 300 local id = tradeskillLineIndex and select(7, GetProfessionInfo(tradeskillLineIndex))
Nenue@29 301 if id then
Nenue@29 302 tagAtlas = WORLD_QUEST_ICONS_BY_PROFESSION[id]
Nenue@29 303 end
Nenue@29 304 elseif worldQuestType == LE_QUEST_TAG_TYPE_DUNGEON then
Nenue@29 305 tagAtlas = "worldquest-icon-dungeon"
Nenue@29 306 end
Nenue@29 307
Nenue@29 308 self.tagID = tagID
Nenue@29 309 self.tagName = tagName
Nenue@29 310 self.worldQuestType = worldQuestType
Nenue@29 311 self.isElite = isElite
Nenue@29 312 self.tradeskillLineIndex = tradeskillLineIndex
Nenue@29 313 self.rarity = rarity
Nenue@29 314 self.tagAtlas = tagAtlas
Nenue@29 315
Nenue@29 316 -- flag unresolved info
Nenue@29 317 if not (rewardIcon and rewardName) then
Nenue@29 318 isPending = true
Nenue@29 319 qprint('because not have icon')
Nenue@29 320 TQ_RequestPreloadRewardData (questID)
Nenue@29 321 --WorldPlan:print('|cFFFFFF00'..tostring(self.title)..'|r waiting on texture info')
Nenue@29 322 else
Nenue@29 323 if (rewardIcon and rewardName) and isPending then
Nenue@29 324 --WorldPlan:print('|cFF00FF00'..tostring(self.title)..'|r has info', rewardIcon, rewardName)
Nenue@29 325 hasUpdate = true
Nenue@29 326 end
Nenue@29 327 isPending = false
Nenue@29 328 end
Nenue@29 329
Nenue@29 330 self.title = questTitle or "|cFFFF0000Retrieving..."
Nenue@29 331 self.itemTexture = rewardIcon or self.itemTexture
Nenue@29 332 self.itemName = rewardName or self.itemName
Nenue@33 333 self.isStale = hasUpdate
Nenue@29 334 self.isPending = isPending
Nenue@29 335
Nenue@29 336
Nenue@35 337 --qprint(' |cFF00FFFF'..questID..'|r hasUpdate:', hasUpdate, 'isPending:', isPending, 'isShown', self:IsShown())
Nenue@35 338 --qprint(' ', 'rewardType:', self.rewardType, 'tag:', self.tagID)
Nenue@35 339 --qprint(' ', tostring(self.title), " |T"..tostring(self.itemTexture)..":12:12|t", tostring(self.itemName))
Nenue@29 340 end
Nenue@31 341 self.cheevos = familiars[self.questID]
Nenue@31 342
Nenue@29 343 return hasUpdate, isPending
Nenue@29 344 end
Nenue@29 345
Nenue@29 346
Nenue@7 347 function WorldPlanPOIMixin:SetAchievementProgressTooltip()
Nenue@7 348 print('cheevos')
Nenue@7 349 end
Nenue@7 350
Nenue@34 351 -- run from OnShow if .isNew is set
Nenue@34 352 function WorldPlanPOIMixin:OnNew()
Nenue@34 353
Nenue@34 354 if not self.isAnimating then
Nenue@35 355 --qprint('|cFFFFFF00'.. self.title .. ' added to quest log.')
Nenue@35 356 self:SetAlpha(0)
Nenue@35 357 if WorldPlan.db.FadeWhileGrouped then
Nenue@35 358 self.FadeIn.FadeIn:SetToAlpha(0.15)
Nenue@35 359 self.PendingFade.FadeIn:SetToAlpha(0.15)
Nenue@35 360 self.PendingFade.FadeOut:SetFromAlpha(0.15)
Nenue@35 361 else
Nenue@35 362 self.FadeIn.FadeIn:SetToAlpha(1)
Nenue@35 363 self.PendingFade.FadeIn:SetToAlpha(1)
Nenue@35 364 self.PendingFade.FadeOut:SetFromAlpha(1)
Nenue@35 365 end
Nenue@34 366 self.isAnimating = true
Nenue@35 367 self.isNew = nil
Nenue@35 368 self.FadeIn:Play()
Nenue@34 369 end
Nenue@7 370 end
Nenue@7 371
Nenue@27 372 function WorldPlanPOIMixin:OnShow ()
Nenue@27 373 -- pop this on principle
Nenue@34 374
Nenue@34 375 if self.isNew or self.isStale then
Nenue@27 376 self:Refresh()
Nenue@27 377 end
Nenue@27 378
Nenue@34 379
Nenue@34 380 -- is it a new quest?
Nenue@34 381 if self.isNew then
Nenue@36 382 qprint('|cFFFFFF00'..tostring(self:GetName())..':OnShow()|r update:', self.isStale, 'new:', self.isNew, 'animation:', self.isAnimating)
Nenue@36 383 --qprint('|cFFFFFF00popping new pin handler')
Nenue@34 384 self:OnNew()
Nenue@35 385 elseif not self.isAnimating then
Nenue@35 386 self:SetAlpha(1)
Nenue@34 387 end
Nenue@34 388
Nenue@36 389 self.Overlay:SetShown(true)
Nenue@35 390 --WorldPlan:print(self:GetAlpha())
Nenue@34 391
Nenue@27 392 end
Nenue@27 393 function WorldPlanPOIMixin:OnHide()
Nenue@35 394 --qprint('|cFFFFFF00["'..tostring(self.title)..'"]|r:OnHide()')
Nenue@34 395 if not self:IsShown() then
Nenue@34 396 self.isAnimating = nil
Nenue@35 397 self:SetAlpha(1)
Nenue@34 398 end
Nenue@34 399
Nenue@36 400 self.Overlay:SetShown(false)
Nenue@27 401 end
Nenue@27 402
Nenue@27 403 function WorldPlanPOIMixin:SetAnchor(frame, mapID, mapWidth, mapHeight)
Nenue@33 404 --qprint(' |cFF00FF00'..self:GetName()..':SetAnchor()|r', self.questID, mapID, mapWidth)
Nenue@7 405 self:ClearAllPoints()
Nenue@29 406 local dX, dY = TQ_GetQuestLocation(self.questID)
Nenue@7 407 if not dX or dX == 0 then
Nenue@7 408 local _, x, y = QuestPOIGetIconInfo(self.questID)
Nenue@7 409 if x and floor(x) ~= 0 then
Nenue@7 410 dX, dY = x, y
Nenue@7 411 else
Nenue@7 412 dX, dY = self.x, self.y
Nenue@7 413 end
Nenue@7 414 end
Nenue@7 415 self.x = dX
Nenue@7 416 self.y = dY
Nenue@7 417
Nenue@29 418 --qprint(' |cFF00FF00'..self.questID..':|r', format("%0.2f %0.2f", dX, dY))
Nenue@7 419
Nenue@7 420 local pX = (dX * mapWidth)
Nenue@7 421 local pY = (-dY * mapHeight)
Nenue@7 422
Nenue@7 423 self:SetParent(WorldMapPOIFrame)
Nenue@7 424 self:SetPoint('CENTER', frame, 'TOPLEFT', pX, pY)
Nenue@7 425 end
Nenue@7 426
Nenue@7 427
Nenue@27 428 function WorldPlanPOIMixin:OnLoad()
Nenue@27 429 qprint('|cFF00FF88'..self:GetName()..':OnLoad()|r',WorldPlan.db)
Nenue@7 430 self:RegisterEvent('SUPER_TRACKED_QUEST_CHANGED')
Nenue@36 431
Nenue@36 432 self.count = self.Overlay.count
Nenue@36 433 self.timeLabel = self.Overlay.timeLabel
Nenue@7 434 end
Nenue@7 435
Nenue@27 436 function WorldPlanPOIMixin:OnEvent(event, ...)
Nenue@7 437 if event == 'SUPER_TRACKED_QUEST_CHANGED' then
Nenue@33 438 self.isStale = true
Nenue@7 439 end
Nenue@7 440 end
Nenue@7 441
Nenue@7 442
Nenue@7 443 local PIN_UPDATE_DELAY = .016
Nenue@7 444 local TOP_PIN_ID
Nenue@27 445 function WorldPlanPOIMixin:OnUpdate (sinceLast)
Nenue@35 446 if self.isNew then
Nenue@35 447 print('|cFFFFFF00push new poi stuff')
Nenue@35 448 self:OnNew()
Nenue@30 449 end
Nenue@7 450 -- control update check intervals
Nenue@7 451 self.throttle = (self.throttle or PIN_UPDATE_DELAY) - sinceLast
Nenue@7 452 if self.throttle <= 0 then
Nenue@7 453 -- factor overtime into the throttle timer
Nenue@7 454 self.throttle = PIN_UPDATE_DELAY - self.throttle
Nenue@7 455 else
Nenue@7 456 return
Nenue@7 457 end
Nenue@35 458 if self.isStale and not self.isAnimating then
Nenue@36 459 wprint('|cFFFFFF00push poi update')
Nenue@35 460 self:Refresh()
Nenue@35 461 return
Nenue@35 462 end
Nenue@7 463
Nenue@7 464 -- query for reward data if it wasn't found in the original scan
Nenue@7 465 local questID = self.questID
Nenue@7 466 if self.isPending then
Nenue@29 467 self:RefreshData()
Nenue@7 468 if not (self.PendingFade:IsPlaying() or self.isAnimating) then
Nenue@7 469 self.PendingFade:Play()
Nenue@7 470 end
Nenue@7 471 return
Nenue@7 472 else
Nenue@7 473 if self.PendingFade:IsPlaying() then
Nenue@7 474 self.PendingFade:Stop()
Nenue@7 475 end
Nenue@7 476 end
Nenue@7 477
Nenue@7 478
Nenue@7 479 -- update time elements
Nenue@36 480 local tl = self.alertLevel
Nenue@7 481 local timeLeft = TQ_GetQuestTimeLeftMinutes(questID)
Nenue@7 482 if timeLeft > 0 then
Nenue@36 483 local text, timeState = WorldPlan:GetTimeInfo(timeLeft, self.maxAlertLevel)
Nenue@29 484 if tl ~= timeState then
Nenue@29 485 tl = timeState
Nenue@29 486 self.timeLabel:SetText(text)
Nenue@7 487 end
Nenue@7 488 else
Nenue@7 489 -- remove self in a timely manner
Nenue@9 490 if not TQ_IsActive(self.questID) then
Nenue@9 491 print('|cFFFF4400'..self:GetName()..' pin hard timeout')
Nenue@9 492 if self.worldQuestType ~= LE_QUEST_TAG_TYPE_PROFESSION then
Nenue@9 493 self:Hide()
Nenue@9 494 end
Nenue@7 495 end
Nenue@7 496 end
Nenue@36 497 self.alertLevel = tl
Nenue@7 498
Nenue@7 499 if self:IsMouseOver() then
Nenue@7 500 self.MouseGlow:Show()
Nenue@7 501 else
Nenue@7 502 self.MouseGlow:Hide()
Nenue@7 503 end
Nenue@8 504 end
Nenue@8 505
Nenue@8 506
Nenue@9 507
Nenue@27 508 function WorldPlanPOIMixin:Refresh ()
Nenue@9 509 local db = WorldPlan.db
Nenue@30 510 print('|cFF00FF88'..self:GetName()..'|r:Refresh()')
Nenue@9 511
Nenue@9 512
Nenue@9 513
Nenue@29 514 local questID = self:GetID()
Nenue@36 515 local iconBorder = self.RewardBorder
Nenue@36 516 local trackingBorder = self.HighlightBorder
Nenue@9 517 local icon = self.icon
Nenue@9 518 local count = self.count
Nenue@9 519
Nenue@9 520
Nenue@27 521
Nenue@9 522
Nenue@9 523 --WorldPlan:print(tostring(self.title), "|T"..tostring(self.itemTexture)..":16:16|t", tostring(self.itemName))
Nenue@36 524
Nenue@36 525
Nenue@9 526
Nenue@9 527 if self.itemName then
Nenue@33 528 --wqprint('filtered:', self.filtered, 'showNumber:', self.showNumber)
Nenue@30 529
Nenue@29 530 self.count:SetText(self.itemNumber)
Nenue@36 531 end
Nenue@36 532 if self.itemTexture then
Nenue@36 533 icon:SetTexture(self.itemTexture)
Nenue@36 534 icon:SetMask("Interface\\Minimap\\UI-Minimap-Background")
Nenue@9 535 end
Nenue@9 536
Nenue@30 537 local border = self:GetTypeInfo(self.rewardType)
Nenue@9 538 iconBorder:SetVertexColor(border.r, border.g, border.b, border.a)
Nenue@9 539 iconBorder:SetDesaturated(true)
Nenue@9 540
Nenue@9 541
Nenue@9 542 if questID == GetSuperTrackedQuestID() then
Nenue@9 543 trackingBorder:SetVertexColor(0,0,0,1)
Nenue@9 544 else
Nenue@9 545 trackingBorder:SetVertexColor(0,0,0,0.5)
Nenue@9 546 end
Nenue@9 547
Nenue@9 548 self.tagIcon:SetAtlas(self.tagAtlas)
Nenue@9 549 self.tagIcon:SetTexCoord(0,1,0,1)
Nenue@36 550 self.EliteBorder:SetShown(self.isElite and not self.filtered)
Nenue@30 551 --qprint('|cFF88FF00updated', questID, self.title, self.rewardType, (style.showNumber and self.itemNumber) or '')
Nenue@30 552 --print(' - subStyle:', (self.filtered == true), self.subStyle)
Nenue@9 553
Nenue@36 554 self.Overlay:SetShown(self:IsShown())
Nenue@36 555 self.Overlay:SetParent(self:GetParent())
Nenue@36 556 self.Overlay:SetFrameLevel(self:GetFrameLevel()+200)
Nenue@36 557 self.Overlay:SetAllPoints(self)
Nenue@36 558
Nenue@9 559
Nenue@9 560 self:UpdateSize()
Nenue@35 561
Nenue@33 562 self.isStale = nil
Nenue@35 563
Nenue@9 564 end
Nenue@9 565
Nenue@35 566 local cvar_check = {
Nenue@35 567 [REWARD_CASH] = 'worldQuestFilterGold',
Nenue@35 568 [REWARD_ARTIFACT_POWER] = 'worldQuestFilterArtifactPower',
Nenue@35 569 [REWARD_CURRENCY] = 'worldQuestFilterOrderResources',
Nenue@35 570 [REWARD_REAGENT]= 'worldQuestFilterProfessionMaterials',
Nenue@35 571 [REWARD_GEAR] = 'worldQuestFilterEquipment',
Nenue@35 572 }
Nenue@8 573
Nenue@33 574
Nenue@33 575 function QuestPOI:IsShowable ()
Nenue@36 576 local print = qprint
Nenue@33 577 local db = WorldPlan.db
Nenue@33 578 local qType = self.worldQuestType
Nenue@33 579 local rType = self.rewardType
Nenue@33 580 self.filtered = nil
Nenue@33 581 self.used = true
Nenue@33 582
Nenue@36 583 for filterKey, value in pairs(WorldPlan.UsedFilters) do
Nenue@36 584 print('|cFFFF4400', filterKey, self[filterKey])
Nenue@36 585 if self[filterKey] ~= value then
Nenue@36 586 self.filtered = true
Nenue@36 587 end
Nenue@36 588 end
Nenue@33 589
Nenue@33 590 self.questId = self:GetID()
Nenue@35 591 if self.rewardType then
Nenue@36 592 if cvar_check[self.rewardType] then
Nenue@36 593 if self.rewardType == REWARD_CASH then
Nenue@36 594 print('##', cvar_check[self.rewardType], GetCVarBool(cvar_check[self.rewardType]))
Nenue@36 595 end
Nenue@36 596 if not GetCVarBool(cvar_check[self.rewardType]) then
Nenue@35 597 self.filtered = true
Nenue@36 598
Nenue@35 599 end
Nenue@36 600
Nenue@35 601 end
Nenue@8 602 end
Nenue@33 603
Nenue@33 604 if not TQ_IsActive(self.questID) then
Nenue@33 605 self.used = nil
Nenue@33 606 elseif qType == LE_QUEST_TAG_TYPE_PROFESSION then
Nenue@33 607 if not (db.ShowAllProfessionQuests or (self.tradeskillLineIndex and GetProfessionInfo(self.tradeskillLineIndex))) then
Nenue@33 608 self.used = nil
Nenue@33 609 end
Nenue@33 610 end
Nenue@36 611 print(' |cFF'.. (((self.rewardType == REWARD_CASH) and 'FFFF00') or '0088FF') ..'IsShowable()|r ', cvar_check[self.rewardType], 'used:', self.used, 'filtered:', self.filtered, self.title)
Nenue@33 612 return self.used, self.filtered
Nenue@33 613 end
Nenue@33 614
Nenue@33 615 function QuestPOI:UpdateTimer (timeLeft, timeType)
Nenue@33 616 print('|cFF0088FFUpdatePinTimer()|r')
Nenue@33 617 end
Nenue@33 618
Nenue@33 619 --- Fixes icons upon size update
Nenue@36 620 function QuestPOI:UpdateSize ()
Nenue@33 621
Nenue@36 622 local style,subStyle = self:GetTypeInfo(self.rewardType)
Nenue@36 623 if self.filtered then
Nenue@36 624 subStyle = style.minimized
Nenue@36 625 end
Nenue@33 626 --qprint('|cFF00FF88'..self:GetName()..'|r:UpdateSize()', style, subStyle)
Nenue@33 627
Nenue@36 628 local icon = self.icon
Nenue@36 629 local iconBorder = self.RewardBorder
Nenue@36 630 local trackingBorder = self.HighlightBorder
Nenue@36 631 local tag = self.tagIcon
Nenue@33 632
Nenue@36 633 local iconWidth = subStyle.iconWidth
Nenue@36 634 local borderWidth = iconWidth + (subStyle.borderWidth * 2)
Nenue@36 635 local highlightWidth = borderWidth + (subStyle.highlightWidth * 2)
Nenue@33 636
Nenue@36 637 local iconTexture = self.itemTexture
Nenue@33 638
Nenue@36 639 self:SetSize(iconWidth, iconWidth)
Nenue@36 640 icon:SetSize(iconWidth, iconWidth)
Nenue@36 641 iconBorder:SetSize(borderWidth, borderWidth)
Nenue@36 642 trackingBorder:SetSize(highlightWidth, highlightWidth)
Nenue@33 643
Nenue@36 644
Nenue@36 645 iconBorder:SetPoint('CENTER', (style.x or 0), (style.y or 0))
Nenue@36 646 trackingBorder:SetPoint('CENTER', (style.x or 0), (style.y or 0))
Nenue@36 647
Nenue@36 648
Nenue@36 649 if style.hasNumeric then
Nenue@36 650 self.count:SetTextColor(unpack(style.numberRGB))
Nenue@36 651 if subStyle.numberFontObject then
Nenue@36 652 --wqprint('change font', _G[subStyle.numberFontObject]:GetName())
Nenue@36 653 self.count:SetFontObject(_G[subStyle.numberFontObject])
Nenue@36 654 end
Nenue@33 655 end
Nenue@33 656
Nenue@36 657 self.count:SetShown((subStyle.showNumber and self.itemNumber) and style.hasNumeric)
Nenue@33 658
Nenue@36 659 --[[
Nenue@33 660 if self.tagSize then
Nenue@33 661 tag:Show()
Nenue@33 662 tag:ClearAllPoints()
Nenue@33 663 tag:SetPoint('BOTTOMRIGHT', self, 'BOTTOMRIGHT', borderWidth, -borderWidth)
Nenue@33 664 else
Nenue@33 665 tag:Hide()
Nenue@33 666 end
Nenue@33 667
Nenue@36 668 if self.NoIcon then
Nenue@36 669 self.icon:Hide()
Nenue@36 670 else
Nenue@36 671 self.icon:Show()
Nenue@36 672 if style.rewardMask then
Nenue@36 673 icon:SetMask(rewardMask)
Nenue@36 674 else
Nenue@36 675 icon:SetMask(iconTexture)
Nenue@36 676 end
Nenue@36 677 if style.pinMask then
Nenue@36 678 iconBorder:Show()
Nenue@36 679 trackingBorder:Show()
Nenue@36 680 iconBorder:SetMask(pinMask)
Nenue@36 681 trackingBorder:SetMask(pinMask)
Nenue@36 682 else
Nenue@36 683 iconBorder:Hide()
Nenue@36 684 trackingBorder:Hide()
Nenue@36 685 end
Nenue@36 686 end
Nenue@36 687
Nenue@36 688
Nenue@36 689 icon:SetTexture(iconTexture)
Nenue@35 690 iconBorder:SetTexture(iconBorder:GetTexture())
Nenue@35 691 trackingBorder:SetTexture(trackingBorder:GetTexture())
Nenue@36 692 --]]
Nenue@36 693 self.currentWidth = subStyle.iconWidth
Nenue@36 694 self.borderWidth = subStyle.borderWidth
Nenue@36 695 self.highlightWidth = subStyle.highlightWidth
Nenue@36 696 self.tagSize = subStyle.TagSize
Nenue@36 697 self.maxAlertLevel = subStyle.maxAlertLevel
Nenue@36 698 self.NoIcon = subStyle.NoIcon
Nenue@36 699 self.style = style
Nenue@36 700 self.subStyle = subStyle
Nenue@36 701 if self.rewardType == REWARD_CASH then
Nenue@36 702 qprint('using mask:', pinMask or iconTexture, rewardMask or iconTexture, self.used, self.filtered)
Nenue@36 703 end
Nenue@36 704
Nenue@7 705 end