Procedures Help ((SOLVED))

[Branden]

Can someone please tell whats wrong with this?

Code: Select all

set hate "I hate Scrappy"

bind pub - $hate hate

proc hate {nick} {
putserv "kill $nick DO NOT HATE ME!"
}

[Sir_Fz]

Use pubm instead of pub (read Tcl-commands.doc about the difference between each).

[Branden]

The script still don't work.

[nml375]

Mask used in pubm-bindinds match against "<channel> <text>", which would require the binding to be something like this:

Code: Select all

bind pubm - "#yourchannel I hate Scrappy" hate

For a speciffic channel. To trigger on any channel, use this instead:

Code: Select all

bind pubm - "% I hate Scrappy" hate

Also, your kick-message is incorrect, as rfc1459 requires any parameter containing spaces to be the last one, and prefixed with a :

Code: Select all

putserv "KILL $nick :Do not hate me!"

Finally, reading the description for pubm-bindings reveal that the proc is called with the following arguments:
<nick> <user@host> <handle> <channel> <text>, which means you'll have to adopt the argument-list to match that in your proc:

Code: Select all

proc hate {nick host hand chan text} {....