Unnamed

on *:JOIN:#rspc:{
  .enable #rspcraw
  whois $nick
}
#rspcraw off
raw *:*:{
  haltdef
  if ($numeric == 319) { 
    set $+(%,$2) $count($3-,@) $count($3-,%) $count($3-,+)
    msg #bedup $2 is on $iif($calc($0 - 2) >= 1,$v1 Channels,$v1 Channel) $&
      Op in: $iif($gettok($($+(%,$2),2),1,32) >= 1,$v1 Channels,$v1 Channel) $&
      Half Op in: $iif($gettok($($+(%,$2),2),2,32) >= 1,$v1 Channels,$v1 Channel) $&
      Voice in: $iif($gettok($($+(%,$2),2),3,32) >= 1,$v1 Channels,$v1 Channel) $&
      Regular in: $iif($calc(($0 - 2) - ($gettok($($+(%,$2),2),1,32) + $gettok($($+(%,$2),2),2,32) + $gettok($($+(%,$2),2),3,32))) >= 1,$v1 Channels,$v1 Channel)
  }
  if ($numeric == 318) { .disable #rspcraw } 
}
#rspcraw end