Tum Kanallarda Badnick Tarama Kodu Aşağıdaki kod bulunduğunuz tüm kanallarda bad leveline eşleşen olup olmadığını tarayacaktır. Kullanıcı listesinde(users) bad tanımına uyan nickleri, kanalda op iseniz (ban+kick) değilseniz (echo) ile bilgilendirme mesajı geçecektir.
Kod
alias control {
if $chan(0) >= 1 { set %difi $regsubex($dde(mirc,channels),/\*/,$null) }
who +c $token(%difi,1,32)
}
raw 352:*:{
if %difi {
haltdef
if $regex($level($6),/^(bad)$/) {
if $me isop $2 { mode $2 +b $6 | kick $2 $6 Badnickler dışarı! }
else { echo 06 -a $+([,$2,]) kanalında $qt($6) badnick tanımına uyuyor }
}
}
}
raw 315:*:{
if %difi {
haltdef
set %difi $deltok(%difi,1,32)
if $numtok(%difi,32) == 0 { unset %difi }
else { who +c $token(%difi,1,32) }
}
} F1 tuşuna atmak için:/alias f1 /control (Chan popups için ALT + R bölümü)
Kod
menu channel {
-
Badnickleri Temizle:/control
}