d ()"H"()"E"F"This is a variation on the Mandlebrot set using z=(z*z*z)+c."& plo,scrnloa,scrnsav,( "(T)est or (F)ull screen ";scree 62 (%(scree)"T")(%(scree)"F") (!<cl()"E"()"H"-Fset()"0"()"E"()"f";Pset()"e"()"1"()"Y"(;)( )MZ"Parameters for horizontal axis?" "x min ";xmi "x max ";xmard"Parameters for vertical axis?" "y min ";ymi "y max ";yma "Maximum number of iterations ";&n "Please name screen file ";6x s()"" "Filename already exists" n() setN %(scree)"T" highhighH  highhighVtwentfoutwsidexmaxmisideymaymiogapside(high)xmigapsidehighymaoldr/ high  gap.  high gap u""   fou()(),    ()*  plo (,,)7  x plo(x,,)xmi u""  %(scree)"T" J setrepl""e" %(scree)"T" "Do you wish to save full screen of present test? (y/n) "replv()-, %(repl)"Y" scree"F" A6 "Do you want to make another run? (y/n) "replv().@ %(repl)"Y" (  "catalog."J scrnsav(,)9T  "Screen save error - try again!"  h6^"Type new file name ";() Jh,)9T