@verb #4051:"'*" any any any rdo #4051
@program #4051:"'*" any any any
"Copied from Lila (#9102):say Aug 23 17:30:35 2001"
"Copied from Yolanda (#9667):say Jul  3 14:50:29 2001"
"Copied from Emmy (#1061):say Jul  2 15:14:39 2001"
"Copied from Norm (#4805):say Oct 14 07:48:49 2000"
if (length(verb) > 1)
  argstr = tostr(verb[2..$], " ", argstr)
endif
if (length(argstr) > 160)
  this.location:announce_all(player:title() + " says, \"" + argstr + "\"")
else
  announce = $gu:multi_grad({this.colours[random($)], this.colours[random($)], this.colours[random($)]}, argstr)
  $command_utils:suspend_if_needed()
  this.location:announce_all(player:title() + " says, \"" + announce + "\"")
endif
"Last modified by Cecil (#7407) on Thu Aug 23 18:36:16 2001 MDT."
.