Multiple Mode Processor

By h3lp on Mar 11, 2005

UPDATED Ver2

This snippet will show you detail on op,deop,voice,devoice bla bla...


it will count and show the result by type.. for eg:


  • [ ChanServ SETS ] MODE: +o, TOTAL: 1, NICK(s): n34r



    If you wanna make only the snippet below appear, make a "haltdef" on OP,DEOP,VOICE,DEVOICE and all related.

    It detect's all kind of prefix "at this time".
on *:rawmode:#:{
  var %n = 1, %nk = 1, %all, %p, %a, %e
  while (%n <= $len($1)) {
    if ($mid($1,%n,1) == +) || ($mid($1,%n,1) == -) { %p = $mid($1,%n,1) | inc %n }
    if ($($+(%,rm,.,$replace(#,.,$chr(45)),.,%p,.,$mid($1,%n,1),.)) !isin %a) %a = %a $+(%,rm,.,$replace(#,.,$chr(45)),.,%p,.,$mid($1,%n,1),.)
    inc $+(%,rm,.,$replace(#,.,$chr(45)),.,%p,.,$mid($1,%n,1),.)
    set $+(%,rm,.,$replace(#,.,$chr(45)),.,%p,.,$mid($1,%n,1),.,name) $($+(%,rm,.,$replace(#,.,$chr(45)),.,%p,.,$mid($1,%n,1),.,name),2) $gettok($2-,%nk,32)
    inc %n | inc %nk
  }
  %n = 1
  while ($gettok(%a,%n,32)) {
    if ($($+($gettok(%a,%n,32),name),2)) {
      if ($gettok($gettok(%a,%n,32),4,46) == b) %e = 12BANMASK(s):
      elseif ($gettok($gettok(%a,%n,32),4,46) == k) %e = 12KEY(s):
      elseif ($gettok($gettok(%a,%n,32),4,46) == l) %e = 12LIMIT(s):
      else %e = 12NICK(s):
    }
    echo # * 4[ $nick SETS ] 10MODE: $gettok($gettok(%a,%n,32),3,46) $+ $gettok($gettok(%a,%n,32),4,46) $+ ,7 TOTAL: $($gettok(%a,%n,32),2) $+  $+ $iif($($+($gettok(%a,%n,32),name),2),$chr(44) %e $v1)
    inc %n
  }
  unset $+(%rm,.,$replace(#,.,$chr(45)),.) $+ *
}

Comments

Sign in to comment.
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.