Mercurial > wow > buffalo2

annotate ObjectiveTracker/ObjectiveTracker.lua @ 39:92534dc793f2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
- restore the previous QuestLogSelection after pulling for selection-restricted quest data; fixes icon mixups while quest map is open - moved progressbar builders into the schema environment, with all the other Frame.lua functions; prep for configuration access - relegate the various removal events to a framescript in their corresponding blocks; this takes care of resolving dead frames
author Nenue
date Thu, 21 Apr 2016 16:43:37 -0400
parents 1f8f9cc3d956
children 03ed70f846de
rev   line source
Nenue@28 1 --- ${PACKAGE_NAME}
Nenue@28 2 -- @file-author@
Nenue@28 3 -- @project-revision@ @project-hash@
Nenue@28 4 -- @file-revision@ @file-hash@
Nenue@28 5 -- Created: 3/26/2016 1:51 AM
Nenue@28 6 local B, _G = select(2,...).frame, _G
Nenue@28 7 local pairs, setmetatable, type, tostring, band, format = _G.pairs, _G.setmetatable, _G.type, _G.tostring, bit.band, string.format
Nenue@28 8 local ipairs, tinsert, hooksecurefunc = _G.ipairs, _G.tinsert, _G.hooksecurefunc
Nenue@28 9 local PlaySoundFile, IsQuestTask, SortQuestWatches, GetCurrentMapAreaID, GetZoneText, GetMinimapZoneText = PlaySoundFile, IsQuestTask, SortQuestWatches, GetCurrentMapAreaID, GetZoneText, GetMinimapZoneText
Nenue@28 10 local QuestPOIUpdateIcons, GetCVar, IsPlayerInMicroDungeon, WorldMapFrame, GetCVarBool, SetMapToCurrentZone = QuestPOIUpdateIcons, GetCVar, IsPlayerInMicroDungeon, WorldMapFrame, GetCVarBool, SetMapToCurrentZone
Nenue@28 11 local AddAutoQuestPopUp = AddAutoQuestPopUp
Nenue@28 12 local T = B:RegisterModule("ObjectiveTracker", _G.VeneerObjectiveWrapper, 'BuffFrame')
Nenue@28 13 local print = B.print('Objectives')
Nenue@28 14 local ObjectiveTrackerFrame, VeneerObjectiveScroll, CreateFrame = _G.ObjectiveTrackerFrame, _G.VeneerObjectiveScroll, _G.CreateFrame
Nenue@28 15 local Wrapper = _G.VeneerObjectiveWrapper
Nenue@28 16 local Scroller = VeneerObjectiveWrapper.scrollArea
Nenue@28 17 local Scroll = _G.VeneerObjectiveScroll
Nenue@28 18 local unitLevel = UnitLevel('player')
Nenue@28 19
Nenue@28 20 --- Performance values
Nenue@28 21 --[[
Nenue@28 22 self:RegisterEvent("QUEST_LOG_UPDATE");
Nenue@28 23 self:RegisterEvent("TRACKED_ACHIEVEMENT_LIST_CHANGED");
Nenue@28 24 self:RegisterEvent("QUEST_WATCH_LIST_CHANGED");
Nenue@28 25 self:RegisterEvent("QUEST_AUTOCOMPLETE");
Nenue@28 26 self:RegisterEvent("QUEST_ACCEPTED");
Nenue@28 27 self:RegisterEvent("SUPER_TRACKED_QUEST_CHANGED");
Nenue@28 28 self:RegisterEvent("SCENARIO_UPDATE");
Nenue@28 29 self:RegisterEvent("SCENARIO_CRITERIA_UPDATE");
Nenue@28 30 self:RegisterEvent("TRACKED_ACHIEVEMENT_UPDATE");
Nenue@28 31 self:RegisterEvent("ZONE_CHANGED_NEW_AREA");
Nenue@28 32 self:RegisterEvent("ZONE_CHANGED");
Nenue@28 33 self:RegisterEvent("QUEST_POI_UPDATE");
Nenue@28 34 self:RegisterEvent("VARIABLES_LOADED");
Nenue@28 35 self:RegisterEvent("QUEST_TURNED_IN");
Nenue@28 36 self:RegisterEvent("PLAYER_MONEY");
Nenue@28 37 ]]
Nenue@28 38
Nenue@28 39
Nenue@28 40 --- These are the bitfields used by Blizzard_ObjectiveTracker to determine which segments get parsed.
Nenue@28 41 --- They are replicated here so that plugins can make use of any securehook args involving this info.
Nenue@28 42 local OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST = OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST -- 0x0100
Nenue@28 43 local OBJECTIVE_TRACKER_UPDATE_MODULE_AUTO_QUEST_POPUP = OBJECTIVE_TRACKER_UPDATE_MODULE_AUTO_QUEST_POPUP -- 0x0200
Nenue@28 44 local OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE = OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE -- 0x0400
Nenue@28 45 local OBJECTIVE_TRACKER_UPDATE_MODULE_SCENARIO = OBJECTIVE_TRACKER_UPDATE_MODULE_SCENARIO -- 0x0800
Nenue@28 46 local OBJECTIVE_TRACKER_UPDATE_MODULE_ACHIEVEMENT = OBJECTIVE_TRACKER_UPDATE_MODULE_ACHIEVEMENT -- 0x1000
Nenue@28 47
Nenue@28 48
Nenue@28 49 local OBJECTIVE_TRACKER_UPDATE_STATIC = OBJECTIVE_TRACKER_UPDATE_STATIC -- 0x0000
Nenue@28 50 local OBJECTIVE_TRACKER_UPDATE_ALL = OBJECTIVE_TRACKER_UPDATE_ALL -- 0xFFFF
Nenue@28 51 local OBJECTIVE_TRACKER_UPDATE_ID = OBJECTIVE_TRACKER_UPDATE_ID -- 0
Nenue@28 52
Nenue@28 53 local OBJECTIVE_TRACKER_UPDATE_QUEST = OBJECTIVE_TRACKER_UPDATE_QUEST -- 0x0001
Nenue@28 54 local OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED = OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED -- 0x0002
Nenue@28 55 local OBJECTIVE_TRACKER_UPDATE_TASK_ADDED = OBJECTIVE_TRACKER_UPDATE_TASK_ADDED -- 0x0004
Nenue@28 56 local OBJECTIVE_TRACKER_UPDATE_SCENARIO = OBJECTIVE_TRACKER_UPDATE_SCENARIO -- 0x0008
Nenue@28 57 local OBJECTIVE_TRACKER_UPDATE_SCENARIO_NEW_STAGE = OBJECTIVE_TRACKER_UPDATE_SCENARIO_NEW_STAGE -- 0x0010
Nenue@28 58 local OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT = OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT -- 0x0020
Nenue@28 59 local OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT_ADDED = OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT_ADDED -- 0x0040
Nenue@28 60 local OBJECTIVE_TRACKER_UPDATE_SCENARIO_BONUS_DELAYED = OBJECTIVE_TRACKER_UPDATE_SCENARIO_BONUS_DELAYED -- 0x0080
Nenue@28 61
Nenue@28 62 local OBJECTIVE_TRACKER_UPDATE_REASON = OBJECTIVE_TRACKER_UPDATE_ALL -- default
Nenue@28 63 --- Used to determine which trackers are listening for money events
Nenue@28 64
Nenue@28 65 T.strings = {}
Nenue@28 66 T.strings.CLICK_TO_ACCCEPT = 'Click to Accept'
Nenue@28 67 T.strings.CLICK_TO_COMPLETE = 'Click to complete'
Nenue@28 68 T.colors ={
Nenue@28 69 enable = true,
Nenue@28 70 }
Nenue@28 71
Nenue@28 72 T.watchMoneyReasons = 0
Nenue@28 73
Nenue@28 74 --- Baseline defaults table; values defined in the files that they pertain to
Nenue@28 75 T.defaults = {}
Nenue@28 76
Nenue@34 77
Nenue@28 78 --- Tracker display order
Nenue@28 79 T.orderedNames = {'Bonus', 'AutoQuest', 'Quest', 'Cheevs'}
Nenue@28 80
Nenue@28 81 --- ipairs() argument tables
Nenue@28 82 T.orderedHandlers = setmetatable({}, {__mode = "k"})
Nenue@28 83 T.orderedTrackers = setmetatable({}, {__mode = "k"})
Nenue@28 84 T.indexedTrackers = setmetatable({}, {__mode = "k"})
Nenue@28 85
Nenue@28 86 --- pairs() argument tables
Nenue@28 87 T.namedTrackers = setmetatable({}, {__mode = "k"})
Nenue@28 88
Nenue@28 89 local WRAPPER_ANCHOR_POINT = 'TOPRIGHT'
Nenue@28 90 local WRAPPER_OFFSET_X = 0
Nenue@28 91 local WRAPPER_OFFSET_Y = -200
Nenue@28 92 local WRAPPER_MAX_HEIGHT = 670
Nenue@28 93 local WRAPPER_WIDTH = 280
Nenue@28 94 local WRAPPER_HEADER_HEIGHT = 24
Nenue@28 95
Nenue@28 96 T.defaults.Wrapper = {
Nenue@28 97 AnchorPoint = WRAPPER_ANCHOR_POINT,
Nenue@28 98 OffsetX = WRAPPER_OFFSET_X,
Nenue@28 99 OffsetY = WRAPPER_OFFSET_Y,
Nenue@28 100 Height = WRAPPER_MAX_HEIGHT,
Nenue@28 101 Width = WRAPPER_WIDTH,
Nenue@28 102 HeaderHeight = WRAPPER_HEADER_HEIGHT,
Nenue@28 103 TextSpacing = 3,
Nenue@33 104 TextIndent = 4,
Nenue@28 105 TitleSpacing = 3,
Nenue@33 106 TitleIndent = 4,
Nenue@28 107 }
Nenue@28 108
Nenue@28 109
Nenue@28 110
Nenue@28 111 --- Tracker module definitions begin here; innards dealing with data retreival and output are defined further in
Nenue@28 112 T.DefaultHandler = {
Nenue@28 113 previousHeight = 0,
Nenue@28 114
Nenue@28 115 name = "temp",
Nenue@28 116 displayName = "temp",
Nenue@28 117 updateReasonModule = 0xFF00,
Nenue@28 118 updateReasonEvent = 0x00FF,
Nenue@28 119
Nenue@28 120 numWatched = 0, --- number of entries being handled
Nenue@28 121 numBlocks = 0, --- number of blocks created
Nenue@28 122 actualBlocks = 0, --- number of blocks in use
Nenue@34 123 Info = {}, --- stored watch list information, keyed by whatever unique ID is involved for that tracker
Nenue@34 124 Watched = {}, --- stores whether the given unique ID is tracked
Nenue@28 125
Nenue@34 126 freeBlocks = {}, --- blocks hidden due to list shrinkage
Nenue@34 127 usedBlocks = {}, --- block in use
Nenue@34 128 BlockInfo = {}, --- by block creation offset, used by framescript
Nenue@37 129 WatchList = {}, --- ordered manifest of watched items
Nenue@28 130
Nenue@34 131 --- Indexes
Nenue@37 132 InfoBlock = {}, --- by unique ID
Nenue@34 133 LogBlock = {}, --- by API log offset, used by GetBlock if possible
Nenue@34 134 WatchBlock = {}, --- block by internal offset, used in GetBlock scope
Nenue@34 135 WatchInfo = {}, --- info by internal offset, used in Update scope
Nenue@28 136 }
Nenue@28 137
Nenue@28 138 T.AutoQuest = {
Nenue@28 139 name = "AutoQuest",
Nenue@28 140 displayName = "Notice",
Nenue@28 141 updateReasonModule = OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST,
Nenue@28 142 updateReasonEvents = OBJECTIVE_TRACKER_UPDATE_QUEST + OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED,
Nenue@38 143 internalColor = '00FFFF',
Nenue@29 144 LogInfo = {},
Nenue@29 145 QuestBlock = {},
Nenue@28 146 }
Nenue@28 147 T.Quest = {
Nenue@28 148 name = "Quest",
Nenue@28 149 displayName = "Quests",
Nenue@28 150 updateReasonModule = OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST,
Nenue@28 151 updateReasonEvents = OBJECTIVE_TRACKER_UPDATE_QUEST + OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED,
Nenue@38 152 internalColor = '0088FF',
Nenue@28 153 itemButtons = {},
Nenue@28 154 freeButtons = {},
Nenue@29 155 LogInfo = {},
Nenue@29 156 QuestBlock = {},
Nenue@28 157 }
Nenue@28 158 T.Cheevs = {
Nenue@28 159 name = "Cheevs",
Nenue@28 160 displayName = "Achievements",
Nenue@37 161 schema = 'achievement',
Nenue@28 162 updateReasonModule = OBJECTIVE_TRACKER_UPDATE_MODULE_ACHIEVEMENT,
Nenue@28 163 updateReasonEvents = OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT +
Nenue@28 164 OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT_ADDED,
Nenue@38 165 internalColor = '00FF88',
Nenue@28 166 }
Nenue@28 167 T.Bonus = {
Nenue@28 168 name = "Bonus",
Nenue@28 169 displayName = "Bonus Objectives",
Nenue@28 170 updateReasonModule = OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE,
Nenue@29 171 updateReasonEvents = OBJECTIVE_TRACKER_UPDATE_QUEST + OBJECTIVE_TRACKER_UPDATE_TASK_ADDED,
Nenue@38 172 internalColor = '00FF00',
Nenue@29 173 QuestBlock = {},
Nenue@28 174 }
Nenue@28 175
Nenue@28 176 T.Scenario = {
Nenue@28 177 name = 'Scenario',
Nenue@28 178 displayName = 'Scenario Objectives',
Nenue@28 179 updateReasonModule = OBJECTIVE_TRACKER_UPDATE_MODULE_SCENARIO,
Nenue@38 180 updateReasonEvents = OBJECTIVE_TRACKER_UPDATE_SCENARIO_NEW_STAGE + OBJECTIVE_TRACKER_UPDATE_SCENARIO_BONUS_DELAYED,
Nenue@38 181 internalColor = '88FF00',
Nenue@28 182 }
Nenue@38 183 local lastLabel
Nenue@38 184 local Tracker_debug = function(handler, channel)
Nenue@38 185 local func = B.print(channel)
Nenue@38 186 local color = handler.internalColor
Nenue@38 187 return function(label, ...)
Nenue@38 188 if lastLabel == label then
Nenue@38 189 label = label:gsub('%a', ' ').. ' '
Nenue@38 190 else
Nenue@38 191 lastLabel = label
Nenue@38 192 label = '|cFF'..color..label..':|r'
Nenue@38 193 end
Nenue@38 194 func(label, ...)
Nenue@38 195 end
Nenue@38 196 end
Nenue@28 197 local Tracker_string = function (self)
Nenue@28 198 return self.name
Nenue@28 199 end
Nenue@28 200 local Tracker_call = function (self, reason)
Nenue@28 201 self:Update(reason)
Nenue@28 202 end
Nenue@28 203 local Handler_Initialize = function (self, name, index)
Nenue@28 204 local c = T.Conf.Wrapper
Nenue@28 205 print('Initializing |cFF00FFFF'..name..'|r module...')
Nenue@28 206
Nenue@28 207 local handler = setmetatable(T[name] or {}, {
Nenue@28 208 __tostring = Tracker_string,
Nenue@28 209 __call = Tracker_call
Nenue@28 210 })
Nenue@28 211 if type(T.orderedHandlers[index]) == 'table' then
Nenue@28 212 return T.orderedHandlers[index]
Nenue@28 213 end
Nenue@28 214
Nenue@28 215 print('|cFFFFFF00Acquiring locals')
Nenue@28 216 local preset = {}
Nenue@28 217 for k, _ in pairs(handler) do
Nenue@28 218 preset[k] = true
Nenue@28 219 end
Nenue@28 220
Nenue@28 221
Nenue@28 222 print('|cFFFF8800Inheriting')
Nenue@28 223 for k, v in pairs(self) do
Nenue@28 224 if not handler[k] then
Nenue@28 225 if type(v) == 'table' then
Nenue@28 226 -- assume all tables to be local data; don't inherit or ref
Nenue@28 227 handler[k] = {}
Nenue@28 228 else
Nenue@28 229 handler[k] = self[k]
Nenue@28 230 end
Nenue@28 231 print('copying', k)
Nenue@28 232 end
Nenue@28 233 end
Nenue@28 234 print('|cFFFF4400'..tostring(name)..'|r:')
Nenue@28 235 for k, v in pairs(handler) do
Nenue@28 236 print(format("%32s %8s %s", (preset[k] and '|cFFFFFFFF' or '|cFFFFFF00') .. k .. '|r', type(v), tostring(v)))
Nenue@28 237 end
Nenue@28 238
Nenue@28 239 T[name] = handler
Nenue@28 240
Nenue@28 241 local trackerName = 'Veneer'..name..'Tracker'
Nenue@28 242 local handler = T[name]
Nenue@28 243 local frame = CreateFrame('Frame', trackerName, _G.VeneerObjectiveScroll, 'VeneerTrackerTemplate')
Nenue@28 244 frame.title:SetText(handler.displayName)
Nenue@28 245 frame:SetWidth(c.Width)
Nenue@30 246 frame.previousOffset = 0
Nenue@29 247
Nenue@28 248 handler.frame = frame
Nenue@29 249 handler.numBlocks = 0
Nenue@29 250 handler.actualBlocks = 0
Nenue@28 251 handler.trackerName = trackerName
Nenue@28 252 handler.lines = {}
Nenue@28 253 T.orderedTrackers[index] = frame
Nenue@28 254 T.namedTrackers[name] = frame
Nenue@28 255 T.indexedTrackers[handler] = frame
Nenue@28 256 print('|cFFFF0088' .. trackerName .. '|r created for |cFF00FFFF' .. handler.displayName .. '|r module')
Nenue@28 257
Nenue@38 258 handler.print = Tracker_debug(handler, 'Tracker')
Nenue@38 259 handler.lprint = Tracker_debug(handler, 'Line')
Nenue@38 260 handler.bprint = Tracker_debug(handler, 'Block')
Nenue@38 261
Nenue@28 262 T.orderedHandlers[index] = handler
Nenue@28 263 return true
Nenue@28 264 end
Nenue@28 265
Nenue@28 266 local Event = {}
Nenue@39 267
Nenue@28 268 Event.QUEST_LOG_UPDATE = function()
Nenue@39 269 return OBJECTIVE_TRACKER_UPDATE_QUEST
Nenue@28 270 end
Nenue@30 271 local GetNumQuestWatches, AddQuestWatch, SetSuperTrackedQuestID = GetNumQuestWatches, AddQuestWatch, SetSuperTrackedQuestID
Nenue@30 272 Event.QUEST_ACCEPTED = function(questLogIndex, questID, added)
Nenue@28 273 if ( IsQuestTask(questID) ) then
Nenue@38 274 return OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED + OBJECTIVE_TRACKER_UPDATE_TASK_ADDED, questID, added
Nenue@28 275 else
Nenue@38 276 return OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED, questID, added
Nenue@28 277 end
Nenue@38 278 AddQuestWatch(questID)
Nenue@28 279 end
Nenue@28 280
Nenue@28 281 Event.QUEST_WATCH_LIST_CHANGED = function(questID, added)
Nenue@37 282 if ( added == true ) then
Nenue@28 283 if ( not IsQuestTask(questID) ) then
Nenue@28 284 return OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED, questID, added
Nenue@28 285 end
Nenue@37 286 elseif questID then
Nenue@37 287 return OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED, questID, added
Nenue@38 288 else
Nenue@38 289 return OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST
Nenue@28 290 end
Nenue@28 291 end
Nenue@28 292
Nenue@28 293 Event.QUEST_POI_UPDATE = function()
Nenue@28 294 QuestPOIUpdateIcons();
Nenue@28 295 if ( GetCVar("trackQuestSorting") == "proximity" ) then
Nenue@28 296 SortQuestWatches();
Nenue@28 297 end
Nenue@28 298 return OBJECTIVE_TRACKER_UPDATE_ALL
Nenue@28 299 end
Nenue@37 300 Event.SUPER_TRACKED_QUEST_CHANGED = function(questID)
Nenue@37 301 return OBJECTIVE_TRACKER_UPDATE_QUEST, questID
Nenue@28 302 end
Nenue@28 303 Event.ZONE_CHANGED = function()
Nenue@28 304 local inMicroDungeon = IsPlayerInMicroDungeon();
Nenue@28 305 if ( inMicroDungeon ~= T.inMicroDungeon ) then
Nenue@28 306 if ( not WorldMapFrame:IsShown() and GetCVarBool("questPOI") ) then
Nenue@28 307 SetMapToCurrentZone(); -- update the zone to get the right POI numbers for the tracker
Nenue@28 308 end
Nenue@28 309 --SortQuestWatches();
Nenue@28 310 T.inMicroDungeon = inMicroDungeon;
Nenue@28 311 end
Nenue@33 312 return OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE + OBJECTIVE_TRACKER_UPDATE_MODULE_SCENARIO
Nenue@28 313 end
Nenue@28 314 Event.QUEST_AUTOCOMPLETE = function(questId)
Nenue@28 315 AddAutoQuestPopUp(questId, "COMPLETE");
Nenue@28 316 return OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST + OBJECTIVE_TRACKER_UPDATE_MODULE_AUTO_QUEST_POPUP
Nenue@28 317 end
Nenue@28 318 Event.SCENARIO_CRITERIA_UPDATE = function()
Nenue@28 319 return OBJECTIVE_TRACKER_UPDATE_SCENARIO
Nenue@28 320 end
Nenue@28 321 Event.SCENARIO_UPDATE = function(newStage)
Nenue@28 322 if ( newStage ) then
Nenue@28 323 return OBJECTIVE_TRACKER_UPDATE_SCENARIO_NEW_STAGE
Nenue@28 324 else
Nenue@28 325 return OBJECTIVE_TRACKER_UPDATE_SCENARIO
Nenue@28 326 end
Nenue@28 327 end
Nenue@28 328 Event.TRACKED_ACHIEVEMENT_UPDATE = function()
Nenue@28 329 return OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT
Nenue@28 330 end
Nenue@28 331 Event.TRACKED_ACHIEVEMENT_LIST_CHANGED = function(achievementID, added)
Nenue@37 332 return OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT_ADDED, achievementID, added
Nenue@28 333 end
Nenue@28 334 Event.ZONE_CHANGED_NEW_AREA = function ()
Nenue@28 335 if ( not WorldMapFrame:IsShown() and GetCVarBool("questPOI") ) then
Nenue@28 336 SetMapToCurrentZone(); -- update the zone to get the right POI numbers for the tracker
Nenue@28 337 end
Nenue@28 338 SortQuestWatches();
Nenue@28 339 T.currentZoneArea = GetCurrentMapAreaID()
Nenue@28 340 print('Updating zone ID to', T.currentZoneArea, '=', GetZoneText(), GetMinimapZoneText())
Nenue@28 341
Nenue@28 342
Nenue@28 343 return OBJECTIVE_TRACKER_UPDATE_TASK_ADDED
Nenue@28 344 end
Nenue@28 345
Nenue@28 346
Nenue@28 347 Event.PLAYER_MONEY = function()
Nenue@28 348 if T.watchMoneyReasons > 0 then
Nenue@28 349 return T.watchMoneyReasons
Nenue@28 350 end
Nenue@28 351 end
Nenue@28 352 Event.CRITERIA_COMPLETE = function()
Nenue@28 353 return OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE
Nenue@28 354 end
Nenue@28 355 Event.QUEST_TURN_IN = function(questID, xp, money)
Nenue@28 356 if ( IsQuestTask(questID) ) then
Nenue@28 357 T.Bonus:OnTurnIn(questID, xp, money)
Nenue@28 358 print('updating bonus modules (code', OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE, ',', questID, xp, money)
Nenue@28 359 return OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE, questID, xp, money
Nenue@28 360 else
Nenue@28 361 return OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST, questID, xp, money
Nenue@28 362 end
Nenue@28 363 end
Nenue@28 364 T.Event = Event
Nenue@28 365
Nenue@28 366 --- Done once per ui load
Nenue@28 367 local BlizzHooks = {
Nenue@34 368 ['AcceptQuest'] = 'AcceptQuest',
Nenue@28 369 ['AddQuestWatch'] = 'AddQuestWatch',
Nenue@28 370 ['RemoveQuestWatch'] = 'RemoveQuestWatch',
Nenue@28 371 ['AbandonQuest'] = 'AbandonQuest',
Nenue@28 372 ['AcknowledgeAutoAcceptQuest'] = 'AcknowledgeAutoAcceptQuest',
Nenue@28 373 ['AddAutoQuestPopUp'] = 'AddAutoQuestPopUp',
Nenue@28 374 ['RemoveAutoQuestPopUp'] = 'RemoveAutoQuestPopUp',
Nenue@28 375 ['AddTrackedAchievement'] = 'AddTrackedAchievement',
Nenue@28 376 ['RemoveTrackedAchievement'] = 'RemoveTrackedAchievement',
Nenue@39 377 ['SetSuperTrackedQuestID'] = 'SetSuperTrackedQuestID',
Nenue@39 378 ['SelectQuestLogEntry'] = 'SelectQuestLogEntry',
Nenue@28 379 }
Nenue@28 380 local VeneerData
Nenue@28 381
Nenue@28 382 T.SetWatchMoney = function(watchMoney, reason)
Nenue@28 383 if watchMoney then
Nenue@28 384 if band(T.watchMoneyReasons, reason) == 0 then
Nenue@28 385 T.watchMoneyReasons = T.watchMoneyReasons + reason;
Nenue@28 386 end
Nenue@28 387 else
Nenue@28 388 if band(T.watchMoneyReasons, reason) > 0 then
Nenue@28 389 T.watchMoneyReasons = T.watchMoneyReasons - reason;
Nenue@28 390 end
Nenue@28 391 end
Nenue@28 392 end
Nenue@28 393
Nenue@32 394 local iprint = B.print('Info')
Nenue@32 395 T.SetRewards = function(t, questID)
Nenue@34 396 local previousSelection = GetQuestLogSelection()
Nenue@32 397
Nenue@32 398 SelectQuestLogEntry(GetQuestLogIndexByID(questID))
Nenue@32 399 local numQuestChoices = GetNumQuestLogChoices();
Nenue@32 400 local skillName, skillIcon, skillPoints = GetQuestLogRewardSkillPoints();
Nenue@32 401 local xp = GetQuestLogRewardXP();
Nenue@32 402 local playerTitle = GetQuestLogRewardTitle();
Nenue@32 403 ProcessQuestLogRewardFactions();
Nenue@34 404
Nenue@32 405 local rewards = {}
Nenue@32 406 local texture, name, isTradeskillSpell, isSpellLearned, hideSpellLearnText, isBoostSpell, garrFollowerID = GetQuestLogRewardSpell(questID)
Nenue@32 407 if name then
Nenue@32 408 tinsert(rewards,{
Nenue@32 409 type = 'spell',
Nenue@32 410 name = name,
Nenue@32 411 texture = texture,
Nenue@32 412 })
Nenue@32 413 end
Nenue@39 414 if previousSelection then
Nenue@39 415 SelectQuestLogEntry(previousSelection)
Nenue@39 416 end
Nenue@32 417
Nenue@32 418 t.numCurrencies = GetNumQuestLogRewardCurrencies(questID)
Nenue@32 419 for i = 1, t.numCurrencies do
Nenue@32 420 local name, texture, count = GetQuestLogRewardCurrencyInfo(i, questID)
Nenue@32 421 tinsert(rewards,{
Nenue@32 422 type = 'currency',
Nenue@32 423 index = i,
Nenue@32 424 name = name,
Nenue@32 425 texture = texture,
Nenue@32 426 count = count
Nenue@32 427 });
Nenue@32 428 end
Nenue@32 429 -- items
Nenue@32 430 t.numItems = GetNumQuestLogRewards(questID)
Nenue@32 431 for i = 1, t.numItems do
Nenue@32 432 local name, texture, count, quality, isUsable = GetQuestLogRewardInfo(i, questID)
Nenue@32 433 tinsert(rewards, {
Nenue@32 434 type = 'item',
Nenue@32 435 index = i ,
Nenue@32 436 name = name,
Nenue@32 437 texture = texture,
Nenue@32 438 count = count,
Nenue@32 439 quality = quality,
Nenue@32 440 isUsable = isUsable
Nenue@32 441 });
Nenue@32 442 end
Nenue@32 443 -- money
Nenue@32 444
Nenue@32 445 local money = GetQuestLogRewardMoney(questID)
Nenue@32 446 if ( money > 0 ) then
Nenue@32 447 tinsert(rewards, {
Nenue@32 448 type = 'money',
Nenue@32 449 name = GetMoneyString(money),
Nenue@32 450 texture = "Interface\\Icons\\inv_misc_coin_01",
Nenue@32 451 count = 0,
Nenue@32 452 });
Nenue@32 453 end
Nenue@32 454
Nenue@32 455 if #rewards >= 1 then
Nenue@32 456 t.rewardInfo = rewards
Nenue@32 457 end
Nenue@32 458 end
Nenue@32 459
Nenue@28 460 local Play = function(file) if Devian and Devian.InWorkspace() then PlaySoundFile(file) end end
Nenue@28 461
Nenue@37 462 local tprint = B.print('Tracker')
Nenue@34 463 T.OnHookedFunc = function(name, ...)
Nenue@37 464 tprint('|cFFFF8800securehook:|r', name, '|cFF00FFFFargs:|r', ...)
Nenue@37 465 local updateReason, arg1, arg2, arg3 = T[name](...)
Nenue@34 466 if updateReason then
Nenue@37 467 print('|cFF00FFFFupdate reason:|r', updateReason, arg1, arg2, arg3)
Nenue@37 468 T:Update(updateReason, arg1, arg2, arg3)
Nenue@34 469 end
Nenue@34 470 end
Nenue@34 471
Nenue@28 472 function T:OnEvent (event, ...)
Nenue@28 473 local isHandled
Nenue@28 474 local reason, arg1, arg2, arg3
Nenue@28 475 if Event[event] then
Nenue@28 476 if type(Event[event]) == 'function' then
Nenue@28 477 Play([[Interface\Addons\SharedMedia_MyMedia\sound\Info.ogg]])
Nenue@28 478 reason, arg1, arg2, arg3 = Event[event](...)
Nenue@28 479 else
Nenue@37 480 Play([[Interface\Addons\SharedMedia_MyMedia\sound\Heart.ogg]])
Nenue@28 481 reason = Event[event]
Nenue@28 482 end
Nenue@28 483 else
Nenue@30 484 print('no event handler set for', event)
Nenue@30 485 Play([[Interface\Addons\SharedMedia_MyMedia\sound\IM.ogg]])
Nenue@28 486 end
Nenue@28 487 if reason then
Nenue@38 488 tprint('OnEvent(|cFF00FF00'.. event ..'|r):', ...)
Nenue@28 489 T:Update(reason, arg1, arg2, arg3)
Nenue@28 490 else
Nenue@38 491 tprint('OnEvent(|cFFFF4400'.. event ..'|r):', ...)
Nenue@38 492 tprint('no detected reason')
Nenue@28 493 Play([[Interface\Addons\SharedMedia_MyMedia\sound\Quack.ogg]])
Nenue@28 494 end
Nenue@38 495 local args = (reason or '0')
Nenue@38 496 if arg1 then args = args .. ', ' .. tostring(arg1) end
Nenue@38 497 if arg2 then args = args .. ', ' .. tostring(arg2) end
Nenue@38 498 if arg3 then args = args .. ', ' .. tostring(arg3) end
Nenue@38 499 tprint('OnEvent(|cFF00FF00'.. event ..'|r):', ..., '|cFFFFFF00=> Update (|r', args,'|cFFFFFF00)|r')
Nenue@28 500
Nenue@28 501 end
Nenue@28 502
Nenue@28 503
Nenue@28 504 function T:OnInitialize()
Nenue@28 505 local c = T.Conf.Wrapper
Nenue@28 506 VeneerData = _G.VeneerData
Nenue@28 507 VeneerData.CallLog = VeneerData.CallLog or {}
Nenue@28 508 if not T.isHooked then
Nenue@28 509 T.isHooked = true
Nenue@28 510 for blizzFunc, veneerFunc in pairs(BlizzHooks) do
Nenue@28 511 if T[veneerFunc] then
Nenue@34 512 hooksecurefunc(blizzFunc, function(...) return T.OnHookedFunc(blizzFunc, ...) end)
Nenue@28 513 else
Nenue@28 514 hooksecurefunc(blizzFunc, function(...)
Nenue@28 515 print('|cFFFF0088securehook('..tostring(blizzFunc)..')|r args:', ...)
Nenue@28 516 tinsert(VeneerData.CallLog, {blizzFunc, ...})
Nenue@28 517 end)
Nenue@28 518 end
Nenue@28 519 end
Nenue@28 520 end
Nenue@28 521
Nenue@28 522 T.Conf.TasksLog = T.Conf.TasksLog or {}
Nenue@28 523
Nenue@28 524 ObjectiveTrackerFrame:UnregisterAllEvents()
Nenue@28 525 ObjectiveTrackerFrame:Hide()
Nenue@33 526 _G.MinimapCluster:Hide()
Nenue@28 527
Nenue@28 528 for id, name in ipairs(T.orderedNames) do
Nenue@28 529 if not T.orderedHandlers[id] then
Nenue@28 530 Handler_Initialize(T.DefaultHandler, name, id)
Nenue@28 531 end
Nenue@28 532 end
Nenue@28 533 self:SetSize(c.Width, 40)
Nenue@28 534 T.InitializeWidgets()
Nenue@28 535 end
Nenue@28 536
Nenue@28 537 --- Done any time the the minimize button is toggled up
Nenue@28 538 function T:OnEnable()
Nenue@28 539
Nenue@28 540 print(B.Conf.VeneerObjectiveWrapper.enabled)
Nenue@34 541
Nenue@28 542
Nenue@28 543 for event, action in pairs(Event) do
Nenue@28 544 print('|cFFFF0088listen to', event, 'for action|r', tostring(action))
Nenue@28 545 Wrapper:RegisterEvent(event)
Nenue@28 546 end
Nenue@28 547
Nenue@28 548 local c = T.Conf.Wrapper
Nenue@30 549 Wrapper.previousHeight = 0
Nenue@28 550 Scroller:SetScrollChild(Scroll)
Nenue@28 551 Scroller:SetWidth(c.Width)
Nenue@28 552 Scroll:SetWidth(c.Width)
Nenue@28 553 Scroll:ClearAllPoints()
Nenue@28 554 Scroll:SetPoint('TOP', Scroller, 'TOP')
Nenue@28 555 self:SetScript('OnEvent', T.OnEvent)
Nenue@28 556
Nenue@28 557 Scroller:Show()
Nenue@28 558
Nenue@28 559 local from, target, to, x, y = Wrapper:GetPoint(1)
Nenue@38 560 print(from, target, to, x,y)
Nenue@28 561
Nenue@28 562
Nenue@38 563 T.UpdateSchema('tracker', 'default')
Nenue@28 564 -- run once to prime the data structure
Nenue@28 565 T.UpdateActionButtons()
Nenue@28 566 end
Nenue@28 567
Nenue@28 568 function T:OnDisable()
Nenue@28 569 self:UnregisterAllEvents()
Nenue@28 570 Scroller:Hide()
Nenue@28 571 end
Nenue@28 572