366
@verb #4016:"newbie" any any any rxdo #4016
@program #4016:"newbie" any any any
days = `toint(dobjstr) ! ANY => 0'
if (!days)
  days = `toint(iobjstr) ! ANY => 0'
  if (!days)
    days = 7
  endif
endif
now = time()
for i in (players())
  msg = ""
  if (i.first_connect_time < $maxint)
    if (now - i.first_connect_time < 3600 * 24 * days)
      msg = " first connected " + $time_utils:english_time(now - i.first_connect_time)
    endif
  else
    if (now - i.last_disconnect_time < 3600 * 24 * days)
      msg = " registered " + $time_utils:english_time(now - i.last_disconnect_time)
    endif
  endif
  if (msg != "")
    if (i:rank() != "Player")
      msg = " (" + i:rank() + ")" + msg
    endif
    player:tell(tostr(i) + " " + i.name + msg + " ago")
  endif
endfor
"Last modified by flaps (#4016) on Sat Jul 19 17:10:34 2003 MDT."
.

0