QuestTracking.lua

   1
   2
   3 local TourGuide = TourGuide
   4 local hadquest
   5
   6
   7 TourGuide.TrackEvents = {"CHAT_MSG_LOOT", "CHAT_MSG_SYSTEM", "QUEST_COMPLETE", "QUEST_WATCH_UPDATE", "QUEST_LOG_UPDATE",
   8         "ZONE_CHANGED", "ZONE_CHANGED_INDOORS", "MINIMAP_ZONE_CHANGED", "ZONE_CHANGED_NEW_AREA"}
   9
  10
  11 function TourGuide:ZONE_CHANGED(...)
  12         local action, quest, note, logi, complete, hasitem, turnedin, fullquestname = self:GetCurrentObjectiveInfo()
  13         if (action == "RUN" or action == "FLY" or action == "HEARTH" or action == "BOAT") and (GetSubZoneText() == quest or GetZoneText() == quest) then
  14                 self:DebugF(1, "Detected zone change %q - %q", action, quest)
  15                 self:SetTurnedIn()
  16         end
  17 end
  18 TourGuide.ZONE_CHANGED_INDOORS = TourGuide.ZONE_CHANGED
  19 TourGuide.MINIMAP_ZONE_CHANGED = TourGuide.ZONE_CHANGED
  20 TourGuide.ZONE_CHANGED_NEW_AREA = TourGuide.ZONE_CHANGED
  21
  22
  23 function TourGuide:CHAT_MSG_SYSTEM(event, msg)
  24         local action, quest, note, logi, complete, hasitem, turnedin, fullquestname = self:GetCurrentObjectiveInfo()
  25
  26         if action == "SETHEARTH" then
  27                 local _, _, loc = msg:find("(.*) is now your home.")
  28                 if loc and loc == quest then
  29                         self:DebugF(1, "Detected setting hearth to %q", loc)
  30                         return self:SetTurnedIn()
  31                 end
  32         end
  33
  34         if action == "ACCEPT" then
  35                 local _, _, text = msg:find("Quest accepted: (.*)")
  36                 if text and quest:gsub("%s%(Part %d+%)", "") == text then
  37                         self:DebugF(1, "Detected quest accept %q", quest)
  38                         return self:UpdateStatusFrame()
  39                 end
  40         end
  41
  42         local _, _, text = msg:find("(.*) completed.")
  43         if not text then return end
  44
  45         if quest:gsub("%s%(Part %d+%)", "") == text then
  46                 self:DebugF(1, "Detected quest turnin %q", quest)
  47 --~             return self:SetTurnedIn()
  48         end
  49
  50         self:Debug(1, "Detected early turnin, searching for quest...")
  51 --~     self:CompleteQuest(text)
  52 end
  53
  54
  55 local turninquest
  56 function TourGuide:QUEST_COMPLETE(event)
  57         local quest = GetTitleText()
  58         self:Debug(10, "QUEST_COMPLETE", quest)
  59         if self:GetQuestLogIndexByName(quest) then
  60                 self:DebugF(1, "Player has quest %q, turning in?", quest)
  61                 turninquest = quest
  62         end
  63 end
  64
  65
  66 function TourGuide:QUEST_WATCH_UPDATE(event)
  67         if self:GetCurrentObjectiveInfo() == "COMPLETE" then self:UpdateStatusFrame() end
  68 end
  69
  70
  71 function TourGuide:QUEST_LOG_UPDATE(event)
  72         self:Debug(10, "QUEST_LOG_UPDATE")
  73         local action, quest, note, logi, complete, hasitem, turnedin, fullquestname = self:GetCurrentObjectiveInfo()
  74         local questturnedin = turninquest and not self:GetQuestLogIndexByName(turninquest)
  75         if turninquest then self:DebugF(1, "Turnin quest %q (%s)", turninquest, tostring(not self:GetQuestLogIndexByName(turninquest))) end
  76
  77         if questturnedin then
  78                 self:Debug(1, "Detected early chain quest turnin, searching for quest...")
  79 --~             self:CompleteQuest(turninquest)
  80         elseif action == "ACCEPT" then self:UpdateStatusFrame()
  81 --~     elseif action == "TURNIN" and turninquest == quest and not logi then self:SetTurnedIn()
  82         elseif action == "COMPLETE" and complete then self:UpdateStatusFrame() end
  83         turninquest = nil
  84 end
  85
  86
  87 function TourGuide:CHAT_MSG_LOOT(event, msg)
  88         local action, quest, _, _, _, _, _, _, _, _, lootitem, lootqty = self:GetCurrentObjectiveInfo()
  89         local _, _, itemid, name = msg:find("^You receive .*Hitem:(%d+).*(%[.+%])")
  90         self:Debug(10, event, msg:gsub("|","||"), action, quest, lootitem, lootqty, itemid, name)
  91
  92         if action == "BUY" and name and name == quest
  93         or action == "NOTE" and lootitem and itemid == lootitem and (GetItemCount(lootitem) + 1) >= lootqty then
  94                 return self:SetTurnedIn()
  95         end
  96 end
  97
  98
  99 function TourGuide:UI_INFO_MESSAGE(event, msg)
 100         local action, quest = self:GetCurrentObjectiveInfo()
 101
 102         if msg == ERR_NEWTAXIPATH and action == "GETFLIGHTPOINT" then
 103                 self:Debug(1, "Discovered flight point")
 104                 self:SetTurnedIn()
 105         end
 106 end
 107
 108
 109 local orig = GetQuestReward
 110 GetQuestReward = function(...)
 111         local quest = GetTitleText()
 112         TourGuide:Debug(10, "GetQuestReward", quest)
 113         TourGuide:CompleteQuest(quest)
 114
 115         return orig(...)
 116 end