Kod

menu status,menubar,channel {
  BADNiCK PROTECTiON
  ..Aktif:/.enable #bad | /echo -ae 4[BADNiCK]12 Protection4 Aktif12 edilmiştir . 
  ..Deaktif:/.disable #bad | /echo -ae 4[BADNiCK]12 Protection4 Deaktif12 edilmiştir.
}
#bad off
on 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Nick:JOIN:*:{
  if !$window(
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
NiCKS) { window -n 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
NiCKS }
  echo 11 -t 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
NiCKS 12==>0 # 12Kanalında uzaklaştırılan 0BADNiCK:4[ $nick ]12 yasağa takılan mask:0,1 $ulist($nick,badnick,1)
  if ($ulist($nick,koruma,0) >= 1) { return }
  elseif !$istok(#Help #SvsDesk #mIRCHelp #Helpers #kanal5,$chan,32) {
    mode $chan +b $nick
    kick $chan $nick 4BADNiCK:12 Kullandığınız tespit edildi. Lütfen;4 /nick yeninick12 şeklinde uygun4 Nick\Rumuz12 alarak tekrar giriş yapınız. 
  }
}
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(#Help #Security #Help #Helpers #HelpTeam #kanal5,%e,32) { 
          mode %e +b $newnick 
          kick %e $newnick 4BADNiCK:12 Kullandığınız tespit edildi. Lütfen;4 /nick yeninick12 şeklinde uygun4 Nick\Rumuz12 alarak tekrar giriş yapınız. 
        } 
        inc %Cnk 
      } 
    } 
  }
}
alias badnickekle {
  if ($level($1 $+ !*@*) == badnick) { echo -a 12Eklemek istediğin4 mask12 zaten4 BadList12 de mevcut.4 BadList'12esinde ekli olan mask:4 $ulist($+($1,!*@*),badnick,1) | return }
  else {
  .auser badnick $1 $+ !*@* | echo -a $1 12Maskı ile4 BadList12 listesine eklendi. | return } 
}
alias badnicksil {
  ruser badnick $1 $+ !*@* | echo -a $1 12Maskı4 BadList'12esinden silindi.
}
alias nickkoruma {
  if ($ulist($+($1,!*@*),koruma,1)) { echo -a 12Eklemek istediğin4 mask12 zaten4 KorumaList12 de mevcut.4 KorumaList'12esinde ekli olan mask:4 $ulist($+($1,!*@*),koruma,1) | return }
  .auser koruma $1 $+ !*@* | echo -a $1 12Maskı ile4 KorumaList'12esine eklendi.
}
alias nickkorumasil {
  ruser koruma $1 $+ !*@* | echo -a $1 12Maskı4 KorumaList'12esinden silindi.
}
alias badidentekle {
  auser badnick *! $+ $1 $+ @*
}
alias badidentsil {
  ruser badnick *! $+ $1 $+ @*
}
alias identkoruma {
  auser koruma *! $+ $1 $+ @*
}
alias tara {
  set %:bulunan 0
  var %s 1
  while %s <= $nick(#,0) {
    %:gnick = $nick(#,%s)
    if ($ulist($+($nick(#,%s), !*@*),koruma,0) >= 1) || ($ulist($+(*!, $regsubex($address($nick(#,%s),1),/^\*[!]\*(\S+)[@].+/S,\1), @*), koruma,0) >= 1) { inc %s | continue }
    if %:gnick isreg # && $level(%:gnick $+ !*@*) == badnick {
      inc %:bulunan 1
      mode # +b %:gnick | kick # %:gnick  4BADNiCK:12 Kullandığınız tespit edildi. Lütfen;4 /nick yeninick12 şeklinde uygun4 Nick\Rumuz12 alarak tekrar giriş yapınız. 
    }
    inc %s
  }
  echo -a 0BADNiCK'ler Tarandı:4 # 12Kanalında4 %:bulunan 0BADNiCK12 bulundu.
}
#bad end
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Badnick taraması yapmak istediğiniz kanalda /tara
Badnick eklemek için:
/badnickekle gay*

Badnick silmek için:
/badnicksil *lez*

Nick Koruma eklemek için:
/nickkoruma gaye*
/nickkoruma *tugay*
/nickkorumasil *selam*

Badident eklemek için:
/badidentekle *msn*
/badidentekle gay

Badident silmek için:
/badidentsil *msn*
/badidentsil gay

İdent Koruma eklemek için:
/identkoruma msn
/identkoruma gaye*