Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias regscan {
if ($chr(35) !isin $1) && ($chr(35) !isin $active) { echo -s 4? Error: No channel specified | halt }
elseif ($chr(35) isin $1) set %regscan.chan $1
else { set %regscan.chan $active }
who %regscan.chan
if ($2) set %regscan.show msg $2
elseif ($1) && ($chr(35) !isin $1) set %regscan.show msg $1
set %regscan.regcount 0 | set %regscan.nonregcount 0
.enable #regscan
}
#regscan off
raw 352:*: {
inc %regscan.total
if (r isin $7) { inc %regscan.regcount | set %regscan.reg %regscan.reg $6 }
else { inc %regscan.nonregcount | set %regscan.nonreg %regscan.nonreg $6 }
haltdef
}
raw 315:*: {
var %regscan.invisible = $calc($nick(%regscan.chan,0) - %regscan.total)
$iif(%regscan.show,%regscan.show,echo -s) 2 %regscan.chan 4Kanalı için Sonuçlar
$iif(%regscan.show,%regscan.show,echo -s) 2Toplam Nick Sayısı4 %regscan.total 1- 2Görünmez Nickler4 %regscan.invisible 1- 2Şifreli Nick Sayısı4 %regscan.regcount 1- 2Şifresiz Nick Sayısı4 %regscan.nonregcount
$iif(%regscan.show,%regscan.show,sifreliler)
$iif(%regscan.show,%regscan.show,sifresizler)
unset %regscan.*
haltdef
.disable #regscan
}
#regscan end
alias sifreliler {
/echo -s 2Kayıtlı Nick Listesi
//tokenize 32 %regscan.reg | /echo -s $*
/echo -s 2Kayılı Nick Listesi Sonu
}
alias sifresizler {
/echo -s 4Kayıtsız Nick Listesi
//tokenize 32 %regscan.nonreg | /echo -s $*
/echo -s 4Kayıtsız Nick Listesi Sonu
}