POO Library

Social Verbs

Here's a simple function and a set of commands which define common nonverbal communication -- nodding, waving, smiling, growling, and so on. Just log in to your POO as a wizard, and paste the following commands:
"Creating $agent.social..."
@newfunc $agent.social(self, adverb='')
# first, find what the social verb is
verb = string.split(gCmdLine)[0] + 's'
# now construct the message and show it
if adverb: msg = "%1D %1:(" + verb + ") " + adverb + "."
else: msg = "%1D %1:(" + verb + ")."
show( msg, {1:user} )
.x

"Defining various social commands...
@cmd $agent.nod calls social()
@cmd $agent.nod <str> calls social(%1)

@cmd $agent.grin calls social()
@cmd $agent.grin <str> calls social(%1)

@cmd $agent.think calls social()
@cmd $agent.think <str> calls social(%1)

@cmd $agent.grimace calls social()
@cmd $agent.grimace <str> calls social(%1)

@cmd $agent.ack calls social()
@cmd $agent.ack <str> calls social(%1)

@cmd $agent.grok calls social()
@cmd $agent.grok <str> calls social(%1)

@cmd $agent.wave calls social()
@cmd $agent.wave <str> calls social(%1)

@cmd $agent.frown calls social()
@cmd $agent.frown <str> calls social(%1)

@cmd $agent.smile calls social()
@cmd $agent.smile <str> calls social(%1)

@cmd $agent.growl calls social()
@cmd $agent.growl <str> calls social(%1)

@cmd $agent.bow calls social()
@cmd $agent.bow <str> calls social(%1)

For the help database:

social
<social verb> [<adverb>]
Various social verbs are defined for nonverbal communication.  These
include nod, grin, think, grimace, ack, grok, wave, frown, smile, and
bow.  Each may be used alone, or with an adverb, as shown in these
examples:

   grimace
   wave happily
   nod thoughtfully


http://www.strout.net/python/poo/lib/social.html
Last Updated: 6/05/97 . . . . . . Joe Strout