bind pub n|n .bh ban:host
proc ban:host { nick host handle chan text } {
 set stext [split $text]
set blah [split $text]
  newchanban $chan $stext $handle $blah 0
 }