--table of default prompt tags
sys.prompttags = {
  ["health"] = function() return stats.h end,
  ["percenthealth"] = function() return(math.floor(stats.h / stats.maxh * 100).. "%h") end,
  ["mana"] = function() return stats.m end,
  ["percentmana"] = function() return(math.floor(stats.m / stats.maxm * 100).. "%m") end,
  ["endurance"] = function() return stats.e end,
  ["percentendurance"] = function() return math.floor(stats.e / stats.maxe * 100) end,
  ["willpower"] = function() return stats.w end,
  ["percentwillpower"] = function() return math.floor(stats.w / stats.maxw * 100) end,
  ["bal"] = function() if sys.bals.b then return "X" else return "" end end,
  ["eq"] = function() if sys.bals.e then return "E" else return "" end end,
  ["target"] = function() if target then return target else return "" end end,
  ["paused"] = function() if sys.paused then return "(PP)" else return "" end end,
  ["softpaused"] = function() if sys.softpaused then return "(sP)" else return "" end end,
  ["phase"] = function() if Def.phased or Def.blackwind or Def.astralform then return "@" else return "" end end,
  ["retardation"] = function() if sys.retard then return "<blue>[<red>RET<blue>]" else return "" end end,
  ["kai"] = function() if gmcp.Char.Status.class == "Monk" then return gmcp.Char.Vitals.charstats[3]:sub(6) else return "" end end,
  ["shin"] = function() if gmcp.Char.Status.class == "Blademaster" then return gmcp.Char.Vitals.charstats[3]:sub(7) else return "" end end,
  ["warning"] = function() return prefixWarning end,
  ["limbs"] = function() if gmcp.Char.Status.class == "Blademaster" and not raid then return "<white>[<gold>RL: " ..rightDam.. " LL: " ..leftDam.. "<white>]" else return "" end end,
  ["exits"] = function()
            promptExits = {}
            local roomExits = gmcp.Room.Info.exits
              for k, v in pairs(roomExits) do
                if k ~= wallDirection then
                  table.insert(promptExits, k:upper())
                end
              end
            return table.concat(promptExits, "<red>|<gold>")
            end,
  ["mw"] = function() if Def.metawake then return "MW" else return "" end end,
  ["breathing"] = function() if Def.breathing then return "br" else return "" end end,
  ["affs"] = function() return affTags() end,
  ["oaff"] = function() return oprompt() end,
  ["timestamp"] = function() return getTimestamp(getLineCount()) end,
  ["diffhealth"] = function()
          if stats.h < stats.oh then
           return("<red>(-"..stats.oh - stats.h .. "h, " .. string.format("%.1f", ((stats.oh - stats.h) / stats.maxh) * 100) .. "%)")
          elseif stats.h > stats.oh then
           return("<green>(+"..stats.h - stats.oh .. "h, " .. string.format("%.1f", ((stats.h - stats.oh) / stats.maxh) * 100) .. "%)")
          else
           return ""
          end -- if
        end, --func
  ["diffmana"] = function()
        if stats.m < stats.om then
         return("<slate_blue>(-"..stats.om - stats.m .. "m, " .. string.format("%.1f", ((stats.om - stats.m) / stats.maxm) * 100) .. "%)")
        elseif stats.m > stats.om then
         return("<purple>(+".. stats.m - stats.om .. "m, " .. string.format("%.1f", ((stats.m - stats.om) / stats.maxm) * 100) .. "%)")
        else
         return ""
        end -- if
      end, --func
  ["def"] = function()
              local defstring = ""
              if def.blindness then
                defstring = defstring .. "<SeaGreen>B "
              end
              if def.deafness then
                defstring = defstring .. "<SeaGreen>D "
              end
              if def.cloak then
                defstring = defstring .. "<deep_sky_blue>C "
              end
              if def.kola then
                defstring = defstring .. "<yellow>K "
              end
              if def.density then
                defstring = defstring .. "<maroon>M "
              end -- if
              if def.heldbreath then
                defstring = defstring .. "<light_grey>br"
              end --if
              return defstring
            end, --func
  ["devo"] = function()
              if gmcp.Char.Status.class == "Paladin" or gmcp.Char.Status.class == "Priest" then
                if stats.devo < 15 then
                  return "<white>[<red>" ..stats.devo.. "% Devo<white>]"
                elseif stats.devo < 50 then
                  return "<white>[<firebrick>" ..stats.devo.. "% Devo<white>]"
                elseif stats.devo < 75 then
                  return "<white>[<dark_orange>" ..stats.devo.. "% Devo<white>]"
                elseif stats.devo >= 75 then
                  return "<white>[<yellow>" ..stats.devo.. "% Devo<white>]"
                end
              else
                return ""
              end
            end,
  ["angel"] = function()
                if gmcp.Char.Status.class == "Priest" then
                  if angel_power < 15 then
                    return "<white>[<red>" ..angel_power.. "% AP<white>]"
                  elseif angel_power < 50 then
                    return "<white>[<red>" ..angel_power.. "% AP<white>]"
                  elseif angel_power < 75 then
                    return "<white>[<red>" ..angel_power.. "% AP<white>]"
                  elseif angel_power >= 75 then
                    return "<white>[<red>" ..angel_power.. "% AP<white>]"
                  end
                else
                  return ""
                end
              end,
  ["xp"] = function()
            stats.exp = tonumber(gmcp.Char.Vitals.nl)
              if stats.exp < 49 then
             return "<white>[<SaddleBrown>" ..stats.exp.. "%<white>]"
              elseif stats.exp < 65 then
             return "<white>[<gold>" .. stats.exp .. "%<white>]"
              elseif stats.exp < 100 then
             return "<white>[<dark_green>" .. stats.exp .. "%<white>]"
              else return ""
              end
            end,--func
  ["invdef"] = function()
              local invdefstring = ""
              if not def.blindness then
                invdefstring = invdefstring .. "<SeaGreen>B "
              end
              if not def.deafness then
                invdefstring = invdefstring .. "<SeaGreen>D "
              end
              if not def.cloak then
                invdefstring = invdefstring .. "<deep_sky_blue>C "
              end
              if not def.kola then
                invdefstring = invdefstring .. "<yellow>K "
              end
              if not def.density then
                invdefstring = invdefstring .. "<maroon>M "
              end -- if
              if def.heldbreath then
                invdefstring = invdefstring .. "<light_grey>br"
              end --if
              return invdefstring
            end, --func
  ["npchp"] = function()
               if gmcp.IRE.Target then
                if gmcp.IRE.Target.Info.id == "-1" then
                  return("<white>[<red>" ..gmcp.IRE.Target.Set.. "<white>]")
                else
                    return("<white>[<red>" ..gmcp.IRE.Target.Info.hpperc.. "<white>]")
                end
              end
          end, --func
}

