egghelp/eggheads community

On join problems

2005-12-27T21:31:33-04:00

Cheers for that all is now well. To get it going i had to put it in a seperate file for some reason.
I have like half a dozen other script sections in my main script file i thought that was ok to do and they all work fine.

Cheers for your time and help Alchera

Statistics: Posted by terryd — Tue Dec 27, 2005 9:31 pm

stuck with On join

2005-12-27T21:13:14-04:00

Just use this instead:

Code:

bind join - * onjoin:msgproc onjoin:msg {nick uhost hand chan} {    puthelp "NOTICE $nick :For info on server do !help"}

.. tested and works!

Statistics: Posted by Alchera — Tue Dec 27, 2005 9:13 pm

Stuck on join

2005-12-27T20:14:48-04:00

Well i tried your snippet in its complete form and tried to tweak it but to no avail.
Today is me first day at this so i must be doing some thing really silly some where
My other snippets i have been fiddling with just basic stuff to get the feel of things like

bind pub - !os pub:os

proc pub:os {nick host handle chan text} {
set uname [exec uname -a]
putserv "PRIVMSG $chan :$uname"
}

for example all work fine its just this join thing. But never mind thanks for your help i will keep reading and tweaking

Cheers

Statistics: Posted by terryd — Tue Dec 27, 2005 8:14 pm

stuck with On join

2005-12-27T19:44:19-04:00

Code:

#Set here the channels that you don't want onjoin msg enabled. Set "*" for all.set no-msg(chan) "#chan1 #chan2"bind join - * onjoin:msgproc onjoin:msg {nick uhost hand chan} {    global no-msg    set chan [string tolower $chan]    if {(([lsearch -exact [string tolower $no-msg(chan)] $chan] >= 0) || ($no-msg(chan) == "*"))} {return}    puthelp "NOTICE $nick :For info on server do !help"}

The above untested; easily altered to suite your own particular needs.

Statistics: Posted by Alchera — Tue Dec 27, 2005 7:44 pm

Stuck with on join

2005-12-27T19:30:50-04:00

I now have

bind join - * test

proc test {nick uhost handle chan } {
putserv "PRIVMSG $chan : $nick :Hello there!"
}

I have also tried a few other ways. The doc you pointed out i have read a dozen time today. But thank you any way

Statistics: Posted by terryd — Tue Dec 27, 2005 7:30 pm

stuck with On join

2005-12-27T18:32:57-04:00

procname

next time check the doc/tcl-commands.doc file before posting.

Statistics: Posted by caesar — Tue Dec 27, 2005 6:32 pm

stuck with On join

2005-12-27T18:19:58-04:00

I have

bind join - * proc_join
proc proc_join {nick chan text} {
putserv "PRIVMSG $chan :$nick:For info on server do !help"
}

I have tried a few variations and im still reading the docs now.
But when i join the channle with the bot no joy
all my other things work fine like 1help for example

Terry

Statistics: Posted by terryd — Tue Dec 27, 2005 6:19 pm