Area Repop

<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE muclient>
<!-- Saved on Monday, October 25, 2010, 3:21 AM -->
<!-- MuClient version 4.61 -->


<muclient>
<plugin
   name="repop"
   author="Xaxz"
   id="74e855c52c18ccd8d0a56453"
   language="Lua"
   purpose="Displays GMCP repop messages"
   save_state="y"
   date_written="2011-05-23 06:52:00"
   requires="4.61"
   version="1.0"
   >
<description trim="y">
<![CDATA[

xrepop
]]>
</description>

</plugin>


<!--  Get our standard constants -->

<include name="constants.lua"/>

<!--  Triggers  -->
<triggers>

</triggers>

<!--  Aliases  -->
<aliases>
	<alias
		match="xrepop on"
		enabled="y"
		script="repop_on"
		regexp="n"
		>
	</alias>

	<alias
		match="xrepop off"
		enabled="y"
		script="repop_off"
		regexp="n"
		>
	</alias>

	<alias
		match="xrepop chan *"
		enabled="y"
		script="repop_chan"
		regexp="n"
		>
	</alias>
</aliases>

<!--  Variables  -->


<!--  Plugin help  -->


<script>
<![CDATA[
repop_channel = "spouse"
repopOn = true

function repop_on(name, line, wildcards)
	repopOn = true
	Note("XRepop: repop reporting on.")
end

function repop_off(name, line, wildcards)
	repopOn = false
	Note("XRepop: repop reporting off.")
end

function repop_chan(name, line, wildcards)
	repop_channel = wildcards[1]
	Note("XRepop: repop channel set to \""..repop_channel.."\"")
end

function OnPluginBroadcast (msg, id, name, text)

   -- Look for GMCP handler.
	if (id == '3e7dedbe37e44942dd46d264') then
		if (text == "comm.repop") then
			res, gmcpvar = CallPlugin("3e7dedbe37e44942dd46d264","gmcpval","comm.repop.zone")
			if repopOn then
				SendNoEcho(string.format("%s @RA@rrea @W%s @Rh@ras @Wr@wepopped @Ra@rt @W%s.@w", repop_channel, gmcpvar, os.date("%I:%M:%S %p")))
			end
		end
	end
end

function OnPluginSaveState ()
	SetVariable("repop_channel", repop_channel)
end

function OnPluginInstall()
	repop_channel = GetVariable("repop_channel")
	repop_channel = repop_channel or "spouse"
end

]]>
</script>

</muclient>