local addonName, QuestKing = ...
local opt = QuestKing.options

-- quest "The Arena of Annihilation" is in "Kun-Lai Summit" zone header...

---- Options

-- low freq

local opt_font = opt.font
local opt_fontChallengeTimer = opt.fontChallengeTimer
local opt_fontSize = opt.fontSize

local opt_fontStyle = opt.fontStyle
local opt_fontLayer = opt.fontLayer

local opt_positionPresets = opt.positionPresets
local opt_tooltipAnchor = opt.tooltipAnchor
local opt_tooltipScale = opt.tooltipScale
local opt_enableItemPopups = opt.enableItemPopups

local opt_subzoneHeuristicHighlight = opt.subzoneHeuristicHighlight

-- high freq

local opt_buttonWidth = opt.buttonWidth
local opt_lineHeight = opt.lineHeight
local opt_titleHeight = opt.titleHeight

local opt_itemAnchorSide = opt.itemAnchorSide
local opt_showCompletedObjectives = opt.showCompletedObjectives
local opt_updateRate = opt.updateRate
local opt_colors = opt.colors


---- Locals

local fEvents = CreateFrame("Frame", "QuestKing_EventsFrame")
local fTimerMonitor = CreateFrame("Frame", "QuestKing_TimerMonitorFrame")
local fCombat = CreateFrame("Frame", "QuestKing_CombatFrame")

local headerList = {}       -- updated by buildQuestSortTable
local questSortTable = {}   -- "
local totalQuestCount = 0   -- "

local trackedAchievementCache = {}

local updatedObjectives = {} -- objectives updated since last updateTracker

local achievementTimers = {}
local achievementTimersMeta = {}

local numWatchButtons = 0 -- total watch buttons
local numButtonsShown = 0 -- buttons curtently in use

local prev_GetNumQuestLogEntries = 0  -- used to determine if updateTracker needs to call buildQuestTable
local prev_GetNumQuestWatches = 0     -- "

local cached_numQuestTimers = 0   -- used to determine if the number of timers has changed while timers are running in update mode

local watchMoney = false  -- set true if a quest we're watching needs money

local OBJECTIVE_PATTERN = "(.*):%s*([%d]+)%s*/%s*([%d]+)"

local db = nil    -- savedvariables
local dbc = nil

local newPlayerLevel = nil

local itemPopups = {}
local QUEST_START_ITEMS = nil
local LOOT_SELF_REGEX = gsub(LOOT_ITEM_SELF, "%%s", "(.+)")

local checkCombat = false

---- ############################

-- Upvalues

local _G = _G
local pairs = pairs
local format = format
local floor = math.floor
local math_modf = math.modf
local math_ceil = math.ceil
local GetTime = GetTime
local GetQuestTimers = GetQuestTimers
local SecondsToTime = SecondsToTime

local GetQuestLink = GetQuestLink
local GetQuestLogTitle = GetQuestLogTitle
local GetNumQuestLogEntries = GetNumQuestLogEntries
local GetQuestLogQuestText = GetQuestLogQuestText
local GetNumQuestLeaderBoards = GetNumQuestLeaderBoards

-- Local functions

local QuestKing_Tracker, WatchButton

local checkCombatTimer, startCombatTimer, checkPlayerLevelUp, parseLoot, UseContainerItemByID, GetTimeStringFromSecondsShort
local hookQuestWatch

local updateTracker
local updateTrackerChallengeTimers, setButtonToChallengeTimer, updateChallengeMedal, onUpdateChallengeTimer
local updateTrackerScenarios, setButtonToScenario
local updateTrackerQuestTimers, setButtonToQuestTimer, onUpdateQuestTimer
local updateTrackerPopups, setButtonToPopup, setButtonToItemPopup
local updateTrackerQuests, setButtonToQuest
local updateTrackerAchievements, setButtonToAchievement, onUpdateAchievementTimer
local setButtonToProvingGroundsTimer, onUpdateProvingGroundsTimer, UpdateProvingGroundsBar

local buildQuestSortTable, getQuestTaggedTitle, colorGradient, getObjectiveColor

-- Tracker

function QuestKing:CreateTracker ()
	local frame = CreateFrame("Frame", "QuestKing_Tracker", UIParent)
	QuestKing_Tracker = frame

	QuestKing:PositionTracker()

	frame:SetWidth(opt_buttonWidth)
	frame:SetHeight(opt_titleHeight)

	-- frame:SetBackdrop({
	-- 	bgFile = "Interface/Tooltips/UI-Tooltip-Background",
	-- 	insets = { left = 0, right = 0, top = 0, bottom = 0 }
	-- })
	-- frame:SetBackdropColor(0,0,0,1)
	
	-- titlebar
	
	local titlebar = CreateFrame("Button", nil, frame)
	titlebar:SetWidth(opt_buttonWidth)
	titlebar:SetHeight(opt_titleHeight)
	titlebar:SetPoint("TOPLEFT", UIParent, "TOPLEFT", 0, -100)
	-- titlebar:SetBackdrop({
	-- 	bgFile = "Interface/Tooltips/UI-Tooltip-Background",
	-- 	insets = { left = 0, right = 0, top = 0, bottom = 0 }
	-- })
	-- titlebar:SetBackdropColor(1, 0, 0, 0)	
	titlebar.parent = frame
	frame.titlebar = titlebar
	
	-- minimize button
	
	local minimizeButton = CreateFrame("Button", "QuestKing_TrackerMinimizeButton", titlebar)
	minimizeButton:SetWidth(15)
	minimizeButton:SetHeight(15)
	
	local tex = minimizeButton:CreateTexture()
	tex:SetPoint("CENTER")
	tex:SetTexture([[Interface\Buttons\UI-Quickslot2]])
	tex:SetWidth(22)
	tex:SetHeight(22)
	minimizeButton:SetNormalTexture(tex)
	
	local tex = minimizeButton:CreateTexture()
	tex:SetPoint("CENTER")
	tex:SetTexture([[Interface\Buttons\UI-Quickslot2]])
	tex:SetWidth(15)
	tex:SetHeight(15)
	minimizeButton:SetPushedTexture(tex)

	local tex = minimizeButton:CreateTexture()
	tex:SetPoint("CENTER")
	tex:SetTexture([[Interface\Buttons\UI-Quickslot-Depress]])
	tex:SetWidth(15)
	tex:SetHeight(15)
	minimizeButton:SetHighlightTexture(tex, "ADD")
	
	local label = minimizeButton:CreateFontString(nil, opt_fontLayer)
	label:SetFont(opt_font, opt_fontSize, opt_fontStyle)
	label:SetJustifyH("CENTER")
	label:SetJustifyV("MIDDLE")
	label:SetTextColor(opt_colors.TrackerTitlebarText[1], opt_colors.TrackerTitlebarText[2], opt_colors.TrackerTitlebarText[3])
	label:SetShadowOffset(1, -1)
	label:SetShadowColor(0, 0, 0, 1)	
	label:SetPoint("CENTER", 1, 0.5)
	label:SetText("+")
	minimizeButton.label = label

	minimizeButton:RegisterForClicks("LeftButtonUp", "RightButtonUp")
	minimizeButton:SetScript("OnClick", QuestKing.MinimizeButtonOnClick)
	
	-- mode button
	
	local modeButton = CreateFrame("Button", "QuestKing_TrackerModeButton", titlebar)
	modeButton:SetWidth(15)
	modeButton:SetHeight(15)
	
	local tex = modeButton:CreateTexture()
	tex:SetPoint("CENTER")
	tex:SetTexture([[Interface\Buttons\UI-Quickslot2]])
	tex:SetWidth(22)
	tex:SetHeight(22)
	modeButton:SetNormalTexture(tex)
	
	local tex = modeButton:CreateTexture()
	tex:SetPoint("CENTER")
	tex:SetTexture([[Interface\Buttons\UI-Quickslot2]])
	tex:SetWidth(15)
	tex:SetHeight(15)
	modeButton:SetPushedTexture(tex)

	local tex = modeButton:CreateTexture()
	tex:SetPoint("CENTER")
	tex:SetTexture([[Interface\Buttons\UI-Quickslot-Depress]])
	tex:SetWidth(15)
	tex:SetHeight(15)
	modeButton:SetHighlightTexture(tex, "ADD")
	
	local label = modeButton:CreateFontString(nil, opt_fontLayer)
	label:SetFont(opt_font, opt_fontSize, opt_fontStyle)
	label:SetJustifyH("CENTER")
	label:SetJustifyV("MIDDLE")
	label:SetTextColor(opt_colors.TrackerTitlebarText[1], opt_colors.TrackerTitlebarText[2], opt_colors.TrackerTitlebarText[3])
	label:SetShadowOffset(1, -1)
	label:SetShadowColor(0, 0, 0, 1)	
	label:SetPoint("CENTER", 1, 0.5)
	label:SetText("Q")
	modeButton.label = label

	modeButton:RegisterForClicks("LeftButtonUp", "RightButtonUp")
	modeButton:SetScript("OnClick", QuestKing.ModeButtonOnClick)
	
	-- titlebar text
	
	local titlebarText = titlebar:CreateFontString(nil, opt_fontLayer)
	titlebarText:SetFont(opt_font, opt_fontSize, opt_fontStyle)
	titlebarText:SetJustifyH("RIGHT")
	titlebarText:SetTextColor(opt_colors.TrackerTitlebarText[1], opt_colors.TrackerTitlebarText[2], opt_colors.TrackerTitlebarText[3])
	titlebarText:SetShadowOffset(1, -1)
	titlebarText:SetShadowColor(0, 0, 0, 1)	

	titlebarText:SetText("0/"..MAX_QUESTS)
	frame.titlebarText = titlebarText

	-- layout
	
	if true then
		minimizeButton:SetPoint("RIGHT", titlebar, "RIGHT", 100, 0)
		modeButton:SetPoint("RIGHT", minimizeButton, "LEFT", 100, 0)
		titlebarText:SetPoint("RIGHT", modeButton, "LEFT", 100, 0)
	end
	
	--frame:SetPoint("TOPLEFT", titlebar)
	--frame:SetPoint("BOTTOMLEFT", titlebar)
	--frame:SetWidth(opt_buttonWidth)
	
	titlebar:SetPoint("TOPLEFT", frame)
	
	-- frame:SetMovable(true)
	-- titlebar:SetScript("OnMouseDown", function ()
	-- 	frame:StartMoving()
	-- end)
	-- titlebar:SetScript("OnMouseUp", function ()
	-- 	frame:StopMovingOrSizing()
	-- 	frame:SetUserPlaced(false)
	-- end)
	
end

local measureFrame = nil
function QuestKing:ResizeTracker (lastShown)
	if (not lastShown) then
		QuestKing_Tracker:SetHeight(opt_titleHeight)
	else
		if not measureFrame then
			measureFrame = CreateFrame("Frame", nil, UIParent)
			measureFrame:SetWidth(opt_buttonWidth)
			-- measureFrame:SetBackdrop({
			-- 	bgFile = "Interface/Tooltips/UI-Tooltip-Background",
			-- 	insets = { left = 0, right = 0, top = 0, bottom = 0 }
			-- })
			-- measureFrame:SetBackdropColor(0,1,0,0.5)
		end
		
		measureFrame:ClearAllPoints()
		measureFrame:SetPoint("TOPLEFT", QuestKing_Tracker)
		measureFrame:SetPoint("BOTTOMLEFT", lastShown)
		local height = measureFrame:GetHeight()
		QuestKing_Tracker:SetHeight(height)
	end
end

function QuestKing:PositionTracker()
	local preset = opt_positionPresets[dbc.trackerPositionPreset]
	if not preset then
		dbc.trackerPositionPreset = 1
		preset = opt_positionPresets[1]
	end
	QuestKing_Tracker:SetPoint(unpack(preset))
end

function QuestKing:CycleTrackerPosition()
	local new = dbc.trackerPositionPreset + 1
	if new > #opt_positionPresets then
		new = 1
	end
	dbc.trackerPositionPreset = new
	QuestKing:PositionTracker()
end

-- Events

function checkCombatTimer ()
	if not InCombatLockdown() then
		--D("FINISH")
		checkCombat = false
		fCombat:SetScript("OnUpdate", nil)
		QuestKing_TrackerModeButton.label:SetTextColor(opt_colors.TrackerTitlebarText[1], opt_colors.TrackerTitlebarText[2], opt_colors.TrackerTitlebarText[3])
		updateTracker()
	end
end

