annotate QuestPOI.lua @ 108:b67ba1078824

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