@verb #649:"nail" this none this rxdo #833
@program #649:"nail" this none this
twit = args[1]
this:narrate(" looks peeved...")
if (!this:send_message_to("a security guard", "get over here") || !this:wait_for_response())
  if (twit.location != this.location)
    this:narrate(" decides to let the matter drop.")
  else
    this:narrate(" decides to settle this rationally...")
    suspend(1)
    twit.location:announce_all_but({twit, this}, this:title(), " smacks ", twit:title(), " hard!")
    twit:tell(this:title(), " gives you a good smack!")
    if ($object_utils:has_callable_verb(twit, "kick_reaction"))
      twit:kick_reaction()
    endif
  endif
else
  if (twit.location != this.location)
    this:say("Situation under control.")
    suspend(2)
    this:say("Thank you anyways.")
  else
    this:narrate(" flashes a malicious grin.")
    this:say("Remove ", twit:title())
    suspend(7)
    if (twit.location != this.location)
      this:say("Thank you!")
    endif
  endif
endif
.