function startCombatTimer ()
	if (checkCombat == false) then
		checkCombat = true
		fCombat:SetScript("OnUpdate", checkCombatTimer)
		QuestKing_TrackerModeButton.label:SetTextColor(1, 0, 0)
	end
end

function checkPlayerLevelUp ()
	local level = UnitLevel("player")
	if level >= newPlayerLevel then
		QuestKing_Tracker:SetScript("OnUpdate", nil)
		updateTracker()
	else
		--
	end
end

function parseLoot (msg)
	local _, _, link = string.find(msg, LOOT_SELF_REGEX)
	if link then
		local _, _, itemID, itemName = string.find(link, "item:(%d+):.*|h%[(.+)%]|h")
		itemID = tonumber(itemID)
		if itemID then
			if tContains(QUEST_START_ITEMS, itemID) then
				itemPopups[itemID] = itemName
				PlaySoundFile("Sound\\Interface\\PVPWarningHordeMono.wav")
				updateTracker()
			end
		end
	end
end

function UseContainerItemByID(searchID)
	for i = 0,4 do
		for j = 1, GetContainerNumSlots(i) do
			local id = GetContainerItemID(i,j)
			if id == searchID then
				UseContainerItem(i, j)
				return
			end
		end
	end
end

function QuestKing_HandleEvent (self, event, ...)
	--D("|cffaaccff"..event, ...)
	if (event == "CHAT_MSG_LOOT") then
		parseLoot(...)
	elseif (event == "PLAYER_MONEY") and (watchMoney) then
		updateTracker()
	elseif (event == "PLAYER_LEVEL_UP") then
		-- local v = 60; D("= " .. Hex(GetQuestDifficultyColor(v))..v)
		-- local v = 61; D("= " .. Hex(GetQuestDifficultyColor(v))..v)
		-- local v = 62; D("= " .. Hex(GetQuestDifficultyColor(v))..v)
		-- local v = 63; D("= " .. Hex(GetQuestDifficultyColor(v))..v)
		-- local v = 64; D("= " .. Hex(GetQuestDifficultyColor(v))..v)
		-- D("GreenRange is " .. GetQuestGreenRange())
		newPlayerLevel = ...
		QuestKing_Tracker:SetScript("OnUpdate", checkPlayerLevelUp)
	elseif (event == "QUEST_LOG_UPDATE") or (event == "ITEM_PUSH") then
		updateTracker()
	elseif (event == "UI_INFO_MESSAGE") then
		local desc = ...
		local p1, p2, quantName, quantCur, quantMax = string.find(desc, OBJECTIVE_PATTERN)
		if quantName then
			updatedObjectives[quantName] = true
		end
	elseif (event == "TRACKED_ACHIEVEMENT_UPDATE") then
		-- can i ignore this/updateTracker entirely if achieveID isnt in trackedAchievementCache? (tContains)
		-- if i do, tracking a quest with a timer that's already started ma not show it (for a while...?)
			
		local achievementID, criteriaID, timeElapsed, timeLimit = ...
		--
		if timeElapsed and timeLimit then
			if timeElapsed >= timeLimit then
				achievementTimers[criteriaID] = nil
				achievementTimersMeta[achievementID] = nil
			else
				achievementTimers[criteriaID] = achievementTimers[criteriaID] or {}
				achievementTimers[criteriaID].startTime = GetTime() - timeElapsed
				achievementTimers[criteriaID].duration = timeLimit
				achievementTimersMeta[achievementID] = achievementTimers[criteriaID]
			end
		end
		--D(">>>")
		updateTracker()
	elseif (event == "QUEST_AUTOCOMPLETE") then
		local questId = ...
		if (AddAutoQuestPopUp(questId, "COMPLETE")) then
			PlaySound("UI_AutoQuestComplete")
		end
		updateTracker()
	elseif (event == "SCENARIO_UPDATE") or (event == "SCENARIO_CRITERIA_UPDATE") then
		-- D("SCENARIO_UPDATE")
		updateTracker()
	elseif (event == "PLAYER_ENTERING_WORLD") or (event == "WORLD_STATE_TIMER_START") or (event == "WORLD_STATE_TIMER_STOP") then
		-- challenge/scenario zone in + timers
		updateTracker()
	elseif (event == "ZONE_CHANGED") or (event == "ZONE_CHANGED_INDOORS") or (event == "ZONE_CHANGED_NEW_AREA") then
		-- zone heuristic highlight
		updateTracker()
	end
end

function QuestKing.MinimizeButtonOnClick (self, mouse, down)
	if mouse == "RightButton" then
		QuestKing:CycleTrackerPosition()
	else
		if dbc.trackerCollapsed then
			dbc.trackerCollapsed = false
			--PlaySound("igMiniMapOpen")
		else
			dbc.trackerCollapsed = true
			--PlaySound("igMiniMapClose")
		end
		updateTracker()
	end
end

function QuestKing.ModeButtonOnClick (self, mouse, down)
	if mouse == "RightButton" then
		if IsAltKeyDown() then
			SetSuperTrackedQuestID(0)
		elseif dbc.displayMode ~= "combined" then
			dbc.displayMode = "combined"
		else
			dbc.displayMode = "quests"
		end
	else
		if dbc.displayMode == "quests" then
			dbc.displayMode = "achievements"
		else
			dbc.displayMode = "quests"
		end
	end
	updateTracker()
end

function QuestKing.ButtonOnClick (self, mouse, down)
	local button = self
	if button.type == "popup" then
		if button.popupType == "ITEM" then
			if mouse == "RightButton" then
				itemPopups[button.itemID] = nil
				updateTracker()
			else
				--if InCombatLockdown() then return end
				UseContainerItemByID(button.itemID)
				itemPopups[button.itemID] = nil
				updateTracker()
			end
		elseif mouse == "RightButton" then
			RemoveAutoQuestPopUp(self.questID)
			updateTracker()
		else
			if button.popupType == "OFFER" then
				QuestLog_OpenToQuest(self.questIndex)
				RemoveAutoQuestPopUp(self.questID)
				updateTracker()
			elseif button.popupType == "COMPLETE" then
				ShowQuestComplete(self.questIndex)
				RemoveAutoQuestPopUp(self.questID)
				updateTracker()
			end
		end
	end
end

function QuestKing.TitleButtonOnClick (self, mouse, down)
	local button = self.parent

	if (IsModifiedClick("CHATLINK") and ChatEdit_GetActiveWindow()) then
		if (button.type == "quest") then
			local questLink = GetQuestLink(button.questIndex)
			if (questLink) then
				ChatEdit_InsertLink(questLink)
				return
			end
		elseif (button.type == "achievement") then
			local achievementLink = GetAchievementLink(button.achievementID)
			if (achievementLink) then
				ChatEdit_InsertLink(achievementLink)
				return
			end
		end
	end
		
	if button.type == "header" then
		local headerName = button.headerName
		
		if dbc.collapsedHeaders[headerName] then
			dbc.collapsedHeaders[headerName] = nil
		else
			dbc.collapsedHeaders[headerName] = true
		end
		updateTracker()
		
	elseif button.type == "quest" then
		if IsAltKeyDown() then
			if mouse == "RightButton" then
				RemoveQuestWatch(button.questIndex)
				updateTracker()
				return
			else
				if dbc.collapsedQuests[button.questID] then
					dbc.collapsedQuests[button.questID] = nil
				else
					dbc.collapsedQuests[button.questID] = true
				end
				updateTracker()
				return
			end
		end
	
		if mouse == "RightButton" then
			WORLDMAP_SETTINGS.selectedQuestId = button.questID
			SetSuperTrackedQuestID(button.questID)
			QuestPOIUpdateIcons()
			if WorldMapFrame:IsShown() then
				HideUIPanel(WorldMapFrame)
				ShowUIPanel(WorldMapFrame)
			end
		else
			if (QuestLogFrame:IsShown()) and (QuestLogFrame.selectedIndex == button.questIndex) then
				HideUIPanel(QuestLogFrame)
			else
				QuestLog_OpenToQuest(button.questIndex)
				ShowUIPanel(QuestLogFrame)
			end
		end

	elseif button.type == "achievement" then
		if IsAltKeyDown() then
			if mouse == "RightButton" then
				RemoveTrackedAchievement(button.achievementID)
				updateTracker()
				return
			else
				if dbc.collapsedAchievements[button.achievementID] then
					dbc.collapsedAchievements[button.achievementID] = nil
				else
					dbc.collapsedAchievements[button.achievementID] = true
				end
				updateTracker()
				return
			end
		end	
	
		if (not AchievementFrame) then AchievementFrame_LoadUI() end
		
		if (not AchievementFrame:IsShown()) then
			AchievementFrame_ToggleAchievementFrame()
			AchievementFrame_SelectAchievement(button.achievementID)
		else
			if (AchievementFrameAchievements.selection ~= button.achievementID) then
				AchievementFrame_SelectAchievement(button.achievementID)
			else
				AchievementFrame_ToggleAchievementFrame()
			end
		end	
	end
end

function QuestKing.TitleButtonOnEnter (self, event, ...)
	local button = self.parent
	if (button.type == "quest") or (button.type == "questtimer") then
		local link = GetQuestLink(button.questIndex)
		if link then
			GameTooltip:SetOwner(self, opt_tooltipAnchor)

			if opt_tooltipScale then
				if not GameTooltip.__QuestKingPreviousScale then
					GameTooltip.__QuestKingPreviousScale = GameTooltip:GetScale()
				end
				GameTooltip:SetScale(opt_tooltipScale)
			end

			GameTooltip:SetHyperlink(link)
			GameTooltip:Show()
		end
	elseif (button.type == "achievement") then
		local link = GetAchievementLink(button.achievementID)
		if link then
			GameTooltip:SetOwner(self, opt_tooltipAnchor)

			if opt_tooltipScale then
				if not GameTooltip.__QuestKingPreviousScale then
					GameTooltip.__QuestKingPreviousScale = GameTooltip:GetScale()
				end
				GameTooltip:SetScale(opt_tooltipScale)
			end

			GameTooltip:SetHyperlink(link)
			GameTooltip:Show()
		end		
	elseif (button.type == "scenario") then
		local stageName, stageDescription, numCriteria = C_Scenario.GetStepInfo()
		GameTooltip:SetOwner(self, opt_tooltipAnchor)

		if opt_tooltipScale then
			if not GameTooltip.__QuestKingPreviousScale then
				GameTooltip.__QuestKingPreviousScale = GameTooltip:GetScale()
			end
			GameTooltip:SetScale(opt_tooltipScale)
		end

		GameTooltip:AddLine(stageName, NORMAL_FONT_COLOR.r, NORMAL_FONT_COLOR.g, NORMAL_FONT_COLOR.b, 1)
		GameTooltip:AddLine(" ")
		GameTooltip:AddLine(stageDescription, 1, 1, 1, 1)
		GameTooltip:Show()
	end
end

function QuestKing.TitleButtonOnLeave (self, event, ...)
	if opt_tooltipScale then
		local oldScale = GameTooltip.__QuestKingPreviousScale or 1
		GameTooltip.__QuestKingPreviousScale = nil
		GameTooltip:SetScale(oldScale)
	end
	GameTooltip:Hide()
end

function hookQuestWatch ()
	--D("|cffaaffcchookQuestWatch")
	updateTracker(true)
end

-- Watch buttons

