306
@verb #1011:"huge" any none none rxdo #7153
@program #1011:"huge" any none none
"Usage: Huge <player>"
"  Gives the player a HUGE hug!"
this:update_usage(verb, player)
who = $string_utils:match_player(dobjstr)
if (valid(who))
  h = u = g = e = ""
  for x in [1..235]
    h = h = "H"
    u = u = "U"
    g = g = "G"
    e = e = "E"
  endfor
  who:tell(player:title(), " gives you a...")
  suspend(1)
  who:tell({h, u, g, e})
  who:tell("HUG!!!!!!!!!!!!!!")
  who.location:announce_all(who:title(), " is left reeling by an absolutely *HUGE* hug from ", player:title(), ".")
  player:tell(who:title(), " has received your hug.")
else
  player:tell("Couldn't match ", dobjstr, ".")
endif
"Last modified by Dax (#789) on Tue May 12 00:24:17 1998 EDT."
.

0