19f
@verb #7639:"random_paragraph" this none this rxdo #4017
@program #7639:"random_paragraph" this none this
p = {}
words = $all_properties()
lines = random(4) + 3
for x in [1..lines]
  line = ""
  for x in [1..random(5) + 3]
    line = line + words[random($)] + " "
  endfor
  p = listappend(p, line[1..$ - 1] + ".")
endfor
return p
"Last modified by Drizzt (#4017) on Sun Sep 16 18:24:24 2001 MDT."
.

0