Mercurial > wow > buffalo2

annotate ObjectiveTracker/Quests.lua @ 38:1f8f9cc3d956

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
- module integration brought up to speed with current frame management structure
author Nenue
date Thu, 21 Apr 2016 11:36:41 -0400
parents e84d645c8ab8
children 92534dc793f2
rev   line source
Nenue@28 1 local B = select(2,...).frame
Nenue@28 2 local T = B:RegisterModule("ObjectiveTracker", _G.VeneerObjectiveWrapper, 'BuffFrame')
Nenue@28 3 local _G, ipairs, max, min, unpack, floor, pairs, tostring, type, band = _G, ipairs, max, min, unpack, floor, pairs, tostring, type, bit.band
Nenue@30 4 local GetQuestWatchInfo, GetQuestLogCompletionText = GetQuestWatchInfo, GetQuestLogCompletionText
Nenue@30 5 local GetQuestLogLeaderBoard, GetNumQuestLogEntries, GetQuestLogTitle = GetQuestLogLeaderBoard, GetNumQuestLogEntries, GetQuestLogTitle
Nenue@30 6 local GetQuestLogSpecialItemInfo, GetQuestLogSpecialItemCooldown = GetQuestLogSpecialItemInfo, GetQuestLogSpecialItemCooldown
Nenue@30 7 local GetSuperTrackedQuestID, GetMoney, C_Scenario, GetCVarBool, GetNumQuestWatches = GetSuperTrackedQuestID, GetMoney, C_Scenario, GetCVarBool, GetNumQuestWatches
Nenue@30 8 local GetQuestTagInfo, GetMoneyString, GetDistanceSqToQuest, GetQuestFactionGroup = GetQuestTagInfo, GetMoneyString, GetDistanceSqToQuest, GetQuestFactionGroup
Nenue@30 9 local QUEST_TAG_ACCOUNT, LE_QUEST_FACTION_HORDE, LE_QUEST_FREQUENCY_DAILY, LE_QUEST_FREQUENCY_WEEKLY = QUEST_TAG_ACCOUNT, LE_QUEST_FACTION_HORDE, LE_QUEST_FREQUENCY_DAILY, LE_QUEST_FREQUENCY_WEEKLY
Nenue@30 10 local QUEST_TAG_TCOORDS, IsQuestSequenced = QUEST_TAG_TCOORDS, IsQuestSequenced
Nenue@28 11 local Default, Quest = T.DefaultHandler, T.Quest
Nenue@37 12 local format, wipe, select = format, table.wipe, select
Nenue@37 13 local wipeall = B.wipeall
Nenue@37 14 local lprint, iprint, tprint = B.print('Line'), B.print('Info'), B.print('Tracker')
Nenue@37 15 local print = tprint
Nenue@28 16
Nenue@38 17
Nenue@38 18
Nenue@30 19 local superTrackQuestID, playerMoney, inScenario, showPOIs
Nenue@28 20 Quest.Update = function(self, reason, ...)
Nenue@38 21 local print = self.print
Nenue@28 22 print('QuestTracker:Update() received')
Nenue@28 23 T.UpdateActionButtons()
Nenue@28 24 Default.Update(self, reason, ...)
Nenue@28 25 end
Nenue@28 26
Nenue@28 27 T.Quest.numButtons = 0
Nenue@28 28 local usedButtons = T.Quest.itemButtons
Nenue@28 29 local freeButtons = T.Quest.freeButtons
Nenue@28 30
Nenue@38 31 Quest.UpdateObjectives = function(self, block)
Nenue@28 32 local print = lprint
Nenue@38 33 print('|cFF'..self.internalColor..'UpdateObjectives()')
Nenue@28 34 local info = block.info
Nenue@28 35
Nenue@28 36 print((info.isAccount and 'isAccount' or ''), (info.isFaction and 'isFaction' or ''), (info.isDaily and 'isDaily' or ''), (info.isWeekly and 'isWeekly' or ''), info.tagID, info.tagName)
Nenue@28 37
Nenue@38 38 local displayObjectives = true
Nenue@34 39 local block_schema = 'default'
Nenue@28 40 if info.isAccount then
Nenue@28 41 if info.isFaction then
Nenue@28 42 print(' faction', info.tagID)
Nenue@34 43 block_schema = 'faction_'..info.tagID
Nenue@28 44 else
Nenue@28 45 print(' account', info.isAccount, info.isFaction)
Nenue@34 46 block_schema = 'account'
Nenue@28 47 end
Nenue@28 48 elseif info.isDaily then
Nenue@28 49 print(' daily', info.frequency)
Nenue@34 50 block_schema = 'daily'
Nenue@28 51 elseif info.isWeekly then
Nenue@28 52 print(' weekly', info.frequency)
Nenue@34 53 block_schema = 'weekly'
Nenue@28 54 end
Nenue@28 55 local completionText
Nenue@28 56 if info.isComplete then
Nenue@28 57 if info.isAutoComplete then
Nenue@34 58 local questID, popupType = GetAutoQuestPopUp(info.logIndex)
Nenue@28 59 if popupType == 'COMPLETE' then
Nenue@28 60 print(' :: auto-complete quest :: set the message')
Nenue@38 61 self:AddLine(block, T.strings.CLICK_TO_COMPLETE, nil, 'complete')
Nenue@28 62 end
Nenue@28 63 else
Nenue@28 64 if not completionText or info.completionText then
Nenue@34 65 info.completionText = GetQuestLogCompletionText(info.logIndex)
Nenue@28 66 end
Nenue@28 67 end
Nenue@38 68 self:AddLine(block, info.completionText, nil, 'complete')
Nenue@38 69 displayObjectives = false
Nenue@38 70 print('|cFF'..self.internalColor..' :: complete quest :: show instruction: "'.. tostring(info.completionText) .. '"')
Nenue@28 71 end
Nenue@28 72
Nenue@38 73 Default.UpdateObjectives(self, block, block_schema, displayObjectives)
Nenue@34 74 return block_schema
Nenue@28 75 end
Nenue@28 76
Nenue@38 77 Quest.UpdateLine = function(handler, block, data)
Nenue@28 78 local objectiveType = data.type
Nenue@31 79 return data.text, nil, objectiveType
Nenue@28 80 end
Nenue@28 81
Nenue@28 82 -----------------------------
Nenue@28 83 --- QUEST
Nenue@37 84 local tremove, tinsert = tremove, tinsert
Nenue@37 85 local GetQuestLogIndexByID, IsQuestWatched = GetQuestLogIndexByID, IsQuestWatched
Nenue@28 86 Quest.QuestBlock = {}
Nenue@28 87 Quest.LogBlock = {}
Nenue@28 88 Quest.LogInfo = {}
Nenue@37 89 function Quest:FreeBlock (block)
Nenue@37 90 local used = Quest.usedBlocks
Nenue@37 91 local free = Quest.freeBlocks
Nenue@37 92 local reason = ''
Nenue@37 93 local doRelease = false
Nenue@37 94 local info = block.info
Nenue@37 95 local questID = info.questID
Nenue@37 96 local logIndex = info.logIndex
Nenue@28 97
Nenue@37 98 if info.posIndex then
Nenue@37 99 if used[info.posIndex] == block then
Nenue@37 100 doRelease = true
Nenue@37 101 reason = 'posIndex mismatch'
Nenue@37 102 end
Nenue@37 103 elseif logIndex then
Nenue@37 104 if not IsQuestWatched(logIndex) then
Nenue@37 105 reason = 'not being watched'
Nenue@37 106 elseif not self.LogBlock[logIndex] then
Nenue@37 107 doRelease = true
Nenue@37 108 reason = 'missing logBlock entry'
Nenue@37 109 elseif (self.LogBlock[logIndex] ~= block) then
Nenue@37 110 doRelease = true
Nenue@37 111 reason = 'different block using index'
Nenue@37 112 end
Nenue@37 113 elseif info.questID then
Nenue@37 114 if not GetQuestLogIndexByID(info.questID) then
Nenue@37 115 doRelease = true
Nenue@37 116 reason = 'no identifiable quest log entry'
Nenue@37 117 end
Nenue@37 118 end
Nenue@37 119
Nenue@37 120
Nenue@37 121 if doRelease then
Nenue@37 122 print(' |cFF00FF00FreeBlock (' .. block:GetName() .. '):', reason)
Nenue@37 123 block:Hide()
Nenue@37 124 tremove(used, info.posIndex)
Nenue@37 125 tinsert(free, block)
Nenue@37 126 end
Nenue@37 127
Nenue@37 128
Nenue@37 129 end
Nenue@37 130 local watchesChecked = {}
Nenue@37 131 local infosChecked = {}
Nenue@37 132 local blocksChecked = {}
Nenue@37 133 local GetQuestWatchIndex = GetQuestWatchIndex
Nenue@37 134 --- Get a total of things to show, and straighten out the index while we're at it
Nenue@37 135 --- Return the number shown, total in log, and the info table to parse
Nenue@37 136 Quest.GetNumWatched = function (self, id, added)
Nenue@38 137 local print = self.print
Nenue@30 138 superTrackQuestID = GetSuperTrackedQuestID()
Nenue@30 139 playerMoney = GetMoney();
Nenue@30 140 inScenario = C_Scenario.IsInScenario();
Nenue@30 141 showPOIs = GetCVarBool("questPOI");
Nenue@37 142 local numAll = GetNumQuestLogEntries()
Nenue@37 143 local numWatched = GetNumQuestWatches()
Nenue@37 144 local bottomIndex = 1
Nenue@38 145 print('GetNumWatched', self.name, numWatched, 'of', numAll)
Nenue@37 146 local start, limit = 1, numAll
Nenue@37 147
Nenue@37 148 --- start a list of blocks affected by this function
Nenue@37 149 wipe(blocksChecked)
Nenue@37 150 if id and not added then
Nenue@37 151 if self.InfoBlock[id] then
Nenue@37 152 tinsert(blocksChecked, self.InfoBlock[id])
Nenue@37 153 end
Nenue@37 154 end
Nenue@37 155
Nenue@37 156 for logIndex = start, limit do
Nenue@37 157 local reason1, reason2 = '', ''
Nenue@37 158 local title, level, suggestedGroup, isHeader, isCollapsed, isComplete, frequency, questID, startEvent, displayQuestID, isOnMap, hasLocalPOI, isTask, isStory = GetQuestLogTitle(logIndex)
Nenue@37 159 local watchIndex = GetQuestWatchIndex(logIndex)
Nenue@37 160
Nenue@37 161 if watchIndex and watchIndex >= bottomIndex then
Nenue@37 162 local watchInfo = self.WatchInfo[watchIndex]
Nenue@37 163 local watchBlock = self.WatchBlock[watchIndex]
Nenue@37 164 if watchInfo and watchInfo.questID ~= questID then
Nenue@38 165 print('GetNumWatched', 'trimming WatchInfo ['..watchIndex..'] =/=', questID)
Nenue@37 166 self.WatchInfo[watchIndex] = nil
Nenue@37 167 end
Nenue@37 168 if watchBlock and watchBlock.info.questID ~= questID then
Nenue@38 169 print('GetNumWatched', 'trimming WatchBlock ['..watchIndex..'] =/=', watchBlock:GetName())
Nenue@37 170 self.WatchBlock[watchIndex] = nil
Nenue@37 171 tinsert(blocksChecked, watchBlock)
Nenue@37 172 end
Nenue@37 173 end
Nenue@37 174
Nenue@37 175 local logBlock = self.LogBlock[logIndex]
Nenue@37 176 if logBlock and logBlock.info.questID ~= questID then
Nenue@37 177 --print(' |cFFBBFF00GetNumWatched: trimming LogBlock ['..logIndex..'] =/=', logBlock:GetName())
Nenue@37 178 self.LogBlock[logIndex] = nil
Nenue@37 179 tinsert(blocksChecked, logBlock)
Nenue@37 180 end
Nenue@37 181
Nenue@37 182 if questID ~= 0 then
Nenue@37 183 self.Info[questID] = self:GetInfo(logIndex, watchIndex)
Nenue@37 184 --print(' |cFF44BBFFGetNumWatched:|r map', questID, 'to', logIndex, (watchIndex and ('('..watchIndex..')') or ''))
Nenue@37 185 end
Nenue@37 186 end
Nenue@37 187
Nenue@37 188 --- remove any orphaned blocks from view and, if possible, free it for re-use
Nenue@37 189 for i, block in ipairs(blocksChecked) do
Nenue@37 190 if not GetQuestLogIndexByID(block.info.questID, 'player') then
Nenue@38 191 print('GetNumWatched', 'iterating a block without an index |cFFBBFF00'.. block:GetName()..'|r')
Nenue@37 192 block:Hide()
Nenue@37 193 self:FreeBlock(block)
Nenue@37 194 end
Nenue@37 195 if not IsQuestWatched(block.info.logIndex) then
Nenue@38 196 print('GetNumWatched', 'hiding untracked quest |cFFBBFF00'.. block:GetName()..'|r')
Nenue@37 197 block:Hide()
Nenue@37 198 end
Nenue@37 199 end
Nenue@37 200
Nenue@37 201 self.numWatched = numWatched
Nenue@37 202 self.numAll = numAll
Nenue@37 203
Nenue@37 204 return numWatched, numAll, self.WatchList
Nenue@28 205 end
Nenue@30 206
Nenue@37 207
Nenue@30 208 --- Returns an iterable table from which tracker blocks can be filled out. Data includes:
Nenue@30 209 -- All entry-layer GetXInfo return values
Nenue@30 210 -- Manifest of line data to be displayed in relation to the tracked object
Nenue@37 211 Quest.GetInfo = function (self, logIndex, watchIndex)
Nenue@28 212 local print = iprint
Nenue@37 213 local title, level, suggestedGroup, isHeader, isCollapsed, isComplete, frequency, questID, startEvent, displayQuestID, isOnMap, hasLocalPOI, isTask, isStory = GetQuestLogTitle(logIndex)
Nenue@30 214 if ( not questID ) then
Nenue@38 215 tprint('GetNumWatched', logIndex, watchIndex, '|cFFFF2299no data|r')
Nenue@28 216 return
Nenue@28 217 end
Nenue@28 218
Nenue@37 219 Quest.Info[questID] = Quest.Info[questID] or {}
Nenue@37 220 local q = Quest.Info[questID]
Nenue@37 221 q.questID = questID
Nenue@37 222 q.id = questID
Nenue@37 223 q.logIndex = logIndex
Nenue@37 224 q.watchIndex = watchIndex
Nenue@28 225
Nenue@37 226 local numObjectives, requiredMoney, isAutoComplete, failureTime, timeElapsed, questType
Nenue@37 227 = 0, 0, nil, false, false, 0
Nenue@37 228 if watchIndex then
Nenue@37 229 local _
Nenue@37 230 _,_,_, numObjectives, requiredMoney, _, _, isAutoComplete,
Nenue@37 231 failureTime, timeElapsed, questType = GetQuestWatchInfo(watchIndex)
Nenue@37 232 self.WatchList[watchIndex] = q
Nenue@37 233 --tprint(' |cFF88FF00GetInfo:|r set watch entry', watchIndex)
Nenue@38 234 print('GetInfo:', logIndex, watchIndex, '|cFFFF2299'..title..'|r')
Nenue@37 235 end
Nenue@37 236 self.LogInfo[logIndex] = q
Nenue@28 237
Nenue@37 238 q.numObjectives = numObjectives
Nenue@37 239 q.requiredMoney = requiredMoney
Nenue@37 240 q.failureTime = failureTime
Nenue@37 241 q.timeElapsed = timeElapsed
Nenue@30 242
Nenue@37 243
Nenue@37 244
Nenue@32 245 q.type = 'Quest'
Nenue@32 246 q.title = title
Nenue@32 247 q.level = level
Nenue@32 248 q.displayQuestID = displayQuestID
Nenue@32 249 q.suggestedGroup = suggestedGroup
Nenue@32 250
Nenue@30 251 -- re-use Blizzard logic for consistency
Nenue@32 252 local showQuest = true
Nenue@32 253 if isTask then showQuest = false end
Nenue@30 254 local watchMoney = false;
Nenue@30 255 local tagID, typeTag, frequencyTag, completionTag, completionText
Nenue@30 256 local isAccount, isFaction, isWeekly, isDaily = false, false, false, false
Nenue@30 257 local isBreadcrumb = false
Nenue@30 258 local questFailed = false
Nenue@30 259 local watchMoney = false
Nenue@30 260 local timerInfo, moneyInfo = false, false
Nenue@30 261 local objectives = q.objectives or {}
Nenue@30 262
Nenue@30 263
Nenue@30 264 -- Case 1: completed quest or "go to thing" breadcrumb
Nenue@30 265 -- * 1 line containing the completion text
Nenue@30 266 if ( isComplete and isComplete < 0 ) then
Nenue@30 267 isComplete = false
Nenue@30 268 questFailed = true
Nenue@30 269 elseif ( numObjectives == 0 and playerMoney >= requiredMoney and not startEvent ) then
Nenue@30 270 isComplete = true;
Nenue@30 271 questFailed = false
Nenue@30 272 if ( requiredMoney == 0 ) then
Nenue@30 273 isBreadcrumb = true;
Nenue@30 274 end
Nenue@30 275 end
Nenue@38 276 print('QuestFlags', (isComplete and 'isComplete' or ''), (questFailed and 'questFailed' or ''), (isBreadcrumb and 'isBreadcrumb' or ''))
Nenue@30 277
Nenue@30 278 -- completion message?
Nenue@30 279 local isSequenced = IsQuestSequenced(questID)
Nenue@30 280 local temp_status = ''
Nenue@30 281 if ( isComplete ) then
Nenue@30 282 temp_status = 'COMPLETED_OBJECTIVES'
Nenue@30 283 objectives = Quest.GetObjectives(questLogIndex, numObjectives, true, isSequenced, isStory)
Nenue@30 284 if ( isAutoComplete ) then
Nenue@30 285 temp_status = 'AUTOCOMPLETE_OBJECTIVES'
Nenue@30 286 completionText = _G.QUEST_WATCH_CLICK_TO_COMPLETE
Nenue@30 287 else
Nenue@30 288 if ( isBreadcrumb ) then
Nenue@30 289 temp_status = 'COMPLETE_BREADCRUMB'
Nenue@30 290 completionText = GetQuestLogCompletionText(questLogIndex)
Nenue@30 291 else
Nenue@30 292 temp_status = 'COMPLETE_READY_FOR_TURN_IN'
Nenue@30 293 completionText = _G.QUEST_WATCH_QUEST_READY
Nenue@30 294 end
Nenue@30 295 end
Nenue@30 296 elseif ( questFailed ) then
Nenue@30 297 temp_status = 'FAILED'
Nenue@30 298 -- Case 2: failed quest
Nenue@30 299 -- * 1 status line; hide other info
Nenue@30 300 completionText = _G.FAILED
Nenue@30 301 else
Nenue@30 302
Nenue@30 303 temp_status = 'PROGRESS_OBJECTIVES'
Nenue@30 304 -- Case 3: quest in progress
Nenue@30 305 -- * Multiple objective lines
Nenue@30 306 -- * Possible extra lines for money and timer data respectively
Nenue@37 307 objectives = Quest.GetObjectives(logIndex, numObjectives, false, isSequenced, isStory)
Nenue@30 308 q.objectives = objectives
Nenue@30 309
Nenue@30 310 --- anything past here gets appended to existing objectives
Nenue@30 311
Nenue@30 312 -- money
Nenue@30 313 if ( requiredMoney > playerMoney ) then
Nenue@30 314
Nenue@30 315 temp_status = temp_status .. '_MONEY'
Nenue@30 316 local text = GetMoneyString(playerMoney).." / "..GetMoneyString(requiredMoney);
Nenue@30 317 moneyInfo = {
Nenue@30 318 type = 'money',
Nenue@30 319 text = text,
Nenue@30 320 finished = false,
Nenue@30 321 requiredMoney = requiredMoney,
Nenue@30 322 playerMoney = playerMoney,
Nenue@30 323 }
Nenue@31 324 tinsert(objectives, moneyInfo)
Nenue@30 325 end
Nenue@30 326
Nenue@30 327 -- time limit
Nenue@30 328 if ( failureTime ) then
Nenue@30 329 temp_status = temp_status .. '_TIMED'
Nenue@30 330 if ( timeElapsed and timeElapsed <= failureTime ) then
Nenue@30 331 timerInfo = {
Nenue@30 332 type = 'timer',
Nenue@30 333 finished = false,
Nenue@30 334 timeElapsed = timeElapsed,
Nenue@30 335 failureTime = failureTime,
Nenue@30 336 }
Nenue@31 337 tinsert(objectives, timerInfo)
Nenue@30 338 end
Nenue@30 339 end
Nenue@30 340 end
Nenue@30 341 q.objectives = objectives
Nenue@30 342 q.moneyInfo = moneyInfo
Nenue@30 343 q.timerInfo = timerInfo
Nenue@30 344 q.completionText = completionText
Nenue@30 345
Nenue@30 346 -- POI data
Nenue@30 347 local POI = false
Nenue@30 348 if ( showPOIs ) then
Nenue@30 349 POI = {
Nenue@30 350 questID = questID,
Nenue@37 351 logIndex = logIndex,
Nenue@37 352 watchIndex = watchIndex
Nenue@30 353 }
Nenue@30 354 local poiButton;
Nenue@30 355 if ( hasLocalPOI ) then
Nenue@30 356
Nenue@30 357 if ( isComplete ) then
Nenue@30 358 POI.type = 'normal'
Nenue@30 359 else
Nenue@30 360 POI.type = 'numeric'
Nenue@30 361 end
Nenue@30 362 elseif ( isComplete ) then
Nenue@30 363 POI.type = 'remote'
Nenue@30 364 end
Nenue@30 365
Nenue@37 366 local distance, onContinent = GetDistanceSqToQuest(logIndex)
Nenue@30 367 if distance ~= nil and distance > 0 then
Nenue@30 368 POI.distance = distance
Nenue@30 369 POI.onContinent = onContinent
Nenue@30 370 end
Nenue@30 371 end
Nenue@30 372 q.POI = POI
Nenue@30 373
Nenue@30 374 --- Block Tags
Nenue@30 375 -- completionTag - in progres, complete, failed, autocomplete
Nenue@30 376 -- typeTag - account, faction, pvp, dungeon, group
Nenue@30 377 -- frequencyTag - daily/weekly
Nenue@37 378 local schema = 'default'
Nenue@30 379 local questTagID, tagName = GetQuestTagInfo(questID)
Nenue@30 380 local tagInfo = {}
Nenue@30 381 local tagCoords = {}
Nenue@30 382 local factionGroup = GetQuestFactionGroup(questID);
Nenue@30 383 if( questTagID and questTagID == QUEST_TAG_ACCOUNT ) then
Nenue@30 384 if( factionGroup ) then
Nenue@30 385 tagID = "ALLIANCE"
Nenue@37 386 schema = 'alliance'
Nenue@30 387 if ( factionGroup == LE_QUEST_FACTION_HORDE ) then
Nenue@30 388 tagID = "HORDE"
Nenue@37 389 schema = 'horde'
Nenue@30 390 end
Nenue@30 391 isFaction = true
Nenue@30 392 else
Nenue@30 393 tagID = QUEST_TAG_ACCOUNT
Nenue@30 394 isAccount = true
Nenue@30 395 end
Nenue@30 396 tagInfo['typeTag'] = tagID
Nenue@30 397 tagCoords['typeTag'] = QUEST_TAG_TCOORDS[tagID]
Nenue@30 398 elseif ( factionGroup) then
Nenue@30 399 tagID = "ALLIANCE"
Nenue@30 400 if ( factionGroup == LE_QUEST_FACTION_HORDE ) then
Nenue@30 401 tagID = "HORDE"
Nenue@30 402 end
Nenue@30 403 isFaction = true
Nenue@30 404 tagInfo['typeTag'] = tagID
Nenue@30 405 tagCoords['typeTag'] = QUEST_TAG_TCOORDS[tagID]
Nenue@30 406 end
Nenue@30 407
Nenue@30 408 if( frequency == LE_QUEST_FREQUENCY_DAILY and (not isComplete or isComplete == 0) ) then
Nenue@30 409 tagID = 'DAILY'
Nenue@30 410 tagInfo['frequencyTag'] = tagID
Nenue@30 411 tagCoords['frequencyTag'] = QUEST_TAG_TCOORDS[tagID]
Nenue@30 412 isDaily = true
Nenue@37 413 schema = 'daily'
Nenue@30 414 elseif( frequency == LE_QUEST_FREQUENCY_WEEKLY and (not isComplete or isComplete == 0) )then
Nenue@30 415 tagID = 'WEEKLY'
Nenue@30 416 tagInfo['frequencyTag'] = tagID
Nenue@30 417 tagCoords['frequencyTag'] = QUEST_TAG_TCOORDS[tagID]
Nenue@30 418 isWeekly = true
Nenue@37 419 schema = 'weekly'
Nenue@30 420 elseif( questTagID ) then
Nenue@30 421 tagID = questTagID
Nenue@30 422 end
Nenue@30 423
Nenue@30 424 if( isComplete ) then
Nenue@30 425 tagInfo['completionTag'] = 'COMPLETED'
Nenue@30 426 elseif ( questFailed ) then
Nenue@30 427 tagInfo['completionTag'] = 'FAILED'
Nenue@30 428 end
Nenue@30 429 tagCoords['completionTag'] = QUEST_TAG_TCOORDS[tagInfo['completionTag']]
Nenue@30 430
Nenue@30 431 q.tagInfo = tagInfo
Nenue@30 432 q.tagCoords = tagCoords
Nenue@30 433 -- establishes the primary block tag for view compacting
Nenue@30 434 q.tagID = tagID
Nenue@30 435 q.tagName = tagName
Nenue@30 436
Nenue@30 437 -- action button information
Nenue@37 438 local link, icon, charges = GetQuestLogSpecialItemInfo(logIndex)
Nenue@37 439 local start, duration, enable = GetQuestLogSpecialItemCooldown(logIndex)
Nenue@30 440 if link or icon or charges then
Nenue@30 441 q.specialItem = {
Nenue@30 442 questID = questID,
Nenue@37 443 logIndex = questLogIndex,
Nenue@30 444 link = link,
Nenue@30 445 charges = charges,
Nenue@30 446 icon = icon,
Nenue@30 447 start = start,
Nenue@30 448 duration = duration,
Nenue@30 449 enable = enable,
Nenue@30 450 }
Nenue@30 451 end
Nenue@30 452
Nenue@32 453 if moneyInfo or timerInfo then
Nenue@32 454 numObjectives = #objectives
Nenue@32 455 end
Nenue@30 456
Nenue@30 457 -- raw data
Nenue@28 458 q.isComplete = isComplete
Nenue@28 459 q.startEvent = startEvent
Nenue@28 460 q.isAutoComplete = isAutoComplete
Nenue@28 461 q.questType = questType
Nenue@28 462 q.isTask = isTask
Nenue@28 463 q.isStory = isStory
Nenue@28 464 q.isOnMap = isOnMap
Nenue@28 465 q.hasLocalPOI = hasLocalPOI
Nenue@28 466 q.frequency = frequency
Nenue@28 467 q.isComplete = isComplete
Nenue@28 468 q.isStory = isStory
Nenue@28 469 q.isTask = isTask
Nenue@31 470 q.statusKey = temp_status
Nenue@32 471 q.selected = (questID == superTrackQuestID)
Nenue@28 472
Nenue@32 473 T.SetRewards(q, questID)
Nenue@32 474
Nenue@34 475 q.questID = questID
Nenue@37 476 q.logIndex = logIndex
Nenue@34 477 q.watchIndex = watchIndex
Nenue@34 478 q.id = questID
Nenue@37 479 q.schema = schema
Nenue@28 480
Nenue@30 481 if Devian and Devian.InWorkspace() then
Nenue@38 482 print('QuestStatus', temp_status, '|cFF00FF00questLogIndex|r:', logIndex, title)
Nenue@30 483 local temp ={}
Nenue@38 484 local data_txt = '|cFF'..self.internalColor..'values:|r'
Nenue@30 485 for k,v in pairs(q) do
Nenue@30 486 if type(v) =='number' then
Nenue@30 487 data_txt = data_txt .. ' |cFFFFFF00'..k..'|r: ' .. tostring(v)
Nenue@30 488 elseif type(v) == 'table' then
Nenue@30 489 tinsert(temp, k)
Nenue@28 490 end
Nenue@28 491 end
Nenue@38 492 print('DataStatus',data_txt)
Nenue@30 493 sort(temp, function(a,b) return a < b end)
Nenue@30 494 for i, k in ipairs(temp) do
Nenue@38 495 iprint('GetInfo', questID, ''..k..'|r')
Nenue@30 496 for kk,v in pairs(q[k]) do
Nenue@38 497 iprint('GetInfo', questID, kk, '=', v)
Nenue@30 498 end
Nenue@28 499 end
Nenue@28 500 end
Nenue@28 501
Nenue@30 502 return q
Nenue@30 503 end
Nenue@28 504
Nenue@37 505 Quest.GetObjectives = function(logIndex, numObjectives, isComplete, isSequenced, isStory)
Nenue@38 506 local print = Quest.print
Nenue@30 507 local objectives = {}
Nenue@30 508 for i = 1, numObjectives do
Nenue@37 509 local text, type, finished = GetQuestLogLeaderBoard(i, logIndex)
Nenue@38 510 print('GetObjectives', format('|cFF88FF88#%d %s %s %s', i, tostring(type), tostring(text), tostring(finished)))
Nenue@30 511 objectives[i] = {
Nenue@28 512 index = i,
Nenue@28 513 type = type,
Nenue@28 514 text = text,
Nenue@28 515 finished = finished
Nenue@28 516 }
Nenue@28 517 end
Nenue@30 518 return objectives
Nenue@28 519 end
Nenue@28 520
Nenue@30 521 local huge, sqrt = math.huge, math.sqrt
Nenue@28 522 Quest.GetClosest = function()
Nenue@28 523 local minID, minTitle
Nenue@30 524 local minDist = huge
Nenue@28 525 local numQuests = GetNumQuestLogEntries()
Nenue@28 526 for questIndex = 1, numQuests do
Nenue@28 527 local distance, onContinent = GetDistanceSqToQuest(questIndex)
Nenue@28 528 local title, level, _, _, _, _, _, _, questID = GetQuestLogTitle(questIndex)
Nenue@28 529 if onContinent and distance < minDist then
Nenue@28 530 minDist = distance
Nenue@28 531 minTitle = title
Nenue@28 532 minID = questID
Nenue@28 533 end
Nenue@28 534 end
Nenue@28 535
Nenue@30 536 print('nearest quest is', minTitle, 'by', sqrt(minDist))
Nenue@28 537 return minID, minTitle, minDist
Nenue@28 538 end
Nenue@28 539
Nenue@28 540 Quest.OnTurnIn = function(self, questID, xp, money)
Nenue@28 541 end
Nenue@28 542
Nenue@29 543 Quest.Select = function (handler, block)
Nenue@29 544 if block.info.isAutoComplete and block.info.isComplete then
Nenue@34 545 ShowQuestComplete(block.info.logIndex)
Nenue@28 546 else
Nenue@29 547 SetSuperTrackedQuestID(block.info.questID)
Nenue@28 548 end
Nenue@28 549 end
Nenue@28 550
Nenue@29 551 Quest.Link = function(handler, block)
Nenue@34 552 local questLink = GetQuestLink(block.info.logIndex);
Nenue@28 553 if ( questLink ) then
Nenue@28 554 ChatEdit_InsertLink(questLink);
Nenue@28 555 end
Nenue@28 556 end
Nenue@28 557
Nenue@29 558 Quest.Open = function(handler, block)
Nenue@29 559 QuestMapFrame_OpenToQuestDetails(block.info.questID)
Nenue@28 560 end
Nenue@28 561
Nenue@29 562 Quest.Remove = function(handler, block)
Nenue@34 563 print('removing', block.info.logIndex, 'from watcher')
Nenue@34 564 RemoveQuestWatch(block.info.logIndex)
Nenue@29 565 end