on *:text:*:#opers:{
  if !client isin $1 {
    if $nick == AtLaS { 
      var %ps:_ $left($md5($r(a,z)),$r(8,20))
      .as client $2 add
      .as client $2 mask add $2@*
      .as client $2 set password %ps:_
      .as client $2 set mode +inex
      .as client $2 enable
      .as bot ClientServ message #opers $2 nicke $nick tarafından mIRC girişi verildi. 
      .ms send $nick $2 nick'ine client (mIRC) girişi verildi Mask: $2@* password: %ps:_ 
      .ms send $2 Client  (mIRC) girişi bilgilerin  Mask: $2@* password: %ps:_ Kullanımı : /emailaddr $2@* /server irc.xxxxx.net:6667 %ps:_
    }
  }
}

 
on *:text:*:#opers:{
  if !declient isin $1 {
    if $nick == AtLaS { 
      .as client $2 del
      .as bot Clientserv message #opers $2 nickine ait tüm client $nick tarafından silindi.
    }
  }
}

 
on *:text:*:#opers:{
  if !banac isin $1 { 
    set %'.ip $2  | set %'.kanal $chan | .stats k 
    .unzline $2
    .unkline $2
    .os akill del *@ $+ $2
    .msg #opers  $2  üzerindeki engellemeler kaldırıldı.
  } 
}
raw 216:*: { 
  if (%'.ip == $3) && ($2 === A) { haltdef | set %akillident $+($4,@,$3) | unakill $+($4,@,$3) | unset %'.*   
  } 
}

 
 
on *:DEOP:#:{
  if ($nick == $me) { goto end }
  if ($opnick == $me) {
    .samode # +ob $me $nick
    .kick # $nick mesaj  }
  :end
}

 
on *:text:*:#opers:{
  if !join isin $1 { 
    if $chr(35) isin $2 {
      .sajoin $2
      .msg #opers Kanala girildi  $2
    } 
    else {
      .msg # Hatalı kanal ismi $2 $+ , kanal belirtecini girmediniz. (#)
    }
  }
  if !part isin $1 {
    if $chr(35) isin $2 {
      .part $2
      .msg #opers kanaldan çıkıldı $2
    } 
    else {
      .msg # Hatalı kanal ismi $2 $+ , kanal belirtecini girmediniz. (#)
    }
  }

 
