IRCForumu.Net - Türkiye'nin IRC ve mIRC Forumu


Damlasu ircforumu


Yeni Konu aç Cevapla
 
LinkBack Seçenekler Arama Stil
Alt 24 Eylül 2016, 19:30   #1
Aborjini
Guest

Random Nick Korumasi Hk.


Reklam

Selamlar;
Elimde bu şekilde bir random koruması var..
Kanala giren sessiz veya sesli harf nicklerde işlem yapmıyor..
Hata nerde bulamadım..
Yardimci olursanız sevınırım, kolay gelsın.


alias rands { if (($regex($1,/[qwrtypğsdfghjklşzxcvbnmç]{ $+ $(%trosessizsayi) $+ }/i)) || ($regex($1,/[qüöıaeiou]{ $+ $(%troseslisayi) $+ }/i))) { return $true } | else { return $false } }


dialog RandomNick {
title "Random Korumasi"
size -1 -1 179 92
option notheme dbu
edit "", 3, 153 22 13 10
edit "", 4, 153 33 13 10
text "Nick'de kac adet sessiz harf yanyana olunca banlasın.? ", 30, 13 23 137 8
text "Nick'de kac adet sesli harf yanyana olunca banlasın.? ", 40, 13 34 137 8
text "Durum : ", 50, 13 46 25 8
edit "", 6, 42 45 124 10
button "Ac", 7, 11 68 50 12
button "Kapat", 8, 63 68 50 12
button "Dialogu Kapat", 13, 115 68 51 12, ok flat
box "Islemler : ", 100, 8 11 162 50
box "", 110, 8 60 162 24
box "Random Nick Korumasi :", 120, 3 3 172 86
}

on *:dialog:RandomNick:*:*:{
if ($devent == init) {
did -ra $dname 6 %trojandurum
did -ra $dname 4 %troseslisayi
did -ra $dname 3 %trosessizsayi

}
if ($devent == sclick) {
if ($did == 7) { .enable #trocanz | set %trojandurum Random Nick Koruma Acik | dialog -x $dname $dname | dialog -m RandomNick RandomNick }
if ($did == 8) { .disable #trocanz | set %trojandurum Random Nick Koruma Kapali | dialog -x $dname $dname | dialog -m RandomNick RandomNick }
if ($did == 13) { set %trosessizsayi $did(3) | set %troseslisayi $did(4) }
}
}




















#trocanz on
on *:JOIN:#:{
if ($rands($nick) == $true) && ($me isop $chan) && ($me isop #karantina) {
.mode $chan +b $nick
kick # $nick 14[ 4Random  Nick Koruması.!14 ] 12Lütfen Nickinizi Değiştirip Tekrar Deneyiniz.! }
}

#trocanz end
Selamlar;
Elimde bu şekilde bir random koruması var..
Kanala giren sessiz veya sesli harf nicklerde işlem yapmıyor..
Hata nerde bulamadım..
Yardimci olursanız sevınırım, kolay gelsın.


alias rands { if (($regex($1,/[qwrtypğsdfghjklşzxcvbnmç]{ $+ $(%trosessizsayi) $+ }/i)) || ($regex($1,/[qüöıaeiou]{ $+ $(%troseslisayi) $+ }/i))) { return $true } | else { return $false } }


dialog RandomNick {
title "Random Korumasi"
size -1 -1 179 92
option notheme dbu
edit "", 3, 153 22 13 10
edit "", 4, 153 33 13 10
text "Nick'de kac adet sessiz harf yanyana olunca banlasın.? ", 30, 13 23 137 8
text "Nick'de kac adet sesli harf yanyana olunca banlasın.? ", 40, 13 34 137 8
text "Durum : ", 50, 13 46 25 8
edit "", 6, 42 45 124 10
button "Ac", 7, 11 68 50 12
button "Kapat", 8, 63 68 50 12
button "Dialogu Kapat", 13, 115 68 51 12, ok flat
box "Islemler : ", 100, 8 11 162 50
box "", 110, 8 60 162 24
box "Random Nick Korumasi :", 120, 3 3 172 86
}

on *:dialog:RandomNick:*:*:{
if ($devent == init) {
did -ra $dname 6 %trojandurum
did -ra $dname 4 %troseslisayi
did -ra $dname 3 %trosessizsayi

}
if ($devent == sclick) {
if ($did == 7) { .enable #trocanz | set %trojandurum Random Nick Koruma Acik | dialog -x $dname $dname | dialog -m RandomNick RandomNick }
if ($did == 8) { .disable #trocanz | set %trojandurum Random Nick Koruma Kapali | dialog -x $dname $dname | dialog -m RandomNick RandomNick }
if ($did == 13) { set %trosessizsayi $did(3) | set %troseslisayi $did(4) }
}
}




















#trocanz on
on *:JOIN:#:{
if ($rands($nick) == $true) && ($me isop $chan) && ($me isop #karantina) {
.mode $chan +b $nick
kick # $nick 14[ 4Random  Nick Koruması.!14 ] 12Lütfen Nickinizi Değiştirip Tekrar Deneyiniz.! }
}

#trocanz end
  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı

Cevapla

Etiketler
korumasi, nick, random, yardım
IRCForumu.Net - Sponsor Bağlantılar


Seçenekler Arama
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
IF - Nick Değişim ve Düzenlemeleri IF Yönetimden Talepler 4 25 Ocak 2022 21:12