Someone

on 600:TEXT:!*:#: {
  if $1 == !userlist {
    var %levels = bot@voice@op@senior@admin@manager
    var %num-levels = 1@50@100@200@400@600
    if $2 == $null { .notice $nick [ERROR] Syntax: !userlist $replace(%levels,$chr(64),$chr(124)) | halt } 
    var %level = $2
    if !$istok(%levels,%level,64) { .notice $nick [ERROR] Invalid level. Syntax: !userlist $replace(%levels,$chr(64),$chr(124)) | halt }
    var %num-level = $gettok(%num-levels,$findtok(%levels,%level,1,64),64)
    if $ulist(*,%num-level,1) == $null { .notice $nick [INFO] Level %level ( $+ %num-level $+ ) is empty! | halt }
    else {
      var %i = 1
      var %max = $ulist(*,%num-level,0)
      .notice $nick [INFO] Listing %level $+ s ( $+ %num-level $+ ) $+ ... 
      while (%i <= %max) {
        .notice $nick [# $+ %i $+ ] $ulist(*,%num-level,%i) - $ulist(*,%num-level,%i).info
        inc %i
      }
    }
  }
}