202
@verb #4457:"fsay" any any any rxdo #4457
@program #4457:"fsay" any any any
meh = mug = {}
for x in ($su:explode(argstr))
  meh = {@meh, x[1]}
  mug = {@mug, x[2..$]}
endfor
moo = {}
for x in (mug)
  if (x in mug == length(mug))
    moo = {@moo, tostr(meh[1], x)}
  else
    moo = {@moo, tostr(meh[(x in mug) + 1], x)}
  endif
endfor
a = ""
for y in (moo)
  a = a + " " + y
endfor
argstr = a[2..$]
return this:say(argstr)
"Last modified by Rubbie (#4457) on Tue Aug  8 02:30:56 2000 MDT."
.

0