Mercurial > wow > buffalo2

annotate ObjectiveTracker/ObjectiveTracker.lua @ 33:64f2a9bbea79

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
- implementing structural revisions in bonus objectives - prevent instances of nil arithmetic - decide on where to keep style values - start widgets with dummy values for operability
author Nenue
date Fri, 15 Apr 2016 17:01:06 -0400
parents a3afe6c3771e
children 9856ebc63fa4
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 default = {
Nenue@28 71 titlebg = {'HORIZONTAL', 1, 0, .7, .25, 1, 0, .7, .125},
Nenue@28 72 textbg = {'HORIZONTAL', 0, 0, 0, 0.4, 0, 0, 0, 0 },
Nenue@28 73 selectionbg = {'HORIZONTAL', 1, 1, 1, 0, 1, 1, 1, 0.225},
Nenue@28 74 },
Nenue@28 75 daily = {
Nenue@28 76 titlebg = {'HORIZONTAL', 0, .7, 1, .25, 0, 1, .7, .125},
Nenue@28 77 textbg = {'HORIZONTAL', 0, .7, 1, .1, 0, 1, .7, .075 },
Nenue@28 78 },
Nenue@28 79 weekly = {
Nenue@28 80 titlebg = {'HORIZONTAL', 0, .35, .7, .25, 0, .35, .7, .125},
Nenue@28 81 textbg = {'HORIZONTAL', 0, .35, .7, .1, 0, .35, .7, .075 },
Nenue@28 82 },
Nenue@28 83 account = {
Nenue@28 84 titlebg = {'HORIZONTAL', .1, .1, .1, .25, .1, .1, .1, .125},
Nenue@28 85 textbg = {'HORIZONTAL', .1, .1, .1, 0.4, .1, .1, .1, .085 },
Nenue@28 86 },
Nenue@28 87 -- alliance
Nenue@28 88 faction_1 = {
Nenue@28 89 titlebg = {'HORIZONTAL', .2, .4, 1, 0.4, .2, .4, 1, .085 },
Nenue@28 90 textbg = {'HORIZONTAL', .2, .4, 1, 0.4, .2, .4, 1, .085 },
Nenue@28 91 },
Nenue@28 92 -- horde
Nenue@28 93 faction_2 = {
Nenue@28 94 titlebg = {'HORIZONTAL', .6, 0, 0.4, 0.4, .6, 0, 0.4, .085 },
Nenue@28 95 textbg = {'HORIZONTAL', .6, 0, 0.4, 0.4, .6, 0, 0.4, .085 },
Nenue@28 96 }
Nenue@28 97 }
Nenue@28 98
Nenue@28 99 T.watchMoneyReasons = 0
Nenue@28 100
Nenue@28 101 --- Baseline defaults table; values defined in the files that they pertain to
Nenue@28 102 T.defaults = {}
Nenue@28 103
Nenue@28 104 --- Tracker display order
Nenue@28 105 T.orderedNames = {'Bonus', 'AutoQuest', 'Quest', 'Cheevs'}
Nenue@28 106
Nenue@28 107 --- ipairs() argument tables
Nenue@28 108 T.orderedHandlers = setmetatable({}, {__mode = "k"})
Nenue@28 109 T.orderedTrackers = setmetatable({}, {__mode = "k"})
Nenue@28 110 T.indexedTrackers = setmetatable({}, {__mode = "k"})
Nenue@28 111
Nenue@28 112 --- pairs() argument tables
Nenue@28 113 T.namedTrackers = setmetatable({}, {__mode = "k"})
Nenue@28 114
Nenue@28 115 local WRAPPER_ANCHOR_POINT = 'TOPRIGHT'
Nenue@28 116 local WRAPPER_OFFSET_X = 0
Nenue@28 117 local WRAPPER_OFFSET_Y = -200
Nenue@28 118 local WRAPPER_MAX_HEIGHT = 670
Nenue@28 119 local WRAPPER_WIDTH = 280
Nenue@28 120 local WRAPPER_HEADER_HEIGHT = 24
Nenue@28 121
Nenue@28 122 T.defaults.Wrapper = {
Nenue@28 123 AnchorPoint = WRAPPER_ANCHOR_POINT,
Nenue@28 124 OffsetX = WRAPPER_OFFSET_X,
Nenue@28 125 OffsetY = WRAPPER_OFFSET_Y,
Nenue@28 126 Height = WRAPPER_MAX_HEIGHT,
Nenue@28 127 Width = WRAPPER_WIDTH,
Nenue@28 128 HeaderHeight = WRAPPER_HEADER_HEIGHT,
Nenue@28 129 TextSpacing = 3,
Nenue@33 130 TextIndent = 4,
Nenue@28 131 TitleSpacing = 3,
Nenue@33 132 TitleIndent = 4,
Nenue@28 133 }
Nenue@28 134
Nenue@28 135
Nenue@28 136
Nenue@28 137 --- Tracker module definitions begin here; innards dealing with data retreival and output are defined further in
Nenue@28 138 T.DefaultHandler = {
Nenue@28 139 previousHeight = 0,
Nenue@28 140
Nenue@28 141 name = "temp",
Nenue@28 142 displayName = "temp",
Nenue@28 143 updateReasonModule = 0xFF00,
Nenue@28 144 updateReasonEvent = 0x00FF,
Nenue@28 145
Nenue@28 146 numWatched = 0, --- number of entries being handled
Nenue@28 147 numBlocks = 0, --- number of blocks created
Nenue@28 148 actualBlocks = 0, --- number of blocks in use
Nenue@28 149
Nenue@28 150 freeBlocks = {}, --- block heap
Nenue@28 151 usedBlocks = {},
Nenue@28 152
Nenue@28 153 Info = {}, -- find data by ID
Nenue@28 154 BlockInfo = {}, -- find data by block ID
Nenue@28 155 Watched = {}, -- find watchIndex by data ID
Nenue@28 156 WatchInfo = {}, -- find data by watch index
Nenue@28 157 WatchBlock = {}, -- find block by watch index
Nenue@28 158 }
Nenue@28 159
Nenue@28 160 T.AutoQuest = {
Nenue@28 161 name = "AutoQuest",
Nenue@28 162 displayName = "Notice",
Nenue@28 163 updateReasonModule = OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST,
Nenue@28 164 updateReasonEvents = OBJECTIVE_TRACKER_UPDATE_QUEST + OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED,
Nenue@29 165 LogInfo = {},
Nenue@29 166 LogBlock = {},
Nenue@29 167 QuestBlock = {},
Nenue@28 168 }
Nenue@28 169 T.Quest = {
Nenue@28 170 name = "Quest",
Nenue@28 171 displayName = "Quests",
Nenue@28 172 updateReasonModule = OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST,
Nenue@28 173 updateReasonEvents = OBJECTIVE_TRACKER_UPDATE_QUEST + OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED,
Nenue@28 174 itemButtons = {},
Nenue@28 175 freeButtons = {},
Nenue@29 176 LogInfo = {},
Nenue@29 177 LogBlock = {},
Nenue@29 178 QuestBlock = {},
Nenue@28 179 }
Nenue@28 180 T.Cheevs = {
Nenue@28 181 name = "Cheevs",
Nenue@28 182 displayName = "Achievements",
Nenue@28 183 updateReasonModule = OBJECTIVE_TRACKER_UPDATE_MODULE_ACHIEVEMENT,
Nenue@28 184 updateReasonEvents = OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT +
Nenue@28 185 OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT_ADDED,
Nenue@28 186 }
Nenue@28 187 T.Bonus = {
Nenue@28 188 name = "Bonus",
Nenue@28 189 displayName = "Bonus Objectives",
Nenue@28 190 updateReasonModule = OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE,
Nenue@29 191 updateReasonEvents = OBJECTIVE_TRACKER_UPDATE_QUEST + OBJECTIVE_TRACKER_UPDATE_TASK_ADDED,
Nenue@29 192 QuestBlock = {},
Nenue@28 193 }
Nenue@28 194
Nenue@28 195 T.Scenario = {
Nenue@28 196 name = 'Scenario',
Nenue@28 197 displayName = 'Scenario Objectives',
Nenue@28 198 updateReasonModule = OBJECTIVE_TRACKER_UPDATE_MODULE_SCENARIO,
Nenue@28 199 updateReasonEvents = OBJECTIVE_TRACKER_UPDATE_SCENARIO_NEW_STAGE + OBJECTIVE_TRACKER_UPDATE_SCENARIO_BONUS_DELAYED
Nenue@28 200 }
Nenue@28 201
Nenue@28 202 local Tracker_string = function (self)
Nenue@28 203 return self.name
Nenue@28 204 end
Nenue@28 205 local Tracker_call = function (self, reason)
Nenue@28 206 self:Update(reason)
Nenue@28 207 end
Nenue@28 208 local Handler_Initialize = function (self, name, index)
Nenue@28 209 local c = T.Conf.Wrapper
Nenue@28 210 print('Initializing |cFF00FFFF'..name..'|r module...')
Nenue@28 211
Nenue@28 212 local handler = setmetatable(T[name] or {}, {
Nenue@28 213 __tostring = Tracker_string,
Nenue@28 214 __call = Tracker_call
Nenue@28 215 })
Nenue@28 216 if type(T.orderedHandlers[index]) == 'table' then
Nenue@28 217 return T.orderedHandlers[index]
Nenue@28 218 end
Nenue@28 219
Nenue@28 220 print('|cFFFFFF00Acquiring locals')
Nenue@28 221 local preset = {}
Nenue@28 222 for k, _ in pairs(handler) do
Nenue@28 223 preset[k] = true
Nenue@28 224 end
Nenue@28 225
Nenue@28 226
Nenue@28 227 print('|cFFFF8800Inheriting')
Nenue@28 228 for k, v in pairs(self) do
Nenue@28 229 if not handler[k] then
Nenue@28 230 if type(v) == 'table' then
Nenue@28 231 -- assume all tables to be local data; don't inherit or ref
Nenue@28 232 handler[k] = {}
Nenue@28 233 else
Nenue@28 234 handler[k] = self[k]
Nenue@28 235 end
Nenue@28 236 print('copying', k)
Nenue@28 237 end
Nenue@28 238 end
Nenue@28 239 print('|cFFFF4400'..tostring(name)..'|r:')
Nenue@28 240 for k, v in pairs(handler) do
Nenue@28 241 print(format("%32s %8s %s", (preset[k] and '|cFFFFFFFF' or '|cFFFFFF00') .. k .. '|r', type(v), tostring(v)))
Nenue@28 242 end
Nenue@28 243
Nenue@28 244 T[name] = handler
Nenue@28 245
Nenue@28 246 local trackerName = 'Veneer'..name..'Tracker'
Nenue@28 247 local handler = T[name]
Nenue@28 248 local frame = CreateFrame('Frame', trackerName, _G.VeneerObjectiveScroll, 'VeneerTrackerTemplate')
Nenue@28 249 frame.title:SetText(handler.displayName)
Nenue@28 250 frame:SetWidth(c.Width)
Nenue@30 251 frame.previousOffset = 0
Nenue@29 252
Nenue@28 253 handler.frame = frame
Nenue@29 254 handler.numBlocks = 0
Nenue@29 255 handler.actualBlocks = 0
Nenue@28 256 handler.trackerName = trackerName
Nenue@28 257 handler.lines = {}
Nenue@28 258 T.orderedTrackers[index] = frame
Nenue@28 259 T.namedTrackers[name] = frame
Nenue@28 260 T.indexedTrackers[handler] = frame
Nenue@28 261 print('|cFFFF0088' .. trackerName .. '|r created for |cFF00FFFF' .. handler.displayName .. '|r module')
Nenue@28 262
Nenue@28 263 T.orderedHandlers[index] = handler
Nenue@28 264 return true
Nenue@28 265 end
Nenue@28 266
Nenue@28 267 local Event = {}
Nenue@28 268 Event.QUEST_LOG_UPDATE = function()
Nenue@28 269 return OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST + OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE
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@28 274 return OBJECTIVE_TRACKER_UPDATE_TASK_ADDED, questID
Nenue@28 275 else
Nenue@30 276 if ( _G.AUTO_QUEST_WATCH == "1" ) then
Nenue@28 277 AddQuestWatch(questLogIndex);
Nenue@28 278 SetSuperTrackedQuestID(questID);
Nenue@28 279 end
Nenue@30 280 return OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED, questID, added
Nenue@28 281 end
Nenue@28 282 end
Nenue@28 283
Nenue@30 284 Event.QUEST_REMOVED = function(questLogIndex, questID)
Nenue@30 285 return OBJECTIVE_TRACKER_UPDATE_QUEST, questID, false
Nenue@30 286 end
Nenue@30 287
Nenue@28 288 Event.QUEST_WATCH_LIST_CHANGED = function(questID, added)
Nenue@28 289 if ( added ) then
Nenue@28 290 if ( not IsQuestTask(questID) ) then
Nenue@28 291 return OBJECTIVE_TRACKER_UPDATE_QUEST_ADDED, questID, added
Nenue@28 292 end
Nenue@28 293 else
Nenue@28 294 return OBJECTIVE_TRACKER_UPDATE_QUEST, questID, added
Nenue@28 295 end
Nenue@28 296 end
Nenue@28 297
Nenue@28 298 Event.QUEST_POI_UPDATE = function()
Nenue@28 299 QuestPOIUpdateIcons();
Nenue@28 300 if ( GetCVar("trackQuestSorting") == "proximity" ) then
Nenue@28 301 SortQuestWatches();
Nenue@28 302 end
Nenue@28 303 return OBJECTIVE_TRACKER_UPDATE_ALL
Nenue@28 304 end
Nenue@28 305 Event.SUPER_TRACKED_QUEST_CHANGED = function()
Nenue@28 306 return OBJECTIVE_TRACKER_UPDATE_QUEST
Nenue@28 307 end
Nenue@28 308 Event.ZONE_CHANGED = function()
Nenue@28 309 local inMicroDungeon = IsPlayerInMicroDungeon();
Nenue@28 310 if ( inMicroDungeon ~= T.inMicroDungeon ) then
Nenue@28 311 if ( not WorldMapFrame:IsShown() and GetCVarBool("questPOI") ) then
Nenue@28 312 SetMapToCurrentZone(); -- update the zone to get the right POI numbers for the tracker
Nenue@28 313 end
Nenue@28 314 --SortQuestWatches();
Nenue@28 315 T.inMicroDungeon = inMicroDungeon;
Nenue@28 316 end
Nenue@33 317 return OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE + OBJECTIVE_TRACKER_UPDATE_MODULE_SCENARIO
Nenue@28 318 end
Nenue@28 319 Event.QUEST_AUTOCOMPLETE = function(questId)
Nenue@28 320 AddAutoQuestPopUp(questId, "COMPLETE");
Nenue@28 321 return OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST + OBJECTIVE_TRACKER_UPDATE_MODULE_AUTO_QUEST_POPUP
Nenue@28 322 end
Nenue@28 323 Event.SCENARIO_CRITERIA_UPDATE = function()
Nenue@28 324 return OBJECTIVE_TRACKER_UPDATE_SCENARIO
Nenue@28 325 end
Nenue@28 326 Event.SCENARIO_UPDATE = function(newStage)
Nenue@28 327 if ( newStage ) then
Nenue@28 328 return OBJECTIVE_TRACKER_UPDATE_SCENARIO_NEW_STAGE
Nenue@28 329 else
Nenue@28 330 return OBJECTIVE_TRACKER_UPDATE_SCENARIO
Nenue@28 331 end
Nenue@28 332 end
Nenue@28 333 Event.TRACKED_ACHIEVEMENT_UPDATE = function()
Nenue@28 334 return OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT
Nenue@28 335 end
Nenue@28 336 Event.TRACKED_ACHIEVEMENT_LIST_CHANGED = function(achievementID, added)
Nenue@28 337 if ( added ) then
Nenue@28 338 return OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT_ADDED, achievementID
Nenue@28 339 else
Nenue@28 340 return OBJECTIVE_TRACKER_UPDATE_ACHIEVEMENT
Nenue@28 341 end
Nenue@28 342 end
Nenue@28 343 Event.ZONE_CHANGED_NEW_AREA = function ()
Nenue@28 344 if ( not WorldMapFrame:IsShown() and GetCVarBool("questPOI") ) then
Nenue@28 345 SetMapToCurrentZone(); -- update the zone to get the right POI numbers for the tracker
Nenue@28 346 end
Nenue@28 347 SortQuestWatches();
Nenue@28 348 T.currentZoneArea = GetCurrentMapAreaID()
Nenue@28 349 print('Updating zone ID to', T.currentZoneArea, '=', GetZoneText(), GetMinimapZoneText())
Nenue@28 350
Nenue@28 351
Nenue@28 352 return OBJECTIVE_TRACKER_UPDATE_TASK_ADDED
Nenue@28 353 end
Nenue@28 354
Nenue@28 355
Nenue@28 356 Event.PLAYER_MONEY = function()
Nenue@28 357 if T.watchMoneyReasons > 0 then
Nenue@28 358 return T.watchMoneyReasons
Nenue@28 359 end
Nenue@28 360 end
Nenue@28 361 Event.CRITERIA_COMPLETE = function()
Nenue@28 362 return OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE
Nenue@28 363 end
Nenue@28 364 Event.QUEST_TURN_IN = function(questID, xp, money)
Nenue@28 365 if ( IsQuestTask(questID) ) then
Nenue@28 366 T.Bonus:OnTurnIn(questID, xp, money)
Nenue@28 367 print('updating bonus modules (code', OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE, ',', questID, xp, money)
Nenue@28 368 return OBJECTIVE_TRACKER_UPDATE_MODULE_BONUS_OBJECTIVE, questID, xp, money
Nenue@28 369 else
Nenue@28 370 return OBJECTIVE_TRACKER_UPDATE_MODULE_QUEST, questID, xp, money
Nenue@28 371 end
Nenue@28 372 end
Nenue@28 373 T.Event = Event
Nenue@28 374
Nenue@28 375 --- Done once per ui load
Nenue@28 376 local BlizzHooks = {
Nenue@28 377 ['AddQuestWatch'] = 'AddQuestWatch',
Nenue@28 378 ['RemoveQuestWatch'] = 'RemoveQuestWatch',
Nenue@28 379 ['AbandonQuest'] = 'AbandonQuest',
Nenue@28 380 ['AcknowledgeAutoAcceptQuest'] = 'AcknowledgeAutoAcceptQuest',
Nenue@28 381 ['AddAutoQuestPopUp'] = 'AddAutoQuestPopUp',
Nenue@28 382 ['RemoveAutoQuestPopUp'] = 'RemoveAutoQuestPopUp',
Nenue@28 383 ['AddTrackedAchievement'] = 'AddTrackedAchievement',
Nenue@28 384 ['RemoveTrackedAchievement'] = 'RemoveTrackedAchievement',
Nenue@28 385 ['SetSuperTrackedQuestID'] = 'SetSuperTrackedQuestID'
Nenue@28 386 }
Nenue@28 387 local VeneerData
Nenue@28 388
Nenue@28 389 T.SetWatchMoney = function(watchMoney, reason)
Nenue@28 390 if watchMoney then
Nenue@28 391 if band(T.watchMoneyReasons, reason) == 0 then
Nenue@28 392 T.watchMoneyReasons = T.watchMoneyReasons + reason;
Nenue@28 393 end
Nenue@28 394 else
Nenue@28 395 if band(T.watchMoneyReasons, reason) > 0 then
Nenue@28 396 T.watchMoneyReasons = T.watchMoneyReasons - reason;
Nenue@28 397 end
Nenue@28 398 end
Nenue@28 399 end
Nenue@28 400 T.animateReasons = 0
Nenue@28 401 T.SetAnimate = function(reason)
Nenue@28 402 print('comparing', T.animateReasons, reason)
Nenue@28 403 if animate then
Nenue@28 404 if band(T.animateReasons, reason) == 0 then
Nenue@28 405 T.animateReasons = T.animateReasons + reason
Nenue@28 406 end
Nenue@28 407 else
Nenue@28 408 if band(T.animateReasons, reason) > 0 then
Nenue@28 409 T.animateReasons = T.animateReasons - reason
Nenue@28 410 end
Nenue@28 411 end
Nenue@28 412 end
Nenue@28 413
Nenue@32 414 local iprint = B.print('Info')
Nenue@32 415 T.SetRewards = function(t, questID)
Nenue@32 416
Nenue@32 417 SelectQuestLogEntry(GetQuestLogIndexByID(questID))
Nenue@32 418 local numQuestChoices = GetNumQuestLogChoices();
Nenue@32 419 local skillName, skillIcon, skillPoints = GetQuestLogRewardSkillPoints();
Nenue@32 420 local xp = GetQuestLogRewardXP();
Nenue@32 421 local playerTitle = GetQuestLogRewardTitle();
Nenue@32 422 ProcessQuestLogRewardFactions();
Nenue@32 423 local rewards = {}
Nenue@32 424 local texture, name, isTradeskillSpell, isSpellLearned, hideSpellLearnText, isBoostSpell, garrFollowerID = GetQuestLogRewardSpell(questID)
Nenue@32 425 if name then
Nenue@32 426 tinsert(rewards,{
Nenue@32 427 type = 'spell',
Nenue@32 428 name = name,
Nenue@32 429 texture = texture,
Nenue@32 430 })
Nenue@32 431 end
Nenue@32 432
Nenue@32 433 t.numCurrencies = GetNumQuestLogRewardCurrencies(questID)
Nenue@32 434 for i = 1, t.numCurrencies do
Nenue@32 435 local name, texture, count = GetQuestLogRewardCurrencyInfo(i, questID)
Nenue@32 436 tinsert(rewards,{
Nenue@32 437 type = 'currency',
Nenue@32 438 index = i,
Nenue@32 439 name = name,
Nenue@32 440 texture = texture,
Nenue@32 441 count = count
Nenue@32 442 });
Nenue@32 443 end
Nenue@32 444 -- items
Nenue@32 445 t.numItems = GetNumQuestLogRewards(questID)
Nenue@32 446 for i = 1, t.numItems do
Nenue@32 447 local name, texture, count, quality, isUsable = GetQuestLogRewardInfo(i, questID)
Nenue@32 448 tinsert(rewards, {
Nenue@32 449 type = 'item',
Nenue@32 450 index = i ,
Nenue@32 451 name = name,
Nenue@32 452 texture = texture,
Nenue@32 453 count = count,
Nenue@32 454 quality = quality,
Nenue@32 455 isUsable = isUsable
Nenue@32 456 });
Nenue@32 457 end
Nenue@32 458 -- money
Nenue@32 459
Nenue@32 460 local money = GetQuestLogRewardMoney(questID)
Nenue@32 461 if ( money > 0 ) then
Nenue@32 462 tinsert(rewards, {
Nenue@32 463 type = 'money',
Nenue@32 464 name = GetMoneyString(money),
Nenue@32 465 texture = "Interface\\Icons\\inv_misc_coin_01",
Nenue@32 466 count = 0,
Nenue@32 467 });
Nenue@32 468 end
Nenue@32 469
Nenue@32 470 if #rewards >= 1 then
Nenue@32 471 t.rewardInfo = rewards
Nenue@32 472 end
Nenue@32 473 end
Nenue@32 474
Nenue@28 475 local Play = function(file) if Devian and Devian.InWorkspace() then PlaySoundFile(file) end end
Nenue@28 476
Nenue@28 477 function T:OnEvent (event, ...)
Nenue@28 478 local isHandled
Nenue@28 479 print('OnEvent(|cFF00FF00'.. event ..'|r):', ...)
Nenue@28 480 local reason, arg1, arg2, arg3
Nenue@28 481 if Event[event] then
Nenue@28 482 if type(Event[event]) == 'function' then
Nenue@28 483 Play([[Interface\Addons\SharedMedia_MyMedia\sound\Info.ogg]])
Nenue@28 484 reason, arg1, arg2, arg3 = Event[event](...)
Nenue@28 485 elseif type(Event[event]) == 'table' then
Nenue@28 486 Play([[Interface\Addons\SharedMedia_MyMedia\sound\Link.ogg]])
Nenue@28 487 for i, action in ipairs(Event[event]) do
Nenue@28 488 if type(action) == 'function' then
Nenue@28 489 reason, arg1, arg2, arg3 = action(event, ...)
Nenue@28 490 else
Nenue@28 491 reason = action
Nenue@28 492 end
Nenue@28 493
Nenue@28 494 if reason then
Nenue@28 495 T:Update(reason, arg1, arg2, arg3)
Nenue@28 496 end
Nenue@28 497 end
Nenue@28 498 else
Nenue@30 499 --Play([[Interface\Addons\SharedMedia_MyMedia\sound\Heart.ogg]])
Nenue@28 500 reason = Event[event]
Nenue@28 501 end
Nenue@28 502 else
Nenue@30 503 print('no event handler set for', event)
Nenue@30 504 Play([[Interface\Addons\SharedMedia_MyMedia\sound\IM.ogg]])
Nenue@28 505 end
Nenue@28 506 if reason then
Nenue@30 507 print('update reason:', reason, 'args:', arg1, arg2, arg3)
Nenue@28 508 T:Update(reason, arg1, arg2, arg3)
Nenue@28 509 else
Nenue@28 510 print('no reason value returned')
Nenue@28 511 Play([[Interface\Addons\SharedMedia_MyMedia\sound\Quack.ogg]])
Nenue@28 512 end
Nenue@28 513
Nenue@28 514 end
Nenue@28 515
Nenue@28 516
Nenue@28 517 function T:OnInitialize()
Nenue@28 518 local c = T.Conf.Wrapper
Nenue@28 519 VeneerData = _G.VeneerData
Nenue@28 520 VeneerData.CallLog = VeneerData.CallLog or {}
Nenue@28 521 if not T.isHooked then
Nenue@28 522 T.isHooked = true
Nenue@28 523 for blizzFunc, veneerFunc in pairs(BlizzHooks) do
Nenue@28 524 if T[veneerFunc] then
Nenue@28 525 hooksecurefunc(blizzFunc, T[veneerFunc])
Nenue@28 526 else
Nenue@28 527 hooksecurefunc(blizzFunc, function(...)
Nenue@28 528 print('|cFFFF0088securehook('..tostring(blizzFunc)..')|r args:', ...)
Nenue@28 529 tinsert(VeneerData.CallLog, {blizzFunc, ...})
Nenue@28 530 end)
Nenue@28 531 end
Nenue@28 532 end
Nenue@28 533 end
Nenue@28 534
Nenue@28 535 T.Conf.TasksLog = T.Conf.TasksLog or {}
Nenue@28 536
Nenue@28 537 ObjectiveTrackerFrame:UnregisterAllEvents()
Nenue@28 538 ObjectiveTrackerFrame:Hide()
Nenue@33 539 _G.MinimapCluster:Hide()
Nenue@28 540
Nenue@28 541 for id, name in ipairs(T.orderedNames) do
Nenue@28 542 if not T.orderedHandlers[id] then
Nenue@28 543 Handler_Initialize(T.DefaultHandler, name, id)
Nenue@28 544 end
Nenue@28 545 end
Nenue@28 546 self:SetSize(c.Width, 40)
Nenue@28 547 T.InitializeWidgets()
Nenue@28 548 end
Nenue@28 549
Nenue@28 550 --- Done any time the the minimize button is toggled up
Nenue@28 551 function T:OnEnable()
Nenue@28 552
Nenue@28 553 print(B.Conf.VeneerObjectiveWrapper.enabled)
Nenue@28 554 if not B.Conf.VeneerObjectiveWrapper.enabled then
Nenue@28 555 return
Nenue@28 556 end
Nenue@28 557
Nenue@28 558 for event, action in pairs(Event) do
Nenue@28 559 print('|cFFFF0088listen to', event, 'for action|r', tostring(action))
Nenue@28 560 Wrapper:RegisterEvent(event)
Nenue@28 561 end
Nenue@28 562
Nenue@28 563 local c = T.Conf.Wrapper
Nenue@30 564 Wrapper.previousHeight = 0
Nenue@28 565 Scroller:SetScrollChild(Scroll)
Nenue@28 566 Scroller:SetWidth(c.Width)
Nenue@28 567 Scroll:SetWidth(c.Width)
Nenue@28 568 Scroll:ClearAllPoints()
Nenue@28 569 Scroll:SetPoint('TOP', Scroller, 'TOP')
Nenue@28 570 self:SetScript('OnEvent', T.OnEvent)
Nenue@28 571
Nenue@28 572 Scroller:Show()
Nenue@28 573
Nenue@28 574 local from, target, to, x, y = Wrapper:GetPoint(1)
Nenue@28 575 print(from, target:GetName(), to, x,y)
Nenue@28 576
Nenue@28 577
Nenue@28 578 -- run once to prime the data structure
Nenue@28 579 T.UpdateActionButtons()
Nenue@28 580 end
Nenue@28 581
Nenue@28 582 function T:OnDisable()
Nenue@28 583 self:UnregisterAllEvents()
Nenue@28 584 Scroller:Hide()
Nenue@28 585 end
Nenue@28 586