My first time :P

Coolyo · Post by **Coolyo** » Sat Apr 17, 2004 12:50 pm

Hey pro tcl scripters

i would like to know how to notice a user when the user join a channel (i also need to specafied the channel so the bon't won't notice a user who join another channel else but the one i specafied)

MVH Coolto

Sry my bad english

Ofloo · Post by **Ofloo** » Sat Apr 17, 2004 1:40 pm

please check this forum there is scripts like this on here you can easely find something with search function look for bind join

or check the eggdrop/windrop doc and look for bind join , putserv and NOTICE..

Coolyo · Post by **Coolyo** » Sat Apr 17, 2004 1:45 pm

Thx i will take a look

K · Post by K » Thu Apr 29, 2004 5:41 am

very simple

Code: Select all

#Type the chan

set onjoin_msg {
 {
  "The text you whant to notice"
 }
}
set onjoin_chans "#talmaciu #strand"

bind join - * join_onjoin


proc join_onjoin {nick uhost hand chan} {
 global onjoin_msg onjoin_chans botnick
 if {(([lsearch -exact [string tolower $onjoin_chans] [string tolower $chan]] != -1) || ($onjoin_$
  set onjoin_temp [lindex $onjoin_msg [rand [llength $onjoin_msg]]]
  foreach msgline $onjoin_temp {
   puthelp "NOTICE $nick :[subst $msgline]"
  }
 }
}

Post by **caesar** » Thu Apr 29, 2004 11:05 am

Code: Select all

set joinmsg "Your msg!"

setudef flag joinmsg

bind join - * join:msg 

proc join:msg {nick uhost hand chan} { 
  if {[isbotnick $nick] || ![channel get $chan joinmsg]} { 
    return 
  } 
putserv "PRIVMSG $nick :$::joinmsg"
}

To enable use .chanset #channel +joinmsg and to disable it use the .chanset #channel -joinmsg and replace #channel with the actual name of the channel.