on *:text:*:#KanaL:{
  if $1 == !badekle && $2 != $me { 
    if $nick isop $chan || $nick ishop $chan { .auser badnick $2- | msg $chan  $+ $2- $+  bad nick listesine eklendi. | .timer 1 1 .xban $2- }
    else { msg $chan Bu komutu kullanabilmek için $chan Kanalında yetkili konumunda olmalısınız. | return }
  }
  if $1 == !badsil { 
    if $nick isop $chan || $nick ishop $chan { .ruser badnick $2- | .timer 1 1 msg $chan  $+ $2- $+  bad nick listesinden silindi. }
    else { msg $chan Bu komutu kullanabilmek için $chan Kanalında yetkili konumunda olmalısınız. | return }
  }
  if $1 == !banla { 
    if $nick isop $chan || $nick ishop $chan { .mode $chan +b $2 | kick $chan $2  4~Bad:Nick14 , Lütfen 4/Nick 2Yeni Nick 14Komutunu KuLLanaraK 4Nick 14Değiştirip Tekrar Giriş Yapınız4... %logo | msg $chan Bad nick Taraması Başladı Lütfen Komutu Tekrarlamayınız $Nick }
    else { msg $chan Bu komutu kullanabilmek için $chan Kanalında yetkili konumunda olmalısınız. | return }
  }
  if $1 == !badlist { 
    if $nick isop $chan || $nick ishop $chan { msg $chan Bad nick listesinde toplam  $+ $ulist(*,badnick,0) $+  adet nick bulunmaktadır. }
    else { msg $chan Bu komutu kullanabilmek için $chan Kanalında yetkili konumunda olmalısınız. | return }
  }
}
alias ufuks { 
  var %t 1 
  while (%t <= $comchan(%2,0)) { 
    if $me isop $comchan(%2,%t) { 
      mode $comchan(%2,%t) +b %2 | kick $comchan(%2,%t) %2 4Lütfen nick-rumuz değiştirip tekrar kanala giriş yapın..
      inc %t
    }
  }
}

on *:text:!bad *:#Kanal: {
  if $2 == list {
    var %i = 1, %end = $ulist(*,badnick,0)
    .msg $chan - Toplam Badnick:4 %end 
    while %i <= %end  {
      ;msg $chan $+(%i,$chr(41)) $iif($ulist(*,badnick,%i) == $nick,$+(,$v1,),$v1)
      inc %i 1
    }
  }
  elseif $2 == ekle { 
    if $3 == $null { .msg $chan $+(",$nick,") Lütfen eklenecek nick yazınız | return }
    if $ulist($3,badnick,1) { .msg $chan $+(",$nick,") Belirtiğiniz kritere uyan $+(",, $3 $+ !*@* ,,") zaten mevcut | return }
    .auser badnick $3 $+ !*@*
    .msg $chan $+(",, $3 $+ !*@* ,,") Başarıyla badnick listesine eklendi
  }
  elseif $2 == sil { 
    if $3 == $null { .msg $chan $+(",$nick,") Lütfen silinecek nick yazınız | return }
    if !$ulist($3,badnick,1) { .msg $chan  $+(",$nick,") Belirtiğiniz kritere uyan $+(",, $3 $+ !*@* ,,") listede mevcut değil | return }
    .ruser badnick  $3 $+ !*@*
    .msg $chan $+(",, $3 $+ !*@* ,,") Başarıyla badnick listesinden kaldırıldı
  }
  elseif $2 == tara { 
    if ($me !ison $3) { .msg # $3 kanalında yokum işlem tamamlanmadı. | return }
    if (!$regex($nick($3,$me).pnick,&|~)) { .msg # $3 kanalında bu işlem için yetkim yok. | return }
    .msg # $3 kanalında badnick taraması başladı. | badtara $3 | set -e %knl #
  }
}
alias banni { 
  .mode $1 +b $2
  .kick $1 $2 $3-
}

alias badtara {
  set %:bulunan 0
  var %s 1
  while %s <= $nick($1,0) {
    %:gnick = $nick($1,%s)
    if %:gnick isreg $1 && $level(%:gnick $+ !*@*) == badnick {
      inc %:bulunan 1
      banni # %:gnick Rutin badnick kontrol.
    }
    inc %s
  }
  .msg %knl 4,1Badnickler Tarandi:11 $1 4-11 %:bulunan 4Badnick Bulundu.
}