<variable name="char_exp">char_exp = {
xpl = "16000",
}</variable>

require "serialize"  -- needed to serialize table to string
char_exp = {}  -- ensure table exists, if not loaded from variable

function OnPluginInstall ()
  assert (loadstring (GetVariable ("char_exp") or "")) ()
end -- function OnPluginInstall

function OnPluginSaveState ()
  SetVariable ("char_exp",
               "char_exp = " .. serialize.save_simple (char_exp))
end -- function OnPluginSaveState

if char_exp == nil then               -- pop-up dialog for the first time
  xpl = utils.inputbox (
    "Max XP per level?",                      -- text question
    "XP per Level",                           -- window title
    nil,                                      -- field pre-text
    nil,                                      -- font
    nil,                                      -- font-size
    { -- dialog box dimensions
      box_width = 180,
      box_height = 130,
      prompt_height = 12,
      reply_width = 80,
      reply_height = 20,
      max_length = 12,
    }
  )
  char_exp.xpl = xpl                  -- push dialog value to char_exp.xpl for saving
  char_xpl = xpl                      -- push dialog value to char_xpl for XP bar use
else                                  -- already set
  char_xpl = char_exp.xpl             -- reuse existing value in state file
  Note ("char_xpl: " .. char_exp.xpl) -- test if it's working
end

save_state="y"

GetPluginVariable ("", "char_exp")

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE muclient [
  <!ENTITY trigger_match  "^\[\-?(\d+)\/(\d+) \-?(\d+)\/(\d+) \-?(\d+)\/(\d+) (?P<axp>\d+) (.*?)$" >
]>

<!--History>
  * Based on Nick Gammon "Experience Bar" plugin
    * http://www.gammon.com.au/forum/?id=9224
  * With additional assistance
    * http://www.gammon.com.au/forum/?id=13018
</History-->

