()"H"()"E"T"Here's an odd little variation on the creature programmes using the test on ";"z=z*c in which c=Ca+Cb where Ca & Cb are both real."G("Use at least one constant greater than 1 for the best effect."&Z plo,scrnloa,scrnsav,d "(T)est or (F)ull screen ";scree 6n (%(scree)"T")(%(scree)"F") d!xcl()"E"()"H"-set()"0"()"E"()"f";set()"e"()"1"()"Y"(;)( )M"Parameters for horizontal axis?" "x min ";xmi "x max ";xmaK"Parameters for vertical axis?" "y min ";ymi "y max ";yma\ "Constant real"; "Constant imaginary"; "Please name screen file ";6 s()"" "Filename already exists" () setN %(scree)"T" highhighH  highhigh6sidexmaxmisideymaymimgapsidehighxmigapsidehighymaoldr/ high  gap+  high gap u"" r  D"ab,abC6 d () ()  @<J () () plo(,,)Txmi^ u"" h %(scree)"T" r setrepl""e| %(scree)"T" "Do you wish to save full screen of present test? (y/n) "replv()- %(repl)"Y" scree"F" A "Do you want to make another run? (y/n) "replv(). %(repl)"Y" d  "catalog." scrnsav(,)9  "Screen save error - try again!"  6"Type new file name ";() ,)9  "Screen save error - try again!"  6