| Feragat | 12 Mart 2015 03:15 |
Cevap: badkoruma mask(s) yardımı
Alıntı:
mys_35 Nickli Üyeden Alıntı
(Mesaj 1041631027)
bu şekil bi badnick korumam var attıgım nickleri örnek [02:21:38] *** ABAZA_ERKEKKhzrr AjaN Tarafından Kanaldan Atıldı ( -=[ *abaza*!*@* ]=- Kick:-=[ 6937]=- ••[ AjaN ]•• ) bu şekilde atıyor benim sitedigim *abaza*!*@* ve *hzrr*!*@* bad listemde olan iki farklı maskıda göstersin şimdiden teşekürler yardımcı olacak arkadaşa
örnek olarak [02:21:38] *** ABAZA_ERKEKKhzrr AjaN Tarafından Kanaldan Atıldı ( -=[ *abaza*!*@* ]=- -=[ *hzrr*!*@* ]=- Kick:-=[ 6937]=- ••[ AjaN ]•• ) olsun
| Kod:
#badnick on
on badnick:JOIN:#:{
if ($ulist($fulladdress,koruma,0) >= 1) { return }
elseif !$istok(#operhelp #help #sales #karantina #kanal5,$chan,32) {
var %xnick = $regsubex(zz,$str(.,$ulist($nick,0)),/./g, $ulist($nick,\n) $chr(32))
inc %kicksayi | mode $chan +b $nick | var %AjaN $+($chan,help) | kick $chan $nick 8,2 -=[ %xnick ]=- Kick:-=[ %kicksayi $+ ]=- 8,2 ••[ AjaN ]••
}
}
alias tara {
set %:bulunan 0
var %s 1
while %s <= $nick(#,0) {
%:gnick = $nick(#,%s)
if %:gnick isreg # && $level(%:gnick $+ !*@*) == badnick {
inc %:bulunan 1
var %xnick1 = $regsubex(zz,$str(.,$ulist(%:gnick,0)),/./g, $ulist(%:gnick,\n) $chr(32))
mode # +b $address(#,2)(%:gnick,666,1)
inc %kicksayi | kick # %:gnick 0,1 %xnick1 8,2Kick: %kicksayi $+ %logo
}
inc %s
}
echo 0,1 ßadNickLer Tarandi:4,1 # - %:bulunan 0,1ßad Nick ßuLundu.
}
on *:NICK:{
if ($ulist($+($newnick,!*@*),koruma,0) >= 1) { return }
else {
if $ulist($+($newnick,!*@*),badnick,0) {
var %Cnk = 1
while $comchan($newnick,%Cnk) {
var %e = $v1
if $me isop %e && !$istok(#Radyo #operhelp #help #sales #karantina #kanal5,%e,32) {
var %znick = $regsubex(zz,$str(.,$ulist($newnick,0)),/./g, $ulist($newnick,\n) $chr(32))
mode %e +b $newnick
kick %e $newnick 8,2 ßad Nick'e Geçtiqiniz için AjaN Tarafından AtıLdınız ! %logo Etkilenen Masklar: %znick
}
inc %Cnk
}
}
}
}
alias badnickekle {
auser badnick $1 $+ !*@*
}
alias badnicksil {
ruser badnick $1 $+ !*@*
}
alias nickkoruma {
auser koruma $1 $+ !*@*
}
alias badidentekle {
auser badnick *! $+ $1 $+ @*
}
alias badidentsil {
ruser badnick *! $+ $1 $+ @*
}
alias identkoruma {
auser koruma *! $+ $1 $+ @*
}
#Badnick end
menu * {
.AjaN Blacklist Koruması
..Aç :.enable #badnick | echo AjaN Blacklist koruması açılmıştır
..Kapat:.disable #badnick | echo AjaN Blacklist koruması kapatılmıştır
}
|
