Çevrimdışı

saol el33t

 

Çevrimdışı

/blacklistscan {
if ($1 ischan) && ($me isop $1) {
var %ø = $ulist(*,blacklist,0) | while %ø {
%o = $read(*,blacklist,0,%ø) | %ö = $nick(#,0,r) | while %ö {
if (%o iswm $nick(#,%ö,r)) { ban -u300 $1 $+(%o,!*@*) | kick $1 $v2 Blacklist..) } | dec %ö } | dec %ø }


benzer bi kod buldum ve ustunde değişmeler yaptım ama olmadı?yardımcı olurmusun el33t

 

Çevrimdışı

tamamdır kodu buldum.

 

Çevrimdışı

maelstrom Nickli Üyeden Alıntı

tamamdır kodu buldum.

yazsan koduda bizde baksan hatta yararlansak

 

Çevrimdışı

/bnickscan {
var %i = 1
while (%i <= $nick($1,0)) {
var %shlist = $ulist($nick($1,%i),blacklist,0),*,@,!)
if (%shlist != 0) {
ban $1 $nick($1,%i) 2 | kick $1 $nick($1,%i) 5 Bad Nick Detected..
}
inc %i 1
}
}

aliasa ekliorus ve gerektiğinde /bnickscan #kanal yapıorus.uyuodum yeni gordum ;p

 

Çevrimdışı

mesela 5. user seviyesine ekle nickleri...

sonra

on 5:Join:#: { kick $nick defol }

yarar mi isine ?