View/Edit #1:match_verb

Switch to edit mode.

Name(s): match_verb
1:  "object:match_verb(STR verb)"
2:  "Find out if an object has a given verb, and some information about it."
3:  "Returns {OBJ location, STR verb} if matched, 0 if not."
4:  "Location is the object on which it is actually defined, verb is a name"
5:  "for the verb which can subsequently be used in verb_info (i.e., no"
6:  "asterisks)."
7:  {verbname} = args
8:  verbname = strsub(verbname, "*", "")
9:  if (valid(parent(this)))
10:   return `verb_info(this, verbname) && {this, verbname} ! E_VERBNF => 0' || parent(this):(verb)(@args)
11: else
12:   return `verb_info(this, verbname) && {this, verbname} ! E_VERBNF => 0'
13: endif
14: "Last modified by Slacker (#55) on Mon Jun 21 05:46:05 1999 MDT."
15: "This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:04 2002 MDT)."
16: "Last modified by Dax (#789) on Sat Aug 17 14:50:04 2002 MDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Slacker (#55)

You are not logged in.

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