When a user joins your channel they will get a notice then moved to a channel you wish and then make them part the channel they joinned. you must be Serivces Root and you must type .chanset #yourchannel +mj

bind join -|- * mj_join
setudef flag mj

set mj(joinmsg) "just change\nthis to your\n welcome msg"
#### use \n too define a newline

proc mj_join { nick host hand chan } {
global mj
if {[channel get $chan mj] != 1} { [return 0] }
    foreach line [split $mj(joinmsg) \n] {
    putquick "notice $nick :$line"
    putserv "operserv raw svsjoin $nick #channel-to-redirect-them-to"
    putserv "operserv raw svspart $nick $chan"
   }
}