local WatchButtonPrototype = CreateFrame("Frame")
local WatchButton = setmetatable({}, { __index = WatchButtonPrototype })
WatchButton.__index = WatchButton
local watchButtonList = {}
do
	function WatchButton:GetNext()
		numButtonsShown = numButtonsShown + 1
		local wb = self:Get(numButtonsShown)
		wb:Reset()
		return wb
	end

	function WatchButton:Get(num)
		local button = watchButtonList[num]
		if button then return button end
		
		local name = "QuestKing_WatchButton" .. num
		
		-- button
		
		button = CreateFrame("Button", name, QuestKing_Tracker)
		button:SetBackdrop({
			bgFile = "Interface/Tooltips/UI-Tooltip-Background",
			insets = { left = 0, right = 0, top = 0, bottom = 0 }
		})
		button:SetBackdropColor(0, 0, 0, 0)
		button:SetWidth(opt_buttonWidth)
		button:SetHeight(opt_lineHeight)
		button:SetPoint("TOPLEFT", 0, 0)
		
		local buttonHighlight = button:CreateTexture()
		buttonHighlight:SetAllPoints(button)
		buttonHighlight:SetTexture([[Interface\QuestFrame\UI-QuestLogTitleHighlight]])
		buttonHighlight:SetAlpha(0.6)
		
		button:RegisterForClicks("LeftButtonUp", "RightButtonUp")
		button:EnableMouse(false)
		button:SetHighlightTexture(buttonHighlight, "ADD")
		button:SetScript("OnClick", QuestKing.ButtonOnClick)
		
		-- icons
		
		local iconExclamationMark = button:CreateTexture(nil, nil, "QuestIcon-Exclamation")
		iconExclamationMark:ClearAllPoints()
		iconExclamationMark:SetPoint("RIGHT", button, "LEFT")
		iconExclamationMark:SetHeight(opt_lineHeight * 2 - 2)
		iconExclamationMark:SetWidth(opt_lineHeight * 1.4)
		iconExclamationMark:Hide()
		button.iconExclamationMark = iconExclamationMark
		
		local animGroup = iconExclamationMark:CreateAnimationGroup()
		local a1 = animGroup:CreateAnimation("Alpha")
		a1:SetStartDelay(0.25); a1:SetDuration(0.33); a1:SetChange(-1); a1:SetOrder(1); a1:SetSmoothing("IN");
		animGroup:SetLooping("BOUNCE")
		iconExclamationMark.animGroup = animGroup

		local iconQuestionMark = button:CreateTexture(nil, nil, "QuestIcon-QuestionMark")
		iconQuestionMark:ClearAllPoints()
		iconQuestionMark:SetPoint("RIGHT", button, "LEFT")
		iconQuestionMark:SetHeight(opt_lineHeight * 2 - 2)
		iconQuestionMark:SetWidth(opt_lineHeight * 1.4)
		iconQuestionMark:Hide()
		button.iconQuestionMark = iconQuestionMark

		local animGroup = iconQuestionMark:CreateAnimationGroup()
		local a1 = animGroup:CreateAnimation("Alpha")
		a1:SetStartDelay(0.25); a1:SetDuration(0.33); a1:SetChange(-1); a1:SetOrder(1); a1:SetSmoothing("IN");
		animGroup:SetLooping("BOUNCE")
		iconQuestionMark.animGroup = animGroup

		-- title button
		
		local titleButton = CreateFrame("Button", nil, button)
		titleButton:SetPoint("BOTTOMLEFT", 0, 0)
		titleButton:SetWidth(opt_buttonWidth)
		titleButton:SetHeight(opt_lineHeight)		
		titleButton.parent = button
		
		titleButton:RegisterForClicks("LeftButtonUp", "RightButtonUp")
		titleButton:SetScript("OnClick", QuestKing.TitleButtonOnClick)
		titleButton:SetScript("OnEnter", QuestKing.TitleButtonOnEnter)
		titleButton:SetScript("OnLeave", QuestKing.TitleButtonOnLeave)
		button.titleButton = titleButton
		
		-- title button hover
		
		local tex = titleButton:CreateTexture()
		tex:SetAllPoints(titleButton)
		tex:SetTexture([[Interface\QuestFrame\UI-QuestLogTitleHighlight]])
		tex:SetAlpha(0.6)
		
		titleButton:EnableMouse(true)
		titleButton:SetHighlightTexture(tex, "ADD")
		
		-- title text
		
		local title = button:CreateFontString(nil, opt_fontLayer)
		title:SetFont(opt_font, opt_fontSize, opt_fontStyle)
		title:SetJustifyH("LEFT")
		title:SetTextColor(1, 1, 0)
		title:SetShadowOffset(1, -1)
		title:SetShadowColor(0, 0, 0, 1)	
		title:SetPoint("TOPLEFT", 0, 0)

		title:SetWidth(opt_buttonWidth)
		title:SetHeight(opt_lineHeight)
		
		title:SetText("<Error>")
	
		button.title = title
		
		-- variables
		button.linesLeft = {}
		button.linesRight = {}
		button.currentLine = 0
		button.updateTimer = opt_updateRate

		button.challengeBarShown = false
		
		button.type = "none"

		button.name = name
		
		setmetatable(button, WatchButton)
		
		watchButtonList[num] = button
		numWatchButtons = numWatchButtons + 1
		
		button.buttonNumber = numWatchButtons
		
		return button
	end
	
	function WatchButton:Reset()
		self.currentLine = 0
		if self.itemButton and self.itemButton:IsShown() then
			if InCombatLockdown() then
				startCombatTimer()
			else
				self.itemButton:Hide()
			end
		end
		self:SetBackdropColor(0, 0, 0, 0)
		self:SetScript("OnUpdate", nil)
		self.updateTimer = opt_updateRate
		
		self:EnableMouse(false)
		self.titleButton:EnableMouse(true)
		
		self.iconExclamationMark.animGroup:Stop()
		self.iconExclamationMark:Hide()
		self.iconQuestionMark.animGroup:Stop()
		self.iconQuestionMark:Hide()

		if (self.challengeBarShown) then
			self.challengeBarShown = false
			self.challengeBar:Hide()
		end
	end

	function WatchButton:CreateLines()
		local left = self:CreateFontString(nil, opt_fontLayer)
		left:SetFont(opt_font, opt_fontSize, opt_fontStyle)
		left:SetJustifyH("LEFT")
		left:SetTextColor(1, 1, 0)
		left:SetShadowOffset(1, -1)
		left:SetShadowColor(0, 0, 0, 1)
		left:SetPoint("TOPLEFT", 0, 0)
		left:SetJustifyV("TOP")
		tinsert(self.linesLeft, left)
		
		local right = self:CreateFontString(nil, opt_fontLayer)
		right:SetFont(opt_font, opt_fontSize, opt_fontStyle)
		right:SetJustifyH("LEFT")
		right:SetTextColor(1, 1, 0)
		right:SetShadowOffset(1, -1)
		right:SetShadowColor(0, 0, 0, 1)	
		right:SetPoint("TOPLEFT", 0, 0)
		right:SetJustifyV("TOP")
		tinsert(self.linesRight, right)
		
		local flash = self:CreateTexture()
		flash:SetPoint("TOPLEFT", left)
		flash:SetPoint("BOTTOMLEFT", left)
		flash:SetWidth(opt_buttonWidth)
		flash:SetTexture([[Interface\QuestFrame\UI-QuestLogTitleHighlight]])
		flash:SetBlendMode("ADD")
		flash:SetVertexColor(opt_colors.ObjectiveFlash[1], opt_colors.ObjectiveFlash[2], opt_colors.ObjectiveFlash[3], 0)
		
		local animGroup = flash:CreateAnimationGroup()
		local a1 = animGroup:CreateAnimation("Alpha")
		local a2 = animGroup:CreateAnimation("Alpha")
		
		a1:SetStartDelay(0)
		a1:SetDuration(0.15)
		a1:SetChange(1)
		a1:SetOrder(1)
		--a1:SetSmoothing("IN")

		a2:SetStartDelay(0.25)
		a2:SetDuration(0.50)
		a2:SetChange(-1)
		a2:SetOrder(2)
		--a1:SetSmoothing("OUT")
		
		left.flash = flash
		left.flash.animGroup = animGroup
		
		return left, right
	end

	function WatchButton:AddLine(textleft, textright, r, g, b, a)
		local currentLine = self.currentLine + 1
		self.currentLine = currentLine
		
		local left, right
		if self.linesLeft[currentLine] then
			left = self.linesLeft[currentLine]
			right = self.linesRight[currentLine]
		else
			left, right = self:CreateLines()
		end
		
		left.isTimer = false
		
		left:SetText(textleft)
		right:SetText(textright)
		
		if r ~= nil then
			left:SetTextColor(r, g, b, a or 1)
			right:SetTextColor(r, g, b, a or 1)
		end
		
		return left
	end
	
	function WatchButton:Layout()
		local height = 0
		local lastLine = nil
		for i = 1, #self.linesLeft do
			local left, right = self.linesLeft[i], self.linesRight[i]
			
			if i > self.currentLine then
				left:Hide()
				right:Hide()
				left.flash.animGroup:Stop()
			else
				left:Show()
				right:Show()
				if lastLine == nil then
					left:SetPoint("TOPLEFT", self.title, "BOTTOMLEFT", 0, 0)
				else
					left:SetPoint("TOPLEFT", lastLine, "BOTTOMLEFT", 0, 0)
				end
				right:SetPoint("TOPLEFT", left, "TOPRIGHT", -1, 0)
				
				left:SetWidth(0)
				left:SetHeight(0)
				
				local lenLeft = left:GetStringWidth()
				local lenRight = right:GetStringWidth()				
				
				if (lenLeft + lenRight) > opt_buttonWidth then
					--left:SetHeight(left:GetStringHeight())
					left:SetHeight(opt_lineHeight)
					left:SetWidth(opt_buttonWidth - lenRight)
				else
					left:SetHeight(opt_lineHeight)
				end

				lastLine = left
				height = (opt_lineHeight * i)
			end
		end
		
		-- if (self.type == "popup") then
		-- 	self.iconExclamationMark:SetHeight((opt_lineHeight * 2 - 2) * 3.5)
		-- 	self.iconExclamationMark:SetWidth((opt_lineHeight * 1.4) * 3.5)
		-- 	self.iconQuestionMark:SetHeight((opt_lineHeight * 2 - 2) * 3.5)
		-- 	self.iconQuestionMark:SetWidth((opt_lineHeight * 1.4) * 3.5)
		-- 	height = height * 6
		-- end

		if (self.challengeBarShown) then
			height = height + 18
		end
		
		self:SetHeight(opt_lineHeight + height)
	end
end

-- Tracker Updating

