Here ya go.. smile
Code:
listuser {
  var %i = 1,%x
  linesep -a
  while $ulist(*,%i).info {
    if $1 == $ifmatch {
      echo -ag * Level $level($ulist(*,%i)) $ifmatch ( $+ $ulist(*,%i) $+ )
      inc %x      
    }
    inc %i
  }
  if !%x { echo -ag * $1 was not found in the userlist }
  linesep -a
}