View/Edit #39:match_player*s match_room*s

Switch to edit mode.

1:  {string} = args
2:  db = verb[7..10] == "room" ? $room_db | $player_db
3:  multiple = verb[$] == "s"
4:  eobj = db:find_exact(string)
5:  objs = eobj == $failed_match ? db:find_all(string) | {eobj}
6:  if (multiple)
7:    return objs
8:  elseif (length(objs) == 1)
9:    return objs[1]
10: elseif (!objs)
11:   return $failed_match
12: else
13:   return $ambiguous_match
14: endif
15: "Last modified by Raptor (#6319) on Mon May 24 22:43:55 1999 MDT."
16: "This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:05 2002 MDT)."
17: "Last modified by Dax (#789) on Sat Aug 17 14:50:05 2002 MDT."

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