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

Sayfa 1 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

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

- - Random Nick Koruması Hakkında... (https://www.ircforumlari.net/mirc-scripting-sorunlari/6307-random-nick-korumasi-hakkinda.html)

yozgatli6644

10 Ağustos 2005 10:49

Random Nick Koruması Hakkında...

Ya ArkadaşLar Random Nick die verdiginiz Kod cok quzeL gercekden begendim Fakat O LitmuSlar icin bir de Trojen tipi

auoeikjf

eiounmi

aueioia

Gibi NickLeri atmıor Ve bunLar Benim Serverime Aşırı derecede giriş cıkısı oLuyor Ondan doLayı Sesli Harflerin buLundugu En az 3 veya 4 sesli harfin yanyana gelerek oLuşan nickLeri atcak bir Random nick Koruması Varmı Cok İhtiyacım Var Yardım Edersebiz Sevinirim Abilerim... :(

goXXip

10 Ağustos 2005 10:59

alias _random.nick {
var %k = 1
while %k <= 3 {
var %r = $mid($1,%k,1)
if %r == a || %r == e || %r == u || %r == o {
writeini random.ini RandomBan $1 %k
}
inc %k
}
if $readini(random.ini,randomban,$1) == 3 {
return $true
}
}

on 1:join:#: {
if $_random.nick($nick) {
ban $chan $nick 2
kick $chan $nick Random Nick!..
}
}

Denemedim ama Çalışır Herhalde

goXXip

10 Ağustos 2005 11:08

while %k <= 3 { ve if $readini(random.ini,randomban,$1) == 3 Buradaki 3 ü 4 yaparsan 4 tane sesli harf yanyana olanlarda arayacaktır.

yozgatli6644

10 Ağustos 2005 11:26

Valla goXXip Cok tşk Ederim..Ayrıca Code Calısmadı Neden calıSmadı biLmiorum...Ama Ben Bunun Alias ını kuLLanırken /_random.nick $nick Script Donuyor...BagLantım Kopuor.. GONDERMEDE HATA ....diyoR...Sende calIsdımı [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] mSn in bekLerim abi

goXXip

10 Ağustos 2005 11:28

Kodu bir daha al

yozgatli6644

10 Ağustos 2005 11:38

aLdım fakat gene aynıda birSey gozume carptı ordaki ayrac [ { - } ] Larda biR oynama oLuor ve on 1:join 1 aralık Öne gecioR..Ondan oLabiLirmi..abi..?

goXXip

10 Ağustos 2005 11:44

Ben hala bir hata göremedim....

yozgatli6644

10 Ağustos 2005 11:47

valla abim Ben Yapdım...O nickLer Join Yapınca hiç bir tEpki goStermior Script...Statuse Bakıorum hic bişi yok ne +b ne kiCk hic bişi yok....

goXXip

10 Ağustos 2005 12:03

Kod [code] taglarının içinden kopyala yapıştır ile alınca hata veriyormuş yeni farkettim. O yüzden tekrar al...

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

yozgatli6644

10 Ağustos 2005 12:55

Olmuor abim Ya olmuor Deli oLdum Bana bunu Tam aNlamıLa aCıkLarmıSın abim..Seni Dosya adından Nereye Koyduguna Kadar HerSeyi anLat...OlDU BU sefer Dedigini Yapdım dizin den yuKle.. Secenegi iLe yükLedim codE u Fakat Banı Atmıor...Anlamadım gitti...Deli oLdum... off :(((

yozgatli6644

10 Ağustos 2005 13:15

Valla Teşekkürler abim..sONUNda Yapdım Hakkını Nasıl Oderim biLmiorum Ama MukemmeLsin hea biŞeyi daha Unutmayalım kimSe 4 4 Lük deiLdir... mJx Öpdüm vaLLa cok tşk ederim iŞime yaradı

BURA MUKEMMEL BİR YER YAA DAHA 3 GUN OLDU KATILALI MUKEMMEL BİLGİLERİM OLDU

MODERATORÜ YAPIMCISI MASTERİ YONETİCİSİ VE UYELERİ OLSUN HERKESE TEŞEKKÜR EDERİM sÜPPERSİNİZ....RASTLADIGIM EN İYİ IRC FORUM BURA TEKRAR TEŞEKKÜRLER...

goXXip

10 Ağustos 2005 13:34

Alıntı:

yozgatli6644 Nickli Üyeden Alıntı

Estağfirullah :)

yozgatli6644

10 Ağustos 2005 13:40

Gene Bak Yaaa Ya bu Code Duz mIRC a koyuorum oLuor HerseyiLe Tamam Ama Baska biR mıRC a Kendi Mırc ıma Koyunca CalISmıyooooor.. :(

yozgatli6644

10 Ağustos 2005 14:12

duz mIRC da oLuor ama Benim mIRcımda oLmuor yaa nEdEnnnnn ?

MuJaX

11 Ağustos 2005 11:05

/Remote on Yaz Ya Usta Bu İçinde 3 Tane Sesli GeçenLeri Atıyo Yan Yana oLanLarı Atan bi Tane yOq mu ¿

yozgatli6644

11 Ağustos 2005 11:34

goxxip sana ne kadar Tesekkur etsem Azdır Cok Tesekkurler abim Senle Tanısmak İsterdim.. abim Öpdüm ;) mJx HarikaSınız

MujAx Arkadasım Sen Aradıgın Code u bLack arkadasımızın yoLLadıgı Random nick Ban isimLi konuda buLabİlİRSİn MuJaX ;))

aSii_GeNc

11 Ağustos 2005 13:28

goXXip e teessüf

Ben sana bölemi öğrettim çağrı.
Aşkolsun :(

Kod:

 

alias _ran {

var %i = 1

while $mid($3,%i,1) {

        var %a = a.i.o.u.e

        if ($istok(%a,$mid($3,%i,1),46)) {

         var %is = $1,%im = 0

         while %is {

                if ($istok(%a,$mid($3,$calc(%i + %is - 1),1),46)) {

                 inc %im

                }

                if (%im == $1) { return evet }

                if ($calc((%i + %im) -1) >= $2) { return }

                dec %is

         }

        }

        inc %i

}

}

Kullanımı: $_ran(<kaç sesli harf yanyana>,<kaçıncı karaktere kadar>,<kelime>)
Yukardaki kod ne işe yari ?
Kısaca anlatmak gerekirse kelime içerisindeki yan yana sesli harfleri arıyor.
Bunu yaparken kaç sesli harf ve nickin baştan kaçıncı karakterine kadar olanını belirtmeniz gerekiyor :P
Yani: //echo $_ran(3,3,aiobnvx) | evet döner
Anlamıda 3 sesli harf yanyana 3 üncü karaktere kadar yani çağrınınkiyle aynı. :)
Örn1: //echo $_ran(3,5,bbaio) | buda evet döner son sesli harf 5. karakterde. Ve 3 sesli harf yanyana.
Örn2: //echo $_ran(3,5,selmaaaa) | bu dönmeyecektir. :)
yozgatli6644
Yukardaki aliases in altına şunu yaz yeter.
on 1:join:#: { if $_ran(3,4,$nick) { ban -k # $nick 2 Random Dedected } }

Code By aSii_GeNc

eviL	11 Ağustos 2005 14:57

Alıntı:

aSii_GeNc Nickli Üyeden Alıntı

Ben sana bölemi öğrettim çağrı.
Aşkolsun :(

[CODE]
alias _ran {
var %i = 1
while $mid($3,%i,1) {
var %a = a.i.o.u.e
if ($istok(%a,$mid($3,%i,1),46)) {
var %is = $1,%im = 0
while %is {
if ($istok(%a,$mid($3,$calc(%i + %is - 1),1),46)) {
inc %im
}
if (%im == $1) { return evet }
if ($calc((%i + %im) -1) >= $2) { return }
dec %is
}
}
inc %i
}
}

}
}
da ekleyin remotede :P

aSii_GeNc

11 Ağustos 2005 16:12

Çalıştıramadaım de de doğru olsun eviL :D

yozgatli6644

11 Ağustos 2005 16:20

aSii_genC Abim Goxxip abinin Verdigi iLe senin Verdigini Ayrı Ayrı RemotelErimi kOycam yokSa SadecE Seninkinimi kuLLancam ? abi :)

