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

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

- - random nick korumasina uyari ekleme (https://www.ircforumlari.net/mirc-scripting-sorunlari/118636-random-nick-korumasina-uyari-ekleme.html)

random nick korumasina uyari ekleme

bu andom nick korumasina uyari eklememi\z mumkunmu.kanala giren usere bir dakika icerisinde nickinizi degisiniz aksi takdirde atilacaksiniz turunden.degismez ise bir dakika icerisinde atilsin,
#randomnick off
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 }
}
}
#randomnick end

Cevap: random nick korumasina uyari ekleme

@sondemdeyim bir süredir sürekli konu aciyorsunuz birseyler talep ediyorsunuz ama hicbir sekilde kendi kodunuzu yazmaya yoneldiginizi gormedim ya hazır kod veriyorsunuz yada sıfırdan yazılmasını talep ediyorsunuz.bu forumun genel mantigina aykiri, olmasi gereken siz biyere kadar yazarsınız tıkandıgınız yerde yardımcı olunur yanlis anlamayin bunu soylemekte kotu bir niyetim yok ama belirtmekte de fayda var ayrica konu guncel mesaj bekliyor turunden yazılar yazmayın mesajınız silinir.

Mesajın konuyla ilgili bölümüne gelince verdiginiz kod sadece random nick tespiti yapan alias, asıl korumayi olusturan event kismidir yani on *:join li olan(random nick giriste tespit edilecekse) buraya onu vermelisiniz ki uyari eklenebilsin.

Cevap: random nick korumasina uyari ekleme

Selamu Aleykum.

oncelikle sunu belirteyim.ihtiyac duydugum codelerde hic bir zaman arastirmadan konu acmadim.oyle bir sey yapsam buraya hazir code koymazdim.sil bastan code istemedim.istedigim iki konu vardi.bunlarda hakkinda hic code yazilmamis konular.uzerinde hic calisilmamis bir code hakkinda burada hazir code veremem.kendiyazdigim codeler var ama basit isler.henuz daha yeniyim.elimdeki codeyi veriyorum uzerinde degisiklik yapilmasini rica ediyorum.isteyen yardim eder istemeyen etmez.bunda foruma ters dusen seyi anlayamadim.
burada actigim her code tarafimdan denendi.beceremdiklerimi buraya aciyorum zaten.elimden bir sey gelse.konu acip uc bes gun cevabini bekleyecek degilim.
neyse canlar sag olsun bu son konum simdiye kadar yardimci olan herkesten ALLAH razi olsun.

#randomnick off
on @!*:join:#:if ($randomnick($nick)) { ban -k $chan $nick 2 4Lutfen Bir Dahaki Sefere Random Nick Kullanmayin Kurallara Dikkat Edelim! }
#randomnick end

Cevap: random nick korumasina uyari ekleme

Kod:

#randomnick off

on @!*:join:#:if ($randomnick($nick)) {

  var %t = $+($nick,.,$chan) | hinc -mu60 rndm %t 1

  if $hget(rndm,%t) == 1 { msg $chan uyari lütfen nickinizi değiştiriniz }

  if $hget(rndm,%t) == 2 { ban -k $chan $nick 2 4Lutfen Bir Dahaki Sefere Random Nick Kullanmayin Kurallara Dikkat Edelim! | hdel rndm %t  }

}

#randomnick end