function updateTracker (forceBuild)
	local numEntries = GetNumQuestLogEntries()
	local numWatches = GetNumQuestWatches()
	if forceBuild then
		buildQuestSortTable()
		prev_GetNumQuestLogEntries = numEntries -- since we built it... is this safe?
		prev_GetNumQuestWatches = numWatches
	else
		if numEntries ~= prev_GetNumQuestLogEntries then
			buildQuestSortTable()
		elseif numWatches ~= prev_GetNumQuestWatches then
			buildQuestSortTable()
		end
		prev_GetNumQuestLogEntries = numEntries
		prev_GetNumQuestWatches = numWatches
	end
	--D("!updateTracker")

	numButtonsShown = 0
	watchMoney = false

	-- titlebar
	if dbc.trackerCollapsed == true then
		QuestKing_TrackerMinimizeButton.label:SetText("+")
	else
		QuestKing_TrackerMinimizeButton.label:SetText("-")
	end

	-- challenge timers
	local hasTimer = GetWorldElapsedTimers()
	local ProvingGroundsType, _, _, _ = C_Scenario.GetProvingGroundsInfo()
	if hasTimer then
		if ProvingGroundsType ~= 0 then
			updateTrackerChallengeTimers(2)
		else
			updateTrackerChallengeTimers(GetWorldElapsedTimers())
		end
	end

	-- scenarios
	local inScenario = C_Scenario.IsInScenario()
	if inScenario then
		updateTrackerScenarios()
	end
	
	-- quest timers
	if GetQuestTimers() then
		updateTrackerQuestTimers()
	end
	
	-- popups
	--if not dbc.trackerCollapsed then
	--	if (dbc.displayMode == "combined") or (dbc.displayMode == "quests") then
			updateTrackerPopups()
	--	end
	--end

	-- achievements
	trackedAchievementCache = { GetTrackedAchievements() }
	if not dbc.trackerCollapsed then
		if (dbc.displayMode == "combined") or (dbc.displayMode == "achievements") then

			-- add header if we're in a scenario since it has its own headers
			if (inScenario) and (dbc.displayMode == "achievements") then
				local achheader = WatchButton:GetNext()
				achheader.type = "header_basic"
				achheader.title:SetText("Achievements")
				achheader.title:SetTextColor(opt_colors.AchievementHeader[1], opt_colors.AchievementHeader[2], opt_colors.AchievementHeader[3])
				achheader:Layout()
			end

			updateTrackerAchievements()
		end
	end

	-- quests
	if (not inScenario) then
		if not dbc.trackerCollapsed then	
			if (dbc.displayMode == "combined") or (dbc.displayMode == "quests") then
				updateTrackerQuests()
			end
		end
	end
	
	local numAch = #trackedAchievementCache
	if dbc.displayMode == "combined" then
		QuestKing_TrackerModeButton.label:SetText("C")
		if numAch > 0 then
			QuestKing_Tracker.titlebarText:SetText(format("%d/%d + %d", totalQuestCount, MAX_QUESTS, numAch))
		else
			QuestKing_Tracker.titlebarText:SetText(format("%d/%d", totalQuestCount, MAX_QUESTS))
		end
		if (numWatches == 0) and (numAch == 0) then
			QuestKing_Tracker.titlebarText:SetTextColor(opt_colors.TrackerTitlebarTextDimmed[1], opt_colors.TrackerTitlebarTextDimmed[2], opt_colors.TrackerTitlebarTextDimmed[3])
		else
			QuestKing_Tracker.titlebarText:SetTextColor(opt_colors.TrackerTitlebarText[1], opt_colors.TrackerTitlebarText[2], opt_colors.TrackerTitlebarText[3])
		end
	elseif dbc.displayMode == "achievements" then
		QuestKing_TrackerModeButton.label:SetText("A")
		QuestKing_Tracker.titlebarText:SetText(numAch)
		if (numAch == 0) then
			QuestKing_Tracker.titlebarText:SetTextColor(opt_colors.TrackerTitlebarTextDimmed[1], opt_colors.TrackerTitlebarTextDimmed[2], opt_colors.TrackerTitlebarTextDimmed[3])
		else
			QuestKing_Tracker.titlebarText:SetTextColor(opt_colors.TrackerTitlebarText[1], opt_colors.TrackerTitlebarText[2], opt_colors.TrackerTitlebarText[3])
		end		
	else
		QuestKing_TrackerModeButton.label:SetText("Q")
		QuestKing_Tracker.titlebarText:SetText(format("%d/%d", totalQuestCount, MAX_QUESTS))
		if (numWatches == 0) then
			QuestKing_Tracker.titlebarText:SetTextColor(opt_colors.TrackerTitlebarTextDimmed[1], opt_colors.TrackerTitlebarTextDimmed[2], opt_colors.TrackerTitlebarTextDimmed[3])
		else
			QuestKing_Tracker.titlebarText:SetTextColor(opt_colors.TrackerTitlebarText[1], opt_colors.TrackerTitlebarText[2], opt_colors.TrackerTitlebarText[3])
		end		
	end
	

	-- LAYOUT
	local lastShown = nil
	if numWatchButtons > 0 then
		for i = 1, numWatchButtons do
			local button = watchButtonList[i]
			
			if i > numButtonsShown then
				button:Hide()
				if (button.itemButton) and (button.itemButton:IsShown()) then
					if InCombatLockdown() then
						startCombatTimer()
					else
						button.itemButton:Hide()
					end
				end
			elseif lastShown == nil then
				button:SetPoint("TOPLEFT", QuestKing_Tracker.titlebar, "BOTTOMLEFT", 0, -1)
				button:Show()
				lastShown = button
			else
				if (button.type == "header") or (button.type == "header_basic") then
					button:SetPoint("TOPLEFT", lastShown, "BOTTOMLEFT", 0, -4)
				elseif (lastShown.type == "header") or (lastShown.type == "header_basic") then
					button:SetPoint("TOPLEFT", lastShown, "BOTTOMLEFT", 0, -3)
				else
					button:SetPoint("TOPLEFT", lastShown, "BOTTOMLEFT", 0, -2)
				end
				button:Show()
				lastShown = button
			end
		end
	end
	
	QuestKing:ResizeTracker(lastShown)
end

-- simplified and shortened version of Blizzard equivalent GetTimeStringFromSeconds
function GetTimeStringFromSecondsShort (timeAmount)
	local seconds = timeAmount

	local hours = floor(seconds / 3600)
	local minutes = floor((seconds / 60) - (hours * 60))
	seconds = seconds - hours * 3600 - minutes * 60

	if hours > 0 then
		return format("%d:%.2d:%.2d", hours, minutes, seconds)
	else
		return format("%d:%.2d", minutes, seconds)
	end
end

function updateTrackerChallengeTimers (...)
	for i = 1, select("#", ...) do
		local timerID = select(i, ...)
		local description, elapsedTime, isChallengeModeTimer = GetWorldElapsedTime(timerID)
		if isChallengeModeTimer == 2 then
			local _, _, _, _, _, _, _, mapID, _ = GetInstanceInfo()
			if (mapID) then
				local button = WatchButton:GetNext()
				button.type = "challengetimer"
				setButtonToChallengeTimer(button, timerID, elapsedTime, GetChallengeModeMapTimes(mapID))
				button:Layout()
			

				return
			end
		elseif isChallengeModeTimer == 3 then
			local difficulty, curWave, maxWave, duration = C_Scenario.GetProvingGroundsInfo()
			local button = WatchButton:GetNext()
			button.type = "challengetimer"
			setButtonToProvingGroundsTimer(button, difficulty, elapsedTime, curWave, maxWave, duration)
		end
	end
end

function setButtonToChallengeTimer (button, timerID, elapsedTime, ...)
	if not (button.challengeMedalTimes) then
		button.challengeMedalTimes = { }
	end
	for i = 1, select("#", ...) do
		button.challengeMedalTimes[i] = select(i, ...);
	end

	button.titleButton:EnableMouse(false)

	button.title:SetText("")

	if not button.challengeBar then
		local challengeBar = CreateFrame("StatusBar", nil, button)
		challengeBar:SetStatusBarTexture("Interface\\TargetingFrame\\UI-StatusBar")
		challengeBar:GetStatusBarTexture():SetHorizTile(false)
		challengeBar:SetStatusBarColor(0, 0.33, 0.61)
		challengeBar:SetMinMaxValues(0, 100)
		challengeBar:SetValue(100)
		challengeBar:SetWidth(opt_buttonWidth - 36)
		challengeBar:SetHeight(17)
		challengeBar:SetPoint("BOTTOMLEFT", button, "BOTTOMLEFT", 26, 5)
		button.challengeBar = challengeBar

		local border = challengeBar:CreateTexture(nil, "OVERLAY")
		border:SetTexture([[Interface\Challenges\challenges-main]])
		border:SetPoint("TOPLEFT", challengeBar, "TOPLEFT", -5, 5)
		border:SetPoint("BOTTOMRIGHT", challengeBar, "BOTTOMRIGHT", 5, -5)
		border:SetTexCoord(0.00097656, 0.13769531, 0.47265625, 0.51757813)
		challengeBar.border = border

		local icon = challengeBar:CreateTexture(nil, "OVERLAY")
		icon:SetTexture([[Interface\Challenges\challenges-plat-sm]])
		icon:SetSize(22, 22)
		icon:SetPoint("RIGHT", challengeBar, "LEFT", -6, 0)
		icon:SetTexCoord(0.25, 0.7, 0.25, 0.7)
		challengeBar.icon = icon
		button.challengeBarIcon = icon

		local text = challengeBar:CreateFontString(nil, "OVERLAY")
		text:SetFont(opt_fontChallengeTimer, opt_fontSize, opt_fontStyle)
		text:SetJustifyH("CENTER")
		text:SetJustifyV("CENTER")
		text:SetAllPoints(true)
		text:SetTextColor(1, 1, 1)
		text:SetShadowOffset(1, -1)
		text:SetShadowColor(0, 0, 0, 1)
		text:SetText("No Medal")
		challengeBar.text = text
		button.challengeBarText = text
	else
		button.challengeBar:Show()
	end
	button.challengeBarShown = true

	button.challengeTime = 0
	button.challengeCurrentMedalTime = -1
	button.challengeRecheck = 0

	-- adding a little to help reduce sync jitter when difference is floor'd later
	onUpdateChallengeTimer(button, (elapsedTime + 0.01), true)

	if (button.challengeCurrentMedalTime) then
		button:SetScript("OnUpdate", onUpdateChallengeTimer)
	end
end

function setButtonToProvingGroundsTimer (button, difficulty, elapsedTime, curWave, maxWave, duration)
	button.titleButton:EnableMouse(false)
	button.ProvingGroundsDuration = duration
	button.title:SetText("")

	if not button.challengeBar then
		local challengeBar = CreateFrame("StatusBar", nil, button)
		challengeBar:SetStatusBarTexture("Interface\\TargetingFrame\\UI-StatusBar")
		challengeBar:GetStatusBarTexture():SetHorizTile(false)
		challengeBar:SetStatusBarColor(0, 0.33, 0.61)
		challengeBar:SetMinMaxValues(0, 100)
		challengeBar:SetValue(100)
		challengeBar:SetWidth(opt_buttonWidth - 36)
		challengeBar:SetHeight(17)
		challengeBar:SetPoint("BOTTOMLEFT", button, "BOTTOMLEFT", 26, 5)
		button.challengeBar = challengeBar

		local border = challengeBar:CreateTexture(nil, "OVERLAY")
		border:SetTexture([[Interface\Challenges\challenges-main]])
		border:SetPoint("TOPLEFT", challengeBar, "TOPLEFT", -5, 5)
		border:SetPoint("BOTTOMRIGHT", challengeBar, "BOTTOMRIGHT", 5, -5)
		border:SetTexCoord(0.00097656, 0.13769531, 0.47265625, 0.51757813)
		challengeBar.border = border

		local icon = challengeBar:CreateTexture(nil, "OVERLAY")
		icon:SetTexture([[Interface\Challenges\challenges-plat-sm]])
		icon:SetSize(22, 22)
		icon:SetPoint("RIGHT", challengeBar, "LEFT", -6, 0)
		icon:SetTexCoord(0.25, 0.7, 0.25, 0.7)
		challengeBar.icon = icon
		button.challengeBarIcon = icon

		local text = challengeBar:CreateFontString(nil, "OVERLAY")
		text:SetFont(opt_fontChallengeTimer, opt_fontSize, opt_fontStyle)
		text:SetJustifyH("CENTER")
		text:SetJustifyV("CENTER")
		text:SetAllPoints(true)
		text:SetTextColor(1, 1, 1)
		text:SetShadowOffset(1, -1)
		text:SetShadowColor(0, 0, 0, 1)
		text:SetText("")
		challengeBar.text = text
		button.challengeBarText = text
	else
		button.challengeBar:Show()
	end
	button.challengeBarShown = true

	button.ProvingGroundsTime = 0
	button.ProvingGroundsDurationMax = -1
	button.ProvingGroundsCurrentWave = curWave
	button.ProvingGroundsMaxWave = maxWave
	button.ProvingGroundsRecheck = 0

	-- adding a little to help reduce sync jitter when difference is floor'd later
	onUpdateProvingGroundsTimer(button, (elapsedTime), true, difficulty)

	if (button.ProvingGroundsTime) then
		button:SetScript("OnUpdate", onUpdateProvingGroundsTimer)
	end
end

function updateChallengeMedal (self, elapsedTime)
	local prevMedalTime = 0
	for i = #self.challengeMedalTimes, 1, -1 do
		local curMedalTime = self.challengeMedalTimes[i]
		if (elapsedTime < curMedalTime) then
			self.challengeCurrentMedalTime = curMedalTime
			self.challengeBar:SetMinMaxValues(0, curMedalTime - prevMedalTime)

			if i == 1 then
				self.challengeBar:SetStatusBarColor(0.76, 0.38, 0.15)
				self.challengeBarIcon:SetTexture([[Interface\Challenges\challenges-bronze-sm]])
				self.challengeBarIcon:Show()
			elseif i == 2 then
				self.challengeBar:SetStatusBarColor(0.64, 0.6, 0.6)
				self.challengeBarIcon:SetTexture([[Interface\Challenges\challenges-silver-sm]])
				self.challengeBarIcon:Show()
			elseif i == 3 then
				self.challengeBar:SetStatusBarColor(0.93, 0.67, 0.25)
				self.challengeBarIcon:SetTexture([[Interface\Challenges\challenges-gold-sm]])
				self.challengeBarIcon:Show()
			elseif i == 4 then
				self.challengeBar:SetStatusBarColor(0.6, 0.75, 0.7)
				self.challengeBarIcon:SetTexture([[Interface\Challenges\challenges-plat-sm]])
				self.challengeBarIcon:Show()
			else
				self.challengeBar:SetStatusBarColor(1, 0.3, 0.3)
				self.challengeBarIcon:Hide()
			end

			return
		else
			prevMedalTime = curMedalTime
		end
	end

	-- no medal
	self.challengeCurrentMedalTime = false
	self:SetScript("OnUpdate", nil)

	self.challengeBarText:SetText(CHALLENGES_TIMER_NO_MEDAL)
	self.challengeBar:SetMinMaxValues(0, 1)
	self.challengeBar:SetValue(1)
	self.challengeBar:SetStatusBarColor(0.3, 0.3, 0.3)
	self.challengeBarIcon:Hide()
end

