ChanServ- AOP, SOP, HOP ve VOP listelerine sadece kayitli nickler eklenebilir.

on *:input:*: {
if $regex($1,^(!|.)opekle$) {
set %eklencekkanal $chan
set %kayitlimi $2
who $2
}
}

raw 352:*: {
  if $6 == %kayitlimi { 
    haltdef
    if r isin $7 { chanserv access %eklencekkanal add %kayitlimi 50  | msg %eklencekkanal nicki op eklendi. }
    else { msg %eklencekkanal Nick kayitsiz. }
    unset %kayitlimi
    unset %eklencekkanal
  }
}

if $1 == AkillAt: { 
    on *:notice:*nickli kullanici bulunamadi*:*:{
      else {
        os killclones $2
        msg $iwc_server_rapor :[A:KİLL] $2  Nickine Web'den A:KİLL atıldı.
      }

on *:text:!opekle &:#admin:{
  if ($regex($2,^#)) {
    msg # $+($nick,:) $3 için sorgulama yapılıyor. Eğer nick kayıtlıysa $2 kanalında ekleme işlemi yapılacaktır. Lütfen bekleyin.
    .enable #kntrl
    nickserv info $3
    set %kntrlkanal $2
    set %kntrlnick $3
  }
}

#kntrl off
on *:notice:*:?:{
  if ($nick == NickServ) {
    if (*kay*tl* de*il* iswm $1-) msg #admin Hata: $+(%kntrlnick,$chr(44)) kayıtlı bir nick olmadığından op ekleme işlemi yapılmadı.
    else { chanserv access %kntrlkanal add %kntrlnick ACCESS-SEVIYESI | msg #admin Bilgi: Ekleme işlemi başarıyla tamamlandı. $+(%kntrlnick,$chr(44) %kntrlkanal üzerinde başarıyla op eklendi. }
    unset %kntrlnick %kntrlkanal
    .disable #kntrl
  }
}

on *:text:*:#:{
  if $regex($1,/[!.]opekle/Si) { 
    if !$regex($2,/^#.+/) { msg # Lütfen kanal belirtiniz. | return }
    if !$regex($3,/^([a-zA-ZĞğıİöÖüÜşŞçÇ_^\133\135}{][a-zA-ZĞğıİöÖüÜşŞçÇ0-9_|^}\{\133\135`-]{0,30})$/i) { msg # Lütfen nick belirtiniz. | return }
    if !$regex($4,\d) { msg # Lütfen Yetki seviyesini giriniz. | return }
    else { .enable #opekle | set %kanal # | cs access $2 add $3- }
  }
}
#opekle off
on *:notice:*:?:{
  if $regex($nick,/^ChanServ$/i) {
    if $regex($1-,/kanal[ıiİ]\skayitl[ıiİ]\sde[gğĞ][ıiİ]l/Si) { msg %kanal $1- | .disable #opekle | return }
    if $regex($1-,/erisim\slistesi.+kayitli.+nick/Si) { msg %kanal $1- | .disable #opekle }
    if $regex($1-,/Erisim\sseviyesi.+ve.+arasinda/Si) { msg %kanal $1- | .disable #opekle }
    if $regex($1-,/nick.+kanalindaki\serisim.+zaten/Si) { msg %kanal $1- | .disable #opekle }
    if $regex($1-,/nick.+kanalindaki\serisim\sseviyesi.+degisti/Si) { msg %kanal $1- | .disable #opekle }
    if $regex($1-,/nick.+kanalinin\serisim.+seviyeden.+eklendi/Si) { msg %kanal $1- | .disable #opekle }
  }
}
#opekle end

on $*:text:/^(!opekle)/iS:#:{
  if (!$regex($2,/^#)) { msg # Lütfen kanal belirtiniz. | return }
  if (!$regex($3,/^([a-zA-ZĞğıİöÖüÜşŞçÇ_^\133\135}{][a-zA-ZĞğıİöÖüÜşŞçÇ0-9_|^}\{\133\135`-]{0,30})$/i)) { msg # Lütfen nick belirtiniz. | return }
  if (!$regex($4,\d)) { msg # Lütfen Yetki seviyesini giriniz. | return }
  else { .enable #opekle | set %kanal # | cs access $2 add $3- }
}
#opekle off
on *:notice:*:?:{
  if (!$regex($nick,/^ChanServ$/i)) return
  if ($regex($1-,/kanal[ıiİ]\skayitl[ıiİ]\sde[gğĞ][ıiİ]l/Si) || $regex($1-,/erisim\slistesi.+kayitli.+nick/Si) || $regex($1-,/Erisim\sseviyesi.+ve.+arasinda/Si) || $regex($1-,/nick.+kanalindaki\serisim.+zaten/Si) || $regex($1-,/nick.+kanalindaki\serisim\sseviyesi.+degisti/Si) || $regex($1-,/nick.+kanalinin\serisim.+seviyeden.+eklendi/Si) { msg %kanal $1- | .disable #opekle }
}
#opekle end

on *:text:!akill &:#admin:set %nck $2 | .enable #w | whois $2
#w off
raw 401:*:if (%nck) { msg #admin Hata: Kişi sunucuda olmadığından işlem yapılmadı. | unset %nck | set %hmm ok }
raw 318:*:if (%hmm == ok) { unset %hmm | .disable #w | return } | elseif (%nck) { operserv killclones %nck | msg #admin Bilgi: %nck sunucudan uzaklaştırıldı. | unset %nck | .disable #w }
#w end

raw 318:*:if (%hmm == ok) { unset %hmm | .disable #w | return } | elseif (%nck) { operserv killclones %nck | msg #admin Bilgi: %nck sunucudan uzaklaştırıldı. | unset %nck | .disable #w }

11.Updated libraries to PCRE v8.37.