on whois msg chan

opsb · Post by **opsb** » Sat Jun 14, 2008 2:35 pm

hi

I need script whick will msg chan setted in script when someone do whois on eggdrop

snotice is in format

-irc.local.net- *** nick (ident@host) did a /whois on you.

And after receiving whois notice, PRIVMSG chan in format

nick (ident@host) just did a /whois on me.

Regards

username · Post by **username** » Sat Jun 14, 2008 3:26 pm

Try it:

Code: Select all

set wchan #yourchan
bind notc - * wproc
proc wproc {nick uhost hand text dest} { 
global wchan
    if {[regexp {(.*?) did a /whois.*?} $text - wwho]} {
        putserv "PRIVMSG $wchan :$wwho just did a /whois on me."
    }
}

Such scripts better to write using RAW.

opsb · Post by **opsb** » Sat Jun 14, 2008 6:19 pm

thnx for trying but not working for me

speechles · Post by **speechles** » Sat Jun 14, 2008 9:29 pm

Code: Select all

set wchan "#yourchan"

bind notc - * wproc

proc wproc {nick uhost hand text {dest ""} } {
	if {($dest == "" || [isbotnick $dest]) && [regexp {(.+?)\sdid a /whois} $text -> wwho]} {
		putserv "PRIVMSG $::wchan :$wwho just did a /whois on me."
	}
}

Greedy matching is needed in cases like this (.+? vs .*?) to contain as much of the line as possible. Also need to check the botnick is the one being sent the notice (the bot gets channel notices and without this check can set this script off erroneously).

opsb · Post by **opsb** » Sun Jun 15, 2008 7:53 pm

Even your code wont work

strikelight · Post by **strikelight** » Sun Jun 15, 2008 9:51 pm

For server notices, you will most likely need to use a raw binding.

Code: Select all

bind raw - NOTICE yourproc:rawnotice

See tcl-commands.doc for the paramaters a raw binding is called with.