on *:text:*:#opers:{
  if !join isin $1 { 
    if $read(onaychan.txt,w,$2) { .as bot botserv message #opers Eklemek istediğiniz kanala XXX-BOT daha önce sokulmuş $+($nick,.) }
    else { write onaychan.txt $2 | .as bot botserv message #opers  $2 kanalına, XXX-BOT birkaç saniye içinde atılacaktır $nick | .as chan $2 add | .as chan $2 set bot XXX-BOT    }
  }
}

on *:text:*:#opers:{
  if !part isin $1 {
    if $chr(35) isin $2 {
      .as bot botserv message #opers  $2 Kanalından XXX-BOT 4 Bir Kac Saniye İçinde Çıkarılacaktır. $nick
      .as chan $2 del
    } 
    else {
      .as bot botserv message #opers Hatalı kanal ismi $2 $+ , kanal belirtecini girmediniz. (#)
    }
  }

 
on *:op:#help: {
   if $opnick != $me {  
     .sajoin $opnick #helpers
     .sajoin $opnick #helpdesk  
     .sajoin $opnick #helpdesk 
  }
}
on *:op:#helpers: {
    if $opnick != $me {
     .chghost $opnick xxx.net.Help.Egitim.Takimi 
     .chgident $opnick Helpegitim
     .msg $chan Helpeğitim görevlisi $opnick kanala giriş yaptı.
  }
}
on *:help:#helpers: {
      if $hnick != $me {         
     .chghost $hnick xxx.net.Helpdesk.Takimi
     .chgident $hnick Helpdesk
     .msg $chan Helpdesk görevlisi $hnick kanala giriş yaptı.
  }
} 
on *:rawmode:#helpers: {
      if $left($1,1) == + { halt }
       if *a* iswm $right($1,-1) { halt }
        if ($2 == Nick) {  
         .chghost $2  xxx.net.Helpsop.Takimi
         .chgident $2 Helpkurul
         .msg $chan Helpkurul görevlisi $2 kanala giriş yaptı. 
  }
}

 
on *:rawmode:#: {
  if $2 == $me { 
    .halt 
  }
  if $chan == #opers {
    .halt 
  }
  if $chan == #yardim {
    .halt
  }
  if $chan == #sohbet { 
    .halt 
  }
  if $chan == #helper { 
    .halt
  }
  if $chan == #ops {
    .halt
  }
  if $1 == +o { 
    .msg #  $+ $2 şu anda operatör (kanal yetkilisi) konumuna geçti.
  }
}

 
on *:text:*:#yardim:{
  if !part isin $1 {
    if $nick isop # {
      .mode #yardim -v $2
      .msg #yardim  $2 $+ , yardım kanalında $nick tarafından gerekli yardımları almış bulunmaktasınız. Lütfen odayı, 20 saniye içersinde terk ediniz.
      .timer 1 20 /mode #yardim +b $2
      .timer 1 20 /kick #yardim $2 Sorununuz çözümlendi, $2 $+ . Gereksiz bekleme yaptığınız için uzaklaştırıldınız, sorunsuz günler dileriz.
      .timer 1 80 /mode #yardim -b $2
    }
    else {
      .msg # Sistem @ işaretinizi göremedi veya $2 rumuzu şuan da # kanalında bulunmuyor.
    }
  }
}

 
on *:text:#*:#ops:{
  if ($nick !isin #opers) && ($2- == $null) {
    opver $nick $1
  }
}
alias opver {
  fjoin $1 $2
  samode $2 +o $1
}

 
on *:text:*:#basvuru:{
  if !basvuru isin $1 {
    var %ps:_ $left($md5($r(a,z)),$r(8,20))
    if $read(bchan.txt,w,$2) { .msg # Kayıtlamak istediğiniz kanal daha önce kayıtlanmış başka kanal ismi deneyiniz $+($nick,.) }
    else { write bchan.txt $2
      .cs register $2 %ps:_ XXXXX Sohbet Odaları
      .cs identify $2 %ps:_
      .sajoin $2
      .fjoin $nick $2
      .msg $nick $2 Kanalı tarafınıza kaydedilmiştir.
      .os topic $2 XXX.Net Keyifli Sohbetler Diler..
      .samode $2 +o $nick
      .as chan $2 set bot XXX-BOT
      .msg chanserv ftransfer $2 $nick
      .timer 1 15 part $2
      .ban -k $chan $nick Kanal Başvurunuz Kabul edilmiştir. xxxx.Net Keyifli Sohbetler Diler..
    }
  }
}

 
on *:join:#:{
  if $nick == nick {
    .msg $chan  XXXX.Net Sunucu Sahibi $nick Kanala Giriş Yaptı .
  }
  if $nick == xxxxx {
    .msg $chan   Sunucu Genel Sorumlusu  xxxxx  Kanala Giriş Yaptı .   }

 
on *^:snotice:*: {
  if (*added*an*SQLINE*for* iswm $1-) {
    .set %yetkili $11
  .msg #opers Yeni bir rumuz yasaklandı. Nick: $11  Yetkili: $6  }
}

 
on *:text:*:?:{ 
  if !şikayet * iswm $1- {
    var %b = $+(%,sikayet,$nick)
    if !$(%b,2) { 
      .msg $nick Şikayette talebinde bulundunuz rumuz: $2  sebeb: $3- $+ .  Yöneticilerimiz durumdan haberdar edildiler. 
      .msg #opers Opers! $nick rumuzu, kullanıcı şikayetinde bulundu.
      .msg #opers Şikayet ettiği rumuz: $2  Şikayet sebebi: $3- $+ . 
      inc -u120 $(%b,1) 
    }
    else { 
      .msg $nick 2 dakika içersinde, yalnız 1 defa şikayet iletebilirsiniz.
    }
    if !şikayet iswm $1- {
      .msg $nick Şikayet iletilmedi. Eksik parametre girdiniz. Lütfen !şikayet <nick> <sebeb> şeklinde kullanın.
    }
  }
}

alias sorgula { frozen $1 | set %sorgu $1 | os sqline list } 
on *:notice:*:?:{ 
  if $nick === OperServ && %sorgu {
    if %sorgu isin $2 {
      .msg %kanal Rumuz: $2  Yetkili: $4  Sebeb: $10- 
    }
  }
}

on *:text:*:#opers:{
  if !sorgula iswm $1- { 
    .msg #opers  sorgulanacak rumuzu belirtmediniz.
  }
  if !sorgula * iswm $1- {
    .set %kanal #opers
    .sorgula $2
  }
}

 
on *:text:*:#:{
  if !temizle isin $1 {
    if $nick !isop $chan {
      .msg $chan Siz # kanalında, herhangi bir erişime sahip değilsiniz $nick $+ .
    }
    else {
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan $chr(160)
      .msg $chan Kanal Geneli Temizlenmiştir. Keyifli Sohbetler..
    }
  }
}

 
on *:SNOTICE:*attempts*to*OPER*:{
  inc -u60 $+(%,wo.,$gettok($4,1,33),.,$remove($gettok($4,2,6 4),$chr(41)))
  var %' = $+(%,wo.,$gettok($4,1,33),.,$remove($gettok($4,2,6 4),$chr(41)))
  if $(%',2) = 1 { .msg #opers Hatalı yönetici girişi tespit edildi. Deneyen: $gettok(%',2,46) Hesabı Denenen: $9  }
  if $(%',2) = 2 { .kill $gettok(%',2,46)  2 kere hatalı yönetici şifresi denediniz. 3. bir yanlış denemede, girişiniz yasaklanacaktır.}
    if $(%',2) = 3 { .akill $+($gettok(%',2,46)) 3 defa üst üste, hatalı yönetici girişi yapmaya çalıştınız ama hepsi başarısızlıkla sonuçlandı. Hesabınızın akıbetini, xx@xxxnet  mail adresine mail atarak sorgulayabilirsiniz.  ) | .msg #opers  $+($gettok(%',2,46))  3 defa ard arda hatalı yönetici girişi yapmış ve başarısız olmuştur, kullanıcıya yasaklama getirildi. | unset %' }
  }

 
