Kod

set %modeall.exempt #opers #kontrol #xline

alias modeall.isExempt {
  var %c = $lower($1)
  var %list = $lower(%modeall.exempt)
  if (%list == $null) return 0
  if ($wildtok(%list,%c,1,32)) return 1
  return 0
}

alias modeall.needsParam {
  var %m = $remove($1,+,-)
  if ($regex(%m,/[beIkl]/i)) return 1
  return 0
}

alias modeall.sanitizeParam {
  if ($1 == $null) return
  var %p = $gettok($1-,1,32)
  if ($left(%p,1) == #) || ($left(%p,1) == &) return
  return %p
}

alias modeall {
  if ($0 == 0) { echo -a Kullanım: /modeall <modlar> [parametre] | return }
  var %modes = $1, %rawparams = $2-, %params, %i = 1, %n = $chan(0)
  if (!%n) { echo -a Kanalda değilsin. | return }

  if (!$modeall.needsParam(%modes)) {
    if (%rawparams != $null) echo -a [MODEALL] Uyarı: '%modes' parametre istemez; fazladan yazılanlar yok sayıldı.
    %params = 
  }
  else {
   
    %params = $modeall.sanitizeParam(%rawparams)
    if (%params == $null) {
      echo -a [MODEALL] Hata: '%modes' parametre ister. Ör: .modeall +b kötü!*@*
      return
    }
  }

  while (%i <= %n) {
    var %c = $chan(%i)
    if ($modeall.isExempt(%c)) { inc %i | continue }
    if (%params != $null) mode %c %modes %params
    else mode %c %modes
    inc %i
  }
}

on *:INPUT:*:{

  if $regex($1,/[\.!]modea[Il]+/Si) && ($2 != $null) {    

    modeall $2-
  }
}


alias modeall-muaf { echo -a MODEALL Muaf Kanallar: %modeall.exempt }
alias modeall-ekle {
  if ($1 == $null) { echo -a Kullanım: /modeall-ekle #kanalVeyaDesen | return }
  var %k = $lower($1)
  if ($istok($lower(%modeall.exempt),%k,32)) { echo -a Zaten muaf: %k | return }
  set %modeall.exempt $addtok(%modeall.exempt,%k,32)
  echo -a Eklendi (muaf): %k  |  Yeni liste: %modeall.exempt
}
alias modeall-sil {
  if ($1 == $null) { echo -a Kullanım: /modeall-sil #kanalVeyaDesen | return }
  var %k = $lower($1)
  if (!$istok($lower(%modeall.exempt),%k,32)) { echo -a Muaf listede yok: %k | return }
  var %i = $findtok($lower(%modeall.exempt),%k,1,32)
  if (%i) set %modeall.exempt $deltok(%modeall.exempt,%i,32)
  echo -a Çıkarıldı (muaf): %k  |  Yeni liste: %modeall.exempt
}