function updateProvingGroundsBar (self, elapsedTime, difficulty)
	local DurTime = self.ProvingGroundsDuration
	self.challengeBar:SetMinMaxValues(0, DurTime)
	if elapsedTime  < DurTime then
		self.ProvingGroundsDurationMax = DurTime
		self.challengeBar:SetMinMaxValues(0, DurTime)
		if difficulty == 1 then
			self.challengeBar:SetStatusBarColor(0.76, 0.38, 0.15)
			self.challengeBarIcon:SetTexture([[Interface\Challenges\challenges-bronze-sm]])
			self.challengeBarIcon:Show()
		elseif difficulty == 2 then
			self.challengeBar:SetStatusBarColor(0.64, 0.6, 0.6)
			self.challengeBarIcon:SetTexture([[Interface\Challenges\challenges-silver-sm]])
			self.challengeBarIcon:Show()
		elseif difficulty == 3 then
			self.challengeBar:SetStatusBarColor(0.93, 0.67, 0.25)
			self.challengeBarIcon:SetTexture([[Interface\Challenges\challenges-gold-sm]])
			self.challengeBarIcon:Show()
		elseif difficulty == 4 then
			self.challengeBar:SetStatusBarColor(0.6, 0.75, 0.7)
			self.challengeBarIcon:SetTexture([[Interface\Challenges\challenges-plat-sm]])
			self.challengeBarIcon:Show()
		end
	else
		self.ProvingGroundsDurationMax = -1
		elapsedTime = 0
		--self:SetScript("OnUpdate", nil)
		self.challengeBarText:SetText("")
		self.challengeBar:SetMinMaxValues(0, 1)
		self.challengeBar:SetValue(0)
		self.challengeBar:SetStatusBarColor(0.3, 0.3, 0.3)
		self.challengeBarIcon:Hide()
	end


end

function onUpdateChallengeTimer (self, elapsed, manual)
	local newTime = self.challengeTime + elapsed
	self.challengeTime = newTime

	local currentMedalTime = self.challengeCurrentMedalTime
	
	if (currentMedalTime) then
		if (newTime > currentMedalTime) then
			-- manual update or medal expired, force update
			updateChallengeMedal(self, newTime)
			currentMedalTime = self.challengeCurrentMedalTime
			
			if currentMedalTime then
				local timeLeft = floor(currentMedalTime - newTime)
				self.challengeBar:SetValue(timeLeft)
				self.challengeBarText:SetText(GetTimeStringFromSecondsShort(timeLeft))

				--D("forceupd", manual)
			end

		else
			-- timed update, throttle it
			local updateTimer = self.updateTimer
			updateTimer = updateTimer - elapsed

			if (updateTimer <= 0) then
				local timeLeft = floor(currentMedalTime - newTime)
				self.challengeBar:SetValue(timeLeft)
				self.challengeBarText:SetText(GetTimeStringFromSecondsShort(timeLeft))


				updateTimer = opt_updateRate			
				--D("noskip")
			end

			self.updateTimer = updateTimer
		end
	else
		--D("nomedal!?")
	end

	-- force a resync every 10 sec for onupdate calls
	if not manual then
		local recheck = self.challengeRecheck + elapsed
		if recheck > 10.1 then
			--D("Recheck", recheck, elapsed)
			self.challengeRecheck = 0
			self:SetScript("OnUpdate", updateTracker)
		else
			self.challengeRecheck = recheck
		end
	end

end

function onUpdateProvingGroundsTimer (self, elapsed, manual, difficulty)
	local newTime = self.ProvingGroundsTime + elapsed
	self.ProvingGroundsTime = newTime
	local durationTime = self.ProvingGroundsDurationMax
	curWave = self.ProvingGroundsCurrentWave
	maxWave = self.ProvingGroundsMaxWave			
	if (durationTime) then
		if floor(newTime) == durationTime then
			self.challengeBar:SetValue(0)
			if maxWave == 0 then
				self.challengeBarText:SetText(format("Wave %u   %s", curWave, GetTimeStringFromSecondsShort(0)))
			else
				self.challengeBarText:SetText(format("Wave %u of %u   %s", curWave, maxWave, GetTimeStringFromSecondsShort(0)))
			end	
		elseif newTime > durationTime then
			-- manual update or medal expired, force update
			updateProvingGroundsBar(self, newTime, difficulty)
			durationTime = self.ProvingGroundsDurationMax
					
			--local timeLeft = durationTime - newTime
			--self.challengeBar:SetValue(timeLeft)
			--if maxWave == 0 then
			--	self.challengeBarText:SetText(format("Wave %u   %s", curWave, GetTimeStringFromSecondsShort(timeLeft)))
			--else
			--	self.challengeBarText:SetText(format("Wave %u of %u   %s", curWave, maxWave, GetTimeStringFromSecondsShort(timeLeft)))
			--end
			--D("forceupd", manual)
		
		else
			-- timed update, throttle it
			local updateTimer = self.updateTimer
			updateTimer = updateTimer - elapsed
			if (updateTimer <= 0) then
				local timeLeft = durationTime - newTime + 1
				self.challengeBar:SetValue(timeLeft)
				if maxWave == 0 then
					self.challengeBarText:SetText(format("Wave %u   %s", curWave, GetTimeStringFromSecondsShort(timeLeft)))
				else
					self.challengeBarText:SetText(format("Wave %u of %u   %s", curWave, maxWave, GetTimeStringFromSecondsShort(timeLeft)))
				end
				updateTimer = opt_updateRate / 2
				--D("noskip")
			end
			
		self.updateTimer = updateTimer

		end
	else
		--D("nomedal!?")
	end

	--force a resync every 10 sec for onupdate calls
	if not manual then
		local recheck = self.ProvingGroundsRecheck + elapsed
		if recheck > 10.1 then
			--D("Recheck", recheck, elapsed)
			self.ProvingGroundsRecheck = 0
			
			self:SetScript("OnUpdate", updateTracker)
		else
			self.ProvingGroundsRecheck = recheck
		end
	end
end

function updateTrackerScenarios ()
	local name, currentStage, numStages = C_Scenario.GetInfo()
	local stageName, stageDescription, numCriteria = C_Scenario.GetStepInfo()
	local inChallengeMode = C_Scenario.IsChallengeMode()
	
	if (currentStage > 0) then
		if (currentStage <= numStages) then
			-- scenario type header
			local header = WatchButton:GetNext()
			header.type = "header_basic"
			if (not inChallengeMode) then
				if (currentStage == numStages) then
					header.title:SetText("Scenario: Final Stage")
				else
					header.title:SetFormattedText("Scenario: Stage %d/%d", currentStage, numStages)
				end			
			else
				header.title:SetText("Challenge Mode")
			end
			header.title:SetTextColor(opt_colors.QuestHeader[1], opt_colors.QuestHeader[2], opt_colors.QuestHeader[3])
			header:Layout()

			-- scenario stage
			local button = WatchButton:GetNext()
			button.type = "scenario"
			setButtonToScenario(button)
			button:Layout()
		elseif (currentStage > numStages) then
			-- scenario complete header
			local header = WatchButton:GetNext()
			header.type = "header_basic"
			if (not inChallengeMode) then
				header.title:SetText("Scenario Complete")
			else
				header.title:SetText("Challenge Mode Complete")
			end
			header.title:SetTextColor(opt_colors.ScenarioComplete[1], opt_colors.ScenarioComplete[2], opt_colors.ScenarioComplete[3])
			header:Layout()			
		end

		-- questtypes
		-- thunderaan the windseeker = 62
		-- stranger in a strange land = 83
		-- blades of the anointed = 85
		-- the kun-lai kicker = 98
		-- soften them up = 81
		-- slay them all! = 41
		-- the champion's call! = 1
		-- imperial qiraji armaments = 62

		-- scenario quests
		local addedHeader = false
		local currentHeader = "(Unknown)"
		local numEntries = GetNumQuestLogEntries()
		for questIndex = 1, numEntries do
			local questTitle,_,_,_,isHeader = GetQuestLogTitle(questIndex)
			if isHeader then
				currentHeader = questTitle
			elseif (currentHeader == name) and (GetQuestLogQuestType(questIndex) == QUEST_TYPE_SCENARIO) then
				if not addedHeader then
					local questHeader = WatchButton:GetNext()
					questHeader.type = "header_basic"
					questHeader.title:SetText("Scenario Quests")
					questHeader.title:SetTextColor(opt_colors.QuestHeader[1], opt_colors.QuestHeader[2], opt_colors.QuestHeader[3])
					questHeader:Layout()						
					addedHeader = true
				end
				local button = WatchButton:GetNext()
				button.type = "quest"
				setButtonToQuest(button, questIndex)
				button:Layout()				
			end
		end

		--
	end

end

function setButtonToScenario (button)
	local name, currentStage, numStages = C_Scenario.GetInfo()
	local stageName, stageDescription, numCriteria = C_Scenario.GetStepInfo()
	local inChallengeMode = C_Scenario.IsChallengeMode()

	if (not inChallengeMode) then
		button.title:SetText(stageName)
	else
		button.title:SetText(stageName)
	end
	button.title:SetTextColor(opt_colors.ScenarioStageTitle[1], opt_colors.ScenarioStageTitle[2], opt_colors.ScenarioStageTitle[3])

	for i = 1, numCriteria do
		local criteriaString, criteriaType, criteriaCompleted, quantity, totalQuantity, flags, assetID, quantityString, criteriaID = C_Scenario.GetCriteriaInfo(i)
		
		if (not criteriaCompleted) then
			local r, g, b = getObjectiveColor(quantity / totalQuantity)
			button:AddLine(format("  %s", criteriaString), format(": %s/%s", quantity, totalQuantity), r, g, b)
		elseif (opt_showCompletedObjectives) then
			button:AddLine(format("  %s", criteriaString), format(": %s/%s", quantity, totalQuantity), opt_colors.ObjectiveGradientComplete[1], opt_colors.ObjectiveGradientComplete[2], opt_colors.ObjectiveGradientComplete[3])
		end
	end

end

function updateTrackerQuestTimers ()
	local questTimers = { GetQuestTimers() }
	local numQuestTimers = #questTimers
	cached_numQuestTimers = numQuestTimers
	for i = 1, numQuestTimers do
		local button = WatchButton:GetNext()
		button.type = "questtimer"
		setButtonToQuestTimer(button, i, questTimers)
		button:Layout()
	end
end

function setButtonToQuestTimer(button, timerID, questTimers)
	button.timerID = timerID

	local questIndex = GetQuestIndexForTimer(timerID)
	local questTitle, _, _, _, _, _, _, _, questID = GetQuestLogTitle(questIndex)
	
	if (not questTitle) or (questTitle == "") then
		questTitle = "(Unknown Quest)"
	else
		questTitle = getQuestTaggedTitle(questIndex)
	end
	
	button.questIndex = questIndex
	button.questID = questID
	
	local timer = questTimers[button.timerID]
	local timerText = SecondsToTime(timer, false, false, 4)
	if (timerText == "") then
		timerText = "0 Sec"
	end
	
	button.title:SetText(questTitle)
	button.title:SetTextColor(opt_colors.QuestTimerTitle[1], opt_colors.QuestTimerTitle[2], opt_colors.QuestTimerTitle[3])
	button:AddLine("  "..timerText, nil, opt_colors.QuestTimerTime[1], opt_colors.QuestTimerTime[2], opt_colors.QuestTimerTime[3])
	button:SetBackdropColor(opt_colors.QuestTimerBackground[1], opt_colors.QuestTimerBackground[2], opt_colors.QuestTimerBackground[3], opt_colors.QuestTimerBackground[4])
	
	button:SetScript("OnUpdate", onUpdateQuestTimer)
end

function onUpdateQuestTimer (self, elapsed)
	local updateTimer = self.updateTimer
	updateTimer = updateTimer - elapsed
	if (updateTimer <= 0) then
		local questTimers = { GetQuestTimers() }
		local numQuestTimers = #questTimers
		
		if (numQuestTimers ~= cached_numQuestTimers) then
			-- number of quest timers has changed, force tracker update to dispose of this frame
			--D("!!! Quest Timer count changed, forcing tracker update!")
			updateTracker()
			return
		end
		
		local timer = questTimers[self.timerID]
		--D(timer, "###", GetQuestTimers())
		local timerText = SecondsToTime(timer, false, false, 4)
		if (timerText == "") then
			timerText = "0 Sec"
		end

		local line = self.linesLeft[1]
		line:SetText("  "..timerText)
		
		updateTimer = opt_updateRate
	end
	self.updateTimer = updateTimer
end


