IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Muaf ident sorunu yardım (https://www.ircforumlari.net/mirc-scripting-sorunlari/308887-muaf-ident-sorunu-yardim.html)

Emrax 01 Ocak 2010 22:05

Muaf ident sorunu yardım
 
PHP- Kodu:

alias randomnick if ($randn2($1)) || ($randn($1))  { return $true } | else { return $false }
alias randn2 {
  if $
1isalpha {
    if ((
$count($1,a,e,i,o,u) >= 4))  { return $false }
    if (
$regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
    if (
$len($1) >= 4) && ($regex($1,/^[a-z]+$)) {
      if (
$regex($1,/^[^aeiou]{3}/)) { return $true }
      elseif (
$regex($1,/([a-z])\1{2}/)) { return $true }
      elseif (
$regex($1,/[aeiou]{3/)) { return $true }
      elseif (
$regex($1,q[^u])) { return $true }
      elseif (
$regex($1,/[^aeioux]x[^aeiouyx]/)) { return $true }
      else { return 
$false }
    }
  }
}
alias randn {
  if $
1isalpha {
    if (
$regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
    if (
$len($1) == 7) {
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      if 
$regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
      else { return 
$false }
    }
    elseif (
$len($1) == 8) {
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      if 
$regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
      else { return 
$false }
    }
    elseif (
$len($1) == 9) {
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      if 
$regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($mid($1,4,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
      else { return 
$false }
    }
    elseif (
$len($1) == 10) {
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      if 
$regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($mid($1,4,5),/(o|i|a|e|u)/g) <= 0) { return $true }
      else { return 
$false }
    }
    if (
$regex($1,/(o|i|a|e|u)/g) <= 0) && ($len($1) == 4) { return $true }
    elseif (
$regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 5) { 
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      else { return 
$true }
    }
    elseif (
$regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 6) { 
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      else { return 
$true }
    }
    elseif (
$regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) == 10) { return $true }
    elseif (
$regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) >= 11) { return $true }
    else { return 
$false }
  }
}
on !*:join:#mIRCTR:{
  
var %identd $gettok($gettok($address($nick,5),1,64),2,33),-1)
  if !
$istok(Ahus neXGen_v2 aSk Admin SoylemIRC burak Dark izmIRC King Neveda asiL trnc zurna is0hbet kArA.qoSLu Sensizim mIRCKalbim IRC MT.Gops Turk ikiSohbet T-Mirc Sohbet TRSohbetLi Numberone Nickserv MultiMRC Quiet diE Damn lcX X K-Turk Kursun-v2 Bjk Love filmdizizl kuzu AfyoK Constantin SCScript yAkLaSmA mIRCindirU mIRCTRWeb KLBKvTurk TriviaBot mIRCIndir_ SohbetIRC Bitanem-v4 keleweb Intel MoDe mIRCTR KLBKBETA KTurkce KLBKveLite SohbeTTurk mIRCIndir KlbkTurkce kelebek d4rkL0rd KelebekTR ekelebek Sturk bad vXy,$right($gettok($10,1,64),-1),32) {
  if (
$randomnick($nick)) && ($randomnick(%identd)) { ban -k $chan $nick 2 0,1X-ir 5,1Security 0,1System5,1&#8482;9,1[0,10,1Råñdøm 0,1ñi¢k9,1]  
}


Arkadaşlar kod bu.Muaf ident ekledim.Agresif korumamda da var muaf orda çalışıyor ama bu kodda çalışmıyor.Hata nerde :S

CesuryureK 01 Ocak 2010 22:20

Cevap: Muaf ident sorunu yardım
 
on !*:join:#mIRCTR:{
var %ident $gettok($address,1,64),32)
if !$istok(ident ident1 ident2 ident3,%ident,32) {
if ($randomnick($nick)) && ($randomnick(%identd)) {
ban -k $chan $nick 2 0,1X-ir 5,1Security 0,1System5,1™9,1[0,10,1Råñdøm 0,1ñi¢k9,1]
}
}
}

şöyle dene
+
if istok sorgusu çok uzun.

----------

on !*:join:#mIRCTR:{
var %ident $gettok($address,1,64),32)
if !$istok(ident ident1 ident2 ident3,%ident,32) {
if ($randomnick($nick)) && ($randomnick(%ident)) {
ban -k $chan $nick 2 0,1X-ir 5,1Security 0,1System5,1™9,1[0,10,1Råñdøm 0,1ñi¢k9,1]
}
}
}

