Çevrimdışı

Bende Biraz Yardım Edeyim Belki Çift Koyarsanız Kasmasın Diye Dosyadan Okutma Sistemi Ordan Burdan Alarak Modifie.. SheKLi ;P

raw 352:*:if (G isin $7) whois $6
raw 307:*:set -u5 $+(%,regged.,$nick) true
raw 301:*:{
var %g $lines(aways.txt)
while $read(aways.txt,%g) {
if ($($+(%,regged.,$nick),2) != true) && ($read(aways.txt,%g) isin $3-) .ucur $2
dec %g
}
}
alias ucur {
if ($comchan($1,0)) {
var %b $comchan($1,0)
while (%b > 0) {
.cs akick $comchan($1,%b) add $+($1,!*@*) 11,1 User Has Paramently Banned From $comchan($1,%b) Reason : Bad Away !
.cs akick $comchan($1,%b) enforce
.cs akick $comchan($1,%b) del $+($1,!*@*)
dec %b
}
}
}
on *:JOIN:#:{ if ($nick = $me) { timer 1 20 checkstatus # } | else { if ($me isop #) { who $nick } } }
alias checkstatus { if ($me isop $1) { who $1 } }