on $*:TEXT:/^[!@](.*)/Si:#:{ 
  if ($me = [pk]ibusta) && (iBusta ison $chan) && (*$chan* iswm $exceptchans || $me = iBusta) && ([PK]iBusta ison $chan) && (*$chan* iswm $exceptchans ) {  
    $iif($left($1,1) == @,msg $chan,notice $nick) let iBusta answer that | Halt 
  }  
}