alias userlist { var %a = 1, %b = $ulist(*,0) window @Userlist while %a <= %b { aline @Userlist $level($ulist(*,%a)) $ulist(*,%a) inc %a } }