@verb #4457:"get_say_word" this none this rxdo #4457
@program #4457:"get_say_word" this none this
{argstr} = args
if (`argstr[$ - 1..$] ! ANY => 0' in {"=P", ":P"})
  return "pbtpbtpbt"
elseif (`argstr[$ - 1..$] ! ANY => 0' in {"=)", ":)", "=}", ":}"})
  return "smile"
elseif (`argstr[$ - 1..$] ! ANY => 0' in {"=(", ":(", ":{", "={"})
  return "frown"
elseif (argstr[$] == "!")
  return "exclaim"
elseif (argstr[$] == "?")
  return "ask"
else
  return "say"
endif
.