Forum27 - Türkiye'nin En Büyük Forumu
 

Go Back   Forum27 - Türkiye'nin En Büyük Forumu > mIRC Scripting ve Sohbet Programları > mIRC Script Tanıtımları

Cevapla

 

LinkBack Seçenekler Stil
  #1  
Alt 4 August 2008, 19:29
Syst3m - ait Kullanıcı Resmi (Avatar)
Root Administrator
 
Kayıt Tarihi: 26 July 2008
Mesajlar: 3,551
Konular:
Aldığı Beğeni: 0 xx
Beğendiği Mesajlar: 0 xx
Standart Random Nick Koruması

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-,/([[rint:]])\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-,/([[rint:]])\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 }
}
}



kullanım şekli:

;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.
Alıntı ile Cevapla
Cevapla

Seçenekler
Stil



Saat: 20:29


Telif Hakları vBulletin® v3.8.9 Copyright ©2000 - 2019, ve
Jelsoft Enterprises Ltd.'e Aittir.
Tipobet forum Kameralı Sohbet Süpertotobet forum aktuel webmaster forum istanbul escort istanbul escort Betvole tipobet365 elexbet canlı maç izle elexbet tv izle elexbet maç izle elexbet elexbet tv elexbet giriş hiltonbet canlı hiltonbet hiltonbet tv hiltonbet şikayet pashagaming giriş ngsbahis tv ngsbahis güncel giriş

Search Engine Friendly URLs by vBSEO 3.6.0 PL2