View/Edit #5450:look_cmd

Switch to edit mode.

Name(s): look_cmd
1:  match = player:my_match_object($string_utils:from_list(args, " "), this.location)
2:  if (length(args) == 0)
3:    match = this.location
4:  endif
5:  if (match == $failed_match || match == $ambiguous_match || match == $nothing)
6:    match = player:my_match_object($string_utils:from_list(args, " "), this)
7:    if (match == $failed_match || match == $ambiguous_match || match == $nothing)
8:      this:tell("What \"", $string_utils:from_list(args, " "), "\"?")
9:    else
10:     player:tell(this:title(), ">>>")
11:     match:look_self()
12:     player:tell("<<<", this:title())
13:   endif
14: else
15:   player:tell(this:title(), ">>>")
16:   match:look_self()
17:   player:tell("<<<", this:title())
18: endif
19: "Last modified by Dax (#789) on Thu Dec 13 20:48:18 2001 MST."

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

You are not logged in.

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