From dc78220122c9d005a1f92dd9f8024c4a2cab79e2 Mon Sep 17 00:00:00 2001
From: "Bradley W. Kramer" <bkramer@xeryax.local>
Date: Sat, 11 Apr 2020 09:09:57 -0400
Subject: [PATCH] Initial Commit

---
 adapted_group_monitor_gmcp.xml | 913 +++++++++++++++++++++++++++++++++
 1 file changed, 913 insertions(+)
 create mode 100644 adapted_group_monitor_gmcp.xml

diff --git a/adapted_group_monitor_gmcp.xml b/adapted_group_monitor_gmcp.xml
new file mode 100644
index 0000000..4cb6ed1
--- /dev/null
+++ b/adapted_group_monitor_gmcp.xml
@@ -0,0 +1,913 @@
+<?xml version="1.0" encoding="iso-8859-1"?>
+<!DOCTYPE muclient>
+<muclient>
+<plugin
+   name="Adapted_Aardwolf_Group_Monitor"
+   author="Koopa-Fiendish"
+   id="f178e68512c685b3be1e9e07"
+   language="Lua"
+   purpose="Adapted Aardwolf Group Monitor"
+   date_written="2010-12-13 15:35:02"
+   requires="4.73"
+   version="2.0"
+   save_state="y"
+>
+
+<description trim="y">
+
+Aardwolf Group Monitor
+
+Gives a persistent compressed display of the status of your group members using
+details captured through GMCP.
+
+</description>
+
+</plugin>
+
+<aliases>
+
+<alias
+   match="resetaard"
+   enabled="y"
+   sequence="100"
+   ignore_case="y"
+   script="reset_aard"
+></alias>
+
+-- show the group window
+<alias
+   match="ktgroupon"
+   enabled="y"
+   sequence="100"
+   omit_from_output="y"
+   script="ShowIt"
+></alias>
+
+-- hide the group window
+<alias
+   match="ktgroupoff"
+   enabled="y"
+   sequence="100"
+   omit_from_output="y"
+   script="HideIt"
+></alias>
+</aliases>
+
+<triggers>
+<trigger
+   enabled="y"
+   match="^(\w+) has invited you to join group: (.*)\.$"
+   script="group_invite"
+   regexp="y"
+   sequence="100"
+   custom_colour="17"
+   other_text_colour="#FFFFFF"
+   other_back_colour="#0000FF"
+></trigger>
+
+<trigger
+   enabled="y"
+   match="^(\w+) has cancelled your invitation to join group: (.*)\.$"
+   script="group_cancel"
+   regexp="y"
+   sequence="100"
+   custom_colour="17"
+   other_text_colour="#FFFFFF"
+   other_back_colour="#FF0000"
+></trigger>
+
+<trigger
+   enabled="y"
+   match="^You have declined the group invitation from (\w+)\.$"
+   script="group_cancel"
+   regexp="y"
+   sequence="100"
+   custom_colour="17"
+   other_text_colour="#FFFFFF"
+   other_back_colour="#FF0000"
+></trigger>
+
+<trigger
+   enabled="y"
+   match="^You have no invitation outstanding from (\w+)\.$"
+   script="group_cancel"
+   regexp="y"
+   sequence="100"
+   custom_colour="17"
+   other_text_colour="#FFFFFF"
+   other_back_colour="#FF0000"
+></trigger>
+
+<trigger
+   enabled="y"
+   match="^Your group invite from (\w+) is cancelled because the group has been disbanded\.$"
+   script="group_cancel"
+   regexp="y"
+   sequence="100"
+   custom_colour="17"
+   other_text_colour="#FFFFFF"
+   other_back_colour="#FF0000"
+></trigger>
+
+<trigger
+   enabled="y"
+   match="^Your group invitation from (\w+) is cancelled because (\w+) has left that group\.$"
+   script="group_cancel"
+   regexp="y"
+   sequence="100"
+   custom_colour="17"
+   other_text_colour="#FFFFFF"
+   other_back_colour="#FF0000"
+></trigger>
+
+<trigger
+   enabled="y"
+   match="^Your group invitation from (\w+) is cancelled because (\w+) has left the game\.$"
+   script="group_cancel"
+   regexp="y"
+   sequence="100"
+   custom_colour="17"
+   other_text_colour="#FFFFFF"
+   other_back_colour="#FF0000"
+></trigger>
+</triggers>
+
+<script>
+<![CDATA[
+require "aard_register_z_on_create"
+
+require "mw_theme_base"
+
+require "gauge"
+require "movewindow"
+require "gmcphelper"
+require "copytable"
+require "serialize"
+
+default_x = 868
+default_y = 336
+default_height = 215
+default_width = 269
+height = tonumber (GetVariable ("height")) or default_height
+width = tonumber (GetVariable ("width")) or default_width
+show_self = tonumber (GetVariable ("show_self")) or 1
+show_hp = tonumber (GetVariable ("show_hp")) or 1
+show_mn = tonumber (GetVariable ("show_mn")) or 1
+show_mv = tonumber (GetVariable ("show_mv")) or 1
+hidden = tonumber (GetVariable ("hidden")) or 0
+flat_gauges = tonumber (GetVariable("flat_gauges")) or 0
+overlay_numbers = tonumber (GetVariable("overlay_numbers")) or 0
+GAP = 2
+font_size = 8
+font_name = ""
+group_members = {}
+group_info = {}
+
+local defaultColorVals = {Health={0x00ff00,0x004400}, Mana={0xff5500,0x442200}, Moves={0x00ffff,0x004444}, Align={0x0000ff,0x00ffff}}
+colorVals = defaultColorVals
+assert (loadstring (GetVariable ("colorVals") or "")) ()
+
+thresh1active = tonumber (GetVariable("thresh1active")) or 0
+thresh2active = tonumber (GetVariable("thresh2active")) or 0
+thresh1percent = tonumber (GetVariable("thresh1percent")) or 40
+thresh2percent = tonumber (GetVariable("thresh2percent")) or 20
+thresh1color = tonumber (GetVariable("thresh1color")) or 0x00ffff
+thresh2color = tonumber (GetVariable("thresh2color")) or 0x0000ff
+
+local barIndex = {"Health", "Mana", "Moves", "Align"}
+
+RESIZE_TAG_SIZE = 10
+MIN_SIZE        = 100
+
+-- Variables not saved.
+startx      = ""
+starty      = ""
+posx        = ""
+posy        = ""
+hidden_members = {}
+
+-- pull in telnet option handling
+--dofile (GetPluginInfo (GetPluginID(), 20) .. "telnet_options.lua")
+
+-- functions for handling Aardwolf color codes
+--dofile (GetPluginInfo (GetPluginID(), 20) .. "aardwolf_colors.lua")
+
+function reset_aard()
+   font_name = default_font_name
+   font_size = default_font_size
+   WindowPosition(win, default_x, default_y, 0, 18)
+   WindowResize(win, default_width, default_height, Theme.PRIMARY_BODY)
+   Repaint() -- hack because WindowPosition doesn't immediately update coordinates
+   SaveState()
+   OnPluginInstall()
+end
+
+function SetUpHotspotsAndDraw(firstTime)
+   -- don't use windowcreate after the first time, because it messes with hotspot handlers
+   if (firstTime == true) then
+      check (WindowCreate (win,
+         windowinfo.window_left, windowinfo.window_top,   -- left, top (auto-positions)
+         width,     -- width
+         height,  -- height
+         windowinfo.window_mode,       -- auto-position: middle right
+         windowinfo.window_flags,  -- flags
+         Theme.PRIMARY_BODY) )
+      -- Add the drag handler so they can move the window around
+      movewindow.add_drag_handler (win, 0, 0, 0, 0)
+
+      if hidden == 0 then
+         WindowShow (win, true)
+      end
+   else
+      -- everything has already been made
+      -- just move them back into place
+      WindowResize(win, width, height, Theme.PRIMARY_BODY)
+   end
+   DisplayGroupPage()
+end
+
+string.lpad = function(str, len, char)
+   if char == nil then char = ' ' end
+   return string.rep(char, len - #str) .. str
+end
+
+string.rpad = function(str, len, char)
+   if char == nil then char = ' ' end
+   return str .. string.rep(char, len - #str)
+end
+
+function RemoveMembersFromGroupDisplay()
+   group_members = {}
+   if (full_group_data ~= nil) then
+      for i,v in ipairs(full_group_data.members) do
+         if not (hidden_members[v.name] or ((show_self == 0) and (char_data ~= nil) and (v.name == char_data.name))) then
+            table.insert(group_members, v)
+         end
+      end
+   end
+end
+function round(n)
+   return n % 1 >= 0.5 and math.ceil(n) or math.floor(n)
+end
+
+-- put all current group members into the hidden_members list
+function hideAllMembers()
+   hidden_members = {}
+   if full_group_data and full_group_data.members and char_data and char_data.name then
+      for i,v in ipairs(full_group_data.members) do
+         if v.name ~= char_data.name then
+            hidden_members[v.name] = true
+         end
+      end
+   end
+   RemoveMembersFromGroupDisplay()
+end
+
+-- build and draw the group display
+function DisplayGroupPage()
+   WindowRectOp(win, 2, 2, 2,-2,-2, Theme.PRIMARY_BODY) -- blank
+
+   if not group_built then
+      if next(invitations) == nil then
+         txt = "No Group To Display"
+         txtlen = WindowTextWidth(win,font_id, txt)
+         WindowText(win, font_id, txt, (width-txtlen)/2, title_height/4, 0, 0, Theme.BODY_TEXT, utf8)
+         txt = "Group info will appear"
+         txtlen = WindowTextWidth(win,font_id,txt)
+         WindowText (win, font_id, txt, (width-txtlen)/2, height/2, 0, 0, Theme.BODY_TEXT, utf8)
+         txt = "once you create or join one."
+         txtlen = WindowTextWidth(win,font_id,txt)
+         WindowText (win, font_id, txt, (width-txtlen)/2, height/2+line_height, 0, 0, Theme.BODY_TEXT, utf8)
+      else
+         local lines = {}
+         txt = "Pending Group Invitations"
+         txtlen = WindowTextWidth(win, font_id, txt)
+         WindowText(win, font_id, txt, (width-txtlen)/2, title_height/4, 0, 0, Theme.BODY_TEXT, utf8)
+         table.insert(lines, "[ Leader     : Group Name ]")
+         table.insert(lines, "---------------------------")
+         for k,v in pairs(invitations) do
+            table.insert(lines, string.rpad(k,12).." : "..v)
+         end
+         for i,v in ipairs(lines) do
+            WindowText(win, font_id, v, GAP*4, (title_height) + (i*line_height), 0, 0, Theme.BODY_TEXT, utf8)
+         end
+      end
+   else
+      y = title_height
+
+      if #group_members > 0 then
+         -- MAIN DISPLAY BODY
+         local baseX = GAP
+         local baseY = y+GAP
+         column_width = WindowTextWidth(win, font_id, "WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW")+GAP*4
+         if overlay_numbers == 0 then
+            column_width = column_width+WindowTextWidth(win, font_id, "WWWW")
+         end
+         num_columns = math.max(math.floor(width / column_width), 1)
+         members_per_col = math.ceil((#group_members)/num_columns)
+         labels_width = math.max(WindowTextWidth(win, font_id, "HP"), WindowTextWidth(win, font_id, "MN"), WindowTextWidth(win, font_id, "MV"))
+         bar_width = column_width - GAP*4 - labels_width
+         if overlay_numbers == 0 then
+            bar_width = bar_width - WindowTextWidth(win, font_id, "88888/88888")
+         end
+		 
+			-- x=248
+			-- Theme.WindowTextFromStyles(win, font_id, {{text="Align",textcolour=0xFFFFFF}}, 248	, y, 0, 0)
+			-- x=x-24
+			-- Theme.WindowTextFromStyles(win, font_id, {{text="QT",textcolour=0xFFFFFF}}, x, y, 0, 0)
+			-- x=x-40
+			-- Theme.WindowTextFromStyles(win, font_id, {{text="mv",textcolour=0xFFFFFF}}, x, y, 0, 0)
+			-- x=x-40
+			-- Theme.WindowTextFromStyles(win, font_id, {{text="mn",textcolour=0xFFFFFF}}, x, y, 0, 0)
+			-- x=x-40
+			-- Theme.WindowTextFromStyles(win, font_id, {{text="hp",textcolour=0xFFFFFF}}, x, y, 0, 0)
+			-- x=x-14
+            -- Theme.WindowTextFromStyles(win, font_id, {{text="here",textcolour=0xFFFFFF}}, x, y, 0, 0)
+			-- x=x-80
+			-- Theme.WindowTextFromStyles(win, font_id, {{text="Name",textcolour=0xFFFFFF}}, x, y, 0, 0)
+
+					 
+		 table.sort(group_members, function(a,b) return a.name < b.name end)
+		 herecount = 0
+		 
+		 for i,v in ipairs(group_members) do
+            if (i ~= 1) and ((i-1) % members_per_col == 0) then
+               baseY = title_height+GAP-1
+               y = baseY
+               baseX = baseX + column_width
+               x = baseX
+            else
+               baseY = y + GAP-1
+               y = baseY
+               x = baseX
+            end
+           -- txt = "["..(("P" and v.info.status.poisoned == true) or "_")..
+           --     (("B" and v.info.status.blind == true) or "_")..
+           --     (("W" and v.info.status.webbed == true) or "_")..
+           --     (("C" and v.info.status.cursed == true) or "_")..
+           --     (("*" and v.info.status.attacked == true) or "_").."]"
+           -- WindowText(win, font_id, txt, x, y, 0, 0, Theme.BODY_TEXT, utf8)
+           -- x = x + math.max(WindowTextWidth(win, font_id, "[PBWC*]"), WindowTextWidth(win, font_id, "[_____]")) + GAP
+            --txt = "["..string.lpad(v.info.lvl, 3, ' ').."]"
+            --x = x + WindowText(win, font_id, txt, x, y, 0, 0, Theme.BODY_TEXT, utf8) + GAP
+			txt = string.rpad(v.name, 12, ' ')
+            zeroed_alignment = v.info.align+2500
+            align_colour = ((zeroed_alignment<=1625 and colorVals.Align[1]) or ((zeroed_alignment>=3375 and colorVals.Align[2]) or Theme.BODY_TEXT))
+            --x = x + WindowText(win, font_id, txt, x, y, 0, 0, name_colour, utf8) + GAP
+            if tonumber(v.info.here) == 1 then 
+				here = "##" 
+				herecount = herecount + 1
+			else 
+				here = "  "
+			end
+			
+			greythresh = 0
+			whitethresh = 1
+			redthresh = 30
+			yellowthresh = 59
+			dcyanthresh = 74
+			
+			
+			hpPercent = round(100* (tonumber(v.info.hp) / tonumber(v.info.mhp)),0)
+			if hpPercent <= greythresh then
+			hpcolor = 0xaaaaaa
+			elseif hpPercent <=whitethresh then
+			hpcolor = 0xffffff	
+			elseif hpPercent <=redthresh then
+			hpcolor = 0x0000FF
+			elseif hpPercent <=yellowthresh then
+			hpcolor = 0x00FFFF
+			elseif hpPercent <=dcyanthresh then
+			hpcolor = 0x808000
+			else
+			hpcolor = 0x00FF00
+			end
+            mnPercent = round(100* (tonumber(v.info.mn) / tonumber(v.info.mmn)),0)
+			if mnPercent <= greythresh then
+			mncolor = 0xaaaaaa
+			elseif mnPercent <=whitethresh then
+			mncolor = 0xffffff
+			elseif mnPercent <=redthresh then
+			mncolor = 0x0000FF			
+			elseif mnPercent <=yellowthresh then
+			mncolor = 0x00FFFF
+			elseif mnPercent <=dcyanthresh then
+			mncolor = 0x808000
+			else
+			mncolor = 0x00FF00
+			end
+            mvPercent = round(100* (tonumber(v.info.mv) / tonumber(v.info.mmv)),0)
+			if mvPercent <= greythresh then
+			mvcolor = 0xaaaaaa
+			elseif mvPercent <=whitethresh then
+			mvcolor = 0xffffff
+			elseif mvPercent <=redthresh then
+			mvcolor = 0x0000FF			
+			elseif mvPercent <=yellowthresh then
+			mvcolor = 0x00FFFF
+			elseif mvPercent <=dcyanthresh then
+			mvcolor = 0x808000
+			else
+			mvcolor = 0x00FF00
+			end
+			--txt = v.name ..here.."["..hpPercent.."] ["..mnPercent.."] ["..mvPercent.."] "..v.info.qt
+			if tonumber(v.info.qt) == 0 then
+			qcolor = 0x0000FF
+			elseif tonumber(v.info.qt) <= 5 then
+			qcolor = 0x00FFFF
+			else
+			qcolor = 0xC0C0C0
+			end
+
+--Left Justified
+            -- x=Theme.WindowTextFromStyles(win, font_id, {{text=v.name,textcolour=hpcolor}}, x, y, 0, 0)
+            -- Theme.WindowTextFromStyles(win, font_id, {{text=here,textcolour=0xffffff}}, x, y, 0, 0)
+			-- x=x+14
+			-- Theme.WindowTextFromStyles(win, font_id, {{text="["..string.lpad(tostring(hpPercent),3,' ').."]",textcolour=hpcolor}}, x, y, 0, 0)
+			-- x=x+40
+			-- Theme.WindowTextFromStyles(win, font_id, {{text="["..string.lpad(tostring(mnPercent),3,' ').."]",textcolour=mncolor}}, x, y, 0, 0)
+			-- x=x+40
+			-- Theme.WindowTextFromStyles(win, font_id, {{text="["..string.lpad(tostring(mvPercent),3,' ').."]",textcolour=mvcolor}}, x, y, 0, 0)
+			-- x=x+40
+			-- Theme.WindowTextFromStyles(win, font_id, {{text=string.lpad(tostring(v.info.qt),2,' '),textcolour=qcolor}}, x, y, 0, 0)
+			-- x=x+24
+			-- Theme.WindowTextFromStyles(win, font_id, {{text="#",textcolour=align_colour}}, x, y, 0, 0)
+--Right
+			x=248
+			Theme.WindowTextFromStyles(win, font_id, {{text="#",textcolour=align_colour}}, 248	, y, 0, 0)
+			x=x-24
+			Theme.WindowTextFromStyles(win, font_id, {{text=string.lpad(tostring(v.info.qt),2,' '),textcolour=qcolor}}, x, y, 0, 0)
+			x=x-40
+			Theme.WindowTextFromStyles(win, font_id, {{text="["..string.lpad(tostring(mvPercent),3,' ').."]",textcolour=mvcolor}}, x, y, 0, 0)
+			x=x-40
+			Theme.WindowTextFromStyles(win, font_id, {{text="["..string.lpad(tostring(mnPercent),3,' ').."]",textcolour=mncolor}}, x, y, 0, 0)
+			x=x-40
+			Theme.WindowTextFromStyles(win, font_id, {{text="["..string.lpad(tostring(hpPercent),3,' ').."]",textcolour=hpcolor}}, x, y, 0, 0)
+			x=x-14
+            Theme.WindowTextFromStyles(win, font_id, {{text=here,textcolour=0xffffff}}, x, y, 0, 0)
+			x=x-80
+			
+			
+            Theme.WindowTextFromStyles(win, font_id, {{text=v.name,textcolour=hpcolor}}, x, y, 0, 0)
+
+
+
+
+            y = y + line_height + 1
+			y = y + GAP - 2
+         end
+      else
+         txt = "Your group is empty."
+         txtlen = WindowTextWidth(win,font_id, txt)
+         WindowText(win, font_id, txt, (width-txtlen)/2, (height+line_height)/2, 0, 0, Theme.BODY_TEXT, utf8)
+      end
+	     x= Theme.WindowTextFromStyles(win, font_id, {{text="Player Count [",textcolour=0xFFFFFF}}, 8,y,0,0)
+		 Theme.WindowTextFromStyles(win, font_id, {{text=#group_members,textcolour=0x00FFFF}}, x,y,0,0)
+		 x=x+16
+		 Theme.WindowTextFromStyles(win, font_id, {{text="]  Here [",textcolour=0xFFFFFF}}, x,y,0,0)
+		 x=x+72
+		 Theme.WindowTextFromStyles(win, font_id, {{text=herecount,textcolour=0x00FFFF}}, x,y,0,0)
+		 x=x+16
+		 Theme.WindowTextFromStyles(win, font_id, {{text="]",textcolour=0xFFFFFF}}, x,y,0,0)
+
+   end
+
+   Theme.DrawBorder(win)
+   Theme.Draw3DRect(win, -1, -1, WindowInfo(win, 3)-1, title_height, false)
+
+   if group_built then
+      styles = ColoursToStyles(full_group_data.groupname)
+      local x = GAP
+      local y = 2
+      local statusBoundary = math.max(GAP, width-WindowTextWidth(win, font_id, full_group_data.status)-3*GAP)
+      WindowRectOp(win, 2, statusBoundary+2*GAP - 2, y , -3, y+line_height, ((full_group_data.status=="Private" and 0x000088) or 0x008800))
+      WindowText(win, font_id, full_group_data.status, statusBoundary+2*GAP, y, 0, 0, 0xffffff)
+      x = x + WindowText(win, font_id, "Group: ", x, y, statusBoundary, 0, Theme.THREE_D_SURFACE_DETAIL, utf8)
+      local group_width = WindowTextWidth(win, font_id, strip_colours_from_styles(styles))
+      WindowRectOp(win, 2, x-3, y, x+group_width + GAP, y+line_height, Theme.PRIMARY_BODY)
+      Theme.WindowTextFromStyles(win, font_id, styles, x, y, statusBoundary, 0)
+      y = y + line_height
+      local xpKillsBoundary = math.max(GAP,width-WindowTextWidth(win, font_id, "XP:"..full_group_data.exp.." K:"..full_group_data.kills)-3*GAP)
+      WindowText(win, font_id, "XP:"..full_group_data.exp.." K:"..full_group_data.kills, xpKillsBoundary+2*GAP, y, 0,0, Theme.THREE_D_SURFACE_DETAIL, utf8)
+      WindowText(win, font_id, "Leader: "..full_group_data.leader, GAP, y, xpKillsBoundary, 0, Theme.THREE_D_SURFACE_DETAIL, utf8)
+   end
+
+   Theme.AddResizeTag(win, 1, nil, nil, "MouseDown", "ResizeMoveCallback", "ResizeReleaseCallback")
+
+   CallPlugin("abc1a0944ae4af7586ce88dc", "BufferedRepaint")
+end -- Display_Group_Page
+
+function validate_percent(input)
+   if string.sub(input, -1) == "%" then
+      input = string.sub(input, 1,-2)
+   end
+   local inputNum = tonumber(input)
+   if not inputNum or inputNum < 1 or inputNum > 100 or inputNum % 1 ~= 0 then
+      ColourNote("white","red","'"..input.."' is not a whole number between 1 and 100. Try again.")
+      return false
+   end
+   return true
+end
+
+function right_click_menu ()
+   return false
+   -- menustring ="!Change Font|>Show Players|"..((show_self==1 and "+") or "").."Include Self|All Others|No Others|-|"
+   -- local member_count = 0
+   -- local member_names = {}
+   -- if full_group_data and full_group_data.members and char_data and char_data.name then
+      -- for i,v in ipairs(full_group_data.members) do
+         -- if v.name ~= char_data.name then
+            -- menustring = menustring..(((hidden_members[v.name] == nil) and "+") or "")..v.name.."|"
+            -- member_count = member_count + 1
+            -- table.insert(member_names, v.name)
+         -- end
+      -- end
+   -- end
+   -- menustring = menustring.."<|-|>Configure Colors|>Health|Main|Border|<|>Mana|Main|Border|<|>Moves|Main|Border|<|>Align|Evil|Good|<|<|>Show Info|"..((show_hp==1 and "+") or "").."Health|"..((show_mn==1 and "+") or "").."Mana|"..((show_mv==1 and "+") or "").."Moves|<|"..((flat_gauges==1 and "+") or "").."Use Flat Gauges|"..((overlay_numbers==1 and "+") or "").."Overlay Numbers|>HP Thresholds|>First|"..(((thresh1active == 1) and "+") or "").."Activate|Set Percent ("..thresh1percent.."%)|Set Color ("..RGBColourToName(thresh1color)..")|<|>Second|"..(((thresh2active == 1) and "+") or "").."Activate|Set Percent ("..thresh2percent.."%)|Set Color ("..RGBColourToName(thresh2color)..")|<|<|-|Bring To Front|Send To Back|-|Reset Defaults"
+   -- result = WindowMenu (win,
+      -- WindowInfo (win, 14),  -- x position
+      -- WindowInfo (win, 15),   -- y position
+      -- menustring) -- content
+
+   -- if result ~= "" then
+      -- numResult = tonumber(result)
+      -- if numResult == 1 then
+         -- -- change font
+         -- wanted_font = utils.fontpicker (font_name, font_size) --font dialog
+         -- if wanted_font then
+            -- font_name = wanted_font.name
+            -- font_size = wanted_font.size
+         -- end
+      -- elseif numResult == 2 then
+         -- -- show/hide self
+         -- show_self = (((show_self == 0) and 1) or 0)
+         -- if (show_self == 0) then
+            -- ColourNote("yellow", "", "You will no longer see your own status in the group monitor.")
+         -- else
+            -- ColourNote("yellow", "", "You will now see your own status in the group monitor.")
+         -- end
+      -- elseif numResult == 3 then
+         -- -- remove all from the hidden list
+         -- hidden_members = {}
+      -- elseif numResult == 4 then
+         -- -- add all to the hidden list
+         -- hideAllMembers()
+      -- elseif numResult >= 5 and numResult <= member_count+4 then
+         -- -- add/remove members in the hidden list
+         -- local adjustedNumResult = numResult - 4
+         -- hidden_members[member_names[adjustedNumResult]] = (((hidden_members[member_names[adjustedNumResult]]== nil) and true) or nil)
+      -- elseif numResult >= member_count+5 and numResult <= member_count+12 then
+         -- -- change color settings
+         -- local adjustedNumResult = numResult-member_count-4
+         -- local colourIndex = 2
+         -- if (adjustedNumResult % 2 == 1) then
+            -- colourIndex = 1
+         -- end
+         -- local newcolour = PickColour (colorVals[barIndex[math.ceil(adjustedNumResult/2)]][colourIndex])
+         -- if newcolour ~= -1 then
+            -- colorVals[barIndex[math.ceil(adjustedNumResult/2)]][colourIndex] = newcolour
+         -- end
+      -- elseif numResult == member_count+13 then
+         -- -- show/hide HP info
+         -- show_hp = (((show_hp == 0) and 1) or 0)
+         -- if (show_hp == 0) then
+            -- ColourNote("yellow", "", "You will no longer see HP info in the group monitor.")
+         -- else
+            -- ColourNote("yellow", "", "You will now see HP info in the group monitor.")
+         -- end
+      -- elseif numResult == member_count+14   then
+         -- -- show/hide MANA info
+         -- show_mn = (((show_mn == 0) and 1) or 0)
+         -- if (show_mn == 0) then
+            -- ColourNote("yellow", "", "You will no longer see MN info in the group monitor.")
+         -- else
+            -- ColourNote("yellow", "", "You will now see MN info in the group monitor.")
+         -- end
+      -- elseif numResult == member_count+15 then
+         -- -- show/hide MOVES info
+         -- show_mv = (((show_mv == 0) and 1) or 0)
+         -- if (show_mv == 0) then
+            -- ColourNote("yellow", "", "You will no longer see MV info in the group monitor.")
+         -- else
+            -- ColourNote("yellow", "", "You will now see MV info in the group monitor.")
+         -- end
+      -- elseif numResult == member_count+16 then
+         -- -- use flat/shaded gauges
+         -- flat_gauges = (((flat_gauges == 0) and 1) or 0)
+      -- elseif numResult == member_count+17 then
+         -- -- toggle overlay numbers on top of gauges
+         -- overlay_numbers = (((overlay_numbers == 0) and 1) or 0)
+      -- elseif numResult == member_count+18 then
+         -- thresh1active = (((thresh1active == 0) and 1) or 0)
+      -- elseif numResult == member_count+19 then
+         -- local perc = utils.inputbox( "I want the HP bars to change color when they drop below this percent...\n(enter a whole number between 1 and 100)", "Group Monitor HP Threshold #1", thresh1percent, nil, nil, {validate=validate_percent})
+         -- if perc then
+            -- if string.sub(perc, -1) == "%" then
+               -- perc = string.sub(perc, 1,-2)
+            -- end
+            -- thresh1percent = tonumber(perc)
+         -- end
+      -- elseif numResult == member_count+20 then
+         -- local newColor = PickColour (thresh1color)
+         -- if newcolor ~= -1 then
+            -- thresh1color = newColor
+         -- end
+      -- elseif numResult == member_count+21 then
+         -- thresh2active = (((thresh2active == 0) and 1) or 0)
+      -- elseif numResult == member_count+22 then
+         -- local perc = utils.inputbox( "I want the HP bars to change color when they drop below this percent...\n(enter a whole number between 1 and 100)", "Group Monitor HP Threshold #2", thresh2percent, nil, nil, {validate=validate_percent})
+         -- if perc then
+            -- if string.sub(perc, -1) == "%" then
+               -- perc = string.sub(perc, 1,-2)
+            -- end
+            -- thresh2percent = tonumber(perc)
+         -- end
+      -- elseif numResult == member_count+23 then
+         -- local newColor = PickColour (thresh2color)
+         -- if newcolor ~= -1 then
+            -- thresh2color = newColor
+         -- end
+      -- elseif numResult == member_count+24 then
+         -- -- bring to front
+         -- CallPlugin("462b665ecb569efbf261422f","boostMe", win)
+      -- elseif numResult == member_count+25 then
+         -- -- send to back
+         -- CallPlugin("462b665ecb569efbf261422f","dropMe", win)
+      -- elseif numResult == member_count+26 then
+         -- -- reset
+         -- font_name        = default_font_name
+         -- font_size        = default_font_size
+         -- height           = default_height
+         -- width            = default_width
+         -- show_coords      = 0
+      -- end -- if
+
+      -- RemoveMembersFromGroupDisplay()
+      -- -- save and reload
+      -- SaveState()
+      -- OnPluginInstall()
+   -- end
+end -- right_click_menu
+
+invitations = {}
+
+function group_invite(name, line, wildcards, styles)
+   invitations[wildcards[1]]=wildcards[2]
+   DisplayGroupPage()
+end
+
+function group_cancel(name, line, wildcards, styles)
+   invitations[wildcards[1]] = nil
+   DisplayGroupPage()
+end
+
+--=================================================================================
+-- Called when plugin receives telnet data - main entry point for actually running
+-- the plugin.
+--=================================================================================
+function OnPluginBroadcast (msg, id, name, text)
+   -- Look for GMCP handler.
+   if (id == '3e7dedbe37e44942dd46d264') then
+      if (text == 'reload') then
+         -- invalidate current data
+         group_built = false
+         self_built = false
+         return
+      end
+
+      if (text=="char.base") then
+         char_data = gmcp("char.base")
+         self_built = true
+         if group_built then
+            RemoveMembersFromGroupDisplay()
+            DisplayGroupPage()
+         end
+      end
+
+      if (text == "group") then
+         full_group_data = gmcp("group")
+         if (full_group_data.groupname == "") then
+            leaveGroup()
+         else
+            group_built = true
+            if self_built then
+               RemoveMembersFromGroupDisplay()
+               DisplayGroupPage()
+            else
+               Send_GMCP_Packet("request char")
+            end
+         end
+      end
+   elseif (id == "462b665ecb569efbf261422f" and msg==996 and text == "re-register z") then
+      CallPlugin("462b665ecb569efbf261422f", "registerMiniwindow", win)
+   end
+end
+
+function ResizeMoveCallback()
+   if GetPluginVariable("c293f9e7f04dde889f65cb90", "lock_down_miniwindows") == "1" then
+      return
+   end
+   posx, posy = WindowInfo (win, 17), WindowInfo (win, 18)
+   width = width + posx - startx
+   startx = posx
+   if (width < MIN_SIZE) then
+      width = MIN_SIZE
+      startx = windowinfo.window_left+width
+   elseif (windowinfo.window_left+width > GetInfo(281)) then
+      width = GetInfo(281)-windowinfo.window_left
+      startx = GetInfo(281)
+   end
+
+   height = height + posy - starty
+   starty = posy
+   local min_lines = 1
+   if show_hp == 1 then
+      min_lines = min_lines + 1
+   end
+   if show_mn == 1 then
+      min_lines = min_lines + 1
+   end
+   if show_mv == 1 then
+      min_lines = min_lines + 1
+   end
+   if (height < title_height+(min_lines*line_height)+(2*GAP)+min_lines-1) then
+      height = title_height+(min_lines*line_height)+(2*GAP)+min_lines-1
+      starty = windowinfo.window_top+height
+   elseif (windowinfo.window_top+height > GetInfo(280)) then
+      height = GetInfo(280)-windowinfo.window_top
+      starty = GetInfo(280)
+   end
+   if (utils.timer() - lastRefresh > 0.0333) then
+      SetUpHotspotsAndDraw(false)
+      lastRefresh = utils.timer()
+   end
+end
+
+lastRefresh = 0
+
+function ResizeReleaseCallback()
+    SetUpHotspotsAndDraw(true)
+end
+
+function MouseDown(flags, hotspot_id)
+   if (hotspot_id == "resize") then
+      startx, starty = WindowInfo (win, 17), WindowInfo (win, 18)
+   end
+end
+
+function CancelMouseOver (flags, hotspotid)
+end -- cancelmouseover
+
+function CancelMouseDown(flags, hotspot_id)
+end
+
+function MouseUp(flags, hotspot_id, win)
+   if bit.band (flags, miniwin.hotspot_got_rh_mouse) ~= 0 then
+      right_click_menu()
+   end
+   return true
+end
+
+function LeftClickOnly(flags, hotspot_id, win)
+   if bit.band (flags, miniwin.hotspot_got_rh_mouse) ~= 0 then
+      return true
+   end
+   return false
+end
+
+function leaveGroup ()
+   invitations = {}
+   group_built = false
+   full_group_data = nil
+   SetUpHotspotsAndDraw(true)
+end
+
+function OnPluginConnect()
+   Send_GMCP_Packet("rawcolor on")
+   Send_GMCP_Packet("group on")
+end
+
+function OnPluginSaveState()
+   -- save window current location for next time
+   movewindow.save_state(win)
+
+   SetVariable("enabled", tostring(GetPluginInfo(GetPluginID (), 17)))
+   if WindowInfo(win, 3) and WindowInfo(win, 4) then
+      width = WindowInfo(win, 3)
+      height = WindowInfo(win, 4)
+   end
+   SetVariable("width", width)
+   SetVariable("height", height)
+   SetVariable("font_name", font_name)
+   SetVariable("font_size", font_size)
+   SetVariable("show_self", show_self)
+   SetVariable("show_hp", show_hp)
+   SetVariable("show_mn", show_mn)
+   SetVariable("show_mv", show_mv)
+   SetVariable("hidden", hidden)
+   SetVariable("colorVals", serialize.save ("colorVals"))
+   SetVariable("flat_gauges", flat_gauges)
+   SetVariable("overlay_numbers", overlay_numbers)
+   SetVariable("thresh1active", thresh1active)
+   SetVariable("thresh2active", thresh2active)
+   SetVariable("thresh1percent", thresh1percent)
+   SetVariable("thresh2percent", thresh2percent)
+   SetVariable("thresh1color", thresh1color)
+   SetVariable("thresh2color", thresh2color)
+end -- OnPluginSaveState
+
+function OnPluginClose()
+   OnPluginDisable()
+   WindowDelete(win)
+end
+
+function HideIt()
+   WindowShow( win, false )
+   hidden = 1
+   SaveState()
+end
+
+function ShowIt()
+   WindowShow (win, true)
+   hidden = 0
+   SaveState()
+end
+
+function OnPluginDisable ()
+   SaveState()
+   WindowShow(win, false)
+end --  OnPluginDisable
+
+function OnPluginEnable ()
+   if hidden == 0 then
+      WindowShow (win, true)
+   end
+   if IsConnected() then
+      OnPluginConnect()
+   end
+   SaveState()
+end -- OnPluginEnable
+
+win = GetPluginID()
+function OnPluginListChanged ()
+   dofile "lua/aard_requirements.lua"
+end
+
+function OnPluginInstall()
+
+   local fonts = utils.getfontfamilies ()
+
+   -- if Dina not there already, add it
+   if not fonts.Dina then
+      AddFont (GetInfo (66) .. "\\Dina.fon")
+      fonts = utils.getfontfamilies ()
+   end
+
+   if fonts ["Dina"] then
+      default_font_size = 8
+      default_font_name = "Dina"
+   elseif fonts["Courier New"] then
+      default_font_size = 9
+      default_font_name = "Courier New"
+   else
+      default_font_size = 9
+      default_font_name = "Lucida Console"
+   end
+
+   font_id = "font"
+   font_name = GetVariable("font_name") or default_font_name
+   font_size = tonumber(GetVariable("font_size")) or default_font_size
+
+   windowinfo = movewindow.install(win, miniwin.pos_center, miniwin.create_absolute_location, false, nil, {mouseup=MouseUp, mousedown=LeftClickOnly, dragmove=LeftClickOnly, dragrelease=LeftClickOnly},{x=default_x, y=default_y})
+   WindowCreate(win, windowinfo.window_left, windowinfo.window_top, width, height, windowinfo.window_mode, windowinfo.window_flags, Theme.SECONDARY_BODY)
+   WindowFont(win, font_id, font_name, font_size, false, false, false, false, 0) -- normal font
+
+   --- Grab font size settings.
+   line_height = WindowFontInfo (win, font_id, 1) -  WindowFontInfo (win, font_id, 4) + 2
+   title_height = line_height*2+4
+
+   if IsConnected() then
+      OnPluginConnect()
+      Send_GMCP_Packet("request group")
+   end
+
+   -- if disabled last time, stay disabled
+   if GetVariable ("enabled") == "false" then
+      ColourNote ("yellow", "", "Warning: Plugin " .. GetPluginName ().. " is currently disabled.")
+      check (EnablePlugin(GetPluginID (), false))
+      return
+   end -- they didn't enable us last time
+
+   -- Draw the initial group window
+   SetUpHotspotsAndDraw(true)
+end
+
+function getmemoryusage()
+  collectgarbage('collect')
+  return collectgarbage('count')
+end
+
+]]>
+
+</script>
+</muclient>