if ($ulist($fulladdress,koruma,0) >= 1) && $me !isop $chan { return }
  elseif !$istok(#*** #cinsellik #gay #lezbiyen #***üel #radyo #muhabbet #Sohbet,$chan,32) {
    mode $chan +b $nick | kick $chan $nick Badnick Kullanmak Yasaktır!..
  }
}
on *:NICK:{ 
  if ($ulist($+($newnick,!*@*),koruma,0) >= 1) { return }
  else {
    if $ulist($+($newnick,!*@*),badnick,0) { 
      var %Cnk = 1 
      while $comchan($newnick,%Cnk) { 
        var %e = $v1 
        if $me isop %e && !$istok(#*** #cinsellik #lezbiyen #gay #radyo #muhabbet #izmir #lez #Sohbet,%e,32) { 
          mode %e +b $newnick  | kick %e $newnick Badnick Kullanmak Yasaktır!..
        } 
        inc %Cnk 
      } 
    } 
  }
}
alias badnickekle {
  auser badnick $1 $+ !*@*
}
alias badnicksil {
  ruser badnick $1 $+ !*@*
}
alias nickkoruma {
  auser koruma $1 $+ !*@*
}
alias badidentekle {
  auser badnick *! $+ $1 $+ @*
}
alias badidentsil {
  ruser badnick *! $+ $1 $+ @* }
alias identkoruma {
  auser koruma *! $+ $1 $+ @*
}