@verb #4214:"hello hi" any none none rxdo #8438
@program #4214:"hello hi" any none none
"Allows the player to wave hello."
"Syntax: hello <player>"
"If without player match, the player just waves hello"
this:update_usage("hi", player)
if (!dobjstr)
  player.location:announce(player:title(), " waves hello.")
  player:tell("You wave hello.")
else
  "  dobj = $string_utils:match_object(dobjstr, player.location);"
  if ($command_utils:object_match_failed(dobj, dobjstr))
    return
  endif
  player.location:announce_all_but({dobj, player}, player:title(), " waves hello to ", dobj:title(), ".")
  player:tell("You wave hello to ", dobj:title(), ".")
  dobj:tell(player:title(), " waves hello to you.")
endif
.