şöyle dene
+
if istok sorgusu çok uzun.

Emrax 01 Ocak 2010 22:32

Cevap: Muaf ident sorunu yardım
 
Hocam şu an deniyorum ama bi sorun çıkmadı daha ben bu identleri Agresif giriş korumamda da kullanıyorum orda sorun çıkmıyor.Bide buna açıp kapatma ekleyebilir miyiz hocam.Örneğin F10 basınca açılacak.Saldırı anında hemen açmak için

Ajan 01 Ocak 2010 23:41

Cevap: Muaf ident sorunu yardım
 
#uc on
;kodlar buraya yazılacak.
#uc end

alias F10 { if $group(#uc) == off { .enable #uc | echo -a Açtım }
else { if $group(#uc) == on { .disable #uc | echo -a Kapadım }}}



Kodları grubun içine yerleştirip F10'a bas, açıksa kapatır; kalıysa açar.

Emrax 02 Ocak 2010 01:32

Cevap: Muaf ident sorunu yardım
 
Çok sağolun hocam..Allaha emanetsiniz..

----------

[01:25:10] Giriş : *** Notice -- Client connecting on port 6667: FEvqGW (mosnmxbt@188.16.28.137) [clients]
[01:25:11] Giriş : *** Notice -- Client connecting on port 6667: EptfqsWvOB (ipbiophmtf@118.194.65.14) [clients]
[01:25:11] Giriş : *** Notice -- Client connecting on port 6667: MGvwWbj (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.comcast.net) [clients]
[01:25:15] Giriş : *** Notice -- Client connecting on port 6667: puX (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.comcast.net) [clients]
[01:25:15] Giriş : *** Notice -- Client connecting on port 6667: vqcLbvrYdcH (ahjerff@12.180.26.217) [clients]

Hocam böyle bir saldırı yedik ama

#uc on
alias randomnick if ($randn2($1)) || ($randn($1)) { return $true } | else { return $false }
alias randn2 {
if $1- isalpha {
if (($count($1,a,e,i,o,u) >= 4)) { return $false }
if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
if ($len($1) >= 4) && ($regex($1,/^[a-z]+$)) {
if ($regex($1,/^[^aeiou]{3}/)) { return $true }
elseif ($regex($1,/([a-z])\1{2}/)) { return $true }
elseif ($regex($1,/[aeiou]{3/)) { return $true }
elseif ($regex($1,q[^u])) { return $true }
elseif ($regex($1,/[^aeioux]x[^aeiouyx]/)) { return $true }
else { return $false }
}
}
}
alias randn {
if $1- isalpha {
if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
if ($len($1) == 7) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 8) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 9) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,4,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 10) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,4,5),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
if ($regex($1,/(o|i|a|e|u)/g) <= 0) && ($len($1) == 4) { return $true }
elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 5) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
else { return $true }
}
elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 6) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
else { return $true }
}
elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) == 10) { return $true }
elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) >= 11) { return $true }
else { return $false }
}
}
on !*:join:#mIRCTR:{
var %ident $gettok($address,1,64),32)
if !$istok(Ahus neXGen_v2 aSk SpiDeRv1.7 yılmaX Admin SoylemIRC burak Dark izmIRC King Neveda asiL trnc zurna is0hbet kArA.qoSLu Sensizim mIRCKalbim IRC MT.Gops Turk ikiSohbet T-Mirc Sohbet TRSohbetLi Numberone Nickserv MultiMRC Quiet diE Damn lcX X K-Turk Kursun-v2 Bjk Love filmdizizl kuzu AfyoK Constantin SCScript yAkLaSmA mIRCindirU mIRCTRWeb KLBKvTurk TriviaBot mIRCIndir_ SohbetIRC Bitanem-v4 keleweb Intel MoDe mIRCTR KLBKBETA KTurkce KLBKveLite SohbeTTurk mIRCIndir KlbkTurkce kelebek d4rkL0rd KelebekTR ekelebek Sturk bad vXy,%ident,32) {
if ($randomnick($nick)) && ($randomnick(%identd)) {
ban -k $chan $nick 2 0,1X-ir 5,1Security 0,1System5,1™9,1[0,10,1Råñdøm 0,1ñi¢k9,1]
}
}
}

