IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Random konusunda yardım edebilirmisiniz ?

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Random konusunda yardım edebilirmisiniz ? (https://www.ircforumlari.net/mirc-scripting-sorunlari/177168-random-konusunda-yardim-edebilirmisiniz.html)

Random konusunda yardım edebilirmisiniz ?

Kod:

[23:26] *** Ayrıldı: opuzmhr (tm@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: ytpvirnxs (ur@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: wjldqimyr (pr@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: iyxsk (nl@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: hwfxu (wb@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: qwepf (ur@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: rxdjfem (af@88.244.175.=XXX) (Kanaldan Ayrildi)

Bu akşam bu şekilde random saldırısı aldım. 2 haneli identleri spmafilter ile yasakladım.. İdentlerin değişeceğini göz önüne alarak bu randomu nasıl engelleyebilirim ?

Cevap: Random konusunda yardım edebilirmisiniz ?

Alıntı:

Ask_Harfleri Nickli Üyeden Alıntı (Mesaj 632531)

Kod:

[23:26] *** Ayrıldı: opuzmhr (tm@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: ytpvirnxs (ur@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: wjldqimyr (pr@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: iyxsk (nl@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: hwfxu (wb@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: qwepf (ur@88.244.175.=XXX) (Kanaldan Ayrildi)

[23:26] *** Ayrıldı: rxdjfem (af@88.244.175.=XXX) (Kanaldan Ayrildi)

Bu akşam bu şekilde random saldırısı aldım. 2 haneli identleri spmafilter ile yasakladım.. İdentlerin değişeceğini göz önüne alarak bu randomu nasıl engelleyebilirim ?

Kod:


 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 }
 }
 }
 menu channel,status {
 Random Nick Koruması
 Aç :.enable #random | echo -at Random Nick Koruması Acılmışdır.
 kapat:.disable #random | echo -at Random Nick Koruması Kapatılmışdır.
 }
 #random off
 on !*:join:#:if ($randomnick($nick)) { /ban -u900 # $nick 2 | kick # $nick 4Random Nick! }
 #random end

kullanım şekli:

Kod:

;on !*:join:#:if ($randomnick($nick)) { işlev }
 on !*:join:#:if ($randomnick($nick)) { kill $nick random nick kullanmayın! }
 on !*:join:#:if ($randomnick($nick)) { gzline $nick +1h random nick kullanmayın! }

kod kullanımını echo olarak test edipte sunuyorum ve test sonuçları;
random nick : myjk
random nick : uipgrznytk
random nick : jcyeszdvnx
random nick : snrijyhodx
random nick : uqjzmlxck
random nick : harybwkv
random nick : harybwkv
random nick : aobfdxniq
random nick : nhxrlzydvku
random nick : gboylujnzap
random nick : wkghmsv
random nick : styi
random nick : osvxhiyta
random nick : rsfdoknchv
random nick : crdxvwbkpo
random nick : ytsapnzde
random nick : phtsmqegwxb
random nick : oavuptgh
random nick : zdcl
random nick : vtlanz
random nick : ybqulr
random nick : ybqulr
random nick : atjbs
random nick : tusxbgl
random nick : sgrud
random nick : tqwfbdpvmj
random nick : fwqykxp
random nick : xvyj
random nick : mhcviolyj
random nick : rqdwoutvfx
random nick : cpzvhewql
random nick : nlyfsvxkc
random nick : lvtzij
random nick : zjyxbtlvd
random nick : wxmbztuhyiq
random nick : pdbk
random nick : repqwji
random nick : uxqekirnyh
random nick : ylzehqgidna
random nick : ueigrdx
random nick : uklcgwat
random nick : paxrdkhb
random nick : lwfckbyxeu
random nick : gtzsebix
random nick : cqtsv
random nick : uqhvbmolg
random nick : dbzmyghkoa
random nick : skvlwgy
random nick : xbjoswmfr
random nick : gfqtjryhmxv
random nick : kqjix
random nick : qwerty
random nick : dfnhjgk
random nick : myway

sc5 clone işlemi için yapmış olduğum bir kodlamadır.
esinlenme CipriX (cem) arkadaşımın sayesindedir.
"randn2" aliases kodlaması başka birinden alınıp geliştirilmiştir.
ve bundan esinlenerek "randn" aliasesini yapılmıştır.
"randn" aliases ise tamamiyle kendime aittir.

İşini görür sanırım.. Random Nickle Giriş Yapanlar Otomatik Olarak mIRC'den Kicklenecektir, kırmızı olarak işaretlediğim yeri, zline kline vs. değiştirirsen Çalışır, iyi Forumlar.

Not; XcLusive 'ye aittir Code. Olduğu gibi buraya aktardim.

Cevap: Random konusunda yardım edebilirmisiniz ?

Bota bunu ekledim ama ban+kick yapmadı.Verdiğiniz random nicklerede girdim ama hala atmıyo :S

Cevap: Random konusunda yardım edebilirmisiniz ?

Kod:

 

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)) { ban -k $chan $nick 2 random nick/ident kullanımı yasaktır.. }

}

Bu şekilde dene, çalışacaktır.

Cevap: Random konusunda yardım edebilirmisiniz ?

Hocam bu kod hemidenti hemde nicki random olanları atıyor dimi?Yani sadece nicki random olanları değilde hem identi dem nicki random olanları atmasını istiyorum.

Cevap: Random konusunda yardım edebilirmisiniz ?

on !*:join:#:{
var %identd = $gettok($gettok($address($nick,5),1,64),2,33),-1)
if ($randomnick($nick)) || ($randomnick(%identd)) { ban -k $chan $nick 2 random nick/ident kullanımı yasaktır.. }
}
bunu

on !*:join:#:{
var %identd = $gettok($gettok($address($nick,5),1,64),2,33),-1)
if ($randomnick($nick)) && ($randomnick(%identd)) { ban -k $chan $nick 2 random nick/ident kullanımı yasaktır.. }
}

olarak değiştirirsen istediğin olur

Cevap: Random konusunda yardım edebilirmisiniz ?

Hocam abartmıyorum dün geceden beri bunu arıyorum gözlerim şişti uykusuzluktan.Çok sağolun.Elinize kolunuza sağlık kodu denicem.Sorun çıkarsa bildiririm hocam.

----------

Peki hocam join değilde connect için yaparsak
on !*join.. diye başlayan yeri

on *:snotice:*client connecting*:{
olarak mı değiştirmemiz gerekiyor?

----------

[10:37:14] * Ayrıldı: mIRCIndir-92154 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:37:14] * Giriş: mIRCIndir-92154 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:37:57] * mIRCIndir-92154 Nick değişerek sdjkhsadjsd Oldu
[10:38:04] * Ayrıldı: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:38:04] * Giriş: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:38:43] * Ayrıldı: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:38:43] * Giriş: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:39:42] * Ayrıldı: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:39:43] * Giriş: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:39:43] * X-ir mod değiştirdi:+b *!*@2DD80C33.199DC7D0.71A06DCE.IP
[10:39:44] * sdjkhsadjsd X-ir Tarafından Kanaldan Atıldı (random nick/ident kullanımı yasaktır..)

Yukarda gördüğünüz gibi kod çalışıyor arkadaşlar.Eğer sunucunuza identi ve nick i random olan botlar giriyor ve user atmak istemiyorsanız mükemmel bir kod..Emeği geçen herkese teşekkürler..

Cevap: Random konusunda yardım edebilirmisiniz ?

Hocam kod sadece 1 kez çalıştı :S

Cevap: Random konusunda yardım edebilirmisiniz ?

kodun çalışması için hem nickin hemde identin random olması gerek en azından öyle algılamalı.
nick random ident normal olursa işlem yapmaz veya tam tersi olursa gene işlem yapmaz. hem nick hemde ident'in random olması lazım ki kod çalışsın.

Cevap: Random konusunda yardım edebilirmisiniz ?

Evet hocam aynı dediğiniz gibi nick ve ident birlikte random olunca işlem yapıyor.Ancak sorunun ne olduğunu buldum.Büyük küçük harf duyarsız kod.yani wFGJHjhSsds nickleri bu yada identi bu olanları atmıyor.Hepsinin küçük olması lazım.Acaba büyük küçük harf algılayabilen şekle getirebilir miyiz?