# -*- LPC -*- #
#
# $Locker: presto $
# $Id: clear.s,v 1.1 2001/12/27 11:34:28 saffra Exp presto $
#
#
#
(clear
(pattern "[at] <indirect:any-living>")
(pattern "<string>")
(pattern "<string> [at] <indirect:any-living>")
(pattern "[at] <indirect:any-living> <string>")
(single
(no-arguments
(self "You clear your throat.")
(rest "$mcname$ clears $mposs$ throat.")
)
(arguments
(arguments loudly, quietly, politely, thoroughly, impatiently,
unobtrusively, rudely, phlegmatically, #)
(self "You clear your throat $arg$.")
(rest "$mcname$ clears $mposs$ throat $arg$.")
)
)
(targeted
(arguments
(arguments loudly, quietly, politely, thoroughly, impatiently,
unobtrusively, rudely, phlegmatically, #)
(self "You clear your throat $arg$ at $hcname$.")
(target "$mcname$ clears $mposs$ throat $arg$ at you.")
(rest "$mcname$ clears $mposs$ throat $arg$ at $hcname$.")
)
)
)
/* Saffra Dec 27 2001 */
