/* This Genie applies random colours and/or baseline shifts to a selected block of text. Warnings: it is slow, it increases the length of the selected text by a factor of 8 or 9 (because of all the style codes needed), and it slows ProPage down to a crawl. So only do it at the end when you have got everything else right. Note that any other style codes inside the block will be removed.
Written by Don Cox ⌐ August 93. Not Public Domain. */
trace n
signal on error
signal on syntax
address command
if word(ppm_GetState(), 1) ~= 3 then exit_msg("You must be in edit mode to use this Genie")