function updateTrackerPopups()
	for itemID, itemName in pairs(itemPopups) do
		local button = WatchButton:GetNext()
		button.type = "popup"
		setButtonToItemPopup(button, itemID, itemName)
		button:Layout()
	end
	
	local numPopups = GetNumAutoQuestPopUps()
	for i = 1, numPopups do
		local popID, popType = GetAutoQuestPopUp(i)
		
		local button = WatchButton:GetNext()
		button.type = "popup"
		setButtonToPopup(button, popID, popType)
		button:Layout()
	end
end

function setButtonToItemPopup (button, itemID, itemName)
	button.popupType = "ITEM"
	button.itemID = itemID
	button.itemName = itemName
	
	button.title:SetText(itemName)
	button.title:SetTextColor(opt_colors.PopupItemTitle[1], opt_colors.PopupItemTitle[2], opt_colors.PopupItemTitle[3])
	button:AddLine("  Item Begins a Quest", nil, opt_colors.PopupItemDescription[1], opt_colors.PopupItemDescription[2], opt_colors.PopupItemDescription[3])
	button:SetBackdropColor(opt_colors.PopupItemBackground[1], opt_colors.PopupItemBackground[2], opt_colors.PopupItemBackground[3], opt_colors.PopupItemBackground[4])
	button.iconExclamationMark:Show()
	button.iconExclamationMark.animGroup:Play()
	
	button.titleButton:EnableMouse(false)
	button:EnableMouse(true)	
end

function setButtonToPopup (button, questID, popType)
	local questIndex = GetQuestLogIndexByID(questID)
	local taggedTitle
	--enter the nexus?
	--D(button, questID, popType, questIndex)
	if (questIndex == 0) or (questIndex == nil) then
		--D("NQ")
		taggedTitle = "New Quest!"
	else
		--D("TI")
		taggedTitle = getQuestTaggedTitle(questIndex)
	end
	
	button.popupType = popType
	button.questIndex = questIndex
	button.questID = questID

	button.title:SetText(taggedTitle)

	if popType == "COMPLETE" then
		button.title:SetTextColor(opt_colors.PopupCompleteTitle[1], opt_colors.PopupCompleteTitle[2], opt_colors.PopupCompleteTitle[3])
		button:AddLine("  Quest Completed", nil, opt_colors.PopupCompleteDescription[1], opt_colors.PopupCompleteDescription[2], opt_colors.PopupCompleteDescription[3])
		button:SetBackdropColor(opt_colors.PopupCompleteBackground[1], opt_colors.PopupCompleteBackground[2], opt_colors.PopupCompleteBackground[3], opt_colors.PopupCompleteBackground[4])
		button.iconQuestionMark:Show()
		button.iconQuestionMark.animGroup:Play()
	else
		button.title:SetTextColor(opt_colors.PopupOfferTitle[1], opt_colors.PopupOfferTitle[2], opt_colors.PopupOfferTitle[3])
		button:AddLine("  Quest Received", nil, opt_colors.PopupOfferDescription[1], opt_colors.PopupOfferDescription[2], opt_colors.PopupOfferDescription[3])
		button:SetBackdropColor(opt_colors.PopupOfferBackground[1], opt_colors.PopupOfferBackground[2], opt_colors.PopupOfferBackground[3], opt_colors.PopupOfferBackground[4])
		button.iconExclamationMark:Show()
		button.iconExclamationMark.animGroup:Play()
	end
	button.titleButton:EnableMouse(false)
	button:EnableMouse(true)
end


function updateTrackerQuests()
	local oldSelection
	if (opt_subzoneHeuristicHighlight) then
		oldSelection = GetQuestLogSelection()
	end

	local headerName, questIndex
	for i = 1, #headerList do
		headerName = headerList[i]
		-- header
		if #questSortTable[headerName] > 0 then
			local button = WatchButton:GetNext()
			button.type = "header"
			button.headerName = headerName
			
			--|TTexturePath:size1:size2:xoffset:yoffset:dimx:dimy:coordx1:coordx2:coordy1:coordy2:red:green:blue|t
			if dbc.collapsedHeaders[headerName] then
				button.title:SetText("|TInterface\\AddOns\\QuestKing\\UI-SortArrow_sm_right:8:8:0:-1:0:0:0:0:0:0:1:1:1|t"..headerName)
				button.title:SetTextColor(opt_colors.QuestHeaderCollapsed[1], opt_colors.QuestHeaderCollapsed[2], opt_colors.QuestHeaderCollapsed[3])
			else
				button.title:SetText("|TInterface\\AddOns\\QuestKing\\UI-SortArrow_sm_down:8:8:0:-1:0:0:0:0:0:0:1:1:1|t"..headerName)
				button.title:SetTextColor(opt_colors.QuestHeader[1], opt_colors.QuestHeader[2], opt_colors.QuestHeader[3])
			end
			
			button:Layout()
		end

		-- quests
		
		if not dbc.collapsedHeaders[headerName] then
			for j = 1, #questSortTable[headerName] do
				questIndex = questSortTable[headerName][j]
				local button = WatchButton:GetNext()
				button.type = "quest"
				setButtonToQuest(button, questIndex)
				button:Layout()
			end
		end
	end

	if (opt_subzoneHeuristicHighlight) then
		SelectQuestLogEntry(oldSelection)
	end	
end

function setButtonToQuest (button, questIndex)
	local questTitle, level, questTag, suggestedGroup, isHeader, isCollapsed, isComplete, isDaily, questID, startEvent = GetQuestLogTitle(questIndex)
	
	button.questIndex = questIndex
	button.questID = questID
	
	local collapseObjectives = dbc.collapsedQuests[questID]
	
	-- set title
	local taggedTitle = getQuestTaggedTitle(questIndex)
	-- taggedTitle = GetQuestLogQuestType(questIndex) .. " / " .. taggedTitle
	
	if isComplete == -1 then
		button.title:SetText(opt_colors._FailedQuestTag .. taggedTitle)
	else
		button.title:SetText(taggedTitle)
	end
	
	-- add objectives		
	local numObj = GetNumQuestLeaderBoards(questIndex) or 0
	local completedObj = 0
	local displayedObj = 0
	for i = 1, numObj do
		local desc, objectiveType, isDone = GetQuestLogLeaderBoard(i, questIndex)
		if (desc == nil) then
			desc = "Unknown"
		end
		local p1, p2, quantName, quantCur, quantMax = string.find(desc, OBJECTIVE_PATTERN)
		
		if isDone then
			completedObj = completedObj + 1
		end
		
		local displayObjective = true
		if collapseObjectives then
			displayObjective = false
		elseif isComplete == 1 then
			if (opt_showCompletedObjectives == "always") then
				displayObjective = true
			else
				displayObjective = false
			end
		end

		if (desc == "Unknown") then
			displayObjective = false
		end

		if (displayObjective) then
			if (not desc) then
				--
			elseif (not quantName) or (objectiveType == "spell") then
				if (not isDone) or (opt_showCompletedObjectives) then
					local r, g, b = getObjectiveColor(isDone and 1 or 0)
					button:AddLine(format("  %s", desc), nil, r, g, b)
					displayedObj = displayedObj + 1
				end
			else
				if (not isDone) or (opt_showCompletedObjectives) then
					local r, g, b = getObjectiveColor(quantCur / quantMax)
					local line = button:AddLine(format("  %s", quantName), format(": %s/%s", quantCur, quantMax), r, g, b)
					displayedObj = displayedObj + 1
					
					if updatedObjectives[quantName] then
						updatedObjectives[quantName] = nil
						line.flash.animGroup:Play()
					end
				end
			end
		end
		
	end

	-- money
	local requiredMoney = GetQuestLogRequiredMoney(questIndex)
	if requiredMoney > 0 then
		watchMoney = true
		local playerMoney = GetMoney()
		
		-- not sure about this, but the default watch frame does it
		-- (fake completion for gold-requiring connectors when gold req is met and no event begins)
		if (numObj == 0 and playerMoney >= requiredMoney and not startEvent) then
			isComplete = 1
		end
		
		numObj = numObj + 1 -- (questking only) ensure all gold-requiring quests aren't marked as connectors

		if (not collapseObjectives) then -- hide entirely if objectives are collapsed
			if playerMoney >= requiredMoney then
				-- show met gold amounts only for incomplete quests
				if (isComplete ~= 1) and (opt_showCompletedObjectives) then
					local r, g, b = getObjectiveColor(1)
					button:AddLine("  Requires: "..GetMoneyString(requiredMoney), nil, r, g, b)
				end
			else
				-- always show unmet gold amount
				local r, g, b = getObjectiveColor(0)
				button:AddLine("  Requires: "..GetMoneyString(requiredMoney), nil, r, g, b)
			end
		end
	end
	
	-- colour title
	if (isComplete == -1) then
		button.title:SetTextColor(opt_colors.QuestTitleFailed[1], opt_colors.QuestTitleFailed[2], opt_colors.QuestTitleFailed[3]) -- failed
	elseif (isComplete == 1) then
		if GetQuestLogIsAutoComplete(questIndex) then
			button.title:SetTextColor(opt_colors.QuestTitleCompleteAuto[1], opt_colors.QuestTitleCompleteAuto[2], opt_colors.QuestTitleCompleteAuto[3]) -- autocompletable
		elseif (numObj == 0) then
			button.title:SetTextColor(opt_colors.QuestTitleConnector[1], opt_colors.QuestTitleConnector[2], opt_colors.QuestTitleConnector[3]) -- connector quest [type c] (complete, 0/0 objectives)
		else
			button.title:SetTextColor(opt_colors.QuestTitleComplete[1], opt_colors.QuestTitleComplete[2], opt_colors.QuestTitleComplete[3]) -- completed quest (complete, n/n objectives)
		end
	-- elseif (GetQuestLogQuestType(questIndex) == QUEST_TYPE_SCENARIO) then
	-- 	button.title:SetTextColor(opt_colors.QuestTitleScenario[1], opt_colors.QuestTitleScenario[2], opt_colors.QuestTitleScenario[3])
	else
		if numObj == 0 then
			button.title:SetTextColor(opt_colors.QuestTitleConnector[1], opt_colors.QuestTitleConnector[2], opt_colors.QuestTitleConnector[3]) -- connector quest [type i] (incomplete, 0/0 objectives)
		elseif numObj == completedObj then
			button.title:SetTextColor(1, 0, 1) -- unknown state (incomplete, n/n objectives where n>0)
		else
			local color = GetQuestDifficultyColor(level)
			button.title:SetTextColor(color.r, color.g, color.b) -- incomplete quest (incomplete, n/m objectives where m>n)
		end
	end

	if collapseObjectives then
		button.title:SetAlpha(0.6)
	end
	
	-- add item button
	local link, item, charges, showItemWhenComplete = GetQuestLogSpecialItemInfo(questIndex)
	local itemButton
	if opt_itemAnchorSide and item and ((isComplete ~= 1) or (showItemWhenComplete)) then
		if InCombatLockdown() then
			startCombatTimer()
		else
			itemButton = _G["QuestKing_WatchFrameItem" .. button.buttonNumber]
			
			if (not itemButton) then
				--itemButton = CreateFrame("Button", "QuestKing_WatchFrameItem" .. button.buttonNumber, button, "WatchFrameItemButtonTemplate")
				itemButton = CreateFrame("Button", "QuestKing_WatchFrameItem" .. button.buttonNumber, UIParent, "WatchFrameItemButtonTemplate")
				button.itemButton = itemButton
			end
			
			-- setup
			itemButton:Show()
			itemButton:ClearAllPoints()
			itemButton:SetID(questIndex)
			SetItemButtonTexture(itemButton, item)
			SetItemButtonCount(itemButton, charges)
			itemButton.charges = charges
			WatchFrameItem_UpdateCooldown(itemButton)
			itemButton.rangeTimer = -1
	
			-- anchor
			if opt_itemAnchorSide == "right" then		
				itemButton:SetPoint("TOPLEFT", button.title, "TOPRIGHT", 4, -1)
			else
				itemButton:SetPoint("TOPRIGHT", button.title, "TOPLEFT", -4, -1)
			end
			
			-- resize
			if displayedObj > 0 then
				itemButton:SetHeight(opt_lineHeight * 2)
				_G[format("QuestKing_WatchFrameItem%dIconTexture", button.buttonNumber)]:SetTexCoord(0, 1, 0, 1)
				_G[format("QuestKing_WatchFrameItem%dNormalTexture", button.buttonNumber)]:SetHeight(42)
			else
				itemButton:SetHeight(opt_lineHeight)
				_G[format("QuestKing_WatchFrameItem%dIconTexture", button.buttonNumber)]:SetTexCoord(0, 1, 0.25, 0.75)
				_G[format("QuestKing_WatchFrameItem%dNormalTexture", button.buttonNumber)]:SetHeight(21)
			end
			itemButton:SetWidth(opt_lineHeight * 2)
			itemButton:SetScale(0.9)
		end
		
	else
		if button.itemButton and button.itemButton:IsShown() then
			if InCombatLockdown() then
				startCombatTimer()
			else		
				button.itemButton:Hide()
			end
		end
	end

	if (opt_subzoneHeuristicHighlight) then
		local subzone = string.lower(GetSubZoneText() or "")

		SelectQuestLogEntry(questIndex)
		local logDescription, logObjectives = GetQuestLogQuestText()

		logDescription = (logDescription and string.lower(logDescription)) or "<<QK_ERROR>>"
		logObjectives = (logObjectives and string.lower(logObjectives)) or "<<QK_ERROR>>"

		if (subzone ~= "") then
			if (string.find(logDescription, subzone, 1, true)) or (string.find(logObjectives, subzone, 1, true)) then
				button:SetBackdropColor(opt_colors.SubzoneHeuristicHighlightColor[1], opt_colors.SubzoneHeuristicHighlightColor[2], opt_colors.SubzoneHeuristicHighlightColor[3], opt_colors.SubzoneHeuristicHighlightColor[4])
			end
		end
	end
	
