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 Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   $_ran v2 RandomNick Yakalama Kodu (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/6580-_ran-v2-randomnick-yakalama-kodu.html)

aSii_GeNc 18 Ağustos 2005 19:03

$_ran v2 RandomNick Yakalama Kodu
 
; _ran(<kaç sesli harf>,<kaç sessiz harf>,<son karakter>,<kelime>)
PHP- Kodu:

alias _ran2 {
var %
a.i.o.u.e,%q.w.r.t.y.p.s.d.f.g.h.j.k.l.z.x.c.v.b.n.m,%1
while $mid($4,%i,1) {
if (
$istok(%a,$mid($4,%i,1),46)) { var %= %,%is = $}
elseif (
$istok(%b,$mid($4,%i,1),46)) { var %= %b,%is = $}
else { unset %
}
if %
{
var %
im 0,%ig = %is
while %is {
if (
$istok(%s,$mid($4,$calc((%+ %is) - 1),1),46)) {
inc %im
}
if (%
im >= %ig) { return evet }
if (
$calc((%+ %im) -1) >= $3) { return }
dec %is
}
}
inc %i
}



Bu daha önce verdiğim kod un sessiz harfleride bulanı :P
Bir kelime içerisindeki yan yana sesli yada sessiz harflerin olup olmadığını denetliyor.
on 1:join:#: { if $_ran2(3,3,6,$nick) { ban -k # $nick 2 Random Dedected } }
Yukarıdaki alias ın altına bunu eklerseniz baştan 6. karaktere kadar yan yana 3 sesli veya 3 sessiz harf görürse evet döner..

Code By aSii_GeNc :P

UOnur 18 Ağustos 2005 19:08

LeadeR Boynunuzdan Öper Hepiniz AKILLI Olun !
 
Güzel Güzelll :)
Trojana HAYIR!!!

CoCoRiCo 18 Ağustos 2005 19:23

regexxxxx regexxxxx isterizz :)

UOnur 18 Ağustos 2005 19:52

Kardeş Kodmu :)

CoCoRiCo 18 Ağustos 2005 19:57

neyse verdigim hatalı zaten cok hassas en iyisi silmek ::)

el33t 18 Ağustos 2005 22:19

Regex'te yeniyim, sadece basit şeyleri biliyorum

Sesli ya da sessiz 3 harf yanyanaysa aşağıdaki alias $true'ya dönüyo, değilse $false, (Remote'a koyuyorsunuz), Kırmızıyla yazılı olan 3 sayılarını kaç tane ünlü ya da ünsüz yanyana geldiğinde $true olmasını istiyosanız onunla değiştirebilirsiniz. Birincisi ünsüz harfler için, ikincisi ünlü harfler için)

alias grr { if (($regex($1,/[^aeiou]{3}/i)) || ($regex($1,/[aeiou]{3}/i))) { return $true } | else { return $false } }

Kullanımı:

$grr(aioselam) $true olacaktır çünkü aio sesli harfleri yanyana, ya da $grr(srrhello) da $true olacaktır çünkü srrh sessiz harfleri yanyana.

on @!*:join:#:{ if ($grr($nick)) { ban -k # $nick 2 random nick } }

Yukardaki kodu da koyarsak kanala giren nicklerden 3 sesli ya da sessiz harf yan yanaysa kanaldan atılırlar.. Ayrıca eğer nickin x karakter uzun olduğunda bu kodun çalışmasını istiyorsanız, aşağıdaki kırmızı X yazan yeri istediğiniz sayıyla değiştirip kullanabilirsiniz:

on @!*:join:#:{ if (($grr($nick)) && ($len($nick) > X)) { ban -k # $nick 2 random nick } }

Umarım işinize yarar..

aSii_GeNc 19 Ağustos 2005 12:02

İşte bu :)
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] gördünmü bebek :)

eviL 19 Ağustos 2005 12:19

bu adam mühteşem :P

BoSs 19 Ağustos 2005 12:27

waaooww anlamaya çalişiyorumama imkanı yok..

aSii_GeNc 19 Ağustos 2005 12:45

:)
o zaman grr ile benim kodu düzenleyeliimmm.
PHP- Kodu:

// grr2(<sesli sayısı>,<sessiz>,<son karakter>,<kelime>)
alias grr2 {
  var %
$mid($4,1,$3)
  if (($($+($,
regex,$chr(40),%s,$chr(44),/[^aeiou],$chr(123),$2,$chr(125),/i,$chr(41)),2)) || ($($+($,regex,$chr(40),%s,$chr(44),/[aeiou],$chr(123),$1,$chr(125),/i,$chr(41)),2))) { return $true } | else { return $false }


Benim kodla aynı görevi 2 satırda yapıyor.
Yani regex ruLaz...
on @!*:join:#:{ if $grr2(3,4,6,$nick) { ban -k # $nick 2 random nick } }


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

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net