@verb #3344:"dance @dance" any none none rxdo #60
@program #3344:"dance @dance" any none none
$perm_utils:is_called_from(player, "my_huh") || raise(E_PERM)
if (dobj == $nothing)
  pstring = "You dance a little jig."
  outstring = "%N dances a little jig."
else
  pstring = "You grab %d's hand, and start to dance."
  outstring = "%N grabs %d's hand, and starts to dance."
endif
this:speak_out(outstring, pstring)
"Last modified by Lao-Tzu (#8084) on Mon Apr 23 18:31:09 2001 MDT."
.