alias check {
  var %c 1,%ohvr 0,%vr 0,%f 0,%e 0,%t 0,%l 0
  while $chan(%c) {
    if $me isop $v1 { var %w ohvr }
    elseif $me ishop $v2 { var %w vr }
    elseif $me isvo $v2 { var %w f }
    else var %w e
    inc % [  $+ [ %w ] ]
    inc %t $nick($v2,0,%w)
    inc %l $nick($chan(%c),0)
    inc %p 
    inc %c
  }
  $iif($isid,return,msg $iif(#,#,$nick)) 6[»14 In6 $chan(0) 14chans6 «] $&
    4[»4 @14Op in4 %ohvr «] $&
    7[» 7%14HalfOp in7 %vr «] $&
    2[»2 +14Voice in2 %f «] $&
    10[»10 R14egular in10 %e «] $&
    3[»14 Power Over:3 %t $+ / $+ %l ( $+ $round($calc((%t / %l)* 100),3) $+ $chr(37) $+ ) 14People 3«]
}
alias scrip {
  var %x = 1
  var %lines = 0
  var %bytes = 0
  while ($script(%x)) {
    inc %lines $lines($script(%x))
    inc %bytes $file($script(%x)).size
    inc %x
  }
  $iif($isid,return,msg $chan) 10I have3 $script(0) 10scripts loaded in my script editor. That's a total of3 $bytes(%lines,bd) 10lines and3 $bytes(%bytes,bd) 10bytes.
}