View/Edit #12:@wiz*ards

Switch to edit mode.

Name(s): @wiz*ards
1:  "Generates a list of the current status of all wizards and guardians."
2:  "When invoked like @wizards all, shows all wizards. (commented out)"
3:  set_task_perms(caller)
4:  dudes = setremove($guardian:leaves(), $slacker)
5:  connected = connected_players()
6:  key = {}
7:  lines = {}
8:  for dude in (dudes)
9:    last = dude in connected ? "*** Connected ***" | player:ctime(dude.last_disconnect_time)
10:   lines = {@lines, {dude:title(), dude:rank(6), last, dude.location:msg_who_location(dude)}}
11:   key = {@key, dude:connected() ? $maxint - idle_seconds(dude) | dude.last_disconnect_time}
12: endfor
13: lines = $list_utils:reverse($list_utils:sort(lines, key))
14: lines = {@lines, "-"}
15: caller:tellColumns({15, 6, 30, 20}, {"Name", "Rank", "Last disconnect", "Location"}, @lines)
16: "Last modified by Cecil (#7407) on Mon Nov  4 14:13:11 2002 MST."

Verb arguments: any none none
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Slacker (#55)

You are not logged in.

[home | help | who | search | setup | code]