annotate QuestPOI.lua @ 95:b29b35cb8539

- Fixed quest completion checking and handling - Changed animation method to hopefully stop weird flickering. - Pins are now visible before full reward data is loaded - Filter bar redesigned: - aligned horizontally along the top of the map display - filter buttons display a '+' when there are matches in both current and other zones, and '*' when there only matches in other zones - button tooltips separate local and global quests - button categories are highlighted and labeled when the cursor is over them - Fixed invalid POI targets appearing when the spell targeting cursor is active - ClassOrderPlan can be closed with the game menu button
author Nenue
date Mon, 08 May 2017 22:38:52 -0400
parents 98b5e08b75ed
children 8591401ec278
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@65 5 -- Big TODOs:
Nenue@65 6 -- -- generate frames using `WorldMap_GetOrCreateTaskPOI' to remove tainting issues
Nenue@7 7 --
Nenue@40 8 local _, db = ...
Nick@64 9 local TQ_GetQuestInfoByQuestID = C_TaskQuest.GetQuestInfoByQuestID
Nenue@7 10 local TQ_GetQuestLocation = C_TaskQuest.GetQuestLocation
Nenue@7 11 local TQ_GetQuestTimeLeftMinutes = C_TaskQuest.GetQuestTimeLeftMinutes
Nenue@9 12 local TQ_IsActive = C_TaskQuest.IsActive
Nenue@29 13 local TQ_RequestPreloadRewardData = C_TaskQuest.RequestPreloadRewardData
Nenue@7 14 local QuestPOIGetIconInfo, WorldMapPOIFrame = QuestPOIGetIconInfo, WorldMapPOIFrame
Nenue@33 15 local WorldMap_DoesWorldQuestInfoPassFilters = WorldMap_DoesWorldQuestInfoPassFilters
Nenue@33 16 local QuestMapFrame_IsQuestWorldQuest = QuestMapFrame_IsQuestWorldQuest
Nenue@40 17 local GetAchievementNumCriteria, GetAchievementCriteriaInfo, GetAchievementInfo = GetAchievementNumCriteria, GetAchievementCriteriaInfo, GetAchievementInfo
Nick@64 18
Nick@64 19 local IsQuestFlaggedCompleted = IsQuestFlaggedCompleted
Nick@64 20 local GetFactionInfoByID, GetQuestObjectiveInfo = GetFactionInfoByID, GetQuestObjectiveInfo
Nick@64 21 local GetQuestTagInfo, GetProfessionInfo = GetQuestTagInfo, GetProfessionInfo
Nick@64 22 local GetNumQuestLogRewards, GetNumQuestLogRewardCurrencies, HaveQuestData = GetNumQuestLogRewards, GetNumQuestLogRewardCurrencies, HaveQuestData
Nick@64 23 local GetQuestLogRewardMoney, GetQuestLogRewardCurrencyInfo, GetMoneyString = GetQuestLogRewardMoney, GetQuestLogRewardCurrencyInfo, GetMoneyString
Nick@64 24 local SpellCanTargetQuest, GetCVarBool = SpellCanTargetQuest, GetCVarBool
Nick@64 25 local SetSuperTrackedQuestID = SetSuperTrackedQuestID
Nenue@65 26 local HaveQuestRewardData = HaveQuestRewardData
Nenue@65 27
Nick@64 28
Nenue@93 29 local pairs, ipairs, tinsert, tremove, unpack, select = pairs, ipairs, tinsert, tremove, unpack, select
Nenue@40 30 local floor, mod, tostring, tonumber, GetSuperTrackedQuestID = floor, mod, tostring, tonumber, GetSuperTrackedQuestID
Nenue@33 31 local GameTooltip = GameTooltip
Nenue@33 32 local GetItemIcon = GetItemIcon
Nenue@7 33
Nenue@67 34 local print = DEVIAN_WORKSPACE and function(...) _G.print('POI', ...) end or nop
Nenue@67 35 local qprint = DEVIAN_WORKSPACE and function(...) _G.print('POI', ...) end or nop
Nenue@67 36 local wprint = DEVIAN_WORKSPACE and function(...) _G.print('WP', ...) end or nop
Nenue@67 37 local wqprint = DEVIAN_WORKSPACE and function(...) _G.print('WorldQuests', ...) end or nop
Nenue@67 38 local iprint = DEVIAN_WORKSPACE and function(...) _G.print('ItemScan', ...) end or nop
Nenue@67 39 local rprint = DEVIAN_WORKSPACE and function(...) _G.print('WQRefresh', ...) end or nop
Nenue@67 40 local dprint = DEVIAN_WORKSPACE and function(...) _G.print('WQData', ...) end or nop
Nenue@7 41 local QuestPOI = WorldPlanPOIMixin
Nenue@7 42
Nenue@93 43 local pinBaseIndex = 1320
Nenue@93 44 local overlayBaseIndex = 1380
Nenue@56 45 local previousHighlight
Nenue@40 46
Nenue@95 47 local FADE_TIMING_MULTIPLIER = 3
Nenue@67 48 local DATA_DEBUG = false
Nenue@75 49 local PIN_REFRESH_DELAY = 1
Nenue@75 50 local PIN_REQUEST_DELAY = .2
Nenue@9 51 local ICON_UNKNOWN = "Interface\\ICONS\\inv_misc_questionmark"
Nenue@9 52 local ICON_MONEY = "Interface\\Buttons\\UI-GroupLoot-Coin-Up"
Nenue@9 53
Nenue@40 54 local WORLD_QUEST_BORDER = "Interface\\UNITPOWERBARALT\\Generic1Target_Circular_Frame"
Nenue@47 55 local PENDING_BORDER = "Interface\\BUTTONS\\YELLOWORANGE64"
Nenue@40 56 local PENDING_ICON = "Interface\\BUTTONS\\YELLOWORANGE64"
Nenue@9 57
Nenue@29 58 local REWARD_CASH = WORLD_QUEST_REWARD_TYPE_FLAG_GOLD
Nenue@29 59 local REWARD_ARTIFACT_POWER = WORLD_QUEST_REWARD_TYPE_FLAG_ARTIFACT_POWER
Nenue@29 60 local REWARD_GEAR = WORLD_QUEST_REWARD_TYPE_FLAG_EQUIPMENT
Nenue@29 61 local REWARD_CURRENCY = WORLD_QUEST_REWARD_TYPE_FLAG_ORDER_RESOURCES
Nenue@29 62 local REWARD_REAGENT = WORLD_QUEST_REWARD_TYPE_FLAG_MATERIALS
Nenue@69 63
Nenue@69 64 local REWARD_TYPE_NAMES = {
Nenue@69 65 [REWARD_CASH] = 'Money',
Nenue@69 66 [REWARD_ARTIFACT_POWER] = 'AP',
Nenue@69 67 [REWARD_GEAR] = 'Equipment',
Nenue@69 68 [REWARD_CURRENCY] = 'Currency',
Nenue@69 69 [REWARD_REAGENT] = 'Trade Goods'
Nenue@69 70 }
Nenue@29 71
Nenue@29 72 local LE_QUEST_TAG_TYPE_PVP = LE_QUEST_TAG_TYPE_PVP
Nenue@29 73 local LE_QUEST_TAG_TYPE_PET_BATTLE = LE_QUEST_TAG_TYPE_PET_BATTLE
Nenue@29 74 local LE_QUEST_TAG_TYPE_DUNGEON = LE_QUEST_TAG_TYPE_DUNGEON
Nenue@29 75 local LE_QUEST_TAG_TYPE_PROFESSION = LE_QUEST_TAG_TYPE_PROFESSION
Nenue@29 76 local LE_QUEST_TAG_TYPE_NORMAL = LE_QUEST_TAG_TYPE_NORMAL
Nenue@29 77
Nenue@29 78 local LE_QUEST_TAG_TYPE_PVP = LE_QUEST_TAG_TYPE_PVP
Nenue@29 79 local LE_QUEST_TAG_TYPE_PET_BATTLE = LE_QUEST_TAG_TYPE_PET_BATTLE
Nenue@29 80 local LE_QUEST_TAG_TYPE_DUNGEON = LE_QUEST_TAG_TYPE_DUNGEON
Nenue@29 81 local LE_QUEST_TAG_TYPE_PROFESSION = LE_QUEST_TAG_TYPE_PROFESSION
Nenue@29 82 local LE_QUEST_TAG_TYPE_NORMAL = LE_QUEST_TAG_TYPE_NORMAL
Nenue@29 83
Nenue@66 84 local DEFAULT_STYLE = {
Nenue@66 85 border = {1,1,1},
Nenue@69 86 textColor = {1,1,1,1},
Nenue@66 87 x = 0, y = 0,
Nenue@66 88 desaturated = true,
Nenue@66 89 iconMask = "Interface\\Minimap\\UI-Minimap-Background",
Nenue@66 90 borderMask = "Interface\\Minimap\\UI-Minimap-Background",
Nenue@66 91 rewardMark = "Interface\\Minimap\\UI-Minimap-Background",
Nenue@66 92 scaleFactors = {0.25, 0.7, 1},
Nenue@66 93 iconWidth = 18,
Nenue@66 94 borderWidth = 2,
Nenue@66 95 highlightWidth = 2,
Nenue@66 96 TagSize = 8,
Nenue@95 97 maxAlertLevel = 3,
Nenue@66 98 numberFontObject = 'WorldPlanFont'
Nenue@66 99 }
Nenue@66 100 local MINIMIZED_STYLE = {
Nenue@66 101 hideNumber = true,
Nenue@66 102 hideIcon = true,
Nenue@67 103 iconWidth = 3,
Nenue@66 104 }
Nenue@66 105 local REWARD_TYPE_STYLES = {
Nenue@66 106 [REWARD_CASH] = {
Nenue@66 107 hideNumber = true,
Nenue@66 108 },
Nenue@66 109 [REWARD_ARTIFACT_POWER] = {},
Nenue@66 110 [REWARD_GEAR] = {
Nenue@66 111 hideNumber = true,
Nenue@66 112 },
Nenue@69 113 [REWARD_CURRENCY] = {
Nenue@69 114 textColor = {1,1,0,.5}
Nenue@69 115 },
Nenue@66 116 [REWARD_REAGENT] = {
Nenue@66 117
Nenue@66 118 hideNumber = true,
Nenue@66 119 },
Nenue@66 120 }
Nenue@74 121 local BORDER_SELECTED_BOUNTY = {1, 1, 0, 1 }
Nenue@74 122 local BORDER_CRITERIA = {.25, .5, 1, 1}
Nenue@66 123
Nenue@65 124 local LE_ITEM_CLASS_WEAPON, LE_ITEM_CLASS_ARMOR, LE_ITEM_CLASS_GEM, LE_ITEM_GEM_ARTIFACTRELIC, LE_ITEM_CLASS_TRADEGOODS = LE_ITEM_CLASS_WEAPON, LE_ITEM_CLASS_ARMOR, LE_ITEM_CLASS_GEM, LE_ITEM_GEM_ARTIFACTRELIC, LE_ITEM_CLASS_TRADEGOODS
Nenue@65 125
Nenue@65 126
Nenue@40 127 local STYLE_TYPE_PENDING = 768
Nenue@40 128
Nenue@31 129
Nenue@29 130 -- Pin color/display variables
Nenue@40 131 db.TooltipExtras = db.TooltipExtras or {} -- idiot-proofing
Nenue@49 132 db.PinAlpha = 1
Nenue@29 133
Nenue@33 134 local familiars = {
Nenue@40 135 [42159] = 'Nightwatcher Merayl',
Nenue@40 136 [40277] = 'Tiffany Nelson',
Nenue@40 137 [40298] = 'Sir Galveston',
Nenue@40 138 [40282] = 'Grixis Tinypop',
Nenue@40 139 [40278] = 'Robert Craig',
Nenue@40 140 [48195] = 'Aulier',
Nenue@40 141 [41990] = 'Varenne',
Nenue@40 142 [41860] = 'Xorvasc',
Nenue@40 143 [40299] = 'Bodhi Sunwayver',
Nenue@40 144 [42442] = 'Amalia',
Nenue@40 145 [40280] = 'Bredda Tenderhide',
Nenue@40 146 [41687] = 'Odrogg',
Nenue@40 147 [41944] = 'Trapper Jarrun',
Nenue@40 148 [40337] = 'Master Tamer Flummox',
Nenue@40 149 [40279] = 'Durian Strongfruit'
Nenue@40 150 }
Nenue@40 151 local falcosaurs = {
Nenue@40 152 [44895] = {44881, 'Sharptalon Hatchling', 115786},
Nenue@40 153 [44894] = {44882, 'Bloodgazer Hatchling', 115787},
Nenue@40 154 [44893] = {44880, 'Direbeak Hatchling', 115785},
Nenue@40 155 [44892] = {44879, 'Snowfeather Hatchling', 115784},
Nenue@33 156 }
Nenue@33 157 local familiars_id = 9696
Nenue@40 158 for questID, name in pairs(familiars) do
Nenue@40 159 db.TooltipExtras[questID] = {{
Nenue@40 160 achievementID = familiars_id,
Nenue@40 161 name = name
Nenue@40 162 }}
Nenue@40 163 end
Nenue@40 164 for questID, info in pairs(falcosaurs) do
Nenue@40 165 local trackingQuestID, petName, petID = unpack(info)
Nenue@33 166
Nenue@40 167 db.TooltipExtras[questID] = {{
Nenue@40 168 questID = trackingQuestID,
Nenue@40 169 pet = petName,
Nenue@40 170 petID = petID
Nenue@40 171 }}
Nenue@9 172 end
Nenue@7 173
Nenue@95 174
Nenue@95 175 do
Nenue@95 176 local timeStates = {
Nenue@95 177 {maxSeconds = 60,
Nenue@95 178 r=1, g=0.25, b =0, format = function (minutes) return '|cFFFF4400'.. minutes .. 'm' end,
Nenue@95 179 },
Nenue@95 180 {maxSeconds = 240,
Nenue@95 181 r=1, g=.5, b=0, format = function(minutes) return '|cFFFF4400'.. floor(minutes/60) .. 'h' end,
Nenue@95 182 },
Nenue@95 183 {maxSeconds = 1440,
Nenue@95 184 r=1, g=1, b=0, format = function(minutes) return '|cFFFFFF00'.. floor(minutes/60) .. 'h' end,
Nenue@95 185 },
Nenue@95 186 {maxSeconds = 10081,
Nenue@95 187 r=0, g=1, b=0,
Nenue@95 188 }, -- 7 days + 1 minute
Nenue@95 189 }
Nenue@95 190 -- Generates a timeleft string
Nenue@95 191 function QuestPOI:GetTimeInfo(timeLeft, limit)
Nenue@95 192 for index = 1, limit do
Nenue@95 193 local state = timeStates[index]
Nenue@95 194 if timeLeft <= state.maxSeconds then
Nenue@95 195 local text
Nenue@95 196 if state.format then
Nenue@95 197 text = state.format(timeLeft)
Nenue@95 198 end
Nenue@95 199 return text, index, state
Nenue@95 200 end
Nenue@95 201 end
Nenue@95 202 return
Nenue@95 203 end
Nenue@95 204 end
Nenue@95 205
Nenue@95 206
Nenue@40 207 local GetAchievementTooltipExtras = function(info)
Nenue@29 208
Nenue@40 209 local hasInfo
Nenue@40 210 local achievementID = info.achievementID
Nenue@40 211 local _, name, _, completed, _, _, _, _, _, icon = GetAchievementInfo(achievementID)
Nenue@40 212 if not completed then
Nenue@40 213
Nenue@40 214 local numItems = GetAchievementNumCriteria(achievementID)
Nenue@40 215 local numNeeded = 0
Nenue@40 216 local tooltipLines = {}
Nenue@40 217 for i =1, numItems do
Nenue@40 218 local criteriaName, criteriaType, completed, _, _, _, _, subAchievementID = GetAchievementCriteriaInfo(achievementID, i)
Nenue@49 219 --print(GetAchievementCriteriaInfo(achievementID, i))
Nenue@40 220
Nenue@40 221 if not completed then
Nenue@49 222 --print('::', criteriaName, completed, subAchievementID)
Nenue@40 223 if criteriaType == 8 then
Nenue@40 224 local _, _, _, completed, _, _, _, _, _, subIcon = GetAchievementInfo(subAchievementID)
Nenue@49 225 --print(' -', criteriaName, completed, subIcon)
Nenue@40 226 if not completed then
Nenue@40 227 local numCompleted = 0
Nenue@40 228 local numSubItems = GetAchievementNumCriteria(subAchievementID)
Nenue@40 229 local subCriteriaLine
Nenue@40 230 for j = 1, numSubItems do
Nenue@40 231 local subName, _, completed = GetAchievementCriteriaInfo(subAchievementID, j)
Nenue@40 232
Nenue@49 233 --print(' -',subName, completed)
Nenue@40 234 if completed then
Nenue@40 235 numCompleted = numCompleted + 1
Nenue@40 236 else
Nenue@40 237 numNeeded = numNeeded + 1
Nenue@40 238 if subName:match(info.name) then
Nenue@40 239 hasInfo = true
Nenue@40 240 subCriteriaLine = ' |T'..subIcon..':16:16|t ' .. criteriaName
Nenue@40 241 end
Nenue@40 242 end
Nenue@40 243
Nenue@40 244 end
Nenue@40 245 if subCriteriaLine then
Nenue@40 246 tinsert(tooltipLines, subCriteriaLine .. ' ('..numCompleted..'/'..numSubItems..')')
Nenue@40 247 end
Nenue@40 248 end
Nenue@40 249 elseif criteriaName:match(info.name) and (not completed) then
Nenue@40 250 numNeeded = numNeeded + 1
Nenue@40 251 tinsert(tooltipLines, criteriaName)
Nenue@40 252 end
Nenue@40 253 end
Nenue@40 254 end
Nenue@49 255 if hasInfo then
Nenue@49 256 WorldMapTooltip:AddLine(" ")
Nenue@49 257 WorldMapTooltip:AddLine("Achievements:")
Nenue@49 258 WorldMapTooltip:AddLine(' |T'..icon..':20:20|t '..name)
Nenue@40 259 for i, line in ipairs(tooltipLines) do
Nenue@40 260 WorldMapTooltip:AddLine(line)
Nenue@40 261 end
Nenue@40 262 end
Nenue@40 263 end
Nenue@40 264 return hasInfo
Nenue@40 265 end
Nenue@40 266
Nenue@40 267 local GetQuestTooltipExtras = function(info)
Nenue@40 268 local questID = info.questID
Nenue@40 269 local hasInfo
Nenue@40 270
Nenue@40 271 if info.pet then
Nenue@40 272 local index, guid = C_PetJournal.FindPetIDByName(info.pet)
Nenue@40 273 if not index then
Nenue@40 274 hasInfo = true
Nenue@40 275 WorldMapTooltip:AddLine('Pets:')
Nenue@40 276 WorldMapTooltip:AddLine(' - ' .. info.petName)
Nenue@40 277
Nenue@40 278 if not IsQuestFlaggedCompleted(questID) then
Nenue@40 279 WorldMapTooltip:AddLine(' Required Quest Flags', 1, 1, 0)
Nenue@40 280 else
Nenue@40 281 WorldMapTooltip:AddLine(' Quest Flags Complete!', 0, 1, 0)
Nenue@40 282 end
Nenue@40 283
Nenue@40 284 end
Nenue@29 285 end
Nenue@29 286
Nenue@29 287 end
Nenue@29 288
Nenue@93 289 function QuestPOI:OnLoad()
Nenue@93 290 --qprint('|cFF00FF88'..self:GetName()..':OnLoad()|r',db.Config)
Nenue@93 291 self.debugTimer = 4
Nenue@93 292 self.title = '|cFF0088FF' .. RETRIEVING_DATA..'|r'
Nenue@93 293 self.count = self.Overlay.count
Nenue@93 294 self.timeLabel = self.Overlay.timeLabel
Nenue@93 295 self.Description = self.Overlay.Description
Nenue@93 296 self.updateRate = PIN_REQUEST_DELAY
Nenue@93 297 self.itemName = '|cFF0088FF' .. RETRIEVING_DATA..'|r'
Nenue@93 298
Nenue@93 299
Nenue@93 300 self.IconBackdrop:SetVertexColor(0,0,0,1)
Nenue@93 301 self.Overlay:SetPoint('TOPLEFT', self, 'TOPLEFT', 0, 4)
Nenue@93 302 self.Overlay:SetPoint('BOTTOMRIGHT', self, 'BOTTOMRIGHT', 0, -4)
Nenue@93 303 end
Nenue@93 304
Nenue@93 305 function QuestPOI:OnShow ()
Nenue@93 306 if self.isStale then
Nenue@93 307 --print('|cFF00FF00refresh on show')
Nenue@93 308 self:Refresh('POI_ONSHOW_STALE')
Nenue@93 309 end
Nenue@95 310
Nenue@95 311 if self.questID and IsQuestComplete(self.questID) then
Nenue@95 312 self:Release()
Nenue@95 313 return
Nenue@95 314 end
Nenue@95 315
Nenue@93 316 self:RegisterEvent('QUEST_TURNED_IN')
Nenue@93 317 self:RegisterEvent('QUEST_LOG_UPDATE')
Nenue@93 318 self:HideOrShowFrames(true)
Nenue@93 319 end
Nenue@93 320
Nenue@93 321 function QuestPOI:OnEvent(event, questID)
Nenue@93 322 if (self.questID == questID) and IsQuestComplete(self.questID) then
Nenue@93 323 db.log(self.questID .. " Marked completed.")
Nenue@93 324 self:Release()
Nenue@93 325 end
Nenue@93 326 end
Nenue@93 327
Nenue@93 328 function QuestPOI:OnHide()
Nenue@93 329 --DEFAULT_CHAT_FRAME:AddMessage('|cFFFFFF00'..self:GetName()..'|r:OnHide()')
Nenue@93 330 self:HideOrShowFrames(false)
Nenue@93 331 -- reset flags
Nenue@93 332 self:SetAlpha(db.PinAlpha)
Nenue@93 333 self.isAnimating = nil
Nenue@93 334 if db.Config.DebugEnabled then
Nenue@93 335 db.log(tostring(self.questID) .. ' ' .. tostring(self.title) .. "\n" .. tostring(REWARD_TYPE_NAMES[self.rewardType]) .. ' ' .. tostring(self.itemName) .. ' ' .. tostring(self.itemNumber) .. "\n|cFFFF4400" .. (self.hideReason or 'NO_MESSAGE') .. "|r\n|cFF00FFFF" .. debugstack(2,3,0) .. '|r')
Nenue@93 336 end
Nenue@93 337 self.hideReason = nil
Nenue@93 338 end
Nenue@40 339
Nenue@40 340 function QuestPOI:OnEnter()
Nenue@57 341 if self.filtered and (self.questID ~= GetSuperTrackedQuestID()) then
Nenue@49 342 return
Nenue@7 343 end
Nenue@57 344 WorldMap_HijackTooltip(self.owningFrame);
Nenue@56 345 self:SetFrameLevel(pinBaseIndex+100)
Nenue@78 346 self.Overlay:SetFrameLevel(overlayBaseIndex+100)
Nenue@56 347
Nenue@56 348 if previousHighlight then
Nenue@56 349 previousHighlight:SetFrameLevel(pinBaseIndex+previousHighlight:GetID())
Nenue@56 350 previousHighlight.Overlay:SetFrameLevel(overlayBaseIndex+previousHighlight:GetID())
Nenue@56 351 end
Nenue@56 352
Nenue@56 353 previousHighlight = self
Nenue@56 354
Nenue@56 355
Nenue@40 356 WorldMapTooltip:SetOwner(self, "ANCHOR_RIGHT");
Nenue@49 357 --print('doing tooltip stuff')
Nenue@40 358
Nenue@40 359 -- Can't add stuff after, so most of the blizzard tooltip hook is simply copied over
Nenue@40 360 local questID = self.questID
Nenue@40 361 local color = WORLD_QUEST_QUALITY_COLORS[self.rarity] or NORMAL_FONT_COLOR;
Nenue@40 362
Nenue@40 363
Nenue@40 364 WorldMapTooltip:SetText(self.title, color.r, color.g, color.b);
Nenue@40 365 QuestUtils_AddQuestTypeToTooltip(WorldMapTooltip, questID, NORMAL_FONT_COLOR);
Nenue@40 366
Nenue@40 367 if ( self.factionID ) then
Nenue@40 368 local factionName = GetFactionInfoByID(self.factionID);
Nenue@40 369 if ( factionName ) then
Nenue@40 370 if (self.capped) then
Nenue@40 371 WorldMapTooltip:AddLine(factionName, GRAY_FONT_COLOR:GetRGB());
Nenue@40 372 else
Nenue@40 373 WorldMapTooltip:AddLine(factionName);
Nenue@40 374 end
Nenue@40 375 end
Nenue@40 376 end
Nenue@40 377
Nenue@40 378 if self.worldQuest then
Nenue@40 379 WorldMap_AddQuestTimeToTooltip(questID);
Nenue@40 380 end
Nenue@40 381
Nenue@40 382
Nenue@40 383 for objectiveIndex = 1, self.numObjectives do
Nenue@40 384 local objectiveText, objectiveType, finished = GetQuestObjectiveInfo(questID, objectiveIndex, false);
Nenue@40 385 if ( objectiveText and #objectiveText > 0 ) then
Nenue@40 386 local color = finished and GRAY_FONT_COLOR or HIGHLIGHT_FONT_COLOR;
Nenue@40 387 WorldMapTooltip:AddLine(QUEST_DASH .. objectiveText, color.r, color.g, color.b, true);
Nenue@40 388 end
Nenue@40 389 end
Nenue@40 390
Nenue@40 391 local percent = C_TaskQuest.GetQuestProgressBarInfo(self.questID);
Nenue@40 392 if ( percent ) then
Nenue@40 393 GameTooltip_InsertFrame(WorldMapTooltip, WorldMapTaskTooltipStatusBar);
Nenue@40 394 WorldMapTaskTooltipStatusBar.Bar:SetValue(percent);
Nenue@40 395 WorldMapTaskTooltipStatusBar.Bar.Label:SetFormattedText(PERCENTAGE_STRING, percent);
Nenue@40 396 end
Nenue@40 397
Nenue@40 398 if db.TooltipExtras[self.questID] then
Nenue@40 399 for index, info in pairs(db.TooltipExtras[questID]) do
Nenue@40 400 if info.achievementID then
Nenue@40 401 GetAchievementTooltipExtras(info)
Nenue@40 402 end
Nenue@40 403 if info.questID then
Nenue@40 404 GetQuestTooltipExtras(info)
Nenue@40 405 end
Nenue@40 406 end
Nenue@40 407 end
Nenue@65 408 GameTooltip_AddQuestRewardsToTooltip(WorldMapTooltip, questID)
Nenue@40 409
Nenue@40 410 WorldMapTooltip:Show()
Nenue@40 411 --WorldMapTooltip.recalculatePadding = true;
Nenue@40 412 --print(WorldMapTooltip:GetParent())
Nenue@40 413 --print(WorldMapTooltip:IsVisible())
Nenue@7 414 end
Nenue@93 415
Nenue@93 416 function QuestPOI:OnMouseDown(button)
Nenue@93 417 if button == 'RightButton' then
Nenue@93 418 SetSuperTrackedQuestID(nil)
Nenue@93 419 else
Nenue@93 420 TaskPOI_OnClick(self, button)
Nenue@93 421 end
Nenue@93 422 end
Nenue@93 423
Nenue@40 424 function QuestPOI:OnLeave()
Nenue@57 425 if self.filtered and (self.questID ~= GetSuperTrackedQuestID()) then
Nenue@57 426 return
Nenue@57 427 end
Nenue@35 428 WorldMap_RestoreTooltip()
Nenue@40 429 WorldMapTooltip:Hide();
Nenue@7 430 end
Nenue@7 431
Nenue@93 432 local updateTime, markTime
Nenue@93 433 function QuestPOI:OnUpdate (sinceLast)
Nenue@93 434 -- control update check intervals
Nenue@93 435
Nenue@95 436 if self.toAlpha then
Nenue@95 437 if not self.alphaStart then
Nenue@95 438 self.alphaStart = GetTime()
Nenue@95 439 end
Nenue@93 440
Nenue@93 441
Nenue@95 442 local alpha = self.icon:GetAlpha()
Nenue@95 443 local alphaMod = ((GetTime()-self.alphaStart) *FADE_TIMING_MULTIPLIER)
Nenue@95 444 if self:GetID() == 1 then
Nenue@95 445 print(alpha, self.toAlpha, sinceLast, alphaMod)
Nenue@95 446 end
Nenue@95 447 if alpha > self.toAlpha then
Nenue@95 448 alpha = alpha - (sinceLast*FADE_TIMING_MULTIPLIER)
Nenue@95 449
Nenue@95 450 if (alpha <= self.toAlpha) then
Nenue@95 451 alpha = self.toAlpha
Nenue@95 452 self.toAlpha = nil
Nenue@95 453 elseif (alpha <= 0) then
Nenue@95 454 alpha = 0
Nenue@95 455 self.toAlpha = nil
Nenue@95 456 end
Nenue@95 457 elseif alpha < self.toAlpha then
Nenue@95 458 alpha = alpha + alphaMod
Nenue@95 459
Nenue@95 460 if (alpha >= self.toAlpha) then
Nenue@95 461 alpha = self.toAlpha
Nenue@95 462 self.toAlpha = nil
Nenue@95 463 elseif (alpha >= 1) then
Nenue@95 464 alpha = 1
Nenue@95 465 self.toAlpha = nil
Nenue@95 466 end
Nenue@95 467
Nenue@95 468 else
Nenue@95 469 self.toAlpha = nil
Nenue@95 470 end
Nenue@95 471
Nenue@95 472 if not self.toAlpha then
Nenue@95 473 self.alphaStart = nil
Nenue@95 474 else
Nenue@95 475 self.alphaStart = GetTime()
Nenue@93 476 end
Nenue@93 477
Nenue@93 478 self.icon:SetAlpha(alpha)
Nenue@93 479 self.RewardBorder:SetAlpha(alpha)
Nenue@93 480 end
Nenue@93 481
Nenue@93 482 self.throttle = (self.throttle or self.updateRate) + sinceLast
Nenue@93 483 if self.throttle >= self.updateRate then
Nenue@93 484 -- factor overtime into the throttle timer
Nenue@93 485 self.throttle = self.throttle - self.updateRate
Nenue@93 486 else
Nenue@93 487 return
Nenue@93 488 end
Nenue@93 489 --@debug@
Nenue@93 490 if DATA_DEBUG then
Nenue@93 491 self.debugTimer = self.debugTimer - sinceLast
Nenue@93 492 if self.debugTimer >= 0 then
Nenue@93 493 print(self.debugTimer)
Nenue@93 494 return
Nenue@93 495 end
Nenue@93 496 end
Nenue@93 497 --@end-debug@
Nenue@93 498
Nenue@93 499 -- query for reward data if it wasn't found in the original scan
Nenue@93 500
Nenue@93 501 if not self.dataLoaded then
Nenue@93 502 local dataLoaded = self:GetData()
Nenue@93 503 if dataLoaded and not tContains(db.UpdatedPins, self) then
Nenue@93 504 -- self.PendingFade:Stop()
Nenue@93 505 -- scale info from the parent module is needed, so deal with it there
Nenue@93 506 print('|cFF00FF88 queueing for update')
Nenue@93 507 self.isNew = true
Nenue@93 508 tinsert(db.UpdatedPins, self)
Nenue@93 509 else
Nenue@93 510
Nenue@93 511 --print('|cFFFF4400OnUpdate(|r'..self:GetID()..'|cFFFF4400)|r poll failed')
Nenue@93 512 end
Nenue@93 513 return
Nenue@93 514 end
Nenue@93 515
Nenue@93 516 if self.maxAlertLevel then
Nenue@93 517 self:UpdateStatus()
Nenue@93 518 end
Nenue@93 519 end
Nenue@93 520
Nenue@93 521
Nenue@93 522 function QuestPOI:StartFading()
Nenue@95 523 if not self.toAlpha then
Nenue@95 524 print('setting toAlpha')
Nenue@95 525 self.toAlpha = 1
Nenue@93 526 self.icon:SetAlpha(0)
Nenue@93 527 self.RewardBorder:SetAlpha(0)
Nenue@93 528 end
Nenue@93 529 end
Nenue@93 530
Nenue@40 531 -- attempt to pull pin data
Nenue@40 532 function QuestPOI:GetData ()
Nenue@75 533 --dprint('|cFF00FF88'..self:GetID()..':GetData()|r')
Nenue@40 534 local questID = self.questID
Nenue@40 535 if not questID then
Nenue@75 536 --dprint('|cFFFF4400bad pin|r', self:GetName())
Nenue@40 537 return nil
Nenue@29 538 end
Nenue@29 539
Nenue@40 540 local questTitle, factionID, capped = TQ_GetQuestInfoByQuestID(questID)
Nenue@40 541 -- if the title is nil, then wait and try later
Nenue@40 542 if not questTitle then
Nenue@75 543 --dprint('|cFFBB8844dataLoaded|r = false|cFF00FFFF', self.questId)
Nenue@65 544 return false
Nenue@40 545 else
Nenue@40 546 self.title, self.factionID, self.capped = questTitle, factionID, capped
Nenue@93 547 --print(questTitle, factionID, capped)
Nenue@40 548 -- set tag details
Nenue@40 549 local worldQuestType
Nenue@40 550 self.tagID, self.tagName, worldQuestType, self.rarity, self.isElite, self.tradeskillLineIndex = GetQuestTagInfo(questID);
Nenue@40 551 local tagAtlas
Nenue@40 552 if worldQuestType == LE_QUEST_TAG_TYPE_PET_BATTLE then
Nenue@40 553 tagAtlas = "worldquest-icon-petbattle"
Nenue@40 554 elseif worldQuestType == LE_QUEST_TAG_TYPE_PVP then
Nenue@40 555 tagAtlas = "worldquest-icon-pvp-ffa"
Nenue@40 556 elseif worldQuestType == LE_QUEST_TAG_TYPE_PROFESSION then
Nenue@40 557 self.isKnownProfession = nil
Nenue@40 558 local id = self.tradeskillLineIndex and select(7, GetProfessionInfo(self.tradeskillLineIndex))
Nenue@40 559 if id then
Nenue@40 560 self.isKnownProfession = true
Nenue@75 561 --qprint('profession' , self.title, id)
Nenue@40 562 tagAtlas = WORLD_QUEST_ICONS_BY_PROFESSION[id]
Nenue@40 563 end
Nenue@40 564 elseif worldQuestType == LE_QUEST_TAG_TYPE_DUNGEON then
Nenue@40 565 tagAtlas = "worldquest-icon-dungeon"
Nenue@40 566 end
Nenue@40 567 self.worldQuestType = worldQuestType
Nenue@40 568 self.tagAtlas = tagAtlas
Nenue@29 569
Nenue@69 570 local dataLoaded, rewardType, itemName, itemTexture, itemNumber, quality, xpType, xpName, xpIcon, xpCount = self:UpdateRewards()
Nenue@75 571 --dprint('|cFFBB8844 dataLoaded|r =', dataLoaded, rewardType, itemName, itemTexture, itemNumber, quality)
Nenue@65 572 if dataLoaded then
Nenue@65 573 self.rewardType = rewardType
Nenue@65 574 self.itemName = itemName
Nenue@65 575 self.itemTexture = itemTexture
Nenue@65 576 self.itemNumber = itemNumber
Nenue@65 577 self.itemQuality = quality
Nenue@49 578 self.dataLoaded = true
Nenue@48 579 self.isStale = true
Nenue@69 580 self.xpType, self.xpName, self.xpIcon, self.xpCount = xpType, xpName, xpIcon, xpCount
Nenue@95 581 WorldPlan.dataFlush = true
Nenue@40 582 end
Nenue@40 583 end
Nenue@40 584
Nenue@40 585
Nenue@65 586 return self.dataLoaded
Nenue@40 587 end
Nenue@40 588
Nenue@69 589 local ID_RESOURCES = 1220
Nenue@69 590 local ID_LEGIONFALL = 1342
Nenue@69 591
Nenue@65 592 --- Returns true if data has changed (either from loading in or qualifications changed)
Nenue@65 593 function QuestPOI:UpdateRewards()
Nenue@40 594 local questID = self.questID
Nenue@65 595 if not HaveQuestRewardData(questID) then
Nenue@65 596 C_TaskQuest.RequestPreloadRewardData(questID);
Nenue@65 597 return false;
Nenue@29 598 else
Nenue@65 599 local rewardMoney, rewardAP, rewardHonor
Nenue@65 600 local rewardItems, rewardCurrency = {}, {}
Nenue@65 601 local rewardIcon, rewardName, rewardCount, rewardStyle, rewardType, itemID, quantity, quality
Nenue@65 602 local xpIcon, xpName, xpCount, xpType
Nenue@69 603 local foundPrimary
Nenue@29 604
Nenue@65 605 if (GetNumQuestLogRewardCurrencies(questID) > 0 or GetNumQuestLogRewards(questID) > 0 or GetQuestLogRewardMoney(questID) > 0 or GetQuestLogRewardArtifactXP(questID) > 0 or GetQuestLogRewardHonor(questID)) then
Nenue@65 606 local money = GetQuestLogRewardMoney(questID)
Nenue@65 607 if money > 0 then
Nenue@65 608 rewardMoney = money
Nenue@65 609 rewardIcon = ICON_MONEY
Nenue@65 610 rewardName = GetMoneyString(money)
Nenue@65 611 rewardCount = floor(money/10000)
Nenue@65 612 rewardType = REWARD_CASH
Nenue@65 613 end
Nenue@65 614
Nenue@65 615 local artifactXP = GetQuestLogRewardArtifactXP(questID);
Nenue@65 616 if artifactXP > 0 then
Nenue@65 617 rewardAP = artifactXP
Nenue@65 618 rewardIcon = "Interface\\ICONS\\inv_7xp_inscription_talenttome01"
Nenue@65 619 rewardCount = artifactXP
Nenue@65 620 rewardType = REWARD_ARTIFACT_POWER
Nenue@75 621 --dprint(' artifactXP', artifactXP)
Nenue@69 622 foundPrimary = true
Nenue@65 623 end
Nenue@65 624
Nenue@65 625 local numQuestCurrencies = GetNumQuestLogRewardCurrencies(questID);
Nenue@65 626 for i = 1, numQuestCurrencies do
Nenue@69 627 local name, texture, numItems, currencyID = GetQuestLogRewardCurrencyInfo(i, questID);
Nenue@65 628 local text = BONUS_OBJECTIVE_REWARD_WITH_COUNT_FORMAT:format(texture, numItems, name);
Nenue@65 629 tinsert(rewardCurrency, {
Nenue@65 630 name = name,
Nenue@65 631 texture = texture,
Nenue@65 632 numItems = numItems,
Nenue@65 633 text = text
Nenue@65 634 })
Nenue@69 635
Nenue@75 636 --dprint(' currency', i, currencyID, name, " |T"..tostring(texture)..":12:12|t")
Nenue@69 637 if currencyID == ID_RESOURCES then
Nenue@69 638 rewardIcon = texture
Nenue@69 639 rewardCount = numItems
Nenue@69 640 rewardName = name
Nenue@69 641 rewardType = REWARD_CURRENCY
Nenue@69 642 foundPrimary = true
Nenue@69 643 elseif currencyID == ID_LEGIONFALL then
Nenue@69 644 xpIcon = texture
Nenue@69 645 xpCount = numItems
Nenue@69 646 xpName = name
Nenue@69 647 xpType = REWARD_CURRENCY
Nenue@69 648 end
Nenue@89 649 end
Nenue@69 650
Nenue@65 651 local honorAmount = GetQuestLogRewardHonor(questID);
Nenue@65 652 if honorAmount > 0 then
Nenue@89 653 xpIcon = "Interface\\ICONS\\Achievement_LegionPVPTier4"
Nenue@89 654 xpCount = honorAmount
Nenue@89 655 xpName = HONOR
Nenue@89 656 xpType = HONOR_CURRENCY
Nenue@88 657 -- let items override
Nenue@65 658 end
Nenue@65 659
Nenue@65 660 local numQuestRewards = GetNumQuestLogRewards(questID);
Nenue@65 661 if numQuestRewards > 0 then
Nenue@65 662 for i = 1, numQuestRewards do
Nenue@65 663 local name, texture, numItems, quality, isUsable, itemID = GetQuestLogRewardInfo(i, questID)
Nenue@65 664
Nenue@65 665 if itemID then
Nenue@65 666 local itemName, itemLink, itemRarity, itemLevel, itemMinLevel, itemType, itemSubType, itemStackCount, itemEquipLoc, itemTexture, sellPrice, classID, subclassID = GetItemInfo(itemID);
Nenue@65 667 if ( classID == LE_ITEM_CLASS_WEAPON or classID == LE_ITEM_CLASS_ARMOR or (classID == LE_ITEM_CLASS_GEM and subclassID == LE_ITEM_GEM_ARTIFACTRELIC) ) then
Nenue@65 668 rewardType = REWARD_GEAR
Nenue@65 669 rewardIcon = texture
Nenue@65 670 rewardName = name
Nenue@65 671 rewardCount = numItems
Nenue@65 672 foundPrimary = true
Nenue@65 673 elseif IsArtifactPowerItem(itemID) then
Nenue@65 674 rewardType = REWARD_ARTIFACT_POWER
Nenue@65 675 rewardIcon = texture
Nenue@65 676 rewardName = name
Nenue@93 677 rewardCount = self:UpdateArtifactPower(itemLink)
Nenue@65 678 foundPrimary = true
Nenue@75 679 --dprint('is an AP token')
Nenue@65 680 elseif classID == LE_ITEM_CLASS_TRADEGOODS then
Nenue@65 681 rewardType = REWARD_REAGENT
Nenue@65 682 rewardIcon = texture
Nenue@65 683 rewardName = name
Nenue@65 684 rewardCount = numItems
Nenue@65 685 foundPrimary = true
Nenue@65 686 end
Nenue@75 687 --dprint(' reward', i, name, " |T"..tostring(texture)..":12:12|t", quality, isUsable, itemID)
Nenue@65 688 tinsert(rewardItems, {
Nenue@65 689 name = name,
Nenue@65 690 texture = texture,
Nenue@65 691 numItems = numItems,
Nenue@65 692 quality = quality,
Nenue@65 693 isUsable = isUsable
Nenue@65 694 })
Nenue@65 695 if not foundPrimary then
Nenue@75 696 --print(' -updating primary')
Nenue@82 697 rewardType = REWARD_REAGENT
Nenue@65 698
Nenue@65 699 rewardIcon = texture
Nenue@65 700 rewardName = name
Nenue@65 701 rewardCount = numItems
Nenue@65 702 end
Nenue@65 703
Nenue@65 704 end
Nenue@65 705
Nenue@65 706 end
Nenue@65 707 end
Nenue@65 708
Nenue@75 709 --dprint(' '..self.questID..':|cFFFFFF00UpdateRewards():', numQuestRewards, rewardType)
Nenue@75 710 --dprint(' ', tostring(self.title), " |T"..tostring(self.itemTexture)..":12:12|t", tostring(self.itemName))
Nenue@65 711
Nenue@89 712 if rewardType and ((self.itemNumber ~= rewardCount) or (self.rewardType ~= rewardType) or (self.itemName ~= rewardName) or (self.itemTexture ~= rewardIcon)) then
Nenue@67 713 if DATA_DEBUG and (self.debugTimer <= 0) then
Nenue@67 714 return false
Nenue@67 715 end
Nenue@67 716
Nenue@89 717 return true, rewardType, rewardName, rewardIcon, rewardCount, quality, xpType, xpName, xpIcon, xpCount
Nenue@67 718
Nenue@65 719 else
Nenue@65 720 return false
Nenue@65 721 end
Nenue@65 722 end
Nenue@65 723
Nenue@65 724
Nenue@65 725
Nenue@65 726 --[[ set reward category
Nenue@29 727 local numRewards = GetNumQuestLogRewards(questID)
Nenue@29 728 local numCurrency = GetNumQuestLogRewardCurrencies(questID)
Nenue@29 729 local money = GetQuestLogRewardMoney(questID)
Nenue@29 730 if numRewards >= 1 then
Nenue@40 731 rewardType, rewardIcon, rewardCount, rewardName, itemID, quality = WorldPlanQuests:GetRewardHeader(questID)
Nenue@29 732 elseif numCurrency >= 1 then
Nenue@29 733 rewardName, rewardIcon, rewardCount = GetQuestLogRewardCurrencyInfo(1, questID)
Nenue@29 734 rewardType = REWARD_CURRENCY
Nenue@29 735 elseif money >= 1 then
Nenue@29 736 rewardName = GetMoneyString(money)
Nenue@29 737 end
Nenue@65 738 --]]
Nenue@29 739
Nenue@40 740 end
Nenue@7 741 end
Nenue@7 742
Nenue@34 743
Nenue@93 744 function QuestPOI:UpdateArtifactPower(rewardLink)
Nenue@93 745 if not (rewardLink or self.rewardLink) then
Nenue@75 746 return
Nenue@75 747 end
Nenue@75 748
Nenue@93 749 self.rewardLink = rewardLink or self.rewardLink
Nenue@49 750
Nenue@93 751 local rewardCount
Nenue@93 752 WorldPlanTooltip:SetOwner(self, 'ANCHOR_NONE')
Nenue@93 753 WorldPlanTooltip:SetHyperlink(rewardLink or self.rewardLink)
Nenue@93 754 for i = 1, WorldPlanTooltip:NumLines() do
Nenue@93 755 local line = _G['WorldPlanTooltipTextLeft' .. i]
Nenue@93 756 local text = line and line:GetText()
Nenue@95 757 local multiplier = (text:match('million') and 1000000) or 1
Nenue@95 758 if text then
Nenue@95 759 text = text:gsub(',', '')
Nenue@95 760 local ap = text:match('([%d]+) '..ARTIFACT_POWER)
Nenue@95 761 if not ap then
Nenue@95 762 ap = text:match('([%d%.]+) million '..ARTIFACT_POWER)
Nenue@95 763 if ap then
Nenue@95 764 ap = tonumber(ap) * 1000000
Nenue@95 765 end
Nenue@95 766 end
Nenue@95 767 if ap then
Nenue@95 768 rewardCount = tonumber(ap)
Nenue@95 769 end
Nenue@69 770 end
Nenue@48 771 end
Nenue@93 772 return rewardCount
Nenue@27 773 end
Nenue@27 774
Nenue@67 775 -- Applies position and sizing parameters to the pin data
Nenue@66 776 function QuestPOI:SetAnchor(owner, dX, dY, mapWidth, mapHeight, scaleFactor)
Nenue@75 777 --dprint(self:GetName()..':SetAnchor()', owner, dX, dY, scaleFactor, self.filtered, self.used)
Nick@62 778 if not self.used then
Nenue@69 779 self.hideReason = 'SetAnchor() on an unused frame.'
Nenue@93 780 self:HideOrShowFrames(false)
Nick@62 781 return
Nick@62 782 end
Nick@62 783
Nenue@75 784
Nenue@67 785 if owner then
Nenue@67 786 self:SetParent(owner)
Nenue@67 787 self.Overlay:SetParent(owner)
Nenue@78 788 self:SetFrameStrata('HIGH')
Nenue@78 789 self:SetFrameLevel(pinBaseIndex + self:GetID())
Nenue@78 790 self.Overlay:SetFrameStrata('HIGH')
Nenue@78 791 self.Overlay:SetFrameLevel(overlayBaseIndex + self:GetID())
Nenue@74 792 self.isStale = true
Nenue@67 793 else
Nenue@67 794 owner = self:GetParent()
Nenue@67 795 end
Nenue@67 796
Nenue@74 797
Nenue@74 798 if scaleFactor then
Nenue@82 799 print('scaleFactor')
Nenue@67 800 self:SetScale(scaleFactor)
Nenue@67 801 self.Overlay:SetScale(scaleFactor)
Nenue@67 802 self.scaleFactor = scaleFactor
Nenue@67 803 end
Nenue@67 804
Nenue@74 805 mapWidth = mapWidth or owner:GetWidth()
Nenue@74 806 mapHeight = mapHeight or owner:GetHeight()
Nenue@74 807 dX = dX or self.x
Nenue@74 808 dY = dY or self.y
Nenue@74 809 --print(owner:GetName() or tostring(owner), self:GetName(), owner:GetScale(), scaleFactor)
Nenue@74 810 if (self.x ~= dX) or (self.y ~= dY) or scaleFactor then
Nenue@67 811
Nenue@74 812 self.x = dX
Nenue@74 813 self.y = dY
Nenue@74 814 local pX = (dX * mapWidth) * (1 / scaleFactor)
Nenue@74 815 local pY = (-dY * mapHeight) * (1 / scaleFactor)
Nenue@74 816 --print('to', pX, pY, self:GetScale())
Nenue@74 817 self:ClearAllPoints()
Nenue@74 818 self:SetPoint('CENTER', owner, 'TOPLEFT', pX, pY)
Nenue@53 819 end
Nick@62 820
Nick@62 821 end
Nick@62 822
Nenue@78 823 -- Non-hieriarchical display states, checked separately from used/filtered states
Nenue@74 824 function QuestPOI:GetCriteriaState()
Nenue@74 825 local isCriteria, isBounty, isSpellTarget
Nenue@93 826
Nenue@93 827
Nenue@93 828
Nenue@93 829 for index, bounty in pairs(db.Bounties) do
Nenue@93 830 if (not IsQuestComplete(bounty.questID)) and IsQuestCriteriaForBounty(self.questID, bounty.questID) then
Nenue@93 831 isCriteria = true
Nenue@93 832 if db.selectedBounty == bounty then
Nenue@93 833 isBounty = true
Nenue@74 834 end
Nenue@93 835 --dprint('|cFF00FF88Criteria:|r', self.questID, bounty.questID, isCriteria, isBounty)
Nenue@74 836 end
Nenue@74 837 end
Nenue@74 838 isSpellTarget = IsQuestIDValidSpellTarget(self.questID)
Nenue@74 839
Nenue@74 840 if (self.isBounty ~= isBounty) or (self.isCriteria ~= isCriteria) or (self.isSpellTarget ~= isSpellTarget) then
Nenue@75 841 --wqprint('|cFF00FF00criteria state changed')
Nenue@74 842 self.isBounty = isBounty
Nenue@74 843 self.isCriteria = isCriteria
Nenue@74 844 self.isSpellTarget = isSpellTarget
Nenue@75 845 self.isStale = true
Nenue@74 846 return true
Nenue@74 847 end
Nenue@74 848 end
Nenue@74 849
Nenue@35 850 local cvar_check = {
Nenue@35 851 [REWARD_CASH] = 'worldQuestFilterGold',
Nenue@35 852 [REWARD_ARTIFACT_POWER] = 'worldQuestFilterArtifactPower',
Nenue@35 853 [REWARD_CURRENCY] = 'worldQuestFilterOrderResources',
Nenue@35 854 [REWARD_REAGENT]= 'worldQuestFilterProfessionMaterials',
Nenue@35 855 [REWARD_GEAR] = 'worldQuestFilterEquipment',
Nenue@35 856 }
Nenue@8 857
Nick@64 858
Nenue@57 859 function QuestPOI:CheckFilterRules ()
Nenue@36 860 local print = qprint
Nenue@33 861 local qType = self.worldQuestType
Nenue@78 862 if not TQ_IsActive(self.questID) then
Nenue@78 863 self.hideReason = 'Filter check ended because quest is inactive.'
Nenue@78 864 self.used = nil
Nenue@78 865 self:SetShown(false)
Nenue@78 866 return
Nenue@78 867 end
Nenue@69 868
Nenue@69 869 if qType == LE_QUEST_TAG_TYPE_PROFESSION then
Nenue@57 870 if not(self.isKnownProfession or db.Config.ShowAllProfessionQuests) then
Nenue@78 871 self.hideReason = 'Failed profession check.'
Nenue@78 872 self.used = nil
Nenue@78 873 self:SetShown(false)
Nenue@78 874 return
Nenue@36 875 end
Nenue@36 876 end
Nenue@57 877
Nenue@78 878 local filtered
Nenue@78 879 for filterKey, value in pairs(db.UsedFilters) do
Nenue@78 880 if self[filterKey] ~= value then
Nenue@78 881 if not self.filtered then
Nenue@78 882 print('|cFFFF4400filtering', filterKey, value, '~=', self[filterKey], self.title)
Nenue@57 883 end
Nenue@78 884 filtered = true
Nenue@57 885 end
Nenue@78 886 end
Nenue@78 887 if self.rewardType and cvar_check[self.rewardType] then
Nenue@78 888 if not GetCVarBool(cvar_check[self.rewardType]) then
Nenue@78 889 filtered = true
Nenue@57 890 end
Nenue@57 891 end
Nenue@78 892
Nenue@78 893 print(' '..self.questID..':|cFFFFFF00CheckFilterRules()|r', filtered, self.title)
Nenue@78 894 if self.filtered ~= filtered then
Nenue@82 895 wqprint('|cFF00FF00filter changed')
Nenue@78 896 self.isStale = true
Nenue@69 897 end
Nenue@78 898
Nenue@82 899 self.filtered = filtered
Nenue@78 900 self.used = true
Nenue@78 901 self:SetShown(true)
Nenue@33 902 end
Nenue@33 903
Nenue@93 904 function QuestPOI:Refresh (event)
Nenue@93 905 print('|cFF00FF88Refresh(|r'..self:GetID()..'|cFF00FF88)|r', event, self.title)
Nenue@33 906
Nenue@93 907
Nenue@93 908 local style = DEFAULT_STYLE
Nenue@93 909 if self.filtered then
Nenue@93 910 print('choose minimized')
Nenue@93 911 style = MINIMIZED_STYLE
Nenue@93 912 elseif self.dataLoaded then
Nenue@93 913 print('choose reward type')
Nenue@93 914 style = REWARD_TYPE_STYLES[self.rewardType]
Nenue@93 915 else
Nenue@93 916 print('choose default')
Nenue@93 917 end
Nenue@93 918
Nenue@93 919 local currentWidth = style.iconWidth or DEFAULT_STYLE.iconWidth
Nenue@93 920
Nenue@93 921
Nenue@93 922
Nenue@93 923 local borderWidth = style.borderWidth or DEFAULT_STYLE.borderWidth
Nenue@93 924 local highlightWidth = style.highlightWidth or DEFAULT_STYLE.highlightWidth
Nenue@93 925 local tagSize = style.TagSize or DEFAULT_STYLE.TagSize
Nenue@93 926 local hideIcon = style.hideIcon or DEFAULT_STYLE.hideIcon
Nenue@93 927 local borderColor = style.border or DEFAULT_STYLE.border
Nenue@93 928 local textColor = style.textColor or DEFAULT_STYLE.textColor
Nenue@93 929 local questID = self.questID
Nenue@36 930 local iconBorder = self.RewardBorder
Nenue@36 931 local trackingBorder = self.HighlightBorder
Nenue@93 932 local icon = self.icon
Nenue@93 933 local count = self.count
Nenue@93 934 local hideNumbers = style.hideNumber or DEFAULT_STYLE.hideNumber
Nenue@33 935
Nenue@33 936
Nenue@93 937 local tagIcon = self.tagIcon
Nenue@93 938 self.maxAlertLevel = style.maxAlertLevel or DEFAULT_STYLE.maxAlertLevel
Nenue@47 939
Nenue@93 940 if self.dataLoaded then
Nenue@93 941 if self.isNew then
Nenue@95 942 print('new pin, has data, cue fade')
Nenue@93 943 self:StartFading()
Nenue@93 944 self.isNew = nil
Nenue@93 945 end
Nenue@93 946 else
Nenue@95 947 if not self.toAlpha then
Nenue@95 948 icon:SetAlpha(0)
Nenue@95 949 iconBorder:SetAlpha(0)
Nenue@93 950 end
Nenue@93 951 end
Nenue@93 952
Nenue@93 953 if self.itemName then
Nenue@93 954 if self.itemNumber and (self.itemNumber > 1) and (not hideNumbers) then
Nenue@93 955 local numberString = self.itemNumber
Nenue@93 956 if self.itemNumber >= 1000000 then
Nenue@93 957 numberString = (floor(self.itemNumber/100000)/10) .. 'M'
Nenue@93 958 elseif self.itemNumber >= 10000 then
Nenue@93 959 numberString = floor(self.itemNumber/1000) .. 'k'
Nenue@93 960 elseif self.itemNumber >= 1000 then
Nenue@93 961 local numeral = floor(self.itemNumber/1000)
Nenue@93 962 local decimal = mod(self.itemNumber, 1000)
Nenue@93 963 numberString = numeral
Nenue@93 964 if decimal > 100 then
Nenue@93 965 numberString = numberString .. '.' .. tostring(floor(decimal/100))
Nenue@93 966 end
Nenue@93 967 numberString = numberString .. 'k'
Nenue@93 968 end
Nenue@93 969
Nenue@93 970 self.count:SetText(numberString)
Nenue@93 971 self.count:SetTextColor(unpack(textColor))
Nenue@93 972 self.count:Show()
Nenue@57 973 else
Nenue@93 974 self.count:SetText(nil)
Nenue@93 975 self.count:Hide()
Nenue@93 976 end
Nenue@93 977 else
Nenue@93 978 self.count:Hide()
Nenue@93 979 end
Nenue@93 980
Nenue@93 981 if db.Config.ShowVerboseInfo then
Nenue@93 982 self.Description:SetText(self.title .. "\n" .. floor(self.x*100+.5) .. "," .. floor(self.y*100+.5))
Nenue@93 983 end
Nenue@93 984
Nenue@93 985
Nenue@93 986 icon:SetSize(currentWidth, currentWidth)
Nenue@93 987 icon:SetMask(style.iconMask or DEFAULT_STYLE.iconMask)
Nenue@93 988 if self.itemTexture then
Nenue@93 989 --iconBorder:SetTexture(WORLD_QUEST_BORDER)
Nenue@93 990
Nenue@93 991 if hideIcon then
Nenue@93 992 icon:SetTexture(PENDING_ICON)
Nenue@93 993 icon:SetDesaturated(true)
Nenue@93 994 icon:SetVertexColor(unpack(borderColor))
Nenue@93 995 else
Nenue@93 996 icon:SetTexture(self.itemTexture)
Nenue@93 997 icon:SetDesaturated(false)
Nenue@93 998 icon:SetVertexColor(1, 1, 1)
Nenue@93 999 end
Nenue@93 1000 else
Nenue@93 1001 --
Nenue@93 1002 --icon:SetTexture(PENDING_ICON)
Nenue@93 1003 --icon:SetDesaturated(true)
Nenue@93 1004 --icon:SetVertexColor(unpack(borderColor))
Nenue@93 1005 end
Nenue@93 1006 local borderMask = style.borderMask or DEFAULT_STYLE.borderMask
Nenue@93 1007 local borderSize = currentWidth + (borderWidth * 2) + (self.isCriteria and 2 or 0)
Nenue@93 1008
Nenue@93 1009
Nenue@93 1010 iconBorder:SetSize(borderSize, borderSize)
Nenue@93 1011
Nenue@93 1012 iconBorder:SetMask(borderMask)
Nenue@93 1013 iconBorder:SetTexture(PENDING_BORDER)
Nenue@93 1014
Nenue@93 1015 iconBorder:SetDesaturated(true)
Nenue@93 1016
Nenue@93 1017 local highlightSize = borderSize + (highlightWidth * 2)
Nenue@93 1018 trackingBorder:SetSize(highlightSize, highlightSize)
Nenue@93 1019 trackingBorder:SetMask(borderMask)
Nenue@93 1020 trackingBorder:SetTexture(PENDING_BORDER)
Nenue@93 1021
Nenue@93 1022 self:SetSize(borderSize, borderSize)
Nenue@93 1023 self.IconBackdrop:SetSize(currentWidth, currentWidth)
Nenue@93 1024
Nenue@93 1025
Nenue@93 1026
Nenue@93 1027 iconBorder:SetPoint('CENTER', (style.x or 0), (style.y or 0))
Nenue@93 1028 trackingBorder:SetPoint('CENTER', (style.x or 0), (style.y or 0))
Nenue@93 1029
Nenue@93 1030 self.tagIcon:SetShown((not self.filtered) and true or false)
Nenue@93 1031 self.tagIcon:SetAtlas(self.tagAtlas)
Nenue@93 1032 self.EliteBorder:SetShown(self.isElite and not self.filtered)
Nenue@93 1033
Nenue@93 1034 self:UpdateStatus()
Nenue@93 1035
Nenue@93 1036 if self.isBounty then
Nenue@93 1037 --print('is bounty')
Nenue@93 1038 iconBorder:SetVertexColor(trackingBorder:GetVertexColor())
Nenue@93 1039 trackingBorder:SetVertexColor(unpack(BORDER_SELECTED_BOUNTY))
Nenue@93 1040 elseif self.isCriteria then
Nenue@93 1041 --print('is criteria of a bounty')
Nenue@93 1042 iconBorder:SetVertexColor(trackingBorder:GetVertexColor())
Nenue@93 1043 trackingBorder:SetVertexColor(unpack(BORDER_CRITERIA))
Nenue@93 1044 else
Nenue@93 1045
Nenue@93 1046 iconBorder:SetVertexColor(unpack(borderColor))
Nenue@93 1047 trackingBorder:SetVertexColor(0,0,0,.5)
Nenue@93 1048 end
Nenue@93 1049
Nenue@93 1050 if SpellCanTargetQuest() then
Nenue@93 1051 if IsQuestIDValidSpellTarget(self.questID) then
Nenue@93 1052 icon:SetVertexColor(1,1,1)
Nenue@93 1053 else
Nenue@93 1054 icon:SetVertexColor(1,0,0,1)
Nenue@93 1055 end
Nenue@93 1056 self:EnableMouse(false)
Nenue@93 1057 else
Nenue@93 1058 self:EnableMouse(true)
Nenue@93 1059 end
Nenue@93 1060 self.isStale = nil
Nenue@93 1061
Nenue@93 1062 -- signal filter info update
Nenue@93 1063 WorldPlanSummary.isStale = true
Nenue@93 1064 end
Nenue@93 1065
Nenue@93 1066 -- Called at static intervals and with Refresh
Nenue@93 1067 function QuestPOI:UpdateStatus()
Nenue@93 1068 -- update time elements
Nenue@93 1069 self.isActive = TQ_IsActive(self.questID)
Nenue@95 1070 --print(self.maxAlertLevel)
Nenue@95 1071 local border = (self.isBounty or self.isCriteria) and self.RewardBorder or self.HighlightBorder
Nenue@93 1072
Nenue@93 1073 if self.isActive then
Nenue@93 1074 local tl = self.alertLevel
Nenue@93 1075 local timeLeft = TQ_GetQuestTimeLeftMinutes(self.questID)
Nenue@93 1076 if timeLeft > 0 then
Nenue@93 1077
Nenue@95 1078 local text, timeState, style = self:GetTimeInfo(timeLeft, self.maxAlertLevel)
Nenue@93 1079 if tl ~= timeState then
Nenue@93 1080 tl = timeState
Nenue@93 1081 self.timeLabel:SetText(text)
Nenue@93 1082 end
Nenue@95 1083 if style then
Nenue@95 1084 self.RewardBorder:SetVertexColor(style.r, style.g, style.b, style.a)
Nenue@95 1085 end
Nenue@93 1086 end
Nenue@93 1087
Nenue@93 1088 self.alertLevel = tl
Nenue@93 1089 self.timeLabel:SetShown(self.worldQuest and (self.maxAlertLevel >= 1))
Nenue@93 1090 else
Nenue@93 1091 self.hideReason = "No longer active."
Nenue@93 1092 self:HideOrShowFrames(false)
Nenue@93 1093
Nenue@93 1094 end
Nenue@93 1095 end
Nenue@93 1096
Nenue@93 1097 -- Show/Hide the text overlays associated with the quest pin; they aren't hierarchically linked
Nenue@93 1098 function QuestPOI:HideOrShowFrames(isShown)
Nenue@93 1099 if not isShown then
Nenue@93 1100 -- print('|cFFFFFF00' ..self:GetName()..':HideOrShowFrames()')
Nenue@93 1101 -- do not SetShown() here
Nenue@93 1102 if not self.hideReason then
Nenue@95 1103 self.hideReason = "HideOrShowFrames() called without a reason."
Nenue@93 1104 end
Nenue@93 1105 end
Nenue@93 1106 self.Overlay:SetShown(isShown)
Nenue@93 1107 self.count:SetShown(isShown)
Nenue@93 1108 self.timeLabel:SetShown(isShown)
Nenue@93 1109 end
Nenue@93 1110
Nenue@93 1111 function QuestPOI:Release()
Nenue@95 1112 print('|cFFFF4400'..self:GetID()..':Release()', self.hideReason)
Nenue@93 1113 self.hideReason = 'Released by script.'
Nenue@95 1114 self:HideOrShowFrames(false)
Nenue@93 1115 if self.questID then
Nenue@93 1116 db.QuestsByID[self.questID] = nil
Nenue@93 1117 for _, map in pairs(db.QuestsByZone) do
Nenue@93 1118 map[self.questID] = nil
Nenue@93 1119 end
Nenue@93 1120 self.questID = nil
Nenue@93 1121 end
Nenue@93 1122 self.isActive = nil
Nenue@93 1123 self.complete = nil
Nenue@93 1124 self.used = nil
Nenue@93 1125 self.dataLoaded = nil
Nenue@93 1126 self.rewardType = nil
Nenue@93 1127 self.itemTexture = nil
Nenue@93 1128 self.itemName = nil
Nenue@93 1129 self.itemNumber = nil
Nenue@93 1130 self:SetShown(false)
Nenue@93 1131 self.animating = nil
Nenue@93 1132 self.icon:SetAlpha(0)
Nenue@93 1133 self.RewardBorder:SetAlpha(0)
Nenue@93 1134 self:UnregisterEvent('QUEST_TURNED_IN')
Nenue@93 1135 self:UnregisterEvent('QUEST_LOG_UPDATE')
Nenue@93 1136
Nenue@93 1137 for i, pin in ipairs(db.UsedPins) do
Nenue@93 1138 if pin == self then
Nenue@95 1139 print('|cFFFF4400cleared from UsedPins|r')
Nenue@93 1140 tremove(db.UsedPins, i)
Nenue@93 1141 break
Nenue@57 1142 end
Nenue@47 1143 end
Nenue@47 1144
Nenue@93 1145 tinsert(db.FreePins, self)
Nenue@93 1146 WorldPlan.dataFlush = true
Nenue@95 1147 WorldPlanSummary.isStale = true
Nenue@95 1148
Nenue@95 1149 return true
Nenue@7 1150 end