_ ()"H"()"E"0"Variation on creature using z=(z*z*z*z)+cP&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  highhigh6sidexmaxmisideymaymikgapsidehighxmigapsidehighymaoldr/ high  gap+  high gap u"" r  "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  "S