alias badtara { 
  if ($me isop #x) || ($me ishop #x) {
    var %sil 1,%uet 
    while (%sil <= $nick(#x,0)) {
      if ($level($nick(#x,%sil)) == Bad) {
        mode #x +b $nick(#x,%sil) |  kick #x $nick(#x,%sil) Bad Nick Tesbiti!
        inc %uet 
      }
      inc %sil  
    }
    msg #y Tarama Sonucu Uzaklaştırılan Bad Nick Adedi: %uet 
  }
}

on *:text:!tarama*:#y:msg # Bad Nick Taraması Başlatıldı. | badtara