1
0
Fork 0
ChoreTracker/ChoreTracker.lua

345 lines
9.8 KiB
Lua
Raw Normal View History

ChoreTracker = LibStub('AceAddon-3.0'):NewAddon('ChoreTracker', 'AceConsole-3.0', 'AceEvent-3.0')
local core = ChoreTracker
2011-09-18 19:38:31 -04:00
local LQT, LDB, LDBIcon, LBZ
local db, tooltip, zones, trackedInstances, vpResetTime
local defaults = {
global = {},
profile = {
minimap = {
hide = false,
},
instances = {},
},
}
local options = {
name = 'ChoreTracker',
type = 'group',
args = {
minimap = {
name = 'Hide Minimap Icon',
desc = 'Removes the icon from your minimap.',
type = 'toggle',
2011-09-18 19:38:31 -04:00
get = function(info) return db.profile.minimap.hide end,
set = function(info, value) db.profile.minimap.hide = value LDBIcon[value and 'Hide' or 'Show'](LDBIcon, 'ChoreTracker') end,
}
}
}
2011-08-25 04:38:35 -04:00
local classColors = {}
local flagColors = {}
2011-09-01 03:16:53 -04:00
function core:OnInitialize()
-- Prepare the database if necessary
2011-09-18 19:38:31 -04:00
db = LibStub('AceDB-3.0'):New('ChoreTrackerDB', defaults, 'Default')
2011-09-01 03:16:53 -04:00
local level = UnitLevel('player')
local realm = GetRealmName()
local name = UnitName('player')
2011-09-18 19:38:31 -04:00
if db.global[realm] == nil then
db.global[realm] = {}
end
2011-09-01 03:16:53 -04:00
2011-09-18 19:38:31 -04:00
if db.global[realm][name] == nil and level == 85 then
db.global[realm][name] = {}
2011-09-01 03:16:53 -04:00
local class = UnitClass('player')
class = class:lower()
if class == 'deathknight' then
class = 'death knight'
2011-08-25 04:38:35 -04:00
end
2011-09-18 19:38:31 -04:00
db.global[realm][name].class = class
db.global[realm][name].valorPoints = {
2011-09-01 03:16:53 -04:00
valorPoints = 0,
resetTime = 0,
}
2011-09-18 19:38:31 -04:00
db.global[realm][name].lockouts = {}
end
-- Register events (here for now; track data regardless of whether it is displayed?)
2011-09-01 03:16:53 -04:00
local level = UnitLevel('player')
if level == 85 then
self:RegisterEvent('CALENDAR_UPDATE_EVENT_LIST','GetNextVPReset')
2011-09-01 03:16:53 -04:00
self:RegisterEvent('UPDATE_INSTANCE_INFO', 'UpdateChores')
self:RegisterEvent('CHAT_MSG_CURRENCY', 'UpdateChores')
2011-09-01 03:16:53 -04:00
end
2011-09-18 19:38:31 -04:00
2011-09-18 23:47:10 -04:00
-- Get calendar events information
OpenCalendar()
2011-09-18 19:38:31 -04:00
-- Reset data if necessary
core:ResetInstances()
core:ResetValorPoints()
end
function core:OnEnable()
LQT = LibStub('LibQTip-1.0')
LBZ = LibStub('LibBabble-Zone-3.0')
2011-09-18 19:38:31 -04:00
-- Setup font strings for later. (RAID_CLASS_COLORS always indexed in English?)
2011-08-25 04:38:35 -04:00
for class,color in pairs(RAID_CLASS_COLORS) do
class = class:lower()
if class == 'deathknight' then
class = 'death knight'
end
2011-08-29 01:17:37 -04:00
classColors[class] = CreateFont('ClassFont' .. class)
classColors[class]:CopyFontObject(GameTooltipText)
classColors[class]:SetTextColor(color.r, color.g, color.b)
2011-08-25 04:38:35 -04:00
end
flagColors['green'] = CreateFont('FlagFontGreen')
flagColors['green']:CopyFontObject(GameTooltipText)
flagColors['green']:SetTextColor(0, 255, 0)
2011-08-25 04:38:35 -04:00
flagColors['red'] = CreateFont('FlagFontRed')
flagColors['red']:CopyFontObject(GameTooltipText)
flagColors['red']:SetTextColor(255, 0, 0)
2011-09-01 03:16:53 -04:00
-- Setup LDB
2011-09-18 19:38:31 -04:00
LDB = LibStub('LibDataBroker-1.1'):NewDataObject('ChoreTracker', {
type = 'data source',
text = 'ChoreTracker',
icon = 'Interface\\AddOns\\ChoreTracker\\icon',
2011-09-19 04:59:17 -04:00
OnClick = function()
if LibStub("AceConfigDialog-3.0").OpenFrames['ChoreTracker'] then
LibStub('AceConfigDialog-3.0'):Close('ChoreTracker')
else
LibStub('AceConfigDialog-3.0'):Open('ChoreTracker')
end
end,
OnEnter = function(self)
local columnCount = 2
for instance,abbreviation in pairs(trackedInstances) do
columnCount = columnCount + 1
end
tooltip = LQT:Acquire('ChoreTrackerTooltip', columnCount, 'LEFT', 'CENTER', 'RIGHT')
core:DrawTooltip()
tooltip:SmartAnchorTo(self)
tooltip:Show()
end,
OnLeave = function(self)
LQT:Release(tooltip)
tooltip = nil
end,
})
-- Deal with minimap
2011-09-18 19:38:31 -04:00
LDBIcon = LibStub('LibDBIcon-1.0')
LDBIcon:Register('ChoreTracker', LDB, db.profile.minimap)
2011-09-18 19:38:31 -04:00
if db.profile.minimap.hide then
LDBIcon:Hide('ChoreTracker')
else
2011-09-18 19:38:31 -04:00
LDBIcon:Show('ChoreTracker')
end
-- Get instances
zones = LBZ:GetLookupTable()
trackedInstances = {
[zones['Baradin Hold']] = 'BH',
[zones['Firelands']] = 'FL',
[zones['The Bastion of Twilight']] = 'BoT',
[zones['Blackwing Descent']] = 'BWD',
[zones['Throne of the Four Winds']] = '4W',
}
-- Add options to Interface Panel
LibStub('AceConfigRegistry-3.0'):RegisterOptionsTable('ChoreTracker', options)
local ACD = LibStub('AceConfigDialog-3.0')
ACD:AddToBlizOptions('ChoreTracker', 'ChoreTracker')
end
2011-08-21 14:10:05 -04:00
function core:UpdateChores()
2011-09-18 19:38:31 -04:00
-- Reset data if necessary
2011-08-25 02:02:50 -04:00
core:ResetInstances()
core:ResetValorPoints()
2011-09-01 03:16:53 -04:00
local realm = GetRealmName()
local name = UnitName('player')
local _,_,_,earnedThisWeek = GetCurrencyInfo(396)
2011-09-01 03:16:53 -04:00
--store Valor Points
2011-09-18 19:38:31 -04:00
if vpResetTime ~= nil then
db.global[realm][name].valorPoints = {}
db.global[realm][name].valorPoints.points = earnedThisWeek
db.global[realm][name].valorPoints.resetTime = vpResetTime
2011-09-01 03:16:53 -04:00
end
2011-08-21 11:01:32 -04:00
2011-09-01 03:16:53 -04:00
--store Saved Instances
local savedInstances = GetNumSavedInstances()
for i = 1, savedInstances do
local instanceName, _, instanceReset, _, _, _, _, _, _, _, _, defeatedBosses = GetSavedInstanceInfo(i)
if trackedInstances[instanceName] ~= nil then
if instanceReset > 0 then
2011-09-18 19:38:31 -04:00
db.global[realm][name].lockouts[instanceName] = {}
db.global[realm][name].lockouts[instanceName].defeatedBosses = defeatedBosses
db.global[realm][name].lockouts[instanceName].resetTime = time() + instanceReset
2011-09-01 03:16:53 -04:00
else
2011-09-18 19:38:31 -04:00
db.global[realm][name].lockouts[instanceName] = nil
end
end
end
end
function core:ResetInstances()
2011-09-18 19:38:31 -04:00
for realm,realmTable in pairs(db.global) do
2011-09-01 03:16:53 -04:00
for name in pairs(realmTable) do
2011-09-18 19:38:31 -04:00
for instance,instanceTable in pairs(db.global[realm][name].lockouts) do
2011-09-01 03:16:53 -04:00
if instanceTable.resetTime < time() then
2011-09-18 19:38:31 -04:00
db.global[realm][name].lockouts[instance] = nil
2011-09-01 03:16:53 -04:00
end
end
end
end
end
function core:ResetValorPoints()
2011-09-18 19:38:31 -04:00
for realm,realmTable in pairs(db.global) do
2011-09-01 03:16:53 -04:00
for name in pairs(realmTable) do
2011-09-18 19:38:31 -04:00
if db.global[realm][name].valorPoints.resetTime < time() then
db.global[realm][name].valorPoints = {
2011-09-01 03:16:53 -04:00
valorPoints = 0,
resetTime = 0,
}
end
end
end
end
function core:GetNextVPReset()
--prepare calendar
local currentCalendarSetting = GetCVar('calendarShowResets') -- get current value and store
SetCVar('calendarShowResets', 1) -- set it to what we want
--figure out what time the server resets daily information
local questReset = GetQuestResetTime()
local resetTime = date('*t', time() + questReset)
--figure out reset day using next BH lockout
local _, month, day, year = CalendarGetDate()
local monthOffset = 0
local resetDate = nil
while resetDate == nil do
local todaysEvents = CalendarGetNumDayEvents(monthOffset, day)
for i = 1,todaysEvents do
if todaysEvents == 0 then
break
end
local title,hour,minute = CalendarGetDayEvent(monthOffset, day, i)
if title == zones['Baradin Hold'] then
resetDate = { year = year, month = month + monthOffset, day = day }
end
end
day = day + 1
if day > 31 then
if monthOffset == 1 then break end
day = 1
monthOffset = 1
end
end
--return calendar
SetCVar('calendarShowResets', currentCalendarSetting)
--and combine for the reset timestamp
if(resetDate ~= nil) then
resetDate.hour = resetTime.hour
resetDate.min = resetTime.min
resetDate.sec = resetTime.sec
vpResetTime = time(resetDate)
else
vpResetTime = nil
end
2011-09-01 03:16:53 -04:00
end
function core:DrawTooltip()
2011-09-19 05:53:40 -04:00
-- Instead of drawing the tooltip directly from data, we will populate a table,
-- sort the table, and then use the table to draw the tooltip
local tooltipTable = {}
for realm in pairs(db.global) do
for name in pairs(db.global[realm]) do
local valorPoints = db.global[realm][name].valorPoints.points
if valorPoints == nil then
valorPoints = 0
end
tooltipTable[name] = { name = name, valorPoints = valorPoints }
for instance in pairs(trackedInstances) do
local defeatedBosses
if db.global[realm][name].lockouts[instance] ~= nil then
defeatedBosses = db.global[realm][name].lockouts[instance].defeatedBosses
else
defeatedBosses = 0
end
tooltipTable[name][instance] = defeatedBosses
end
end
end
-- Sort by name for now
table.sort(tooltipTable, function(a, b) return a.name < b.name end )
for name,info in pairs(tooltipTable) do
local printString = name
for header,value in pairs(info) do
printString = printString .. ' ' .. value
end
print(printString)
end
tooltip:AddHeader('')
local valorPointColumn = tooltip:AddColumn('LEFT')
tooltip:SetCell(1, 1, '')
tooltip:SetCell(1, 2, 'VP')
2011-09-01 03:16:53 -04:00
local nextColumn = 3
for instance,abbreviation in pairs(trackedInstances) do
tooltip:SetCell(1, nextColumn, abbreviation, nil, 'CENTER')
2011-09-01 03:16:53 -04:00
nextColumn = nextColumn + 1
end
2011-09-18 19:38:31 -04:00
for realm in pairs(db.global) do
for name in pairs(db.global[realm]) do
local characterLine = tooltip:AddLine('')
2011-09-18 19:38:31 -04:00
local class = db.global[realm][name].class
tooltip:SetCell(characterLine, 1, name, classColors[class], 'LEFT')
2011-09-01 03:16:53 -04:00
local valorPoints, valorPointColor
2011-09-18 19:38:31 -04:00
valorPoints = db.global[realm][name].valorPoints.points
if valorPoints == nil then
valorPoints = 0
end
2011-09-01 03:16:53 -04:00
if valorPoints == 980 then
valorPointColor = flagColors['red']
else
valorPointColor = flagColors['green']
end
tooltip:SetCell(characterLine, 2, valorPoints, valorPointColor, 'RIGHT')
2011-09-01 03:16:53 -04:00
local nextColumn = 3
for instance,abbreviation in pairs(trackedInstances) do
2011-09-18 19:38:31 -04:00
if db.global[realm][name].lockouts[instance] ~= nil then
local defeatedBosses = db.global[realm][name].lockouts[instance].defeatedBosses
tooltip:SetCell(characterLine, nextColumn, defeatedBosses, flagColors['red'], 'RIGHT')
2011-09-01 03:16:53 -04:00
else
tooltip:SetCell(characterLine, nextColumn, '0', flagColors['green'], 'RIGHT')
2011-09-01 03:16:53 -04:00
end
nextColumn = nextColumn + 1
end
end
end
end