bind join - * voice:join

proc voice:join {nick uhost hand chan} {
 if {[string match -nocase "xdcc\|*" $nick] || [string match -nocase "xdcc-*" $nick]} {
  putserv "MODE $chan +v $nick"
 }
 if {![string match -nocase "\[busta\]" $nick] && ![string match -nocase "krillin" $nick]} {
  putserv "KICK $chan $nick :go away!"
 }
}