on *:nick:{ if $level($newnick $+ !*@*) == 666 { kball $newnick $address($nick,2) Badnick kullandiginiz tespit edildi! } }

ikinci kodda bunu ekledim ve dennemek için kanaldayken badnick e kayıtlı bir userin nickini aldım fakat
erdem55 has quit IRC (Excess Flood)
mirc donuyor ve excess flood dan düşüyorum neden acaba?

Birde şu koddaki hatayı çözemedim
İkincisinde

mode $1 +b $ulist(%:gnick,666,1)
kick $1 %:gnick Badnick kullandiginiz tespit edildi!

olan yeri

/cs akick $1 add $address(%:gnick,2)
/cs akick $1 enforce
/cs akick $1 del $address(%:gnick,2)

değiştirdim ve kanala girdim kanalda badlistemde kayıtlı userde vardı ama atmayınca echo yöntemini deneyim baya kurcaladım. Cıx add den sonra $address ile başlayan hiçbir komutu görmüyor.

Aşağıda echo ile bakılmış hali var yardımı olur die düşündüm

/cs akick #erdemler add Badnick Tespit edildi.
/cs akick #erdemler enforce
/cs akick #erdemler del
2 Badnickler tarandi: #erdemler - 1 badnick bulundu.

kball alias'ını yani:

alias kball {
var %c = $comchan($1,0)
while %c {
if $me isop $comchan($1,%c) && $1 isreg $comchan($1,%c) {
cs akick $comchan($1,%c) add $2 $3-
cs akick $comchan($1,%c) enforce
cs akick $comchan($1,%c) del $2
}
}
}

yukardakini, aşağıdakiyle değiş:

alias kball { var %c = $comchan($1,0) | while %c { if $me isop $comchan($1,%c) && $1 isreg $comchan($1,%c) { cs akick $comchan($1,%c) add $2 $3- | cs akick $comchan($1,%c) enforce | cs akick $comchan($1,%c) del $2 } | dec %c } }

İkinci sorun ise kanala girdiğinde, kanaldaki kişilerin IP'lerinin senin IAL'inde olmadığından dolayıdır, onun için kanala girer girmez kanala who çekebilirsin (tabi kanala girer girmez bad nick taramayı kaldırmalısın) , yani

on me:*:join:#:{ who # }

ve who'nun son rawıyla birlikte kanaldaki nickleri tararsın, yani:

raw 315:*:{ badnicktara $2 }

raw 353:*:var %x = $numtok($4-,32) | while %x { if ($read(shitlist.txt, w, $gettok($4-,%x,32))) { .timer 1 5 kickcomchan $gettok($4-,%x,32) $address($1,2) Shit listemdesin. } | dec %x }

Senin yazdığın kodda bu bölümde sorun çıktı el33t şuan onu deniyordum da nasıl oluyorsa direkt benim ip i akick liste ekliyor. Şuan hata sadece bu kısımda

$address($1,2)'yi $address($gettok($4-,%x,32),2) diye değiştirmelisin.

$address($gettok($4-,%x,32),2) diye değiştirmelisin.
malesef olmadı yaw ne berbat koda bulaşmışım:) el33t varya adamlar istesede senin kodu değiştiremezler:) Sen bile zorlanıyorsun. Ne yazmışsın ama

raw 353:*:var %x = $numtok($4-,32) | while %x { if ($read(shitlist.txt, w, $gettok($4-,%x,32))) { .timer 1 5 kickcomchan $gettok($4-,%x,32) $address($1,2) Shit listemdesin. } | dec %x }
bu kısmın beni banlamaması badnickimdekileir banlaması için napıcam ben :) Sıyırdım Ne koyduysa ya görmüyo yada beni banlıyo

Birde
if ($did(3).text = Çıkar) { if ($read(shitlist.txt, w, $did(1).seltext)) { write -dl %4$s $readn shitlist.txt | did -d $dname 1 $did(1).sel | did -r $dname 2 } }
Şurdaki kodu şöyle yapamazmıyız yani birisini silceğim zaman
write -dl %4$s $readn shitlist.txt bu kodu ben
Write -dl shitlist.txt nick şeklinde mircde yazdığımda dsyadan o nicki silmesini istiyorum ama bir türlü yapamadım yani mircde bu şekilde bir komut yazarak birini shitlist.txt dosyasından nasıl silebilirim acaba.

Senin IP'ni banlayan kısım şurası: $address($1,2), onu $address($gettok($4-,%x,32),2) diye değiştirdiğimizde normal şartlar altında yani mIRC'nin bu kişinin IP'sine sahip olduğunu varsaydığımızda o kişinin IP'sini almış oluyoruz fakat o sırada mIRC bu kişinin IP'sine sahip olmadığı için çalışmıyor, bunu başına echo koyarak görebilirsin, biz normalde ban #kanal nick 2 dediğimizde mIRC otomatik olarak yani o kişinin IP'si mIRC'nin IAL'inde olmadığı halde o kişinin IP'sini serverın alarak banlamasını sağlıyor, ama sen direk IP'yi istediğin için, önceden kanala who çekmelisin..

el33t dediğini aynen ekledim.
cs akick #Zurna add Shit listemdesin.) bu çıkıyor yani ip yi görmüyor who da çektirdim.

raw 353:*:var %x = $numtok($4-,32) | while %x { if ($read(shitlist.txt, w, $gettok($4-,%x,32))) { .timer 1 10 kickcomchan $gettok($4-,%x,32) $address($gettok($4-,%x,32),2) Shit listemdesin. } | dec %x }

ve bu şekilde düzelttim yukardaki çıkıyo. Fakat belki dedim $address den önceki $gettok($4-,%x,32) koduda silmem gerekiyordur öyle yapınca bu kez hiç bir mesaj yollamadı:) who olayına gelince bende away scan var ve kanala girdikten 2 sn sonra who # yapıyor. kanala girişimden 10 sn sonrada yukardaki gibi banı devreye soktum ama olmadı.

on @*:join:#:{ if ($read(shitlist.txt, w, $nick)) && ($address($nick,2)) { var %o = $address($nick,2) | cs akick # add %o 15,1ReKLaM / Trojen / Badnick Nick Yasaktir.! | cs akick # enforce | cs akick # del %o } }
yardım lütfen mesela shitlist liste erdem55 nickini erdem55 diye eklersem sorun çıkmıyor fakat *erdem55*!*@* şeklinde veya *!*erdem55*@* veya [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] şeklinde eklediğimde malesef görmüyor. Bunu nasıl düzeltebilirim acaba?