Tum Kanallarda Badnick Tarama Kodu

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
}