Switch to edit mode.
Name(s): vit*als1: "Copied from nymh (#2351):vitals Aug 19 15:20:11 2000"
2: if (dobjstr == "" || dobj == player)
3: dobj = player
4: check = 1
5: else
6: dobj = $string_utils:match_player(dobjstr)
7: check = 0
8: endif
9: targ = dobj
10: if (!valid(targ))
11: if (!valid(targ = $string_utils:match_player(argstr)))
12: player:tell(argstr, " doesn't exist.")
13: endif
14: else
15: last = ctime(dobj.last_connect_time)
16: age = ctime(dobj.first_connect_time)
17: place = dobj.location.name
18: desc = dobj:description()
19: player:tell("--------------------")
20: player:tell(" ", dobj.name, ", ", dobj)
21: if (check == 1)
22: if (desc)
23: player:tell(desc)
24: else
25: player:tell("You have no description set.")
26: endif
27: player:tell("")
28: player:tell("You are currently in ", dobj.location, ", ", dobj.location.name, ".")
29: player:tell("You have the feature(s): ", toliteral(dobj.features))
30: player:tell("Your alias(es) are: ", toliteral(dobj.aliases))
31: player:tell("")
32: player:tell("You first connected on ", age, ".")
33: player:tell("You last connected on ", last, ".")
34: player:tell("You are carrying: ", toliteral(dobj.contents))
35: player:tell("")
36: player:("@quota")()
37: else
38: if (desc)
39: player:tell(desc)
40: else
41: player:tell(dobj.name, " has no description set.")
42: endif
43: player:tell("")
44: player:tell(dobj.name, " [", dobj.gender, "] is currently in ", dobj.location, ", ", dobj.location.name, ".")
45: player:tell(dobj.name, " has the feature(s): ", toliteral(dobj.features))
46: player:tell(dobj.name, " has the alias(es): ", toliteral(dobj.aliases))
47: player:tell("")
48: player:tell(dobj.name, " first connected on ", age, ".")
49: player:tell(dobj.name, " last connected on ", last, ".")
50: player:tell(dobj.name, " is carrying: ", toliteral(dobj.contents))
51: player:tell("")
52: player:("@quota")()
53: endif
54: player:tell("--------------------")
55: endif