1e6
@verb #8165:"foo*" any for/about any rdo #8165
@program #8165:"foo*" any for/about any
fooverb = verb[4..$]
player:tell("Now fooing " + fooverb)
if (fooverb in {"kick", "boo", "praise", "worship", "dis"})
  if ($esteem_utils:("can_" + fooverb)(player, dobj))
    force_input(player, fooverb + " " + dobjstr + " for " + iobjstr)
  else
    player:tell("Foo failed.  The power!  The power!")
  endif
endif
"Last modified by Mandos (#8165) on Fri Jul 20 19:35:11 2001 MDT."
.

0