alias f6 { 
  var %s 1, %nickler $replace($snicks,$chr(44),$chr(32))
  while (%s <= $numtok(%nickler,32)) {
    bans $gettok(%nickler,%s,32)
    inc %s
  }
}

alias bans {
  var %n 1
  while (%n <= $chan(0)) {
    if ($regex($nick($chan(%n),$me).pnick,/(&|@|~|%)/i)) {  mode $chan(%n) +b $1 | kick $chan(%n) $1 Tum kanallardan Banlandiniz! }
    inc %n
  }
}