--table of default prompt tag colors
sys.prompttagcolors = {
  ["stances"] = function()
    local bmStance = gmcp.Char.Vitals.charstats[4]:sub(9)
    if bmStance == "Thyr" then
      return "sea_green"
    elseif bmStance == "Mir" then
      return "blue"
    elseif bmStance == "Arash" then
      return "boldred"
    elseif bmStance == "Doya" then
      return "orange"
    elseif bmStance == "Sanya" then
      return "purple"
    end --if
  end,

  ["hcolour"] = function()
                  if stats.h >= (stats.maxh * 0.75) then
                    return "sea_green"
                  elseif stats.h >= (stats.maxh * 0.33) then
                    return "yellow"
                  else
                    return "red"
                  end --if
                end, --fn
  ["mcolour"] = function()
                  if stats.m >= (stats.maxm * .75) then
                    return "sea_green"
                  elseif stats.m >= (stats.maxm * .50) then
                    return "yellow"
                  else
                    return "red"
                  end -- if
                end, --fn
  ["wcolour"] = function()
                  if stats.w >= (stats.maxw * .66) then
                    return "sea_green"
                  elseif stats.w >= (stats.maxw * .50) then
                    return "yellow"
                  else
                    return "red"
                  end -- if
                end, --fn
  ["ecolour"] = function()
                  if stats.e >= (stats.maxe * .66) then
                    return "sea_green"
                  elseif stats.e >= (stats.maxe * .50) then
                    return "yellow"
                  else
                    return "red"
                  end -- if
                end, --fn
  ["kaicolour"] = function()
                    if stats.kai < 10 then
                      --can't even choke
                      return "red"
                    elseif stats.kai < 21 then
                      --can't heal
                      return "firebrick"
                    elseif stats.kai < 41 then
                      --can't cripple
                      return "dark_orange"
                    elseif stats.kai < 61 then
                      --can't enfeeble
                      return "yellow"
                    elseif stats.kai >= 61 then
                      --can do anything
                      return "dark_green"
                    end
                  end, --function,
  ["shincolour"] = function()
                    if stats.shin < 4 then
                      --can't even infuse
                      return "red"
                    elseif stats.shin < 14 then
                      --can't fist
                      return "firebrick"
                    elseif stats.shin < 29 then
                      --can't blizzard
                      return "dark_orange"
                    elseif stats.shin < 39 then
                      --can't annihilate
                      return "yellow"
                    else
                      --can do anything
                      return "dark_green"
                    end
                  end, --function

}