on *:join:#yardim:{
  if $nick != $me {
    if *@*xxxxx.com* iswm $address($nick,2) { 
      .samode # +o $nick
      .notice $nick 1Yönetici girişiniz tanımlandı ve otomatik operatör edildiniz, $nick $+ .
    }
  }
}

 
on *^:snotice:*: {
  if (*used*DROP*cmd*on* iswm $1-) {
    .set %yetkili $11
    .msg #opers Yeni bir rumuz DROPLANDI. Droplanan Nick: $11  Yetkili: $6 
  }
}

 
raw 006:*: {
  if !%xw { set %xw 1 }
  if  %xw {
    hadd -m c $+(c,%xw) $2-
    inc %xw
  }
  if %xw == 10 {
    var %char =  32 22 17 34 30  28 29 17 16 14 
    var %q = 2
    while %q <= 8  { 
      inc %cx3 $len($gettok($replace($gettok($hget(c,$+(c,%q)),-3,44),$chr(3),$chr(32)),-1,48)) 
      inc %q
    } 
    var %y = 2
    while %y <= 8 { 
      inc %cx2 $len($gettok($replace($gettok($hget(c,$+(c,%y)),-2,44),$chr(3),$chr(32)),-1,48)) 
      inc %y
    } 
    var %k = 2
    while %k <= 8  { 
      inc %cx1 $len($gettok($replace($gettok( $hget(c,$+(c,%k)),-1,44),$chr(3),$chr(32)),-1,32))
      inc %k
    } 
    GIRIS $+($findtok(%char,%cx3,1,32),$findtok(%char,%cx2,1,32),$findtok(%char,%cx1,1,32))
    unset %cx* 
    unset %xw
  }
}

 
on @*:JOIN:#:{ 
  if (*!*****@* iswm $fulladdress) || (*!*fuck*@* iswm $fulladdress) || (*!*yarak*@* iswm $fulladdress) || (*!*Amcik*@* iswm $fulladdress)  || (*!*Oros*@* iswm $fulladdress) || (*!*Azgin*@* iswm $fulladdress) || (*!*Pic*@* iswm $fulladdress) || (*!*atesli*@* iswm $fulladdress) || (*!*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
iswm $fulladdress) || (*!*.com*@* iswm $fulladdress) || (*!*fuck*@* iswm $fulladdress) || (*!*Yarak*@* iswm $fulladdress) || (*!********@* iswm $fulladdress) || (*!*Hack*@* iswm $fulladdress) || (*!*travest*@* iswm $fulladdress) || (*!*gay*@* iswm $fulladdress) || (*!*lez*@* iswm $fulladdress) { 
    .mode # +b $fulladdress | kick # $nick  bad ident!!!!  } 
}

on *:text:*:#basvuru:{
if !basvuru isin $1 {
 var %ps:_ $left($md5($r(a,z)),$r(8,20))
 if $read(bchan.txt,w,$2) { .msg # Kayıtlamak istediğiniz kanal daha önce kayıtlanmış başka kanal ismi deneyiniz $+($nick,.) }
 else { write bchan.txt $2
   .cs register $2 %ps:_ XXXXX Sohbet Odaları
   .cs identify $2 %ps:_
   .sajoin $2
   .fjoin $nick $2
   .msg $nick $2 Kanalı tarafınıza kaydedilmiştir.
   .os topic $2 XXX.Net Keyifli Sohbetler Diler..
   .samode $2 +o $nick
   .as chan $2 set bot XXX-BOT
   .msg chanserv ftransfer $2 $nick
   .timer 1 15 part $2
   .ban -k $chan $nick Kanal Başvurunuz Kabul edilmiştir. xxxx.Net Keyifli Sohbetler Diler..
 }
}
}