end


function updateTrackerAchievements()
	local trackedAchievements = trackedAchievementCache
	trackedAchievementCache = trackedAchievements
	
	local numTrackedAchievements = #trackedAchievements

	-- header
	local showAchievements = true
	if (dbc.displayMode == "combined") then
		local headerName = "Achievements"
		if numTrackedAchievements > 0 then
			local button = WatchButton:GetNext()
			button.type = "header"
			button.headerName = headerName
	
			if dbc.collapsedHeaders[headerName] then
				button.title:SetText("|TInterface\\AddOns\\QuestKing\\UI-SortArrow_sm_right:8:8:0:-1:0:0:0:0:0:0:1:1:1|t"..headerName)
				button.title:SetTextColor(opt_colors.AchievementHeaderCollapsed[1], opt_colors.AchievementHeaderCollapsed[2], opt_colors.AchievementHeaderCollapsed[3])
			else
				button.title:SetText("|TInterface\\AddOns\\QuestKing\\UI-SortArrow_sm_down:8:8:0:-1:0:0:0:0:0:0:1:1:1|t"..headerName)
				button.title:SetTextColor(opt_colors.AchievementHeader[1], opt_colors.AchievementHeader[2], opt_colors.AchievementHeader[3])
			end
			
			button:Layout()
		end
		
		if dbc.collapsedHeaders[headerName] then
			showAchievements = false
		end
	end
	
	-- achievements
	if showAchievements then
		for i = 1, numTrackedAchievements do
			local achievementID = trackedAchievements[i]
			
			local button = WatchButton:GetNext()
			button.type = "achievement"
			setButtonToAchievement(button, achievementID)
			button:Layout()
		end
	end
end

function setButtonToAchievement (button, achievementID)
	local id, achievementName, points, achievemntCompleted, _, _, _, achievementDesc, flags, image, rewardText, isGuildAch = GetAchievementInfo(achievementID)	

	button.achievementID = achievementID

	local collapseCriteria = dbc.collapsedAchievements[achievementID]

	-- set title		
	button.title:SetText(achievementName)
	if completed then
		button.title:SetTextColor(opt_colors.AchievementTitleComplete[1], opt_colors.AchievementTitleComplete[2], opt_colors.AchievementTitleComplete[3])
	else
		if isGuildAch then
			button.title:SetTextColor(opt_colors.AchievementTitleGuild[1], opt_colors.AchievementTitleGuild[2], opt_colors.AchievementTitleGuild[3])
		else
			button.title:SetTextColor(opt_colors.AchievementTitle[1], opt_colors.AchievementTitle[2], opt_colors.AchievementTitle[3])
		end
	end
	
	if collapseCriteria then
		button.title:SetAlpha(0.6)
	end
	
	-- criteria setup
	local numCriteria = GetAchievementNumCriteria(achievementID)	
	local foundTimer = false
	local timeNow -- avoid multiple calls to GetTime()
	
	-- no criteria
	if (numCriteria == 0) then
		if (not collapseCriteria) then
			button:AddLine("  "..achievementDesc, nil, opt_colors.AchievementDescription[1], opt_colors.AchievementDescription[2], opt_colors.AchievementDescription[3]) -- no criteria exist, show desc line
		end
	end
	
	-- criteria loop
	for i = 1, numCriteria do
		local _
		local criteriaString, criteriaType, criteriaCompleted, quantity, totalQuantity, name, flags, assetID, quantityString, criteriaID, eligible = GetAchievementCriteriaInfo(achievementID, i)
		
		-- set string
		if (bit.band(flags, EVALUATION_TREE_FLAG_PROGRESS_BAR) == EVALUATION_TREE_FLAG_PROGRESS_BAR) then
			criteriaString = quantityString
		else
			if (criteriaType == CRITERIA_TYPE_ACHIEVEMENT and assetID) then -- meta achievement
				_, criteriaString = GetAchievementInfo(assetID)
			end
		end
		
		-- display criteria depending on timer state
		-- kinda wanna seperate this out, but display is dependent on timer logic (e.g. timeLeft > 0 forces display)
		local timerTable = achievementTimers[criteriaID]
		local timeLeft = 0
		if timerTable then
			-- timer exists
			foundTimer = true
			timeNow = timeNow or GetTime()
			local timeLeft = floor(timerTable.startTime + timerTable.duration - timeNow)
			
			if timeLeft > 0 then
				-- timer is running, force showing criteria
				if criteriaCompleted then
					button:AddLine("  "..criteriaString, nil, opt_colors.AchievementCriteriaComplete[1], opt_colors.AchievementCriteriaComplete[2], opt_colors.AchievementCriteriaComplete[3]) -- timer running, force showing completed objective
				else
					button:AddLine("  "..criteriaString, nil, opt_colors.AchievementCriteria[1], opt_colors.AchievementCriteria[2], opt_colors.AchievementCriteria[3]) -- timer running, force showing normal objective
				end
				
				-- adding timer line
				local time = SecondsToTime(timeLeft, false, false, 4)
				if (time == "") then time = "0 Sec" end
				
				button.title:SetTextColor(opt_colors.AchievementTimedTitle[1], opt_colors.AchievementTimedTitle[2], opt_colors.AchievementTimedTitle[3])
				button:SetBackdropColor(opt_colors.AchievementTimedBackground[1], opt_colors.AchievementTimedBackground[2], opt_colors.AchievementTimedBackground[3], opt_colors.AchievementTimedBackground[4])
				--D(opt_colors.AchievementTimedBackground[1], opt_colors.AchievementTimedBackground[2], opt_colors.AchievementTimedBackground[3], opt_colors.AchievementTimedBackground[4])
				local line = button:AddLine("    "..time, nil, opt_colors.AchievementTimedTimer[1], opt_colors.AchievementTimedTimer[2], opt_colors.AchievementTimedTimer[3])
				
				line.isTimer = true
				line.startTime = timerTable.startTime
				line.duration = timerTable.duration
				
				button:SetScript("OnUpdate", onUpdateAchievementTimer)
				
			else
				-- timer has expired
				if (not criteriaCompleted) and (not collapseCriteria) then
					button:AddLine("  "..criteriaString, nil, opt_colors.AchievementCriteria[1], opt_colors.AchievementCriteria[2], opt_colors.AchievementCriteria[3]) -- timer expired, show normally unless completed/collapsed
				end
				achievementTimers[criteriaID] = nil -- since timer expired, erase it ourselves without waiting for event
			end
			
		else
			-- no timer exists
			if (not criteriaCompleted) and (not collapseCriteria) then
				button:AddLine("  "..criteriaString, nil, opt_colors.AchievementCriteria[1], opt_colors.AchievementCriteria[2], opt_colors.AchievementCriteria[3]) -- no timer, show normally unless completed/collapsed
			end
		end
		
	end

	-- show "meta" timer if there is a timer on this achievement, but no associated criteria are found in GetAchievementNumCriteria (Salt and Pepper?)
	-- multiple timers would be a problem (it sets/unsets with whichever criteria timer fires last), but it's better than nothing
	if (foundTimer == false) and (achievementTimersMeta[achievementID]) then
		local timerTable = achievementTimersMeta[achievementID]
		local timeNow = GetTime()
		local timeLeft = floor(timerTable.startTime + timerTable.duration - timeNow)

		if timeLeft > 0 then
			local time = SecondsToTime(timeLeft, false, false, 4)
			if (time == "") then time = "0 Sec" end
			
			button.title:SetTextColor(opt_colors.AchievementTimedTitle[1], opt_colors.AchievementTimedTitle[2], opt_colors.AchievementTimedTitle[3])
			button:SetBackdropColor(opt_colors.AchievementTimedBackground[1], opt_colors.AchievementTimedBackground[2], opt_colors.AchievementTimedBackground[3], opt_colors.AchievementTimedBackground[4])
			local line = button:AddLine("    "..time, nil, opt_colors.AchievementTimedTimerMeta[1], opt_colors.AchievementTimedTimerMeta[2], opt_colors.AchievementTimedTimerMeta[3])
			
			line.isTimer = true
			line.startTime = timerTable.startTime
			line.duration = timerTable.duration
			
			button:SetScript("OnUpdate", onUpdateAchievementTimer)
		end
	end
	
end

function onUpdateAchievementTimer (self, elapsed)
	local updateTimer = self.updateTimer
	updateTimer = updateTimer - elapsed
	if (updateTimer <= 0) then
		local timeNow
		for i = 1, #self.linesLeft do
			local line = self.linesLeft[i]
			if line.isTimer then
				timeNow = timeNow or GetTime()
				local timeLeft = floor(line.startTime + line.duration - timeNow)
				
				if timeLeft > 0 then
					--D(timeLeft)
					local time = SecondsToTime(timeLeft, false, false, 4)
					if (time == "") then time = "0 Sec" end				
					line:SetText("    "..time)
				else
					--D("EXPIRED")
					updateTracker()
					return
				end
			end
		end
		updateTimer = opt_updateRate
	end
	self.updateTimer = updateTimer
end
	

function buildQuestSortTable ()
	for k,v in pairs(questSortTable) do
		wipe(questSortTable[k])
	end
	wipe(headerList)
	
	local numEntries = GetNumQuestLogEntries()
	local currentHeader = "(Unknown)"
	
	local numQuests = 0
	for i = 1, numEntries do
		local title,_,_,_,isHeader,isCollapsed,_,_,_ = GetQuestLogTitle(i)
		if (not title) or (title == "") then
			title = "(Unknown)"
		end

		if (isHeader) then
			currentHeader = title
			tinsert(headerList, title)
			if not questSortTable[title] then
				questSortTable[title] = {}
			end
		elseif (not isHeader) and (IsQuestWatched(i)) then
			if (not questSortTable[currentHeader]) then
				questSortTable[currentHeader] = {}
			end
			tinsert(questSortTable[currentHeader], i)
		end
		
		if (not isHeader) then
			numQuests = numQuests + 1
		end
	end
	
	totalQuestCount = numQuests
end

function getQuestTaggedTitle (questIndex)
	local questTitle, level, questTag, suggestedGroup, _, _, _, isDaily, questID, startEvent, displayQuestID = GetQuestLogTitle(questIndex)
	
	-- determine tag
	local levelClass = tostring(level)
	if (isDaily) then
		levelClass = levelClass.."Y"
	end
	if (questTag ~= nil) then
		if ((questTag == "Group") and (suggestedGroup > 0)) then
			levelClass = levelClass.."G"..suggestedGroup
		elseif ((questTag == "Group") or (questTag == "Elite")) then
			levelClass = levelClass.."+"
		elseif (questTag == "Dungeon") then
			levelClass = levelClass.."D"
		elseif (questTag == "Heroic") then
			levelClass = levelClass.."H"
		elseif ((questTag == "Raid (10)") or (questTag == "Raid (25)") or (questTag == "Raid")) then	
			levelClass = levelClass.."R"					
		elseif (questTag == "PvP") then
			levelClass = levelClass.."P"
		elseif (questTag == "Scenario") then
			levelClass = levelClass.."S"
		elseif (questTag == "Legendary") then
			levelClass = levelClass.."L"
		elseif (questTag == "Account") then
			levelClass = levelClass.."A"
		else
			levelClass = levelClass.."+"
		end
	end
	
	if startEvent then
		levelClass = levelClass.."e"
	end

	if GetQuestLogIsAutoComplete(questIndex) then
		levelClass = levelClass.."a"
	end	
	
	return format("[%s] %s", levelClass, questTitle)