CoCoRiCo

11 Ağustos 2005 17:30

Alıntı:

yozgatli6644 Nickli Üyeden Alıntı

aSii_genC Abim Goxxip abinin Verdigi iLe senin Verdigini Ayrı Ayrı RemotelErimi kOycam yokSa SadecE Seninkinimi kuLLancam ? abi :)

öncekini sil Asii nin verdigini kullan..

Alıntı:

aSii_GeNc Nickli Üyeden Alıntı

.....

aSii Regexleyin yumusacık olsun regsub layın mis gibi koksun :D

UOnur

11 Ağustos 2005 18:21

Takıl kafana Göre yozgatlı...

ztn Gençler çoşmuş gitmiş :)

yozgatli6644

11 Ağustos 2005 18:39

Eywalalh Saolun ArkadaşLar mJx opdum Herkesi UOnur cok tatlısın yaa :)) ben bayılıosam kızlar ohooo :)) mJx tekrar

UOnur

11 Ağustos 2005 19:25

haha keşke kız olsaydın :D

aSii_GeNc

11 Ağustos 2005 20:57

Alıntı:

©º©º®î©º Nickli Üyeden Alıntı

öncekini sil Asii nin verdigini kullan..

aSii Regexleyin yumusacık olsun regsub layın mis gibi koksun :D

