@verb #4909:"foot tap*foot" any any any rxdo #6319
@program #4909:"foot tap*foot" any any any
$perm_utils:is_called_from(player, "my_huh") || raise(E_PERM)
"Copied from Les eMOOtions de Rascal (#4909):foot by Gargamel (busy) (#6082) Jun  2 10:05:33 1996"
if (dobj == $nothing)
  outstring = "%N taps %p foot impatiently."
  pstring = "You tap your foot impatiently."
else
  outstring = "%N looks at %d and taps %p foot impatiently."
  pstring = "You look at %d and tap your foot impatiently."
endif
this:speak_out(outstring, pstring)
"Last modified by Lao-Tzu (#8084) on Mon Apr 23 18:59:30 2001 MDT."
.