Çevrimdışı

Merhaba Unvan Aldıktan Sonra Yardım Istemek Garip Geliyor Ama Bilmemek Ayip Deil Ögrenmemek Ayip..

alias nchnge {
var %a = B C D F G H J K L M N P Q R S T V W X Y Z
var %b = a e i o u
var %c = b c d f g h j k l m n p q r s t v w x y z
var %d = a e i o u
var %e = b c d f g h j k l m n p q r s t v w x y z
var %f = a e i o u
var %g = $gettok(%b,$rand(1,$numtok(%b,32)),32)
var %h = $gettok(%d,$rand(1,$numtok(%d,32)),32)
var %i = $gettok(%f,$rand(1,$numtok(%f,32)),32)
var %j = $gettok(%a,$rand(1,$numtok(%a,32)),32)
var %k = $gettok(%c,$rand(1,$numtok(%c,32)),32)
var %l = $gettok(%e,$rand(1,$numtok(%e,32)),32)
echo -a %g $+ %j $+ %h $+ %k
}

Böyle Bir Random Codenin Anti Randomu Yapilabilirmi Eger Ilgilenicek Arkadaş Var Ise Ogretici Bir Şekilde Acıklarsa Cok Sevinirim..

 

Çevrimdışı

%a ünsüz büyük harfler, %b %d ve %f ünlü küçük harfler, %c ve %e ünsüz küçük harfler
%g ünsüz büyük harflerden her hangi bir harf alıyor.
%h ve %i ünlü küçük harflerden her hangi bir harf alıyor.
%j ünsüz büyük harflerden her hangi bir harf alıyor.
%k ünsüz küçük harflerden her hangi bir harf alıyor.
%l ünsüz küçük harflerden her hangi bir harf alıyor.

echolayan ise: ünsüz büyük harf + ünsüz büyük harf + ünlü küçük harf + ünsüz küçük harf

2 ünsüz büyük harf, 1 ünlü küçük harf, 1 ünsüz küçük harf

$regex() ile yapmak en mantıklısı yani

alias cir { if $len($1) == 4 && $isupper($mid($1,1,2)) && $islower($mid($1,3)) { return $iif($regex($1,/[^AEIOU]{2}[aeiou][^aeiou]/),$true,$false) } | else { return $false } }

$cir(<text>), eğer <text> 4 karakterse, ilk 2 karakteri büyük harf, diğer 2si küçük harf, bu ilk 2 harf ünsüz, 3. harf ünlü, 4. harf ünsüz ise $true olacaktır, aksi takdirde $false.

Umarım işine yarar..

 

Çevrimdışı

el33t Nickli Üyeden Alıntı

%a ünsüz büyük harfler, %b %d ve %f ünlü küçük harfler, %c ve %e ünsüz küçük harfler %g ünsüz büyük harflerden her hangi bir harf alıyor. %h ve %i ünlü küçük harflerden her hangi bir harf alıyor. %j ünsüz büyük harflerden her hangi bir harf alıyor. %k ünsüz küçük harflerden her hangi bir harf alıyor. %l ünsüz küçük harflerden her hangi bir harf alıyor. echolayan ise: ünsüz büyük harf + ünsüz büyük harf + ünlü küçük harf + ünsüz küçük harf 2 ünsüz büyük harf, 1 ünlü küçük harf, 1 ünsüz küçük harf $regex() ile yapmak en mantıklısı yani alias cir { if $len($1) == 4 && $isupper($mid($1,1,2)) && $islower($mid($1,3)) { return $iif($regex($1,/[^AEIOU]{2}[aeiou][^aeiou]/),$true,$false) } | else { return $false } } $cir(<text>), eğer <text> 4 karakterse, ilk 2 karakteri büyük harf, diğer 2si küçük harf, bu ilk 2 harf ünsüz, 3. harf ünlü, 4. harf ünsüz ise $true olacaktır, aksi takdirde $false. Umarım işine yarar..

alias cir { if $len($1) == 6 && $mid($1,1,2) && $mid($1,3) { return $iif($regex($1,/[^AEIOU]{2}[aeiou][^aeiou]/),$true,$false) } | else { return $false } }

olarak değiştireceğim ama Regexte nerdeyse hiç bilgim yok ögretilenlerden yapmaya çalıştım veya aceleye denk geldi codedeki benim deiştirdiğim turuncu yazidaki kahverengi ve kalın bölümü nerede ne yapildiğini açıklarmısın ben oraya şu mantıgı eklemek istiyorum 6 haneli nick te 2. ve 3. ( arttırılabilir 4. dü olabilir ) harf sessiz ise Belirttiğim bölümde neler oldugunu acıklarsan sevinirim teşekkürler.

 

Çevrimdışı

$regex($1,/[^AEIOU]{2}[aeiou][^aeiou]/)

Eğer ilk 2 harf AEIOU dışındaki harflerse (yani ünsüzler)
3. harf a, e, i, o ya da u ise;
4. harf a, e, i, o, u dışındaki harfler ise (yani ünsüzler)

regex eşleşmiş olacaktır yani 1 değerini alacaktır.

bir kelimenin 2 ve 3. harflerini almak için şunu kullanabilirsin.
$mid($1,2,2) 2. harf ve ondan sonraki harfi alacaktır, yani 2. ve 3. harf. Eğer bunun 4. harfide almasını istiyorsan $mid($1,2,3) olarak değiştirebilirsin. Bunların sessiz harf olmalarını kontrol etmek istersende;

$regex($mid($1,2,2),/[^aeiou]{2}/)

kullanabilirsin. Koyu ile gösterdiğim en az kaç tane ünsüz harf olması gerektiği. Eğer $mid($1,2,3) kullanacaksan o sayıyı da 3 ile değiştirmen gerekir.