Regex kasii :) ümit ama aklımda şu işleri yoluna koem :P
Bu arada while ile ilgili bir dll var onu kullanırsanız saldırılarda mIRC a.g.d. olmaz :)

UOnur

11 Ağustos 2005 21:48

a.g.d. aklıma gelen şeymi :D

aSii_GeNc

11 Ağustos 2005 22:48

Türkçe işte :P

yozgatli6644

12 Ağustos 2005 10:40

:PPP öLe bişide Lasım oLabiLir donmamaSı icin scirptin ? :))

yozgatli6644

12 Ağustos 2005 11:01

Ya buNda Tag Lar oynuor diger turlu yukleyincede oynuor ... ayraclar .... tam aLtınamı koyam yokSa inc %i den sonramı yada en sonda gelen }
}
dan sonramı?

yozgatli6644

12 Ağustos 2005 11:07

ok yapdım mJx ladım uonur & asii_genC :) You are WonderfuLL & Supper mJxxxxxxxxx :) uoNur Sana klzmı yok canım ;) ayıbSIn :))

UOnur

12 Ağustos 2005 13:17

demi ya :) Bana kızmı Yok.
Hem kendileri kaybederler nerde bulacaklar benim gibisini ;)
Beni sevmeyen ölsün bee :)

MuJaX

12 Ağustos 2005 18:50

aSi genç aga Sen şimdi

Kod:

alias _ran {

  var %i = 1

  while $mid($3,%i,1) {

         var %a = a.i.o.u.e

         if ($istok(%a,$mid($3,%i,1),46)) {

                var %is = $1,%im = 0

                while %is {

                  if ($istok(%a,$mid($3,$calc(%i + %is - 1),1),46)) {

                         inc %im

                        }

                        if (%im == $1) { return evet }

                        if ($calc((%i + %im) -1) >= $2) { return }

                        dec %is

                  }

                 }

                 inc %i

          }

        }

Kodunu verdin ya yanyana harflerle ilgili usta bu acaip kasıyo ya script dönüyo Bağlantım koptuktan sonra ;
[18:46] * Göndermede Hata ([10054] Bağlantı resetlendi.Tekrar Bağlanınız)
-
[18:46] * Bağlantınız Kesildi
-
*** Bütün Kanallar Kapatıldı...
-
* / : Servera bağlı değilsiniz (Satır 146, script3.ini)
Yazıyo bi Baqarmısın ¿

aSii_GeNc

12 Ağustos 2005 19:42

Gonul.net e gel #gonul ve #sohbet kanalında kodun çalışır halini gör :D
Sorun kodda değil...
Ama tavsiye istersen Türkçe mIRC kullanma...

UOnur

12 Ağustos 2005 20:23

PHP- Kodu:

   alias _ran {

  var %i = 1

  while $mid($3,%i,1) {

    var %a = a.i.o.u.e

    if ($istok(%a,$mid($3,%i,1),46)) {

      var %is = $1,%im = 0

      while %is {

        if ($istok(%a,$mid($3,$calc(%i + %is - 1),1),46)) {

          inc %im

        }

        if (%im == $1) { return evet }

        if ($calc((%i + %im) -1) >= $2) { return }

        dec %is

      }

    }

    inc %i

  }

}

Çalışmıo diyenin alnını çizerim :)

MuJaX

12 Ağustos 2005 21:51

Allah Razı oLsun UOnur Sende oLmaSan NapcaS biLmiom :D

UOnur

13 Ağustos 2005 14:54

her toplulukta bir kurtarıcı mevcuttur :)

MaeLStrOm

13 Ağustos 2005 16:15

bak sen :)

yozgatli6644

13 Ağustos 2005 16:24

Çok tşKler arkadaşLar İşime Yaradım Öpdüm Hepinizi Saolun ;)

MaeLStrOm

13 Ağustos 2005 16:29

bu arada asi_genc o donmaları engelleyen while dll dalgasını nasıl kurcaz sana zahmet bi anlatsana

yozgatli6644

13 Ağustos 2005 16:38

aSii_genc abi Öle biŞi var iSe EqeR gercEkden aNlatSan iyi Olur ;) maeLstrom ;)

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

Sayfa 1 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster