45f
@verb #6:"here_huh" this none this rxdo #55
@program #6:"here_huh" this none this
":here_huh(verb,args)  -- room-specific :huh processing.  This should return 1 if it finds something interesting to do and 0 otherwise; see $command_utils:do_huh."
"For the generic room, we check for the case of the caller specifying an exit for which a corresponding verb was never defined."
{verb, args} = args
set_task_perms(caller_perms())
if (args || player.location != this)
  "Added by Cecil to better support the $vehicle (#2030)"
  return 0
elseif ((exit = this:match_exit(verb)) == $failed_match)
  if (verb in {"east", "e", "west", "w", "south", "s", "north", "n", "up", "u", "down", "d", "northeast", "ne", "northwest", "nw", "southeast", "se", "southwest", "sw"})
    $msg:mtell("nogo")
    return 1
  endif
  "... okay, it's not an exit.  we give up..."
  return 0
elseif (typeof(exit) == WAIF || valid(exit))
  $call_verb(exit, "move", {player})
else
  "... ambiguous exit ..."
  $msg:mtell("ambiguousgo", verb)
endif
return 1
"Last modified by Lao-Tzu (#8084) on Mon Aug 12 08:43:15 2002 MDT."
.

0