 |
| Yazar |
Mesaj |
eXtreme
Kayıtlı Üye
Kayıt: 17.09.2006
Üye no: 89
Mesaj: 102
Başlık: 0
Şehir: Türkiye
2 Aşk puanı
|
|
 Random Nick Koruması |
|
|
4 seslı veya 4 sesiz harf yanyana gelınce ban+kick atmak ıstıyorum.yardımcı olabılecek varmı  CaKaL :kih
|
| |
|
 |
22 Ekm 2006 03:08 pm |
|
Mesaj: #1  |
| Yazar |
Mesaj |
aRaGoRn
Kayıtlı Üye
Kayıt: 21.10.2006
Üye no: 158
Mesaj: 66
Başlık: 0
Şehir: -Yolcu-
0 Aşk puanı
|
|
|
|
|
| Kod: |
on @!*:JOIN:#:{
if (!$regex($nick,/korunannick1|korunannick2/i)) {
tokenize 33 $gettok($fulladdress,1,64)
if (!$hget($+($chan,$cid,drone),$nick)) && (($len($1) > 4) || ($len($2) > 4)) && ($regex($1,/^[a-z]+$) && $regex($2,/^~?[a-z]+$)) {
if ($regex($1,/^[^aeiou]{4}/)) || ($regex($2,/^(~?)[^aeiou]{4}/)) { goto end }
elseif ($regex($1,/([a-z])\1{2}/)) || ($regex($2,/([a-z])\1{2}/)) { goto end }
elseif ($regex($1,/[aeiou]{4/)) || ($regex($2,/[aeiou]{4}/)) { goto end }
elseif ($regex($1,q[^u]) || $regex($2,q[^])) { goto end }
elseif ($regex($1,/[^aeioux]x[^aeiouyx]/)) || ($regex($2,/[^aeioux]x[^aeiouyx]/)) { goto end }
else { halt }
:end
if ($nick ison $chan) { ban $chan $nick 2 | .timer 1 600 mode $chan -b $address($nick,2) | kick $chan $nick (Random (Rastgele) Nick ve/veya Ident..)[Drones Kicked: $+(%d.k,]) | inc %d.k }
hadd -mu60 $+($chan,$cid,drone) $replace($fulladdress,!,$chr(32))
halt
}
;elseif ($regex($nick,/^[A-Z][a-z]+[^0-9][0-9]{2}$/)) && (Guest* !iswm $nick) { echo 4 -s ban -ku600 $chan $nick 2 autokicked: [exp/ma] You are infected with an IRC trojan/virus. }
}
|
Harika Çalışıyor ötesi yok Konunnick1 yazan Bölümlere banlanmasını istemediğin nickleri istediğin kadar yazabilirsin. Aralarına | karakteri koyarak tabiki... Banlar 600 snlik kafana göre editle..
|
| |
|
 |
23 Ekm 2006 11:53 pm |
|
| Mesaj: #2 |
| Yazar |
Mesaj |
eXtreme
Kayıtlı Üye
Kayıt: 17.09.2006
Üye no: 89
Mesaj: 102
Başlık: 0
Şehir: Türkiye
2 Aşk puanı
|
|
|
|
26 Ekm 2006 01:22 pm |
|
| Mesaj: #3 |
| Yazar |
Mesaj |
eXtreme
Kayıtlı Üye
Kayıt: 17.09.2006
Üye no: 89
Mesaj: 102
Başlık: 0
Şehir: Türkiye
2 Aşk puanı
|
|
Cok hASSas 2 seslı veya sesız harfı yanyana gorunce banlıyor olmadı...
|
| |
|
|
27 Ekm 2006 03:10 pm |
|
| Mesaj: #4 |
| Yazar |
Mesaj |
aRaGoRn
Kayıtlı Üye
Kayıt: 21.10.2006
Üye no: 158
Mesaj: 66
Başlık: 0
Şehir: -Yolcu-
0 Aşk puanı
|
|
Denedim gayet güzel atıyor mrgreen
|
| |
|
|
29 Kas 2006 12:01 pm |
|
| Mesaj: #5 |
| Yazar |
Mesaj |
barı$
a$k beni sevmedi...
no women no cry
Kayıt: 17.08.2006
Üye no: 2
Mesaj: 6502
Başlık: 212
Şehir: AntaLyA
15608 Aşk puanı
|
|
random nick korumaları içerisinde en saglı olanı bu
|
| |
|
|
29 Kas 2006 12:04 pm |
|
| Mesaj: #6 |
|
|
|
