-- adds +me and /me support.
-- plop

function DataArrival(user, data)
   data=strsub(data,1,strlen(data)-1) 
   if( strsub(data, 1, 1) == "<" ) then
      local s,e,cmd = strfind(data,"%b<>%s+(%S+)") 
      if cmd == "+me" or cmd == "/me" then
         local s,e,msg = strfind(data,"%b<>%s+%S+%s+(.*)") 
         SendToAll("* "..user.sName.." "..msg)
         return 1
      end
   end
end