ьМ і я()с"H"ся()с"E"Tі"Here's a Mandelbrot variation, getting even slower now, using z=(z*z*z*z)+c!"&… ploф,scrnsavе,scrnloaд,(ћ "(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 ";xmaшrdі"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‚бмбся()Њжмі setзN–ќ я%(screeо)м"T" в highщмhighшмH ’ highщмяhighшмПj siшмeighфмtwentщмfouтмtwпмsideшмxmaштxmiоsideщмymaштymiоoЄgapшмsideшф(highшф)шмxmiоgapщмsideщфhighщщмymaшoldймтмrмм/ґ™ щмhighщ г а тщмщтgapщ.ѕ™ шм г highш а шмшсgapшИќ яuп"" в ТбмвмймбЧЬЛ йрф ч бубсвувоfouтъмбубубубсвувувувтsiшубубувувсшвмeighфубубубувтeighфубувувувсщбмъймйсК,жќ йрф в лм ’ лмйъ()с*рќ лп в Ѓ ploф (ш,щ,ж)8хќ лм в x±мшсЃ ploф (x±,щ,ж)ъ«шмxmiо«Л яuм""К ќ я%(screeо)п"T" в › Jі setшreplщм""e"ќ я%(screeо)м"T" в і "Do you wish to save full screen of present test? (y/n) "replщмяv()-,ќ я%(replщ)м"Y" в screeом"F"њ Њ?6і "Do you want to make another run? (y/n) "replщмяv().@ќ я%(replщ)м"Y" в ( ’ ‚"catalog."“JЃ scrnsavе(б,е)9Tќ еп в і "Screen save error - try again!" ’ h6^і"Type new file name ";ббмбся()њ JhАб,е)9Tќ еп в і "Screen save error -