@verb #9102:"ou" none none none rdo #9102
@program #9102:"ou" none none none
"Copied from ChocolateGuy (#4813):ou Jun 14 12:08:58 2000"
data = {}
keys = {}
for i in (connected_players())
  data = {@data, {i:title(), tostr(i), this:srank(i)[1], i.location:title(), tostr(i.location)}}
  keys = {@keys, tostr(this:srank(i)[2]) + $su:right(tostr(200000000 - #2774:player_age(i)), 12, "0")}
endfor
data = $list_utils:sort(data, keys)
player:tellcolumns("lrllr", {1, 1, 1, 1, 1}, {"Player", "", "Rank", "Location", ""}, @data)
.