Gammon Forum

<?xml version="1.0" encoding="ISO-8859-1"?>

<!DOCTYPE muclient>

<!-- Saved on Saturday, June 30, 2007, 10:48 -->

<!-- MuClient version 4.13 -->

<!-- Plugin "Chat_Redirector" generated by Plugin Wizard -->

<!-- Edit plugin and change "chat_world" variable to be the name of the world you want chats to go to. -->

-<muclient>


-<plugin language="Lua" version="1.0" requires="4.08" date_written="2007-06-30 10:45:35" purpose="Redirects chat messages to another world" id="cb84a526b476f69f403517da" author="Nick Gammon" name="Chat_Redirector">


-<description trim="y">

-<![CDATA[
Redirects chats to the specified world.

Add or modify "chat" triggers to capture different sorts of message.

Change the variable "chat_world" to be the name of the world chats are to go to.
]]>
</description>

</plugin>

<!-- Triggers -->



-<triggers>

<trigger sequence="100" script="redirect" regexp="y" match="^[A-Za-z]+ (|MUSIC:| say |yells|OOC|tells) \'(.*?)\'$" enabled="y"> </trigger>

<trigger sequence="100" script="redirect" regexp="y" match="^You ( say |yell |OOC|MUSIC:|tell ) \'(.*?)\'$" enabled="y"> </trigger>

</triggers>

<!-- Script -->



-<script>

-<![CDATA[
chat_world = "RoD chats"
local first_time = true

function redirect (name, line, wildcards, styles)

  -- try to find "chat" world
  local w = GetWorld (chat_world)  -- get "chat" world

  -- if not found, try to open it
  if first_time and not w then
    local filename = GetInfo (67) .. chat_world .. ".mcl"
    Open (filename)
    w = GetWorld (chat_world)  -- try again
    if not w then
      ColourNote ("white", "red", "Can't open chat world file: " .. filename)
      first_time = false  -- don't repeatedly show failure message
    end -- can't find world 
  end -- can't find world first time around

  if w then  -- if present
    for _, v in ipairs (styles) do
      w:ColourTell (RGBColourToName (v.textcolour), 
                    RGBColourToName (v.backcolour), 
                    v.text)  
    end -- for each style run
    w:Note ("")  -- wrap up line

  end -- world found

end -- function redirect 

]]>
</script>

</muclient>

Mary tells you "hello".