View/Edit #2731:tell_contents

Switch to edit mode.

Name(s): tell_contents
1:  "Copied from The_spider (#7446):tell_contents Aug  9 09:41:24 1999"
2:  if (player:isa($webber))
3:    return pass(@args)
4:  endif
5:  targ = length(args) > 1 ? args[2] | this
6:  cont = args[1]
7:  data = {}
8:  for x in (cont)
9:    m = length(verbs(x))
10:   thisdata = {tostr(x), m == 0 ? "None" | (m == E_TYPE ? "EPERM" | tostr(m)), x:title(), $code_utils:classify_object(x), x.owner:title()}
11:   data = {@data, thisdata}
12: endfor
13: targ_ps = $gender_utils.psc[targ.gender in $gender_utils.genders]
14: targ_ps = tostr(targ_ps, " ", $gender_utils.is_plural[targ.gender in $gender_utils.genders] ? "are" | "is")
15: player:tell(this:title(), " is naturally carrying:")
16: if (data)
17:   player:tellColumns({6, 5, 35, 12, 15}, {"#", "Verbs", "Name", "Type", "Owner"}, @data)
18: else
19:   player:tell("      Nothing.")
20: endif

Verb arguments: this none this
Verb perms: Readable NOT-Debug
Verb owned by: Q (#2731)

You are not logged in.

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