end

function colorGradient(perc, ...)
	if perc >= 1 then
		local r, g, b = select(select('#', ...) - 2, ...)
		return r, g, b
	elseif perc <= 0 then
		local r, g, b = ...
		return r, g, b
	end

	local num = select('#', ...) / 3

	local segment, relperc = math_modf(perc*(num-1))
	local r1, g1, b1, r2, g2, b2 = select((segment*3)+1, ...)

	return r1 + (r2-r1)*relperc, g1 + (g2-g1)*relperc, b1 + (b2-b1)*relperc
end

function getObjectiveColor(progress)
	local r, g, b
	if (progress == 1) then
		r, g, b = opt_colors.ObjectiveGradientComplete[1], opt_colors.ObjectiveGradientComplete[2], opt_colors.ObjectiveGradientComplete[3]
	else
		r, g, b = colorGradient(progress,
			opt_colors.ObjectiveGradient0[1], opt_colors.ObjectiveGradient0[2], opt_colors.ObjectiveGradient0[3],
			opt_colors.ObjectiveGradient50[1], opt_colors.ObjectiveGradient50[2], opt_colors.ObjectiveGradient50[3],
			opt_colors.ObjectiveGradient99[1], opt_colors.ObjectiveGradient99[2], opt_colors.ObjectiveGradient99[3])
	end
	return r, g, b
end

-- Misc

local old_WatchFrame_Update = WatchFrame_Update
-- @@@@@ test BRC quest with BOTH open - done
function WatchFrame_Update()
	--D('HIDING')
	WatchFrame:Hide()
	if not WatchFrame.qkfix then
		WatchFrame.qkfix = true
		WatchFrame:UnregisterAllEvents()
		WatchFrameLines:UnregisterAllEvents()
	end
end

WatchFrame:HookScript("OnShow",function ()
	WatchFrame:Hide()
end)

QuestKing_UpdateTracker = updateTracker

SLASH_QUESTKING_RESET1 = "/qkreset"
SlashCmdList["QUESTKING_RESET"] = function(msg, editBox)
	print("QuestKing: Resetting all collapsed headers/quests/achievements.")
	dbc.collapsedHeaders = {}
	dbc.collapsedQuests = {}
	dbc.collapsedAchievements = {}

	-- dbc.trackerCollapsed = false
	-- dbc.trackerHidden = false
	updateTracker()
end

fEvents:SetScript("OnEvent", function(self, event, name)
	if name ~= addonName then return end
	
	self:UnregisterEvent("ADDON_LOADED")
	self:SetScript("OnEvent", QuestKing_HandleEvent)
	
	if not (QuestKingDB) then
		QuestKingDB = {}
	end
	if not (QuestKingDBPerChar) then
		QuestKingDBPerChar = {}
	end

	db = QuestKingDB
	dbc = QuestKingDBPerChar
	
	dbc.collapsedHeaders = dbc.collapsedHeaders or {}
	dbc.collapsedQuests = dbc.collapsedQuests or {}
	dbc.collapsedAchievements = dbc.collapsedAchievements or {}
	dbc.trackerCollapsed = dbc.trackerCollapsed or false
	
	dbc.displayMode = dbc.displayMode or "combined"
	dbc.trackerPositionPreset = dbc.trackerPositionPreset or 1

	-- dbc.trackerHidden = dbc.trackerHidden or false
	-- dbc.trackerPositionCustom = dbc.trackerPositionCustom or false
	
	-- i don't understand why this doesn't work...
	-- WATCHFRAME_MAXACHIEVEMENTS = 100
	
	self:RegisterEvent("QUEST_LOG_UPDATE")
	self:RegisterEvent("ITEM_PUSH")

	self:RegisterEvent("QUEST_AUTOCOMPLETE")

	self:RegisterEvent("TRACKED_ACHIEVEMENT_UPDATE") -- Achievement timers
	self:RegisterEvent("ACHIEVEMENT_EARNED") -- necessary?
	--self:RegisterEvent("CRITERIA_UPDATE")
	self:RegisterEvent("PLAYER_LEVEL_UP")
	
	self:RegisterEvent("UI_INFO_MESSAGE")

	self:RegisterEvent("PLAYER_MONEY") -- for GetQuestLogRequiredMoney

	self:RegisterEvent("SCENARIO_UPDATE")
	self:RegisterEvent("SCENARIO_CRITERIA_UPDATE")

	self:RegisterEvent("PLAYER_ENTERING_WORLD")
	self:RegisterEvent("WORLD_STATE_TIMER_START")
	self:RegisterEvent("WORLD_STATE_TIMER_STOP")

	if (opt_subzoneHeuristicHighlight) then
    self:RegisterEvent("ZONE_CHANGED")
		self:RegisterEvent("ZONE_CHANGED_INDOORS")
		self:RegisterEvent("ZONE_CHANGED_NEW_AREA")
	end
	
	if (opt_enableItemPopups) then
		self:RegisterEvent("CHAT_MSG_LOOT")
		QUEST_START_ITEMS = {1307,1357,1972,2839,3082,3317,4056,4433,4613,4854,4881,4926,5099,5102,5103,5138,5179,5352,5791,5877,6172,6196,6497,6766,6775,6776,6916,8244,8524,8623,8704,8705,9326,9572,10454,10589,10590,10593,10621,11116,11668,12558,12564,12771,12842,13140,14646,14647,14648,14649,14650,14651,16303,16304,16305,16408,16782,17008,17115,17116,17409,18356,18357,18358,18359,18360,18361,18362,18363,18364,18422,18423,18565,18589,18628,18703,18706,18769,18770,18771,18969,18987,19002,19003,19016,19018,19228,19257,19267,19277,19423,19443,19452,19802,20310,20460,20461,20483,20644,20741,20742,20765,20798,20806,20807,20938,20939,20940,20941,20942,20943,20944,20945,20946,20947,20948,21165,21166,21167,21220,21221,21230,21245,21246,21247,21248,21249,21250,21251,21252,21253,21255,21256,21257,21258,21259,21260,21261,21262,21263,21264,21265,21378,21379,21380,21381,21382,21384,21385,21514,21749,21750,21751,21776,22597,22600,22601,22602,22603,22604,22605,22606,22607,22608,22609,22610,22611,22612,22613,22614,22615,22616,22617,22618,22620,22621,22622,22623,22624,22719,22723,22727,22888,22970,22972,22973,22974,22975,22977,23179,23180,23181,23182,23183,23184,23216,23228,23249,23338,23580,23678,23759,23777,23797,23837,23850,23870,23890,23892,23900,23904,23910,24132,24228,24330,24367,24407,24414,24483,24484,24504,24558,24559,25459,25705,25706,25752,25753,28113,28114,28552,28598,29233,29234,29235,29236,29476,29588,29590,29738,30431,30579,30756,31120,31239,31241,31345,31363,31384,31489,31707,31890,31891,31907,31914,32385,32386,32405,32523,32621,32726,33102,33121,33289,33314,33345,33347,33961,33962,33978,34028,34090,34091,34469,34777,34815,34984,35120,35567,35568,35569,35648,35723,35787,35855,36742,36744,36746,36756,36780,36855,36856,36940,36958,37163,37164,37432,37571,37599,37736,37737,37830,37833,38280,38281,38321,38567,38660,38673,39713,40666,41267,41556,42203,42772,43242,43297,43512,44148,44158,44259,44276,44294,44326,44569,44577,44725,44927,44979,45039,45506,45857,46004,46052,46053,46128,46318,46697,46875,46876,46877,46878,46879,46880,46881,46882,46883,46884,46955,47039,47246,48679,49010,49200,49203,49205,49219,49220,49641,49643,49644,49667,49676,49776,49932,50320,50379,50380,51315,52079,52197,52831,53053,53106,54345,54614,54639,55166,55167,55181,55186,55243,56474,56571,56812,57102,57118,57935,58117,58491,58898,59143,60816,60886,60956,61310,61322,61378,61505,62021,62044,62045,62046,62056,62138,62281,62282,62483,62768,62933,63090,63250,63276,63686,63700,64353,64450,65894,65895,65896,65897,69854,70928,70932,73058,74034,77957,78912,79238,79323,79324,79325,79326,79341,79343,79812,80240,80241,80597,80827,82870,83076,83767,83769,83770,83771,83772,83773,83774,83777,83779,83780,85477,85557,85558,85783,86404,86433,86434,86435,86436,86542,86544,86545,87878,88538,88563,88715,89169,89170,89171,89172,89173,89174,89175,89176,89178,89179,89180,89181,89182,89183,89184,89185,89209}
	end
	
	WatchFrame:UnregisterEvent("QUEST_AUTOCOMPLETE")
	
	hooksecurefunc("AddQuestWatch", hookQuestWatch)
	hooksecurefunc("RemoveQuestWatch", hookQuestWatch)
	
	hooksecurefunc("AddAutoQuestPopUp", function ()
		updateTracker()
	end)

	QuestKing:CreateTracker()
	updateTracker()

	-- QuestKing.UpdateTracker = updateTracker
	-- QuestKing_Tracker:SetScript("OnShow", function (self)
	-- 	dbc.trackerHidden = false
	-- 	updateTracker()
	-- 	print("QuestKing tracker shown.")
	-- end)
	-- QuestKing_Tracker:SetScript("OnHide", function (self)
	-- 	dbc.trackerHidden = true
	-- 	print("QuestKing tracker hidden.")
	-- end)
	-- if (dbc.trackerHidden == true) then
	-- 	QuestKing_Tracker:Hide()
	-- end

	-- QuestKing_Tracker.TitleRegion = QuestKing_Tracker:CreateTitleRegion()
	-- QuestKing_Tracker.TitleRegion:SetAllPoints()
	-- QuestKing_Tracker:EnableMouse(true)
	-- QuestKing_Tracker:SetMovable(true)
 --    QuestKing_Tracker:SetScript("OnMouseDown", function ()
 --        QuestKing_Tracker:StartMoving()
 --    end)
 --    QuestKing_Tracker:SetScript("OnMouseUp", function ()
 --        QuestKing_Tracker:StopMovingOrSizing()
 --    end)	
	--QuestKing_Tracker.TitleRegion:EnableMouse(1)
	--QuestKing_Tracker.TitleRegion:SetPoint("TOPLEFT")
	--QuestKing_Tracker.TitleRegion:SetPoint("TOPRIGHT")
	--QuestKing_Tracker.TitleRegion:SetHeight(opt_titleHeight)
end)

fEvents:RegisterEvent("ADDON_LOADED")


-- Debug stuff, ignore

-- /run QuestKing_HandleEvent(nil, "TRACKED_ACHIEVEMENT_UPDATE", 2188, 7622, 10, 15); QuestKing_HandleEvent(nil, "TRACKED_ACHIEVEMENT_UPDATE", 3815, 0, 10, 20);
-- /run AddAutoQuestPopUp(28790, "OFFER"); AddAutoQuestPopUp(25771, "COMPLETE"); QuestKing_UpdateTracker();

-- function GetQuestTimers()
-- 	return GetTime() - 2095200, GetTime() - 2095200, GetTime() - 2095200
-- end
-- 
-- function GetQuestIndexForTimer(timerID)
-- 	if timerID == 1 then
-- 		return 2
-- 	elseif timerID == 2 then
-- 		return 4
-- 	else
-- 		return 5
-- 	end
-- end

--/run Boss1TargetFrame:Show(); Boss1TargetFrame:SetPoint("TOPRIGHT", "QuestKing_Tracker", "TOPLEFT", 50, 0)
--/run VehicleSeatIndicator_SetUpVehicle(221)
--/run UIParent_ManageFramePositions()

-- FramePositionDelegate:UIParentManageFramePositions
-- Boss1TargetFrame:UnregisterEvent("INSTANCE_ENCOUNTER_ENGAGE_UNIT")
--   221 222 223 224 225 226 227 228 249 254

-- hook setpoint?

-- ? convert quest item checks to GetContainerItemQuestInfo
-- requires expensive bag scans on inventory change, issues with knowing which item is picked up, retriggering items on login etc.
-- probably not worth it... but does avoid issue of having to manually update IDs