Forums Scripts & Popups Need help with this code

alias checkk {
  var %a = 1,%lev = $iif($1,$1,*)
  if ($ulist(*,%lev,0) == 0) echo 5 -a -> 0 results
  while $ulist(*,%lev,%a) {
    echo 6 -a -> User $+ $remove(%a,$null)$+($level(!$v1),$v1))
    inc %a 
  }
}