Umarım daha iyi anlamışsındır.

 

Çevrimdışı

el33t Nickli Üyeden Alıntı

$regex($1,/[^AEIOU]{2}[aeiou][^aeiou]/) Eğer ilk 2 harf AEIOU dışındaki harflerse (yani ünsüzler) 3. harf a, e, i, o ya da u ise; 4. harf a, e, i, o, u dışındaki harfler ise (yani ünsüzler) regex eşleşmiş olacaktır yani 1 değerini alacaktır. bir kelimenin 2 ve 3. harflerini almak için şunu kullanabilirsin. $mid($1,2,2) 2. harf ve ondan sonraki harfi alacaktır, yani 2. ve 3. harf. Eğer bunun 4. harfide almasını istiyorsan $mid($1,2,3) olarak değiştirebilirsin. Bunların sessiz harf olmalarını kontrol etmek istersende; $regex($mid($1,2,2),/[^aeiou]{2}/) kullanabilirsin. Koyu ile gösterdiğim en az kaç tane ünsüz harf olması gerektiği. Eğer $mid($1,2,3) kullanacaksan o sayıyı da 3 ile değiştirmen gerekir. Umarım daha iyi anlamışsındır.

on *:join:#:{ set %N+ $len($nick) { if $cir($nick) { cs akick $chan $address($nick,2) Random Nick V3 | cs akick $chan enforce | cs akick $chan del $address($nick,2) } }
}

alias cir { if $len($1) >= %N+ { return $iif($regex($1,/[aeiou][^aeiou]{2}/),$true,$false) } | else { return $false } }


Gerçekten Harikasın el33t Seni Takip eden Adam Gercekten Birşeyler Öğrenebilir Bu öğrettiklerin sayesinde Yukarıdaki codeyi Yarattim Şu an Stajda Oldugum Icin Deneyemiyorum zamandan Tasarruf Etmek Icin Buraya Dogru olup Olmadıgını Veya Hatam Olup Olmadıgını Ogrenmek Icin Koyuyorum Ki Hemen Düzelteyim..
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Tekrardan Cok cok Cok TeşekkürLer..

 

Çevrimdışı

#randomV3 off
on *:join:#d-bana:{ set %N+ $len($nick) { if $cir($nick) { cs akick $chan add $address($nick,2) Random Nick V3 | cs akick $chan enforce | cs akick $chan del $address($nick,2) } }
}
alias cir { if $len($1) >= %N+ { if $regex($1,/[aeiou][^aeiou]{2}/) { return $true } | else { return $false } }
#randomV3 end

el33t senin codeden yola cıkarak En son bunu yapdim Ama Bu NickLeride Atiyor..

[11:45] * ChanServ sets mode: +b
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[11:45] * nur_000 was kicked by ChanServ (AKICK by mmX (Random Nick V3))

[11:45] * ChanServ sets mode: +b
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[11:45] * Kacakv-4- was kicked by ChanServ (AKICK by mmX (Random Nick V3))

[11:45] * ChanServ sets mode: +b
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[11:45] * Guest4567 was kicked by ChanServ (AKICK by mmX (Random Nick V3))


Benim Atmak Istediğim Nickler Bunlar..

ufhxo
ocdiio

Bu tip yani 1. nick sesli 2. ve 3. harfi sessiz geri kalanı sesli ise atsin veya 1. nick sesli 2. 3. ve 4. harfi sessiz dierleri sessiz ise atsin die

$regex($1,/[aeiou][^aeiou]{2}/)

Codesini Yabdim olmuyorr.. nerede Yanlış lık varki..

 

Çevrimdışı

Şunu dene istersen:

alias ardv3 { if $regex($1,/[aeiou]{1}/) { if ($regex($mid($1,2,3),/[^aeiou]{3}/) && $regex($mid($1,5),/[aeiou]/)) || ($regex($mid($1,2,2),/[^aeiou]{2}/) && $regex($mid($1,4),/[aieou]{ $+ $len($mid($1,4)) $+ }/)) { return $true } } | return $false }

$ardv3(ufhxo) -- $true
$ardv3(ocdiio) -- $true
$ardv3(Guest4567) -- $false

Umarım işine yarar..

 

Çevrimdışı

This message has been deleted by [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]. Sebep: Anlamaya başlasan iyi olur, istek kod yazmıyoruz

peki ilgin için saol

Giriş: ufwiek (????
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
Giriş: axvie (??????
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
Giriş: ivyzoi (?????
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
Giriş: idyaprvu (?????
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

random nickler a ve b kanalına giriyorlar sanrasında bütün kanallardan part edip statüde bekliyorlar

71174.28.11.vie.surfer.at) has changed his/her nickname to evbd
changed his/her nickname to awmcuqovu
bunun gibi söle bişey denedim ama faydası olmadı

raw 352:*: {
if serv !isin $6 {
if *#* !iswm $2 {
gline $6 bot olararak tanındınız
halt
}
}
}

/who kanalda olmayana gine [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] elimden geleni yapmaya çalıştım ama olmadı yardım erdersen sevinirim

 

Çevrimdışı

on !*:PART:#: if (*Left all Channels* iswm $1-) { Gline $nick 86000 Is Trojan Dedected. }

birdE Şu kodu Dene bakalım. butun kanallardan part yapiyorlar diyorsun tahminen Left all Channels yapiyorlar bu kodu dene işine yarıyacağından eminim . iyi çalışmalar.

 

djiNN GLOBAL script yapıyor sanırım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) fakat coder mmX yazmazsan emeğe saygısızlık yamamıs olursun
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.