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 $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 %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 $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 %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

eXaDuS

02 Ocak 2010 06:31

Cevap: Muaf ident sorunu yardım

Kod:

on *:snotice:*client*connect*: {

if $regex($remove($8,$chr(58)),/(6667|7000)/) &amp;&amp; $istokcs(ident1,ident2,ident3,$remove($gettok($10,1,64),$chr(40)),32) { zline $9 Yasak Ident }

}

Bunu denersimisin..Yasaklamak istediğin identleri ident1,ident2 yazan yerle değiş aralarına virgül ekleyip diledin kadar ident ekle..

Emrax

02 Ocak 2010 10:24

Cevap: Muaf ident sorunu yardım

Hocam yasaklamak istediğimiz ident değilde muaf tutmamız gereken identler var.O muafların haricinde randomsa atacak amaç bu.Yardımlarınızı bekliyorum..

Emrax

02 Ocak 2010 12:50

Cevap: Muaf ident sorunu yardım

Hala bi çözüm yok :S

eXaDuS

02 Ocak 2010 12:58

Cevap: Muaf ident sorunu yardım

Ozaman hiç bunlarla uğraşmayacaksın direk unreal'den serbest olmasını istediğin identleri belirle başka hiç bir ident giremesin sunucuna..

PHP- Kodu:

   ban user {

mask "*@*";

reason "Sunucumuzda ident korumasi aktif oldugu için baglanamiyorsunuz baglanmak için /emailadd identiniyaz@ yaziniz  ";

};

except ban {

mask "identyaz@*";

};

except ban {

mask "identyaz@*";

};

unrealircd.conf içine atip /rehash cek

Bu işlemden sonra identyaz olan yerlere serbest kalmasını istediğin identleri çoğaltarak yazabilirsin..Oidentler dışında başka ident kullanan kişiler giremez sunucuna..

Emrax

02 Ocak 2010 13:34

Cevap: Muaf ident sorunu yardım

Hocam benim sunucum yok ayrıca telnete de bakmıyorum :) Sadece bir services adminim ne kadar denediysem deneyeyim muaf ettiremedim :S Lütfen yardım

Ajan	02 Ocak 2010 22:29

Cevap: Muaf ident sorunu yardım

mIRC ana klasörüne ident.txt dosyası aç ve muaf identlerini alt alta sırala. Daha sonra vermiş olduğun join eventını aşağıdakiyle değiştir.

on *:join:#:{
if ($randomnick($nick)) {
if $read(ident.txt,w,$gettok($gettok($address($nick,5 ),2,33),1,64)) { halt }
else {
ban -k $chan $nick uç
}
}
}

Emrax

02 Ocak 2010 23:11

Cevap: Muaf ident sorunu yardım

[23:09:25] * Ayrıldı: WqkjasDs (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[23:09:26] * Giriş: WqkjasDs (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[23:09:30] * X-ir mod değiştirdi:+b *!*@141B8971.199DC7D0.71A06DCE.IP

Hocam dediğiniz gibi yaptım ama yine banlı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 ($randomnick($nick)) {
if $read(ident.txt,w,$gettok($gettok($address($nick,5 ),2,33),1,64)) { halt }
else {
ban -k $chan $nick 0,1X-ir 5,1Security 0,1System5,1™9,1[0,1Råñdøm 0,1ñi¢k9,1]
}
}
}

#random end

Kod bu şekilde.Çözemedim neden böyle olduğunu :S

Fr33	11 Mart 2010 12:37

Cevap: Muaf ident sorunu yardım

X-ir, oper/admin değilsen bulunduğun Sunucu da bu tür saldırılar da lagta kalman korumalarının işlev yapmaması normal oper/admin olmanın en güzel yönlerinden biri bence LAG sorunu daha az yaşaman Operatörlere göre yapılacak pek birşey yoktur kanal saldırıların da koruma yerine bence kanal modelerine odaklan daha faydalı olacaktır. Proxy iplere +b atsan da ne fark eder

Alıntı:

X-ir Nickli Üyeden Alıntı (Mesaj 1040285444)

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

----------

X-ir, valla isteğini karşılar mı bilmem bu Random koruması Random ident ve nickleri algılıyor ve gline atıyor nick ve random mu? gzline nick normal ident random yine gzline atar ident normal nick random yine gzline atar(; istersen denersin CODE ;
alias randomnick if ($randn2($1)) || ($randn($1)) { return $true } | else { return $false }
alias randn2 {
if $1- isalpha && $1- islower {
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 && $1- islower {
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:#:{
var %identd = $gettok($gettok($address($nick,5),1,64),2,33),-1)
if ($randomnick($nick)) || ($randomnick(%identd)) { gzline $nick random 4Y5ou 4h5ave 4r5andom 4n5ick14/4i5dentd. 4p5lease 4c5hange 4y5our 4n5ick14/4i5dentd
}

Alıntı:

X-ir Nickli Üyeden Alıntı (Mesaj 1040285452)

Hocam random nick koruması değil istediğim hem nicki hem identi random olduğunda atması.Diğer türlü atmaması

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