Blacklist'tekileri Tarasın ve Kanallardan Atsın...
 

ArkadaşLar Ben bu araLar size fazLa yuk oLuom fazlA kONU ACIoRUM AMA biraZ amator[ acemi ] yim Yardım EderSeniz Minnettar Kalcam..bu Sefey :( blACKlist Tarayan bir Code arıoRum...diElim ben #yozgat kanalına girdim , ve kanal da benim blacklistimde bulunan baya bir kişi fakat onlar benden once girdikleri icin banlayamıorum işte bu code kanaldaki nicklerden benim karalistemde olanları Tarıyacak...buLduklarını kickLiyecek...Tabi 2.girist karaliste atcak...

BEN BOLE BİR CODE BULMUSTUM FAKAT O badnick.txt adı bir remote dosyasına koydugun nickleri tarıor ve pc donuor , script donuordu cok berbattı.... ve orda yazan nickLerden basKa nickLeri atıordu...

o Code işinize Yararsa Size verebiLirim...

YardımLarınızı Bekliyorum.. SAYGIlARLaR By yOzqAt...

on *:join:#:if ($nick == $me) who # | write $+($chan,.txt)
raw 352:*:if ($file($+($2,.txt))) write $ifmatch $+($6,!,$remote($3,~),@,$4) * $7 | denetle $+($2,.txt)
alias denetle {
var %i = $lines($1)
while (0 < %i) {
if ($read($1,w,$ulist(*,%i)) { .attır $gettok($ifmatch,33,1) }
dec %i
}
remove $1
}
alias attır {
var %ş = $comchan($1,0)
while (0 < %ş) {
if ($comchan($1,%ş).op) { ban $comchan($1,%ş) $1 2 | kick $comchan($1,%ş) $1 Kara liste!!! }
dec %ş
}
}

Denemedim ama ne derece çalışır bilmiom :D
Ama çalışması gerek

alias attır
;bu ne yha aoıhjohasd

düzeltildi.

DjiNn O mesajını Düzeltirmisin.

Tekrar Özür diLerim Hata verDi bu Neden biLmiorum
*** /remove: Dosya yok 'C:\.........
boLe bir hatA StatuSte.... KaraListem uSers Kısmında

blacklist:yozgatli
blacklist:frogel

Şeklinde...

Denemedim ama çalışır sanırım, opları atmıyor. Sen kanala girdikten 3 saniye sonra taramaya başlıyor eğer opsan o sırada kanalda bulunan ve blacklistinde olanları kanaldan banlıyor. İşte kod:

on me:*:join:#kanal:{ .timer 1 3 blacklistscan # }
alias blacklistscan { if $me isop $1 { var %< = $ulist(*,blacklist,0) | while %< { var %> = $ulist(*,blacklist,%<) | if %> ison $1 && %> !isop $1 { ban -k $1 %> 2 black listemdesin. } | dec %< } } }

Umarım işine yarar..

el33t kodundan anladığım kadarıyla bunu kendi blacklistime eklemem için senin blacklist yazdığın yerleri kara diye değiştirmem yeterli yanlışmı anlamışım blacklistimde nickler kara:erdem55 diye kaydediliyo
bide bende ayrı bi blacklist daha var ondada kara1:*!*yarra*@* diye kayıtlı veya [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] diye yine aynı kodede blacklist kısmını kara1 diye değişsem bu mastklarıda görüp atarmı acaba?

ztn denemeden yazdıım hangi Kod çalışmışki :)
Ayrıca...
o attır kanallardan attır (kick) anlamındadır.fesat adamlar :) pu size sapık herifler :)

Sanırım bu işinize daha çok yarar..

on *:join:#:{
if ($nick = $me) { .timer 1 3 blacklistscan # }
elseif (($ulist($address($nick,5),blacklist,0) >= 1) && ($me isop #)) { mode # +b $ulist($address($nick,5),blacklist,1) | kick # $nick black listemdesin. }
}
alias blacklistscan {
if $me isop $1 {
var %< = $ulist(*,blacklist,0) | while %< {
var %> = $ulist(*,blacklist,%<)
if ((%> ison $1) && (%> !isop $1)) { ban -k $1 %> 2 black listemdesin. }
elseif ($ialchan(%>,#,0) >= 1) { mode # +b %> | var %' = $ifmatch | while %' { var %! = $gettok($ialchan(%>,#,%'),1,33) | if ((%! ison $1) && (%! !isop $1)) { kick $1 %! black listemdesin. } | dec %' } }
dec %<
}
}
}