NickAbuse !me messages..

[NemeziS]

Hello!

I'm using this NickAbuse script.

function DataArrival(user, data)

if strsub(data,1,1) == "<" then

data=strsub(data,1,strlen(data)-1)

s,e,cmd,Name,rsn = strfind(data,"%b<>%s+(%S+)%s+(%S+)%s+(.*)")

if user.iProfile == 0 then



if (cmd=="+say") or (cmd=="!say") or (cmd=="?say") then

SendToAll(Name, rsn) return 1



elseif (cmd=="+saypm") or (cmd=="!saypm") or (cmd=="?saypm") then

s,e,cmd,to,from,msg = strfind(data,"%b<>%s+(%S+)%s+(%S+)%s+(%S+)%s+(.*)")

SendPmToNick(to,from,msg) return 1

end

end

end

end

I also wanted to make messages like !me from selected user.
Example: I'm writing !sayme Puma lol lol lol
then in main appears

[19:47] * Puma  lol lol lol

What lines should I add to my script to enable this function?

[BottledHate]

function DataArrival(user, data)
   if strsub(data,1,1) == "<" then
      data=strsub(data,1,strlen(data)-1)
      s,e,cmd,Name,rsn = strfind(data,"%b<>%s+(%S+)%s+(%S+)%s+(.*)")
      if user.iProfile == 0 then
         if (cmd=="+say") or (cmd=="!say") or (cmd=="?say") then
            SendToAll(Name, rsn) return 1
         elseif (cmd=="+saypm") or (cmd=="!saypm") or (cmd=="?saypm") then
            s,e,cmd,to,from,msg = strfind(data,"%b<>%s+(%S+)%s+(%S+)%s+(%S+)%s+(.*)")
            SendPmToNick(to,from,msg) return 1
         elseif cmd =="!sayme" or cmd == "+sayme" or cmd == "?sayme" then
            if not user.bOperator then return end --//remove this line if you want non ops to use the command.
            Name = Name or ""
            rsn = rsn or ""
            SendToAll("* "..Name.." "..rsn)
            return 1
         end
      end
   end
end

:D

-BH

[D-J Valhala]

hehehehehehehe cool script i love it LoL  

[NemeziS]

Thanx! :)