#uc end

alias F10 { if $group(#uc) == off { .enable #uc | echo -a 14,1Random Koruması 4,1AçıLdı!! }
else { if $group(#uc) == on { .disable #uc | echo -a 14,1Random Koruması 4,1Kapatıldı!! }}}

bu koruma çalışmadı :S Acaba ban olduğu için mi yavaş kaldı. Yoksa sorun mu var :S


Emrax 02 Ocak 2010 03:43

Cevap: Muaf ident sorunu yardım
 
Sigaram bitti.Kod çalışmıyo.Kafayı yicem harbiden yardım edin ya :S Ne yaptım ettiysem çalışmadı.Koruma açılıp kapanıyor gösteriyo ama çalışmıyo.Sabır..Lütfen yardım :S

eXaDuS 02 Ocak 2010 04:31

Cevap: Muaf ident sorunu yardım
 
Kod:

#randomnick off
alias grr { if (($regex($1,/[^aeiou]{3}/i)) || ($regex($1,/[aeiou]{3}/i))) { return $true } | else { return $false } }
on @!*:join:#:{ if ($grr($nick)) { /gline $nick 3600 Random nick koruması şu anda aktif. 1 Saat banlandınız. } }
#randomnick end
 
alias rac {
 enable #randomnick
}
 
alias rkapa {
 disable #randomnick end
}

Bu koruma ile Random yani bilinmeyen karmaşık nicklere çare bulabilirsiniz.

Kullanımı;

/rac : random nick korumasını etkin kılar
/rkapa : random nick korumasını devre dışı kılar


Alıntı..

Emrax 02 Ocak 2010 05:23

Cevap: Muaf ident sorunu yardım
 
Hocam random nick koruması değil istediğim hem nicki hem identi random olduğunda atması.Diğer türlü atmaması

eXaDuS 02 Ocak 2010 05:35

Cevap: Muaf ident sorunu yardım
 
Alıntı:

X-ir Nickli Üyeden Alıntı (Mesaj 1040285295)
PHP- Kodu:

alias randomnick if ($randn2($1)) || ($randn($1))  { return $true } | else { return $false }
alias randn2 {
  if $
1isalpha {
    if ((
$count($1,a,e,i,o,u) >= 4))  { return $false }
    if (
$regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
    if (
$len($1) >= 4) && ($regex($1,/^[a-z]+$)) {
      if (
$regex($1,/^[^aeiou]{3}/)) { return $true }
      elseif (
$regex($1,/([a-z])\1{2}/)) { return $true }
      elseif (
$regex($1,/[aeiou]{3/)) { return $true }
      elseif (
$regex($1,q[^u])) { return $true }
      elseif (
$regex($1,/[^aeioux]x[^aeiouyx]/)) { return $true }
      else { return 
$false }
    }
  }
}
alias randn {
  if $
1isalpha {
    if (
$regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
    if (
$len($1) == 7) {
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      if 
$regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
      else { return 
$false }
    }
    elseif (
$len($1) == 8) {
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      if 
$regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
      else { return 
$false }
    }
    elseif (
$len($1) == 9) {
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      if 
$regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($mid($1,4,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
      else { return 
$false }
    }
    elseif (
$len($1) == 10) {
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      if 
$regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
      elseif 
$regex($mid($1,4,5),/(o|i|a|e|u)/g) <= 0) { return $true }
      else { return 
$false }
    }
    if (
$regex($1,/(o|i|a|e|u)/g) <= 0) && ($len($1) == 4) { return $true }
    elseif (
$regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 5) { 
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      else { return 
$true }
    }
    elseif (
$regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 6) { 
      var %
son $mid($1,$len($1),1)
      var %
son2 $mid($1,$calc($len($1) - 1),1)
      if (%
son == %son2) { return $false }
      else { return 
$true }
    }
    elseif (
$regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) == 10) { return $true }
    elseif (
$regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) >= 11) { return $true }
    else { return 
$false }
  }
}
on !*:join:#mIRCTR:{
  
var %identd $gettok($gettok($address($nick,5),1,64),2,33),-1)
  if !
$istok(Ahus neXGen_v2 aSk Admin SoylemIRC burak Dark izmIRC King Neveda asiL trnc zurna is0hbet kArA.qoSLu Sensizim mIRCKalbim IRC MT.Gops Turk ikiSohbet T-Mirc Sohbet TRSohbetLi Numberone Nickserv MultiMRC Quiet diE Damn lcX X K-Turk Kursun-v2 Bjk Love filmdizizl kuzu AfyoK Constantin SCScript yAkLaSmA mIRCindirU mIRCTRWeb KLBKvTurk TriviaBot mIRCIndir_ SohbetIRC Bitanem-v4 keleweb Intel MoDe mIRCTR KLBKBETA KTurkce KLBKveLite SohbeTTurk mIRCIndir KlbkTurkce kelebek d4rkL0rd KelebekTR ekelebek Sturk bad vXy,$right($gettok($10,1,64),-1),32) {
  if (
$randomnick($nick)) && ($randomnick(%identd)) { ban -k $chan $nick 2 0,1X-ir 5,1Security 0,1System5,1™9,1[0,10,1Råñdøm 0,1ñi¢k9,1]  
}


Arkadaşlar kod bu.Muaf ident ekledim.Agresif korumamda da var muaf orda çalışıyor ama bu kodda çalışmıyor.Hata nerde :S

Burdaki yasaklamak istediğin identleri virgül ile ayırarak denermisin yani : ident1,ident2,ident3 gibi

neXGen_v2,aSk,Admin,SoylemIRC, şeklinde

Emrax 02 Ocak 2010 06:05

Cevap: Muaf ident sorunu yardım
 
Hocam teşekkür ederim ama olmadı :S O kod hiç çalışmıyor :S

alias randomnick if ($randn2($1)) || ($randn($1)) { return $true } | else { return $false }
alias randn2 {
if $1- isalpha {
if (($count($1,a,e,i,o,u) >= 4)) { return $false }
if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
if ($len($1) >= 4) && ($regex($1,/^[a-z]+$)) {
if ($regex($1,/^[^aeiou]{3}/)) { return $true }
elseif ($regex($1,/([a-z])\1{2}/)) { return $true }
elseif ($regex($1,/[aeiou]{3/)) { return $true }
elseif ($regex($1,q[^u])) { return $true }
elseif ($regex($1,/[^aeioux]x[^aeiouyx]/)) { return $true }
else { return $false }
}
}
}
alias randn {
if $1- isalpha {
if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
if ($len($1) == 7) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 8) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 9) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,4,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 10) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,4,5),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
if ($regex($1,/(o|i|a|e|u)/g) <= 0) && ($len($1) == 4) { return $true }
elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 5) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
else { return $true }
}
elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 6) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
else { return $true }
}
elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) == 10) { return $true }
elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) >= 11) { return $true }
else { return $false }
}
}
menu * {
Random Nick Koruması
Aç :.enable #random | echo -at 14,1Random Koruması 4,1AçıLdı!!
kapat:.disable #random | echo -at 14,1Random Koruması 4,1AçıLdı!!
}
#random on
on !*:join:#X-ir: {
if $regex($nick,/(Chick|Prens|butterfly|qamze|haqan|crayz|blacklost |ccredo|tuqce|yaqmuur)/i) { halt }
if ($randomnick($nick)) {
if !$istok(mIRCTR,$right($gettok($10,1,64),-1),32) {
/ban -ku180 # $nick 2 0,1Råñdøm 5,1ñ¡¢k ƒø®ßiddêñ0,1!!
}
}
}

#random end


Diye bir kod var elimde ama bu kezde muaf identi görmüyor.Bu atıyor ama muaf identleri ekleyemedim :S


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 00:05.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk