From b2df6befc82f3c0f74d02f944d638a7e06044825 Mon Sep 17 00:00:00 2001
From: Arcidayne <9382522b@opayq.com>
Date: Sat, 28 Nov 2015 14:49:17 -0800
Subject: [PATCH] Themed Tracker!

See 'q help' for commands!
---
 Themed_Tracker/Themed_Tracker.xml | 1124 +++++++++++++++++++++++++++++
 1 file changed, 1124 insertions(+)
 create mode 100644 Themed_Tracker/Themed_Tracker.xml

diff --git a/Themed_Tracker/Themed_Tracker.xml b/Themed_Tracker/Themed_Tracker.xml
new file mode 100644
index 0000000..bcaa71e
--- /dev/null
+++ b/Themed_Tracker/Themed_Tracker.xml
@@ -0,0 +1,1124 @@
+<?xml version="1.0" encoding="iso-8859-1"?>
+<!DOCTYPE muclient>
+<!-- Saved on Monday, November 23, 2015, 8:30 PM -->
+<!-- MuClient version 4.94 -->
+
+<!-- Plugin "Themed_Tracker" generated by Plugin Wizard -->
+
+<muclient>
+<plugin
+   name="Themed_Tracker"
+   author="Arcidayne"
+   id="2d410b28a4ae912f46f8e75e"
+   language="Lua"
+   purpose="Customizable quest tracker"
+   save_state="y"
+   date_written="2015-11-23 20:25:08"
+   requires="4.80"
+   version="1.1"
+   >
+<description trim="y">
+
+</description>
+
+</plugin>
+
+
+<!--  Aliases  -->
+
+<aliases>
+  <alias
+    match="^q(?:u|ue|ues|uest)? set((?:public|local)) ((?:on|off))$"
+    enabled="y"
+    regexp="y"
+    send_to="12"
+    sequence="100"
+    >
+    <send>if "%1" == "public" and "%2" == "on" then
+      tracker_db.report_check = 1
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Now reporting to the public!")
+      elseif "%1" == "public" and "%2" == "off" then
+      tracker_db.report_check = 0
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "No longer reporting to the public!")
+      elseif "%2" == "local" and "%2" == "on" then
+      tracker_db.local_check = 1
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Now reporting locally!")
+      else
+      tracker_db.local_check = 0
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "No longer reporting locally!")
+      end</send>
+    </alias>
+  <alias
+    match="^q(?:u|ue|ues|uest)? report(?: (.*))?$"
+    enabled="y"
+    regexp="y"
+    send_to="12"
+    sequence="100"
+    >
+    <send>if string.len("%1") > 0 then
+      Send("%1 " .. tracker_db.last_quest_report)
+      else
+      Send(tracker_db.report_channel .. tracker_db.last_quest_report)
+      end</send>
+    </alias>
+  <alias
+    match="^q(?:u|ue|ues|uest)? addtheme (.*)$"
+    enabled="y"
+    regexp="y"
+    send_to="12"
+    sequence="100"
+    >
+    <send>new_theme("%1")</send>
+  </alias>
+  <alias
+    match="^q(?:u|ue|ues|uest)? settheme(?: (\w+) ?(\w+)? ?(\w+)?)?$"
+    enabled="y"
+    regexp="y"
+    send_to="12"
+    sequence="100"
+    >
+    <send>local name, field, color = string.len("%1"), string.len("%2"), string.len("%3")
+
+      if name > 0 and field > 0 and color > 0 then
+        custom_theme("%1", "%2", "%3")
+      else
+        ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Correct syntax is: ", tracker_db.themes[tracker_db.set_theme].special, "", "q settheme [name of theme] [field name] [color]")
+      end</send>
+    </alias>
+  <alias
+    match="^q(?:u|ue|ues|uest)? colors(?: (\w+))?$"
+    enabled="y"
+    regexp="y"
+    send_to="12"
+    sequence="100"
+    >
+    <send>if string.len("%1") > 0 then
+      color_table("%1")
+      else
+      color_table()
+      end</send>
+    </alias>
+  <alias
+   match="^q(?:u|ue|ues|uest)? stats$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  <send>q_stats(tracker_db.set_theme)</send>
+  </alias>
+  <alias
+   match="^q(?:u|ue|ues|uest)? strings$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  <send>ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Quest ",  tracker_db.themes[tracker_db.set_theme].special, "", "start", tracker_db.themes[tracker_db.set_theme].text, "", " string is: ", tracker_db.themes[tracker_db.set_theme].title, "", tracker_db.strings.quest_start_string)
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Quest ", tracker_db.themes[tracker_db.set_theme].special, "", "killed", tracker_db.themes[tracker_db.set_theme].text, "", " string is: ", tracker_db.themes[tracker_db.set_theme].title, "", tracker_db.strings.quest_killed_string)
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Quest ", tracker_db.themes[tracker_db.set_theme].special, "", "failed", tracker_db.themes[tracker_db.set_theme].text, "", " string is: ", tracker_db.themes[tracker_db.set_theme].title, "", tracker_db.strings.quest_failed_string)
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Quest ", tracker_db.themes[tracker_db.set_theme].special, "", "completed", tracker_db.themes[tracker_db.set_theme].text, "", " string is: ", tracker_db.themes[tracker_db.set_theme].title, "", tracker_db.strings.quest_completed_string)
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Quest ", tracker_db.themes[tracker_db.set_theme].special, "", "ready", tracker_db.themes[tracker_db.set_theme].text, "", " string is: ", tracker_db.themes[tracker_db.set_theme].title, "", tracker_db.strings.quest_ready_string)
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Quest ", tracker_db.themes[tracker_db.set_theme].special, "", "reset", tracker_db.themes[tracker_db.set_theme].text, "", " string is: ", tracker_db.themes[tracker_db.set_theme].title, "", tracker_db.strings.quest_reset_string)
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Quest ", tracker_db.themes[tracker_db.set_theme].special, "", "bonus", tracker_db.themes[tracker_db.set_theme].text, "", " string is: ", tracker_db.themes[tracker_db.set_theme].title, "", tracker_db.strings.quest_bonus_string)
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Quest ", tracker_db.themes[tracker_db.set_theme].special, "", "nobonus", tracker_db.themes[tracker_db.set_theme].text, "", " string is: ", tracker_db.themes[tracker_db.set_theme].title, "", tracker_db.strings.quest_nobonus_string)
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Use ", tracker_db.themes[tracker_db.set_theme].special, "", "'q custom [highlighted term] [string]'", tracker_db.themes[tracker_db.set_theme].text, "", " to set a new string value.")</send>
+  </alias>
+  <alias
+    match="^q(?:u|ue|ues|uest)? reset(?: (all|current|themes|strings) ?(confirm)?)?$"
+    enabled="y"
+    regexp="y"
+    send_to="12"
+    sequence="100"
+    >
+    <send>if string.len("%1") > 0 and string.len("%2") == 0 then
+      q_reset("%1")
+      elseif string.len("%1") > 0 and string.len("%2") > 0 then
+      q_reset("%1", "%2")
+      else
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Did you mean qreset self, or ", tracker_db.themes[tracker_db.set_theme].special, "", "'q reset [all|current|themes]'", tracker_db.themes[tracker_db.set_theme].text, "", "?")
+      end
+    </send>
+  </alias>
+  <alias
+    match="^q(?:u|ue|ues|uest)? custom(?: (\w+) (.*))?$"
+    enabled="y"
+    regexp="y"
+    send_to="12"
+    sequence="100"
+    >
+    <send>if string.len("%1") > 0 then
+      local field = "%1"
+      if string.len(string.gsub("%2", "^%s", "")) > 0 then
+      local strv = string.gsub("%2", "^%s", "")
+      set_custom(field, strv)      else set_custom(field)
+      end
+      else
+      set_custom()
+      end</send>
+    </alias>
+  <alias
+    match="^q(?:u|ue|ues|uest)? themes?(?: (\d+))?$"
+    enabled="y"
+    regexp="y"
+    send_to="12"
+    sequence="100"
+    >
+    <send>if string.len("%1") > 0 then
+      set_theme("%1")
+      else
+      set_theme()
+      end</send>
+    </alias>
+  <alias
+    match="^q(?:u|ue|ues|uest)? channel(?: (\w+)\s?)?$"
+    enabled="y"
+    regexp="y"
+    send_to="12"
+    sequence="100"
+    >
+    <send>if string.len("%1") > 0 then
+      tracker_db.report_channel = "%1 "
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Tracker now reports to: ", tracker_db.themes[tracker_db.set_theme].special, "", tracker_db.report_channel)
+      SetVariable("atracker", serialize.save("tracker_db"))
+      else
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Tracker reports to: ", tracker_db.themes[tracker_db.set_theme].special, "", tracker_db.report_channel)
+      end</send>
+    </alias>
+</aliases>
+
+<!--  Script  -->
+
+
+<script>
+<![CDATA[
+function custom_report(str)
+  str = str:gsub("%%avghours%%", tracker_db.q_db.total_avghours)
+           :gsub("%%lasttime%%", tracker_db.q_db.last_time)
+       :gsub("%%avgdays%%", tracker_db.q_db.total_avgdays)
+       :gsub("%%avgmins%%", tracker_db.q_db.total_avgmins)
+       :gsub("%%avgsecs%%", tracker_db.q_db.total_avgsecs)
+       :gsub("%%avggold%%", tracker_db.q_db.total_avggold)
+       :gsub("%%totalwon%%", tracker_db.q_db.total_won)
+       :gsub("%%totallost%%", tracker_db.q_db.total_lost)
+       :gsub("%%wonpct%%", tracker_db.q_db.total_wonpct)
+       :gsub("%%totalqp%%", tracker_db.q_db.total_qp)
+       :gsub("%%publicqp%%", tracker_db.q_db.last_publicqp)
+       :gsub("%%avgqp%%", tracker_db.q_db.total_avgqp)
+       :gsub("%%totalbonusqp%%", tracker_db.q_db.total_bonusqp)
+       :gsub("%%totalpracs%%", tracker_db.q_db.total_practices)
+       :gsub("%%totalgold%%", tracker_db.q_db.total_gold)
+       :gsub("%%totaltrains%%", tracker_db.q_db.total_trains)
+       :gsub("%%totaltp%%", tracker_db.q_db.total_trivia)
+       :gsub("%%lastmob%%", tracker_db.q_db.last_mob)
+       :gsub("%%lastarea%%", tracker_db.q_db.last_area)
+       :gsub("%%lastroom%%", tracker_db.q_db.last_room)
+       :gsub("%%lastqp%%", tracker_db.q_db.last_qp)
+       :gsub("%%lastgold%%", tracker_db.q_db.last_gold)
+       :gsub("%%lastpracs%%", tracker_db.q_db.last_practices)
+       :gsub("%%lasttrains%%", tracker_db.q_db.last_trains)
+       :gsub("%%lasttp%%", tracker_db.q_db.last_trivia)
+       :gsub("%%lastmins%%", tracker_db.q_db.last_mins)
+       :gsub("%%lastsecs%%", tracker_db.q_db.last_secs)
+       :gsub("%%totalluckyqp%%", tracker_db.q_db.total_luckyqp)
+       :gsub("%%wonall%%", tracker_db.q_cumulative.won)
+       :gsub("%%lostall%%", tracker_db.q_cumulative.lost)
+       :gsub("%%qpall%%", tracker_db.q_cumulative.qp)
+       :gsub("%%trainsall%%", tracker_db.q_cumulative.trains)
+       :gsub("%%goldall%%", tracker_db.q_cumulative.gold)
+       :gsub("%%pracsall%%", tracker_db.q_cumulative.practices)
+       :gsub("%%tpall%%", tracker_db.q_cumulative.trivia)
+       :gsub("%%wonallpct%%", tracker_db.q_cumulative.wonpct)
+       :gsub("%%luckyqpall%%", tracker_db.q_cumulative.luckyqp)
+       :gsub("%%bonusqpall%%", tracker_db.q_cumulative.bonusqp)
+       :gsub("%%bonuslist%%", tracker_db.q_db.bonus_report)       
+
+  return str
+end
+
+-- Theme functions
+
+function set_theme(z)
+  if z and tonumber(z) > 0 and tonumber(z) <= #tracker_db.themes then 
+    ColourNote(tracker_db.themes[tonumber(z)].text, "", "Changing theme to: ", tracker_db.themes[tonumber(z)].title, "", tracker_db.themes[tonumber(z)].theme)
+    tracker_db.set_theme = tonumber(z)
+    SetVariable("atracker", serialize.save("tracker_db"))
+  elseif z then
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Invalid theme option. Please select a number from " .. tracker_db.themes[tracker_db.set_theme].number, "", "1", tracker_db.themes[tracker_db.set_theme].text, "", " and ", tracker_db.themes[tracker_db.set_theme].number, "", #tracker_db.themes, tracker_db.themes[tracker_db.set_theme].text, "", ".")
+  else
+    theme_output = {}
+    local function insert(f, t)
+      table.insert(theme_output, f)
+      table.insert(theme_output, "")
+      table.insert(theme_output, t)
+    end
+
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Your current theme is: ", tracker_db.themes[tracker_db.set_theme].title, "", tracker_db.themes[tracker_db.set_theme].theme .. "\n", tracker_db.themes[tracker_db.set_theme].text, "", "You have the following themes available: \n")
+    for k,v in ipairs(tracker_db.themes) do
+      insert(v.text, v.theme)
+      insert(v.number, " (" .. k .. ")\n")
+      insert(v.heading, "-")
+      insert(v.title, " Quest Stats ")
+      insert(v.heading, "-\n")
+      insert(v.heading, "Completed ")
+      insert(v.bracket, "[")
+      insert(v.number, tracker_db.q_cumulative.won)
+      insert(v.subtext, "/")
+      insert(v.number, (tonumber(tracker_db.q_cumulative.won) + tonumber(tracker_db.q_cumulative.lost)))
+      insert(v.bracket, "] [")
+      insert(v.number, string.format("%5.1f", tonumber(tracker_db.q_cumulative.wonpct)) .. "%")
+      insert(v.bracket, "]\n\n")
+    end
+    
+    ColourNote(unpack(theme_output))
+  end
+end
+
+function new_theme(s)
+  local theme_check = 0
+  for _, v in ipairs(tracker_db.themes) do
+    if string.upper(v.theme) == string.upper(s) then
+      theme_check = 1
+      break
+    end
+  end
+
+  if theme_check == 0 then
+      table.insert(tracker_db.themes, {heading = "white", bracket = "white", number = "white", number2 = "white", number3 = "white", text = "white", special = "white", subtext = "white", title = "white", theme =  string.gsub(string.lower(s), "^%l", string.upper)})
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "New theme added! (", tracker_db.themes[tracker_db.set_theme].special, "", string.gsub(string.lower(s), "^%l", string.upper), tracker_db.themes[tracker_db.set_theme].text, "", ")")
+      SetVariable("atracker", serialize.save("tracker_db"))
+    else
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "You already have a theme with this name. Use ", tracker_db.themes[tracker_db.set_theme].special, "", "'q set " .. s .. " <field> <color>'", tracker_db.themes[tracker_db.set_theme].text, "", " to change color values.")
+  end
+end
+
+function custom_theme(name, field, color)
+  local theme_name, theme_check, theme_num, field_check = string.gsub(string.lower(name), "^%l", string.upper), 0, 0, 0
+  for i, v in pairs(tracker_db.themes) do
+    if string.upper(v.theme) == string.upper(name) then
+      theme_check = 1
+      theme_num = i
+      break
+    end
+  end
+
+  if theme_check == 1 then
+    for _,v in pairs(tracker_db.themes[theme_num]) do
+      if string.lower(v) == string.lower(field) then
+        field_check = 1
+      end
+    end
+    if field_check == 1 then
+      tracker_db.themes[theme_num][field] = color
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Field ", tracker_db.themes[tracker_db.set_theme].special, "", field, tracker_db.themes[tracker_db.set_theme].text, "", " set to ", color, "", color, tracker_db.themes[tracker_db.set_theme].text, "", ". If different than what you were expecting, check spelling!")
+    else
+      ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Field ", tracker_db.themes[tracker_db.set_theme].special, "", field, tracker_db.themes[tracker_db.set_theme].text, "", " not found! Options are: ", tracker_db.themes[tracker_db.set_theme].subtext, "", "heading, bracket, number, number2, number3, special, subtext, text, title", tracker_db.themes[tracker_db.set_theme].text, "", ". Please try again.")
+    end
+  else
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Theme ", tracker_db.themes[tracker_db.set_theme].special, "", name, tracker_db.themes[tracker_db.set_theme].text, "", " not found. Did you ", tracker_db.themes[tracker_db.set_theme].special, "", "addtheme", tracker_db.themes[tracker_db.set_theme].text, "", " it yet?")
+  end
+end
+
+function OnPluginBroadcast (msg, id, name, text)
+  if (id == '3e7dedbe37e44942dd46d264') then
+    if (text == 'comm.quest') then
+      local res, qinfo = CallPlugin("3e7dedbe37e44942dd46d264","gmcpval","comm.quest")
+
+      assert(loadstring("quest = " .. qinfo or "")) ()
+
+      if quest["action"] == "start" then
+        QuestStart(quest.targ, quest.room, quest.area, quest.timer, tracker_db.set_theme)
+      elseif quest["action"] == "fail" then
+        QuestFail(tracker_db.set_theme)
+      elseif quest["action"] == "killed" then
+        QuestKilled(tracker_db.set_theme)
+      elseif quest["action"] == "comp" then
+        QuestComp(quest.qp, quest.tierqp, quest.pracs, quest.trains, quest.tp, quest.mccp, quest.lucky, quest.double, quest.daily, quest.totqp, quest.gold, quest.completed, quest.wait, tracker_db.set_theme)
+      elseif quest["action"] == "ready" then
+        QuestReady(tracker_db.set_theme)
+      elseif quest["action"] == "timeout" then
+        QuestFail(tracker_db.set_theme)
+      elseif quest["action"] == "reset" then
+        QuestReset(tracker_db.set_theme)
+      end               
+    end
+  end
+end
+
+function color_table(color)
+  local output = {}
+  local function insert(f, b, t)
+    table.insert(output, f)
+    table.insert(output, b)
+    table.insert(output, t)
+  end
+  if color and tracker_db.color_table[color] then
+    for _,v in ipairs(tracker_db.color_table[color]) do
+      insert("", v, "   ")
+      insert("white", "", " -- " .. v .. "\n")
+    end
+  elseif color and not tracker_db.color_table[color] then
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Available colors are: ", tracker_db.themes[tracker_db.set_theme].special, "", "blue, green, pink, red, yellow, brown, grey, white, orange, purple")
+  else
+    for i, v in pairs(tracker_db.color_table) do
+      insert("white", "", string.gsub(string.lower(i), "^%l", string.upper) .. " colors\n")
+      for _,v in ipairs(v) do
+        insert("", v, "   ")
+      end
+      insert("", "", "\n\n")
+    end
+  end
+  ColourNote(unpack(output))
+end
+
+function add_stats(t, k, v)
+  t[k] = t[k] + (v or 1)
+end
+
+function sub_stats(t, k, v)
+  t[k] = t[k] - (v or 1)
+end
+
+function QuestStart(t, r, a, c, z)
+  local theme = tracker_db.themes[z]
+  local brack, head, num, num2, num3, special, subtext, title, text = theme.bracket, theme.heading, theme.number, theme.number2, theme.number3, theme.special, theme.subtext, theme.title, theme.text
+
+  tracker_db.q_db.last_mob, tracker_db.q_db.last_area, tracker_db.q_db.last_room, tracker_db.q_db.last_time = t, a, r, c
+
+  tracker_db.q_db.current_start = os.time()
+  tracker_db.q_db.last_qp     = 0
+  tracker_db.q_db.last_publicqp = 0
+  tracker_db.q_db.last_bonusqp  = 0
+  tracker_db.q_db.last_luckyqp  = 0
+  tracker_db.q_db.last_gold   = 0
+  tracker_db.q_db.last_trains   = 0
+  tracker_db.q_db.last_practices  = 0
+  tracker_db.q_db.last_trivia   = 0
+  tracker_db.q_db.last_date   = os.date("%A %B %d, %Y %I:%M %p")
+
+  ColourNote(head, "", tracker_db.heading, text, "", "Quest Information\nTarget: ", special, "", t .. "\n", text, "", "Room: ", special, "", r .. "\n", text, "", "Area: ", special, "", a .. "\n", text, "", "Time limit: ", special, "", c .. " minutes\n", head, "", tracker_db.heading)
+
+  tracker_db.current_quest_report = custom_report(tracker_db.strings.quest_start_string)
+
+  if tracker_db.report_check == 1 then
+    Send(tracker_db.report_channel .. tracker_db.current_quest_report)
+  end
+
+  SetVariable("atracker", serialize.save("tracker_db"))
+end
+
+function QuestFail(z)
+  
+  add_stats(tracker_db.q_db, "total_lost")
+  add_stats(tracker_db.q_cumulative, "lostall")
+
+  local theme = tracker_db.themes[z]
+  local brack, head, num, num2, num3, special, subtext, title, text = theme.bracket, theme.heading, theme.number, theme.number2, theme.number3, theme.special, theme.subtext, theme.title, theme.text
+  local total_q, total_qall = tracker_db.q_db.total_lost + tracker_db.q_db.total_won, tracker_db.q_db.q_cumulative.lostall + tracker_db.q_db.q_cumulative.wonall
+
+  tracker_db.q_db.total_wonpct = string.format("%0.1f", 100*(tonumber(tracker_db.q_db.total_won)/tonumber(total_q)))
+  tracker_db.q_db.total_avgqp = (string.format("%0.1f", tonumber(tracker_db.q_db.total_qp)/tonumber(total_q)))
+  tracker_db.q_cumulative.wonpct = (string.format("%0.1f", 100*(tonumber(tracker_db.q_cumulative.wonall)/tonumber(total_qall))))
+
+  if tracker_db.local_check == 1 then
+    ColourNote(head, "", tracker_db.heading, text, "", "Quest failed.\nFor updated quest stats, type ", brack, "", "'", subtext, "", "q stats", brack, "", "'\n", head, "", tracker_db.heading)
+  end
+  
+  tracker_db.last_quest_report = custom_report(tracker_db.strings.quest_fail_string)
+
+  if tracker_db.report_check == 1 then
+    Send(tracker_db.report_channel .. tracker_db.last_quest_report)
+  end
+
+  SetVariable("atracker", serialize.save("tracker_db"))
+end
+
+function QuestKilled(z)
+  local theme = tracker_db.themes[z]
+  local brack, head, num, num2, num3, special, subtext, title, text = theme.bracket, theme.heading, theme.number, theme.number2, theme.number3, theme.special, theme.subtext, theme.title, theme.text
+
+  if tracker_db.local_check == 1 then
+    ColourNote(head, "", tracker_db.heading, text, "", "Quest target killed! Complete your quest!\n", head, "", tracker_db.heading)
+  end
+
+  if tracker_db.report_check == 1 then
+    Send(tracker_db.report_channel .. custom_report(tracker_db.strings.quest_killed_string))
+  end
+end
+
+function QuestComp(q, tq, p, tr, tp, m, l, d, da, qp, g, c, w, z)
+  local theme = tracker_db.themes[z]
+  local brack, head, num, num2, num3, special, subtext, title, text = theme.bracket, theme.heading, theme.number, theme.number2, theme.number3, theme.special, theme.subtext, theme.title, theme.text
+  local bonuses = (tonumber(qp) - tonumber(l) - tonumber(m) - tonumber(q) - tonumber(tq))
+
+  tracker_db.q_db.current_end     = os.time()
+  tracker_db.q_db.last_trains     = tonumber(tr)
+  tracker_db.q_db.last_trivia     = tonumber(tp)
+  tracker_db.q_db.last_publicqp   = tonumber(qp)
+  tracker_db.q_db.last_practices    = tonumber(p)
+  tracker_db.q_db.last_gold       = tonumber(g)
+  tracker_db.q_db.last_qp       = tonumber(qp)
+
+
+  add_stats(tracker_db.q_db, "total_trains", tonumber(tr))
+  add_stats(tracker_db.q_db, "total_trivia", tonumber(tp))
+  add_stats(tracker_db.q_db, "total_qp", tonumber(qp))
+  add_stats(tracker_db.q_db, "total_bonusqp", bonuses)
+  add_stats(tracker_db.q_db, "total_practices", tonumber(p))
+  add_stats(tracker_db.q_db, "total_luckyqp", tonumber(l))
+  add_stats(tracker_db.q_db, "total_gold", tonumber(g))
+  add_stats(tracker_db.q_db, "total_won")
+
+  if tonumber(tr) > 0 or tonumber(tp) > 0 or tonumber(p) > 0 then
+    tracker_db.q_db.bonus_report = custom_report(tracker_db.strings.quest_bonus_string)
+  else
+    tracker_db.q_db.bonus_report = custom_report(tracker_db.strings.quest_nobonus_string)
+  end
+
+  add_stats(tracker_db.q_cumulative, "trains", tonumber(tr))
+  add_stats(tracker_db.q_cumulative, "trivia", tonumber(tp))
+  add_stats(tracker_db.q_cumulative, "qp", qp)
+  add_stats(tracker_db.q_cumulative, "bonusqp", bonuses)
+  add_stats(tracker_db.q_cumulative, "practices", tonumber(p))
+  add_stats(tracker_db.q_cumulative, "luckyqp", tonumber(l))
+  add_stats(tracker_db.q_cumulative, "gold", tonumber(g))
+  add_stats(tracker_db.q_cumulative, "won")
+
+  local total_q, total_qall = tracker_db.q_db.total_won + tracker_db.q_db.total_lost, tracker_db.q_cumulative.won + tracker_db.q_cumulative.lost
+
+  tracker_db.q_cumulative.wonpct = string.format("%0.1f", (100 * (tonumber(tracker_db.q_cumulative.won)/tonumber(total_qall))))
+  tracker_db.q_db.total_wonpct = string.format("%0.1f", (100 * (tonumber(tracker_db.q_db.total_won)/tonumber(total_q))))
+  tracker_db.q_db.total_avggold = string.format("%0.1f", (tonumber(tracker_db.q_db.total_gold)/tonumber(tracker_db.q_db.total_won)))
+  tracker_db.q_db.total_avgqp = string.format("%0.2f", tonumber(tracker_db.q_db.total_qp)/tonumber(total_q))
+
+  -- Time calculations, old-fashioned (primitive!) way for simplicity
+
+  tracker_db.q_db.current_time = (tracker_db.q_db.current_end - tracker_db.q_db.current_start)
+  add_stats(tracker_db.q_db, "totalsec", tracker_db.q_db.current_time)
+  tracker_db.q_db.current_days = math.floor(tracker_db.q_db.current_time/86400)
+  sub_stats(tracker_db.q_db, "current_time", (tracker_db.q_db.current_days*86400))
+
+  tracker_db.q_db.current_hours = math.floor(tracker_db.q_db.current_time/3600)
+  sub_stats(tracker_db.q_db,"current_time", (tracker_db.q_db.current_hours*3600))
+
+  tracker_db.q_db.current_minutes = math.floor(tracker_db.q_db.current_time/60)
+  tracker_db.q_db.current_seconds = tracker_db.q_db.current_time - (tracker_db.q_db.current_minutes*60)
+
+  add_stats(tracker_db.q_db, "total_secs", tracker_db.q_db.current_seconds)
+  if tracker_db.q_db.total_secs > 59 then
+    add_stats(tracker_db.q_db, "total_mins")
+    sub_stats(tracker_db.q_db, "total_secs", 60)
+  end
+
+  add_stats(tracker_db.q_db, "total_mins", tracker_db.q_db.current_minutes)
+  if tracker_db.q_db.total_mins > 59 then
+    add_stats(tracker_db.q_db, "total_hours")
+    sub_stats(tracker_db.q_db, "total_mins", 60)
+  end
+
+  add_stats(tracker_db.q_db, "total_hours", tracker_db.q_db.current_hours)
+  if tracker_db.q_db.total_hours > 23 then
+    add_stats(tracker_db.q_db, "total_days")
+    sub_stats(tracker_db.q_db, "total_hours", 24)
+  end
+
+  add_stats(tracker_db.q_db, "total_days", tracker_db.q_db.current_days)
+
+  tracker_db.q_db.last_mins = tracker_db.q_db.current_minutes
+  tracker_db.q_db.last_secs = tracker_db.q_db.current_seconds
+
+  tracker_db.q_db.total_avgtime = (tracker_db.q_db.totalsec/total_q)
+  tracker_db.q_db.total_avgsecs = tracker_db.q_db.total_avgtime%60
+  tracker_db.q_db.total_avgmins = ((tracker_db.q_db.total_avgtime - tracker_db.q_db.total_avgsecs)/60)%60
+  tracker_db.q_db.total_avghours = (tracker_db.q_db.total_avgtime - tracker_db.q_db.total_avgsecs - (tracker_db.q_db.total_avgmins*60))/3600
+
+  -- Reporting
+
+  if tracker_db.local_check == 1 then
+    ColourNote(head, "", tracker_db.heading, text, "", "Quest Completed\nRewards: ", num, "", qp, text, "", " qp, ", num, "", g, text, "", " gold.\nExtras: ", num, "", tr, text, "", " trn, ", num, "", p, text, "", " prc, ", num, "", tp, text, "", " trv.\nTime: ", num, "", tracker_db.q_db.last_mins, text, "", " mins, ", num, "", tracker_db.q_db.last_secs, text, "", " secs.\nFor updated quest stats, type ", brack, "", "'", subtext, "", "q stats", brack, "", "'\n", head, "", tracker_db.heading)
+  end
+
+  tracker_db.last_quest_report = custom_report(tracker_db.strings.quest_completed_string)
+
+  if tracker_db.report_check == 1 then
+    Send(tracker_db.report_channel .. tracker_db.last_quest_report)
+  end
+
+  SetVariable("atracker", serialize.save("tracker_db"))
+end
+
+function QuestReady(z)
+  local theme = tracker_db.themes[z]
+  local brack, head, num, num2, num3, special, subtext, title, text = theme.bracket, theme.heading, theme.number, theme.number2, theme.number3, theme.special, theme.subtext, theme.title, theme.text
+
+  if tracker_db.local_check == 1 then
+    ColourNote(head, "", tracker_db.heading, text, "", "Quest ready!\n", head, "", tracker_db.heading)
+  end
+
+  if tracker_db.report_check == 1 then
+    Send(tracker_db.report_channel .. custom_report(tracker_db.strings.quest_ready_string))
+  end
+end
+
+function QuestReset(z)
+  local theme = tracker_db.themes[z]
+  local brack, head, num, num2, num3, special, subtext, title, text = theme.bracket, theme.heading, theme.number, theme.number2, theme.number3, theme.special, theme.subtext, theme.title, theme.text
+
+  if tracker_db.local_check == 1 then
+    ColourNote(head, "", tracker_db.heading, text, "", "Quest reset!\n", head, "", tracker_db.heading)
+  end
+
+  if tracker_db.report_check == 1 then
+    Send(tracker_db.report_channel .. custom_report(tracker_db.strings.quest_reset_string))
+  end
+end
+
+function q_stats(z)
+  local theme = tracker_db.themes[z]
+  local brack, head, num, num2, num3, special, subtext, title, text = theme.bracket, theme.heading, theme.number, theme.number2, theme.number3, theme.special, theme.subtext, theme.title, theme.text
+  local gold_format = ""
+
+  if tracker_db.q_db.total_gold > 999999 then
+    gold_format = string.format("%5.2f", tonumber(tracker_db.q_db.total_gold)/1000000) .. "m"
+  else
+    gold_format = string.format("%6.0f", tonumber(tracker_db.q_db.total_gold))
+  end
+
+  ColourTell(head, "", "-------------------------------") NoteStyle(5) ColourTell(title, "", " Quest Stats ") NoteStyle(0) ColourTell(head, "", "-------------------------------\n")
+  ColourNote(text, "", "Q Completed   ", brack, "", "[", num, "", string.format("%6.0f", tonumber(tracker_db.q_cumulative.won)), brack, "", "]    ", text, "", "Q Failed      ", brack, "", "[", num, "", string.format("%6.0f", tonumber(tracker_db.q_cumulative.lost)), brack, "", "]    ", text, "", "Success Ratio ", brack, "", "[", num, "", string.format("%5.1f", tonumber(tracker_db.q_cumulative.wonpct)) .. "%", brack, "", "]\n")
+  ColourTell(head, "", "             --") NoteStyle(5) ColourTell(title, "", "Since " .. string.format( "%39s", tracker_db.q_db.total_reset)) NoteStyle(0) ColourTell(head, "",  "--\n")
+  ColourNote(text, "", "Complete", brack,  "", "[", num, "", string.format( "%6.0f", tonumber(tracker_db.q_db.total_won)), brack, "", "]   ", text, "", "Failed  ", brack, "", "[", num, "", string.format( "%6.0f", tonumber(tracker_db.q_db.total_lost)), brack, "", "]                      ", text, "", "Won Pct", brack, "", " [", num, "", string.format( "%5.1f", tonumber(tracker_db.q_db.total_wonpct)) .. "%", brack, "",  "]")
+  ColourNote(text, "", "QP Tot  ", brack, "", "[", num, "", string.format( "%6.0f", tonumber(tracker_db.q_db.total_qp)), brack, "", "]   ", text, "", "Avg QP  ",  brack, "", "[", num, "", string.format( "%6.1f", tonumber(tracker_db.q_db.total_avgqp)), brack, "",  "]   ", text, "", "Lucky QP", brack, "", "[", num, "", string.format( "%6.0f", tonumber(tracker_db.q_db.total_luckyqp)), brack, "",  "]   ", text, "", "Bonus   ", brack, "", "[", num, "", string.format("%6.0f", tonumber(tracker_db.q_db.total_bonusqp)), brack, "", "]")
+  ColourNote(text, "",  "Pracs   ", brack, "", "[", num, "",  string.format( "%6.0f", tonumber(tracker_db.q_db.total_practices)), brack, "", "]   ", text, "",  "Trains  ", brack, "", "[", num, "",  string.format( "%6.0f", tonumber(tracker_db.q_db.total_trains)), brack, "", "]   ", text, "",  "Gold    ", brack, "", "[", num, "", gold_format, brack, "", "]   ", text, "",  "Trivia  ", brack, "", "[", num, "",  string.format( "%6.0f", tonumber(tracker_db.q_db.total_trivia)), brack, "", "]")
+  ColourNote(text, "",  "Total Time     ", brack, "", "[", num, "",  string.format( "%3.0f", tonumber(tracker_db.q_db.total_days)), brack, "", " days ", num, "",  string.format( "%2.0f", tonumber(tracker_db.q_db.total_hours)), brack, "", " hrs ", num, "",  string.format( "%2.0f", tonumber(tracker_db.q_db.total_mins)), brack, "", " mins ", num, "",  string.format( "%2.0f", tonumber(tracker_db.q_db.total_secs)), brack, "", " secs ]")
+  ColourNote(text, "",  "Average Time   ", brack, "", "[                ", num, "",  string.format( "%2.0f", tonumber(tracker_db.q_db.total_avgmins)), brack, "", " mins ", num, "", string.format( "%2.0f", tonumber(tracker_db.q_db.total_avgsecs)), brack, "", " secs ]\n")
+  ColourTell(head, "", "             --") NoteStyle(5) ColourTell(title, "",  "Last Q " .. string.format( "%39s", tracker_db.q_db.last_date)) NoteStyle(0) ColourTell(head, "", "--\n")
+  ColourNote(text, "",  "Target        ", brack, "", "[",  num, "",  tracker_db.q_db.last_mob, subtext, "",  " in ", num, "",  tracker_db.q_db.last_area, brack, "", " / ",  num, "", tracker_db.q_db.last_room, brack, "", "]")
+  ColourNote(text, "",  "Details       ", brack, "", "[",  num, "",  tracker_db.q_db.last_qp, subtext, "",  " qp ", brack, "", "/ ",  num, "",  tracker_db.q_db.last_gold, subtext, "",  " gld ", brack, "", "/ ",  num, "",  tracker_db.q_db.last_trains, subtext, "",  " trn ", brack, "", "/ ",  num, "",  tracker_db.q_db.last_practices, subtext, "",  " prc ", brack, "", "/ ",  num, "",  tracker_db.q_db.last_trivia, subtext, "",  " trv", brack, "", "]") 
+  ColourNote(text, "",  "Completed In  ", brack, "", "[", num, "",  string.format( "%2.0f", tonumber(tracker_db.q_db.last_mins)), subtext, "",  " mins ", num, "",  string.format( "%2.0f", tonumber(tracker_db.q_db.last_secs)), subtext, "",  " secs ", brack, "", "]")
+  ColourTell(head, "", "-----------------------------------------------------------------------", brack, "", "[") NoteStyle(5) ColourTell(title, "", tracker_db.version) NoteStyle(0) ColourTell(brack, "", "]\n\n")
+end
+
+
+function q_reset(p, c)
+  if p == "all" and c == "confirm" then
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Resetting everything back to default!")
+    tracker_db.q_cumulative = reset_db.q_cumulative
+    tracker_db.q_db = reset_db.q_db
+    tracker_db.q_db.total_reset = os.date("%A %B %d, %Y %I:%M %p")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Tracker cumulative and current stats reset! (Boy, that was fast!)")
+  elseif p == "all" and not c then
+    ColourNote("yellow", "firebrick", "WARNING: This will reset ALL your cumulative and current stats and cannot be undone!")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Type ", tracker_db.themes[tracker_db.set_theme].special, "", "'q reset all confirm'", tracker_db.themes[tracker_db.set_theme].text, "", " to continue.")
+  elseif p == "current" and c == "confirm" then
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Resetting current totals!")
+    tracker_db.q_db = reset_db.q_db
+    tracker_db.q_db.total_reset = os.date("%A %B %d, %Y %I:%M %p")
+  elseif p == "current" and not c then
+    ColourNote("yellow", "firebrick", "WARNING: This will reset your current stats and cannot be undone!")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Type ", tracker_db.themes[tracker_db.set_theme].special, "", "'q reset current confirm'", tracker_db.themes[tracker_db.set_theme].text, "", " to continue.")
+  elseif p == "themes" and c == "confirm" then
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Resetting default themes!")
+    tracker_db.themes = reset_db.themes
+  elseif p == "themes" and not c then
+    ColourNote("yellow", "firebrick", "WARNING: This will erase custom themes and reset themes to default and cannot be undone!")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Type ", tracker_db.themes[tracker_db.set_theme].special, "", "'q reset themes confirm'", tracker_db.themes[tracker_db.set_theme].text, "", " to continue.")
+  elseif p == "strings" and c == "confirm" then
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Resetting default strings!")
+    tracker_db.strings = reset_db.strings
+  elseif p == "strings" and not c then
+    ColourNote("yellow", "firebrick", "WARNING: This will erase custom strings and reset them to default and cannot be undone!")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Type ", tracker_db.themes[tracker_db.set_theme].special, "", "'q reset strings confirm'", tracker_db.themes[tracker_db.set_theme].text, "", " to continue.")  
+  end
+  SetVariable("atracker", serialize.save("tracker_db"))
+end
+
+function set_custom(v, s)
+  if v and s then
+    if v == "start" then tracker_db.strings.quest_start_string = s
+      elseif v == "completed" then tracker_db.strings.quest_completed_string = s
+        ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", string.gsub(string.lower(v), "^%l", string.upper) .. " set to: ", tracker_db.themes[tracker_db.set_theme].special, "", s)
+      elseif v == "failed" then tracker_db.strings.quest_failed_string = s
+        ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", string.gsub(string.lower(v), "^%l", string.upper) .. " set to: ", tracker_db.themes[tracker_db.set_theme].special, "", s)
+      elseif v == "killed" then tracker_db.strings.quest_killed_string = s
+        ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", string.gsub(string.lower(v), "^%l", string.upper) .. " set to: ", tracker_db.themes[tracker_db.set_theme].special, "", s)
+      elseif v == "ready" then tracker_db.strings.quest_ready_string = s
+        ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", string.gsub(string.lower(v), "^%l", string.upper) .. " set to: ", tracker_db.themes[tracker_db.set_theme].special, "", s)
+      elseif v == "reset" then tracker_db.strings.quest_reset_string = s
+        ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", string.gsub(string.lower(v), "^%l", string.upper) .. " set to: ", tracker_db.themes[tracker_db.set_theme].special, "", s)
+      elseif v == "bonus" then tracker_db.strings.quest_bonus_string = s
+        ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", string.gsub(string.lower(v), "^%l", string.upper) .. " set to: ", tracker_db.themes[tracker_db.set_theme].special, "", s)
+      elseif v == "nobonus" then tracker_db.strings.quest_nobonus_string = s
+        ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", string.gsub(string.lower(v), "^%l", string.upper) .. " set to: ", tracker_db.themes[tracker_db.set_theme].special, "", s)
+      else
+        ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "That's not an option. Please select from: ", tracker_db.themes[tracker_db.set_theme].special, "", "start, completed, failed, killed, ready, reset, current, last")
+    end
+  elseif v and not s then
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Why do you want an empty string? The command is: ", tracker_db.themes[tracker_db.set_theme].special, "", "'q custom <type> <custom string>'")
+  else
+    ColourNote(tracker_db.themes[tracker_db.set_theme].text, "", "Your options are:")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%avggold%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current Average Gold")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%totalwon%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current completed quest total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%wonall%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Overall completed quest total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%totallost%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current failed quest total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lostall%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Overall failed quest total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%wonpct%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current won percentage")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%wonallpct%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Overall won percentage")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%totalqp%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current quest point total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%qpall%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Overall quest point total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%publicqp%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Public quest point display (*shrug*, it's an option)*")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%avgqp%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current average quest points per quest")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%totalbonusqp%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current bonus quest points total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%bonusqpall%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Overall bonus quest point total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%totalpracs%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current practice total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%pracsall%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Overall practice total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%totalgold%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current gold total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%goldall%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Overall gold total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%totaltrains%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current trains total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%trainsall%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Overall trains total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%totaltp%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current trivia point total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%tpall%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Overall trivia point total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%totalluckyqp%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current lucky quest point total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%luckyqpall%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Overall lucky quest point total")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%avghours%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Average hours")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%avgdays%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Average days")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%avgmins%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Average minutes")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%avgsecs%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Average seconds")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lastmob%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current/last quest mob")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lastarea%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current/last quest area")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lastroom%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current/last quest room")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lastqp%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Last quest point reward")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lastgold%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Last gold reward")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lastpracs%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Last practices reward")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lasttrains%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Last trains reward")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lasttp%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Last trivia point reward")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lastmins%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Last completed quest time (minutes)")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lastsecs%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Last completed quest time (seconds)")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%lasttime%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Current/Last time limit on quest")
+    ColourNote(tracker_db.themes[tracker_db.set_theme].special, "", string.format("%-20s", "%bonuslist%"), tracker_db.themes[tracker_db.set_theme].text, "", "-- Bonus list output\n")
+  end
+  SetVariable("atracker", serialize.save("tracker_db"))
+end
+
+function OnPluginInstall()
+  require 'serialize'
+
+  reset_db = {
+
+    color_table = {
+  
+      pink = {
+        "pink", 
+        "lightpink", 
+        "hotpink", 
+        "deeppink", 
+        "palevioletred", 
+        "mediumvioletred"
+        },
+    
+      red = {
+        "lightsalmon", 
+        "salmon", 
+        "darksalmon", 
+        "lightcoral", 
+        "indianred", 
+        "crimson", 
+        "firebrick", 
+        "darkred", 
+        "red"
+        },
+      
+      orange = {
+        "orangered", 
+        "tomato", 
+        "coral", 
+        "darkorange", 
+        "orange"
+      },
+      
+      yellow = {
+        "yellow", 
+        "lightyellow", 
+        "lemonchiffon", 
+        "lightgoldenrodyellow", 
+        "papayawhip", 
+        "moccasin", 
+        "peachpuff", 
+        "palegoldenrod", 
+        "khaki", 
+        "darkkhaki", 
+        "gold"
+        },
+    
+      brown = {
+        "cornsilk",
+        "blanchedalmond",
+        "bisque",
+        "navajowhite",
+        "wheat",
+        "burlywood",
+        "tan",
+        "rosybrown",
+        "sandybrown",
+        "goldenrod",
+        "darkgoldenrod",
+        "peru",
+        "chocolate",
+        "saddlebrown",
+        "sienna",
+        "brown",
+        "maroon"
+      },
+    
+      purple = {
+        "lavender",
+        "thistle",
+        "plum",
+        "violet",
+        "orchid",
+        "fuchsia",
+        "magenta",
+        "mediumorchid",
+        "mediumpurple",
+        "blueviolet",
+        "darkviolet",
+        "darkorchid",
+        "darkmagenta",
+        "purple",
+        "indigo",
+        "slateblue",
+        "darkslateblue",
+        "mediumslateblue"
+      },
+    
+      green = {
+        "greenyellow",
+        "chartreuse",
+        "lawngreen",
+        "lime",
+        "limegreen",
+        "palegreen",
+        "lightgreen",
+        "mediumspringgreen",
+        "springgreen",
+        "mediumseagreen",
+        "seagreen",
+        "forestgreen",
+        "green",
+        "darkgreen",
+        "yellowgreen",
+        "olivedrab",
+        "olive",
+        "darkolivegreen",
+        "mediumaquamarine",
+        "darkseagreen",
+        "lightseagreen",
+        "darkcyan",
+        "teal"
+      },
+    
+      blue = {
+        "aqua",
+        "cyan",
+        "lightcyan",
+        "paleturquoise",
+        "aquamarine",
+        "turquoise",
+        "mediumturquoise",
+        "darkturquoise",
+        "cadetblue",
+        "steelblue",
+        "lightsteelblue",
+        "powderblue",
+        "lightblue",
+        "skyblue",
+        "lightskyblue",
+        "deepskyblue",
+        "dodgerblue",
+        "cornflowerblue",
+        "mediumslateblue",
+        "royalblue",
+        "blue",
+        "mediumblue",
+        "darkblue",
+        "navy",
+        "midnightblue"  
+      },
+    
+      white = {
+        "white",
+        "snow",
+        "honeydew",
+        "mintcream",
+        "azure",
+        "aliceblue",
+        "ghostwhite",
+        "whitesmoke",
+        "seashell",
+        "beige",
+        "oldlace",
+        "floralwhite",
+        "ivory",
+        "antiquewhite",
+        "linen",
+        "lavenderblush",
+        "mistyrose" 
+      },
+    
+      grey = {
+        "gainsboro",
+        "lightgrey",
+        "silver",
+        "darkgray",
+        "gray",
+        "dimgray",
+        "lightslategray",
+        "slategray",
+        "darkslategray",
+        "black"
+      }
+    },
+  
+    themes = {
+    {
+      bracket   = "lightcoral", 
+      heading   = "firebrick", 
+      number    = "gold", 
+      number2   = "sandybrown", 
+      number3   = "orangered", 
+      special   = "salmon", 
+      subtext   = "orange", 
+      text      = "orangered", 
+      title     = "ghostwhite", 
+      theme     = "Fire"
+      },
+  
+    {
+      bracket   = "darkslateblue", 
+      heading   = "lightskyblue", 
+      number    = "powerblue", 
+      number2   = "royalblue", 
+      number3   = "mediumblue", 
+      special   = "lightsteelblue", 
+      subtext   = "lightskyblue",
+      text      = "cornflowerblue", 
+      title     = "azure",
+      theme     = "Cool"
+      },
+  
+    {
+      bracket   = "saddlebrown", 
+      heading   = "green", 
+      number    = "lightgreen", 
+      number2   = "limegreen",
+      number3   = "seagreen",
+      special   = "peru",
+      subtext   = "olivedrab",
+      text      = "yellowgreen", 
+      title     = "honeydew", 
+      theme     = "Nature"
+      },
+  
+    {
+      bracket   = "darkmagenta", 
+      heading   = "darkmagenta", 
+      number    = "violet", 
+      number2   = "ghostwhite",
+      number3   = "ghostwhite",
+      special   = "plum", 
+      subtext   = "mediumorchid",
+      text    = "mediumorchid", 
+      title     = "ghostwhite", 
+      theme     = "Violet"
+      },
+  
+    {
+      bracket   = "teal", 
+      heading   = "powerblue", 
+      number    = "mediumaquamarine",
+      number2   = "ghostwhite",
+      number3   = "ghostwhite", 
+      special   = "skyblue",
+      subtext   = "ghostwhite", 
+      text    = "powerblue", 
+      title     = "white", 
+      theme     = "Sea"
+      },
+  
+    {
+      bracket   = "orange", 
+      heading   = "lightcoral", 
+      number    = "peachpuff",
+      number2   = "ghostwhite",
+      number3   = "ghostwhite", 
+      special   = "ghostwhite",
+      subtext   = "ghostwhite",
+      text    = "coral", 
+      title     = "ghostwhite", 
+      theme     = "Peach"
+      },
+  
+    {
+      bracket   = "darkmagenta", 
+      heading   = "indigo", 
+      number    = "ghostwhite", 
+      number2   = "ghostwhite",
+      number3   = "ghostwhite",
+      special   = "darkmagenta",
+      subtext   = "mediumpurple",
+      text      = "ghostwhite", 
+      title     = "ghostwhite", 
+      theme     = "Grape"
+      },
+  
+    {
+      bracket   = "red", 
+      heading   = "white", 
+      number    = "silver",
+      number2   = "silver",
+      number3   = "silver",
+      special   = "darkslategray", 
+      subtext   = "silver",
+      text    = "ghostwhite", 
+      title     = "ghostwhite", 
+      theme     = "Rogues"
+      },
+    },
+  
+    set_theme = 1, -- Set by default
+    current_quest_report = "@D[@x123Quest@D] @x214Find: @W%lastmob% @x214Room: @W%lastroom% @x214Area: @W%lastarea% @x214Time: @W%lasttime%$C",
+      last_quest_report = "@D[@x123Quest@D] @x214No quests have been run!$C",
+    version = "1.1",
+    
+    strings = {
+      quest_start_string = "@D[@x123Quest@D] @x123Find: @W%lastmob% @x123Room: @W%lastroom% @x123Area: @W%lastarea% @x123Time: @W%lasttime%$C", 
+      quest_completed_string = "@D[@x123Quest@D] @x123Last Mob: @D[@W%lastmob%@D] @x123in @D[@W%lastroom%@D] @x123in @D[@W%lastarea%@D] @x123Time: @D[@W%lastmins%@x123m @W%lastsecs%@x123s@D] @x123Base Rewards: @D[@W%publicqp%@x123qp, @W%lastgold%@x123gold@D] @x123Bonuses: @D[%bonuslist%@D]$C",
+      quest_failed_string = "@D[@x123Quest@D] @x123Failed!$C",
+      quest_killed_string = "@D[@x123Quest@D] @x123Target killed!$C",
+      quest_ready_string = "@D[@x123Quest@D] @x123Ready!$C",
+      quest_reset_string = "@D@x123Quest@D] @x123Reset!$C",
+      quest_bonus_string = "@W%lasttrains%@x123trn @W%lastpracs%@x123prc @W%lasttp%@x123tp",
+      quest_nobonus_string = "@x123No bonuses",
+      },
+
+    report_check = 1, -- enabled by default
+    local_check = 1, -- enabled by default
+    report_channel = "gt ", -- Set to default
+    heading = "--------------------------------------------------------------\n",
+  
+    q_db = {
+      bonus_quests    = 0,
+      current_start   = 0,
+      current_end     = 0,
+      current_time    = 0,
+      current_days    = 0,
+      current_hours   = 0,
+      current_minutes  = 0,
+      current_seconds  = 0,
+      totalsec        = 0,
+      total_avgtime   = 0,
+      total_avggold   = 0, -- %avggold%
+      total_won       = 0, -- %totalwon%
+      total_lost      = 0, -- %totallost%
+      total_wonpct    = 0, -- %wonpct%
+      total_qp        = 0, -- %totalqp%
+      last_publicqp   = 0, -- %publicqp%
+      total_avgqp     = 0, -- %avgqp%
+      total_bonusqp   = 0, -- %totalbonusqp%
+      total_practices  = 0, -- %totalpracs%
+      total_gold      = 0, -- %totalgold%
+      total_trains    = 0, -- %totaltrains%
+      total_trivia    = 0, -- %totaltp%
+      total_avghours   = 0, -- %%avghours%
+      total_avgdays   = 0, -- %avgdays%
+      total_avgmins   = 0, -- %avgmins%
+      total_avgsecs   = 0, -- %avgsecs%
+      total_days      = 0,
+      total_hours     = 0,
+      total_mins      = 0,
+      total_secs      = 0,
+      last_mob        = "N/A", -- %lastmob%
+      last_area       = "N/A", -- %lastarea%
+      last_room       = "N/A", -- %lastroom%
+      last_time       = 0, -- %%lasttime%%
+      last_qp         = 0, -- %lastqp%
+      last_gold       = 0, -- %lastgold%
+      last_practices  = 0, -- %lastpracs%
+      last_trains     = 0, -- %lasttrains%
+      last_trivia     = 0, -- %lasttp%
+      last_mins     = 0, -- %lastmins%
+      last_secs     = 0, -- %lastsecs%
+      qpgoal        = 0,
+      qpgoal_text     = "---",
+      qps_needed      = 0,
+      quests_needed   = 0,
+      bonus_report    = "",
+      total_luckyqp   = 0, -- %totalluckyqp%
+      last_date     = "", -- os.date("%A %B %d, %Y %I:%M %p")
+      total_reset     = "" -- os.date("%A %B %d, %Y %I:%M %p")
+    },
+  
+    q_cumulative = {
+      won     = 0, -- %wonall%
+      lost    = 0, -- %lostall%
+      qp      = 0, -- %qpall%
+      trains    = 0, -- %trainsall%
+      gold    = 0, -- %goldall%
+      practices = 0, -- %pracsall%
+      trivia    = 0, -- %tpall%
+      wonpct    = 0, -- %wonallpct%
+      luckyqp   = 0, -- %luckyqpall%
+      bonusqp   = 0, -- %bonusqpall%
+    }
+  }
+  if GetVariable("atracker") then
+    loadstring (GetVariable("atracker")) ()
+  else
+    tracker_db = {}
+    tracker_db = reset_db
+    tracker_db.q_db.total_reset = os.date("%A %B %d, %Y %I:%M %p")
+    SetVariable("atracker", serialize.save("tracker_db"))
+  end
+end
+]]>
+</script>
+
+
+<!--  Plugin help  -->
+
+<aliases>
+  <alias
+   script="OnHelp"
+   match="^q(?:u|ue|ues|uest)? help$"
+   enabled="y"
+   regexp="y"
+  >
+  </alias>
+</aliases>
+
+<script>
+<![CDATA[
+function OnHelp ()
+  --world.Note (world.GetPluginInfo (world.GetPluginID (), 3))
+  local function fmt(i, d)
+  return ColourNote("limegreen", "", i .. "\n", "white", "", d .. "\n")
+end
+
+ColourNote("green", "", "Themed Tracker Help", "gray", "", " (Original written by GdAnGuS, rewritten and revamped by Arcidayne)\n")
+fmt("q[uest] stats", "Displays quest stats in a \"score\" format")
+fmt("q[uest] custom [type] [string]", "Allows you to customize strings. Without arguments, will display fields you can set.")
+fmt("q[uest] theme [theme option]", "Sets your current theme to a new theme. Without arguments, displays all your existing themes.")
+fmt("q[uest] addtheme [name]", "Allows you to add a new color theme. It will default all colors to white, so be sure to set the new colors.")
+fmt("q[uest] settheme [name] [field] [color]", "Set an existing theme's field to a different color.")
+fmt("q[uest] colors [color]", "Displays a color palette broken into color groups. The [color] argument allows you to break that color down by color name.")
+fmt("q[uest] strings", "Displays current them settings in raw colors format.")
+fmt("q[uest] custom [string type] [string]", "Allows you to customize your field strings similar to how you customize prompts. Use without arguments to a list of settable field names. An example would be: 'q custom completed @DQuest Completed! @w%lastqp% @Dquest points earned!'")
+fmt("q[uest] channel [channel]", "Sets your report channel. Without arguments, displays your current report channel.")
+fmt("q[uest] set[public|local] [off|on]", "Sets whether you use your report channel (public) and local (score table).")
+fmt("q[uest] reset [current|all|themes|strings]", "Resets your current stats, cumulative stats, themes, and strings, respectively.\n")
+ColourNote("green", "", "If you run into any problems, please note Arcidayne on personal board. Be detailed!")
+end
+]]>
+</script> 
+
+</muclient>