2a5
@verb #1009:"wag" any none none rdo #9296
@program #1009:"wag" any none none
if (argstr == "")
  #1009.location:announce(#1009.name, " wags his little puppy dog tail happily.")
  player:tell("In ", #1009.location.name, ", ", #1009.name, " wags his puppy dog tail happily.")
elseif (#1009.location == dobj.location)
  dobj:tell(#1009.name, " wags his little puppy dog tail at you happily.")
  #1009.location:announce_all_but({dobj}, #1009.name, " wags his little puppy dog tail at ", dobj:title(), " happily.")
else
  player:tell("Sorry, ", #1009.name, " cannot do as you requested.")
endif
"Last modified by Ariebeladon (#9296) on Sat Nov 16 09:21:06 2002 MST."
.

0