egghelp/eggheads community

Join/changenick script

2009-10-18T18:52:37-04:00

That is because join has only 4 arguments passed nick, host, handle and channel. Yet you've included text making it 5. Joins do not pass this additional argument for text. Simply change it to look as it does below:

Code:

bind join - #chan2 msg:chanjoinproc msg:chanjoin {nick host handle chan} {        putserv "PRIVMSG $chan :Hey, $nick! Welcome."}

Statistics: Posted by speechles — Sun Oct 18, 2009 6:52 pm

Join/changenick script

2009-10-18T18:49:35-04:00

Thanks, but this one doesn't work either:

Code:

bind join - #chan2 msg:chanjoin proc msg:chanjoin {nick host handle chan text} {        putserv "PRIVMSG $chan :Hey, $nick! Welcome."}

(Just a welcome message to everyone that joins)

Statistics: Posted by JKM — Sun Oct 18, 2009 6:49 pm

Join/changenick script

2009-10-18T17:31:54-04:00

tagChans = list of channels to care about
tagTag = tag we are checking for

Code:

set tagChans "#chan1 #chan2 #etc"set tagTag "TAG|"bind join - "% $tagTag*" voice:userbind nick - "% $tagTag*" voice:userbind nick - * devoice:userbind join - #chan2 msg:chanjoinproc voice:user {nick uhost hand chan {nn ""}} { if {$nn == ""} {set nn $nick} if {[lsearch -exact [split [string tolower $::tagChans]] [string tolower $chan]] != -1 && ![isvoice $nn $chan]} {  pushmode $chan +v $nn }}proc devoice:user {nick uhost hand chan nn} { if {[lsearch -exact [split [string tolower $::tagChans]] [string tolower $chan]] != -1 && ![string match -nocase $::tagTag* $nn] &&[isvoice $nn $chan]} {  pushmode $chan -v $nn }}proc msg:gsjoin {nick host handle chan text} {        putserv "PRIVMSG $chan :Hey, $nick! Welcome."}

Statistics: Posted by speechles — Sun Oct 18, 2009 5:31 pm

Join/changenick script

2009-10-18T15:24:29-04:00

Neither of these scripts are working, and I'm wondering what's wrong.

Code:

set tagChans "#chan"bind join - {% TAG|*} voice:userbind nick - {% TAG|*} voice:userbind nick - * devoice:userbind join - #chan2 msg:chanjoinproc voice:user {nick uhost hand chan {nn ""}} { if {$nn == ""} {set nn $nick} if {[lsearch -exact [split [string tolower #chan]] [string tolower $chan]] != -1 && ![isvoice $nn $chan]} {  pushmode $chan +v $nn }}proc devoice:user {nick uhost hand chan nn} { if {[lsearch -exact [split [string tolower #chan]] [string tolower $chan]] != -1 && ![string match -nocase tag|* $nn] &&[isvoice $nn $chan]} {  pushmode $chan -v $nn }}proc msg:gsjoin {nick host handle chan text} {        putserv "PRIVMSG $chan :Hey, $nick! Welcome."}

Statistics: Posted by JKM — Sun Oct 18, 2009 3:24 pm