<muclient>
  <plugin
    name="Ansalon_MW_Expbar_Prompt"
    author="Ansalon"
    language="Lua"
    purpose="Shows XP to level as bar"
    save_state="y"
    date_written="2015-09-30"
    date_modified="2015-10-27"
    requires="4.99"
    version="1.10"
    id="62a3dfc07c5b023272af5e6e"
    >
    <description trim="y"><![CDATA[
      Install this plugin to show how close you are to levelling.

      Note: This is prompt based.

      I. Match
        1. See "trigger_match" at the top of this file
        2. Change it to match your prompt design
    ]]></description>
  </plugin>

  <triggers>
    <trigger
      enabled="y"
      match="&trigger_match;"
      regexp="y"
      script="do_prompt"
      sequence="100"
    ></trigger>
  </triggers>

  <script><![CDATA[
    win = GetPluginID ()  -- get a unique name

    -- configuration
    GAUGE_HEIGHT = 11
    NUMBER_OF_TICKS = 20

    BACKGROUND_COLOUR = ColourNameToRGB "gray"
    BOX_COLOUR = ColourNameToRGB "dodgerblue"

    require "serialize"  -- needed to serialize table to string
    char_exp = {}  -- ensure table exists, if not loaded from variable

    -- on plugin install, convert variable into Lua table
    function OnPluginInstall ()
      assert (loadstring (GetVariable ("char_exp") or "")) ()
    end -- function OnPluginInstall

    -- on saving state, convert Lua table back into string variable
    -- save_simple is for simple tables that do not have cycles (self-reference)
    -- or refer to other tables
    function OnPluginSaveState ()
      SetVariable ("char_exp",
                   "char_exp = " .. serialize.save_simple (char_exp))
    end -- function OnPluginSaveState

    if char_exp == nil then
      xpl = utils.inputbox (              -- pop-up dialog for the first time
        "Max XP per level?",                      -- text question
        "XP per Level",                           -- window title
        nil,                                      -- field pre-text
        nil,                                      -- font
        nil,                                      -- font-size
        { -- dialog box dimensions
          box_width = 180,
          box_height = 130,
          prompt_height = 12,
          reply_width = 80,
          reply_height = 20,
          max_length = 12,
        }
      )
      char_exp.xpl = xpl                  -- push dialog value to char_exp.xpl for saving
      char_xpl = xpl                      -- push dialog value to char_xpl for XP bar use
    else                                  -- already set
      char_xpl = char_exp.xpl             -- reuse existing value in state file
      Note ("char_xpl: " .. tonumber (char_exp.xpl))    -- test if it's working
    end -- if char_exp

    -- draw the bar here, on getting the prompt, or window resize
    function draw_bar ()

      -- check numbers for validity
      if not current_xp or
         not max_xp or
         current_xp < 0 or
         max_xp <= 0 then
         return
      end -- if

      -- cannot have more than max xp
      if current_xp > max_xp then
         current_xp = max_xp
      end -- if

      -- width is window width minus 2
      local gauge_width = GetInfo (281) - 2

      -- make room for the bar
      local bottom_margin = GetInfo (275)

      -- adjust text rectangle, keeping existing settings where possible
      if bottom_margin == 0 or
        (bottom_margin < 0 and math.abs (bottom_margin) < (GAUGE_HEIGHT + 2)) then
        TextRectangle(GetInfo (272), GetInfo (273),   -- left, top
                      GetInfo (274), -- right
                      - (GAUGE_HEIGHT + 2),  -- bottom (gauge height plus 2 more)
                      GetInfo (276), GetInfo (282) or 0, GetInfo (277),  --  BorderOffset, BorderColour, BorderWidth
                      GetInfo (278), GetInfo (279)) -- OutsideFillColour, OutsideFillStyle
      end -- if

      -- make the miniwindow
      WindowCreate (win,
                    0, 0,   -- left, top (auto-positions)
                    gauge_width,     -- width
                    GAUGE_HEIGHT,  -- height
                    10,       -- auto-position: bottom left
                    0,  -- flags
                    BACKGROUND_COLOUR)

      WindowRectOp (win, 2, 0, 0, 0, 0, BACKGROUND_COLOUR)  -- fill entire box

      -- how far through the level we are
      local done = current_xp / max_xp
      local bar_width = gauge_width * done

      -- box size must be > 0 or WindowGradient fills the whole thing
      if math.floor (bar_width) > 0 then

        -- top half
        WindowGradient (win, 0, 0,
                        bar_width, GAUGE_HEIGHT / 2,
                        0x000000,  -- black
                        BOX_COLOUR,
                        2)   -- vertical gradient

        -- bottom half
        WindowGradient (win, 0, GAUGE_HEIGHT / 2,
                        bar_width, 0,
                        BOX_COLOUR,
                        0x000000,  -- black
                        2)   -- vertical gradient
      end -- any experience to speak of

      -- show ticks
      local ticks_at = gauge_width / NUMBER_OF_TICKS

      -- ticks
      for i = 1, NUMBER_OF_TICKS do
        WindowLine (win, i * ticks_at, 0, i * ticks_at, GAUGE_HEIGHT, ColourNameToRGB ("silver"), 0, 1)
      end -- for

      -- draw a box around it
      check (WindowRectOp (win, 1, 0, 0, 0, 0, ColourNameToRGB ("lightgrey")))  -- frame entire box

      -- ensure window visible
      WindowShow (win, true)
    end -- draw_bar

    function do_prompt (name, line, wildcards, styles)
      -- CHANGE HERE if your prompt is different (eg. different wildcard numbers)
      -- (string.gsub removes commas from the experience figures, if necessary)
      max_xp = tonumber (char_xpl)
      current_xp = max_xp - tonumber (wildcards.axp)

      draw_bar ()
    end -- do_prompt

    function OnPluginWorldOutputResized ()
      draw_bar ()
    end -- function

    -- hide window on removal
    function OnPluginClose ()
      WindowShow (win,  false)  -- hide it
    end -- OnPluginClose

    -- hide window on disable
    function OnPluginDisable ()
      WindowShow (win,  false)  -- hide it
    end -- OnPluginDisable
  ]]></script>
</muclient>

    if char_exp == nil then

    char_exp = {}  -- ensure table exists, if not loaded from variable

    if next (char_exp) == nil then  -- is table empty?

   -- on plugin install, convert variable into Lua table
    function OnPluginInstall ()
      assert (loadstring (GetVariable ("char_exp") or "")) ()

       if next (char_exp) == nil then
          xpl = utils.inputbox (              -- pop-up dialog for the first time
            "Max XP per level?",                      -- text question
            "XP per Level",                           -- window title
            nil,                                      -- field pre-text
            nil,                                      -- font
            nil,                                      -- font-size
            { -- dialog box dimensions
              box_width = 180,
              box_height = 130,
              prompt_height = 12,
              reply_width = 80,
              reply_height = 20,
              max_length = 12,
            }
          )
          char_exp.xpl = xpl                  -- push dialog value to char_exp.xpl for saving
          char_xpl = xpl                      -- push dialog value to char_xpl for XP bar use
        else                                  -- already set
          char_xpl = char_exp.xpl             -- reuse existing value in state file
          Note ("char_xpl: " .. (tonumber (char_exp.xpl) or "NIL!"))    -- test if it's working
        end -- if char_exp

    end -- function OnPluginInstall