1a0
@verb #7214:"countQ" this none this rxd #7214
@program #7214:"countQ" this none this
{avail, used} = {0, 0}
for x in (players())
  ticks_left() < 2000 || seconds_left() < 2 ? suspend(0) | 0
  avail = avail + `x:_get_max_vm() ! ANY => 0'
  used = used + `x:_get_max_vm() ! ANY => 0' - `x:free_bytes() ! ANY => 0'
endfor
return {avail, used}
"Last modified by JS (#7214) on Mon Aug 12 23:54:14 2002 MDT."
.

0