Hi, the new multifractal edition now has 8 formulas to choose, a phoenix type is now available and a spider type. The maximum now has been reached concerning the structure of the formula and the possible amount of inputs. Another fundamental improvement is that the "warp-effect" now is used in two different ways: If reset is checked "z" is set to the basic value and the effect, if enabled, is applied to the input. If reset is not checked the effect, if enabled, is applied to "z" which generates a different image, of course. This means a whole lot of new possibilities and is especially useful in case of sensitive inputs such as Julia, Spider, Phoenix. So there are four different ways to control each in/out part of the image, with or without reset and with or without thw warp-effect, which by itself can be modified in many ways. Fractal greetings, Al --------------------------------start-frm---------------------- FRM:Multifractal_7 { ; Albrecht Niekamp 240703 ;p1 (spider)julia-seed ;real(p2) 5digits: frm-use: shape, outside, inside1, inside2, inside3 ; 0_off 1_secant/mand 2_bees/jul 3_m_mods/phoen 4_newt/spider +5_reset ; input2 : 2digits_many-mods 2digits_phoenix 2digits_spider ; 5digits_secondary frm use : 0_no 1_yes +5_warp ;imag(p2)(-) 2-4digits : quasinewton input (max 2000) ; 1digit : no many_mods multipl. 1_out 2_in1 3_in2 4_all ; 1digit : iter-reset 1_out 2_in1 3_in2 4_all ; input2 : 4digits(-)_mand/jul 2digits_secant 4digits_bees ;real(p3) many_mods bailout, bailout ;imag(p3) shape : factor (fn1), outside : border-in (5digits+fract) ;real(p4) outside : factor (fn2), border-out (5digits+fract) ;imag(p4) inside1 : maxiter1, 5digits_factor1 (fn2) ;real(p5) inside2 : maxiter2, 5digits_factor2 (fn3) ;imag(p5) inside3 : maxiter3, 5digits_factor3 (fn4) ;fn(1) is shared by many_mods, bees da=real(p2) dd=trunc(da) da=round((da-dd)*100000000000)+11111 d=trunc(dd/10000) t=d>5 dd=dd-d*10000 d=d-5*t d3=(d==2)+(d==4) d4=(d3==0) vb=(d==3)+(d==4) d=trunc(dd/1000) ex1=d>0 dd=dd-d*1000 rs1=d>5 d=d-5*rs1 v1m=(d==3) v1j=(d==4) dd1=(d==2)+(d==4) d=trunc(dd/100) ex2=d>0 dd=dd-d*100 rs2=d>5 d=d-5*rs2 v2m=(d==3) v2j=(d==4) dd2=(d==2)+(d==4) d=trunc(dd/10) ex3=d>0 dd=dd-d*10 rs3=d>5 d=d-5*rs3 v3m=(d==3) v3j=(d==4) dd3=(d==2)+(d==4) ex4=dd>0 rs4=dd>5 dd=dd-rs4*5 v4m=(dd==3) v4j=(dd==4) dd4=(dd==2)+(dd==4) ; mm=trunc(da/1000000000) da=da-mm*1000000000 ph=trunc(da/10000000)/100 da=da-ph*1000000000 sp=trunc(da/100000)/100 da=da-sp*10000000 d=trunc(da/10000) ex0=d>4 ab=(d==2)+(d==7) da=da-d*10000 d=trunc(da/1000) w1=d>4 ab1=(d==2)+(d==7) da=da-d*1000 d=trunc(da/100) w2=d>4 ab2=(d==2)+(d==7) da=da-d*100 d=trunc(da/10) w3=d>4 ab3=(d==2)+(d==7) d=round(da-d*10) w4=d>4 ab4=(d==2)+(d==7) tt=ex0+ex1+ex2+ex3+ex4 ; d=imag(p2) t=d<0 if (t) d=-d endif dd=trunc(d) d=round((d-dd)*10000000000) pp=trunc(dd/100)/10 dd=dd-1000*pp da=trunc(dd/10) so1=((da==1)+(da==4)==0) so2=((da==2)+(da==4)==0) so3=((da==3)+(da==4)==0) dd=dd-10*da ir1=(dd==1)+(dd==4) ir2=(dd==2)+(dd==4) ir3=(dd==3)+(dd==4) ; p0=trunc(d/100000000)/10 d=d-p0*1000000000 p6=trunc(d/1000000)/10 d=d-p6*10000000 if (t) p6=-p6 endif p7=trunc(d/10000)/10 d=d-p7*100000 p8=trunc(d/100)/100 d=d-p8*10000 p9=d/100 ; d=real(p3) mb=trunc(d) ba=(d-mb)*100000 ; d=imag(p3) sfac=trunc(d) b1=(d-sfac)*100000 b0=b1/2 ; d=real(p4) ofac=trunc(d) b2=(d-ofac)*100000 ; d=imag(p4) mi1=trunc(d) fac1=(d-mi1)*100000 ; d=real(p5) mi2=trunc(d) fac2=(d-mi2)*100000 ; d=imag(p5) mi3=trunc(d) fac3=(d-mi3)*100000 ; mo=vb>ab mo1=v1m>ab1 mo2=v2m>ab2 mo3=v3m>ab3 mo4=v4m>ab4 ; sc=((ab+vb)==0) sc1=((ab1+v1m)==0) sc2=((ab2+v2m)==0) sc3=((ab3+v3m)==0) sc4=((ab4+v4m)==0) ; px=((ab+vb)==2) px1=((ab1+v1m)==2) px2=((ab2+v2m)==2) px3=((ab3+v3m)==2) px4=((ab4+v4m)==2) ; if (d4) z=0 if (vb) if (mo) c=0.4*log(sqr(pixel^mm)) else c=pixel z=pixel endif else c=pixel z=pixel*sc endif else c=p1 z=pixel endif t=0 u=d3 bo=z p=pp z0=p7 zold=(0.0,0.0) cb=p9 : If (tt) t=t+1 if ((ex0) && bo>b0) u=2*(fn1(t/sfac)) if (d4) z=z*u if (mo) c=0.4*log(sqr(pixel^mm)) ba=mb else c=pixel endif else z=pixel cb=p9*u c=p1*u p=pp*u endif ex0=0 tt=tt-1 elseif ((ex1) && bo>b1 && bo<b2) if (w1) u=2*(fn2(t/ofac)) else u=1,0 endif rs=rs1 ab=ab1 if (dd1) if (rs) z=pixel cb=p9*u c=p1*u p=pp*u else c=p1 z=z*u cb=p9 endif vb=v1j d3=1 else d3=0 if (rs) c=z*u z=pixel*(sc1+px1) z0=p7*u ph=ph*u else c=z z=z*u endif vb=v1m if (mo1) if (so1) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) ba=mb endif endif if (ir1) t=0 endif ex1=0 tt=tt-1 elseif ((ex2) && t>mi1) if (w2) u=2*(fn2(t/fac1)) else u=1,0 endif rs=rs2 ab=ab2 if (dd2) if (rs) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif vb=v2j d3=1 else d3=0 if (rs) c=z*u z=pixel*(sc2+px2) z0=p7*u ph=ph*u else c=z z=z*u endif vb=v2m if (mo2) if (so2) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) ba=mb endif endif if (ir2) t=0 endif ex2=0 tt=tt-1 elseif ((ex3) && t>mi2) if (w3) u=2*(fn3(t/fac2)) else u=1,0 endif ab=ab3 rs=rs3 if (dd3) if (rs) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif vb=v3j d3=1 else d3=0 if (rs) c=z*u z=pixel*(sc3+px3) z0=p7*u ph=ph*u else c=z z=z*u endif vb=v3m if (mo3) if (so3) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) ba=mb endif endif if (ir3) t=0 endif ex3=0 tt=tt-1 elseif ((ex4) && t>mi3) if (w4) u=2*(fn4(t/fac3)) else u=1,0 endif ab=ab4 rs=rs4 if (dd4) if (rs) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif vb=v4j d3=1 else d3=0 if (rs) c=z*u z=pixel*(sc4+px4) z0=p7*u ph=ph*u else c=z z=z*u endif vb=v4m if (mo4) if (so2) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) ba=mb endif endif ex4=0 tt=tt-1 endif endif if (vb) if (d3) if (ab) z=z*z+c ;Spiderjul John Horner c=c*sp+z else z1=z^p-1 ;Qusinewton Pusk s Istv n z2=p*z*z z=z-z1/z2 endif elseif (ab) zt=z*z+ph-0.5*zold ;Phoenix Mike Wareman zold=z z=zt else z2=fn1(z)+c ;Many_mods Linda Allison q=cos(z2) z=c*(1-q)/(1+q) endif elseif (d3) if (ab) z2=z*z ;Julia Pusk s Istv n z=z2*z2+p6*z2+c-p0 else z1=fn1(z)-cb ;Bees Ray Girvan z2=z1^p8-1 z3=p8*(z1^(p8-1)) z=z-(z2/z3) endif elseif (ab) z2=z*z ;Mandel Pusk s Istv n z=z2*z2+p6*z2+c-p0 else z3=z ;Secant Mike Wareman z1=z0*z0*z0*z0-1 z2=z*z*z*z-1 z=z-z2*(z-z0)/(z2-z1) z0=z3 endif bo=|z| bo<=ba } -------------------------------------------start-par--------------------- downmix { ; inside spider-newton-phoenix ; Albrecht Niekamp July, 03 ; ; ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=mfr.frm formulaname=multifractal_7 function=cos/exp/exp/exp passes=t center-mag=0.453671/1.33227e-015/1.323725/1/-90/3.88578058618804789e-016 params=-0.02237006744590594/-0.07473982970671712/10498.32595010101/5000.\ 0608020602/2048.04084/384.0000045/384.00024/256.0076800000001/512.007680\ 0000001/768.0076800000001 float=y maxiter=2048 inside=maxiter outside=tdis logmap=4 periodicity=0 rseed=-2436 colors=200677<21>hiijkkkll<3>rss<21>HIIFGGEFF<3>677455344122000<25>0bo0d\ q0es<3>0kz<25>09C08A068<2>022000111<24>niQpjRrlS<3>ysX<25>BB7996775<3>00\ 0<24>n00p00r00<3>y00<25>B00900700<3>000<2>455 } spinewphoesec { ; Albrecht Niekamp July, 03 ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=mfr.frm formulaname=multifractal_7 function=cos/exp/exp/sin passes=t center-mag=-8.88178e-016/-8.88178e-016/1.041667/1/-90/3.8857805861880478\ 9e-016 params=-0.02237006744590594/-0.07473982970671712/40986.3259501001/5000.0\ 608020602/2048.04094/384.0000045/384.00024/256.00768/768.0076800000001/1\ 024.00768 float=y maxiter=2048 inside=maxiter outside=tdis logmap=4 periodicity=0 rseed=-2436 colors=200677<21>hiijkkkll<3>rss<21>HIIFGGEFF<3>677455344122000<25>0bo0d\ q0es<3>0kz<25>09C08A068<2>022000111<24>niQpjRrlS<3>ysX<25>BB7996775<3>00\ 0<24>n00p00r00<3>y00<25>B00900700<3>000<2>455 } Secantflyer { ; Albrecht Niekamp July, 03 ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=mfr.frm formulaname=multifractal_7 function=cos/exp/exp/sin passes=t center-mag=0.312805/0/0.6666667 params=-0.02237006744590594/-0.07473982970671712/31997.32595010605/5000.\ 0608020602/2048.04094/384.0000045/384.00024/256.00768/768.0076800000001/\ 1024.00768 float=y maxiter=2048 inside=maxiter outside=tdis logmap=4 periodicity=0 rseed=-2436 colors=2000gt<22>09C08A068<2>022000111<24>niQpjRrlS<3>ysX<25>BB7996775<3\
000<24>n00p00r00<3>y00<25>B00900700<3>000<2>455677899ABBBCC<18>hiijkkkl\ l<3>rss<21>HIIFGGEFF<3>677455344122000<25>0bo0dq0es<3>0kz0jx0hv }
Double_image { ; Time 0.19.43.53 ; Albrecht Niekamp July, 03 ; ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=mfr.frm formulaname=multifractal_7 function=sin/cosxx/cos/sin passes=t center-mag=0.426332/6.66134e-016/1.344086/1/-90/-1.23373533611470521e-01\ 4 params=-0.02237006744590594/-0.07473982970671712/10482.64595310601/5040.\ 0608020602/82048.02048000001/384.0000045/384.00024/128.00768/184.00768/5\ 12.0076800000001 float=y maxiter=3072 inside=maxiter outside=tdis periodicity=0 rseed=-2436 colors=2000bo<19>09C08A068<2>022000211<13>UQFWSGYTH<3>e`LgbMidN<3>qjRslS\ unT<2>zsX<25>CB7A96875<3>000400<23>o00q00s00<3>z00<25>C00A00800<3>000<23\
eeegggiiijjjlllnnn<2>sss<25>BBB999777<2>222000012<24>0bo0cq0es<3>0kz<4>\ 0dq }
Layers { ; of the onion ; Albrecht Niekamp July, 03 ; Time 1.33.03.85 ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=mfr.frm formulaname=multifractal_7 function=sin/cosxx/cos/sin passes=t center-mag=0.972387/-0.248155/26.88172/1/-90/-1.23373533611470521e-014 params=-0.02237006744590594/-0.07473982970671712/10482.64595110606/5040.\ 0608020602/82048.02048000001/384.0000045/384.00024/128.00768/184.00768/5\ 12.0076800000001 float=y maxiter=3072 inside=maxiter outside=tdis logmap=yes periodicity=0 rseed=-2436 colors=2000bo<19>09C08A068<2>022000211<13>UQFWSGYTH<3>e`LgbMidN<3>qjRslS\ unT<2>zsX<25>CB7A96875<3>000400<23>o00q00s00<3>z00<25>C00A00800<3>000<23\
eeegggiiijjjlllnnn<2>sss<25>BBB999777<2>222000012<24>0bo0cq0es<3>0kz<4>\ 0dq }
Hanging_gardens { ; of Semiramis ; Albrecht Niekamp July, 03 ; Time 0.48.12.55 ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=mfr.frm formulaname=multifractal_7 function=sin/cosxx/cos/sin passes=t center-mag=+0.36133792768156270/-0.64229253619003070/116197.8/1/-90/3.88\ 578058618804789e-016 params=-0.02237006744590594/-0.07473982970671712/10482.64595110606/5040.\ 0608020602/82048.02048000001/384.0000045/384.00024/128.00768/184.00768/5\ 12.0076800000001 float=y maxiter=3072 inside=maxiter outside=tdis periodicity=0 rseed=-2436 colors=2000JQ<12>0bo0cq0es<3>0kz<25>09C08A068<2>022000211<13>UQFWSGYTH<3\
e`LgbMidN<3>qjRslSunT<2>zsX<25>CB7A96875<3>000400<23>o00q00s00<3>z00<25\ C00A00800<3>000<23>eeegggiiijjjlllnnn<2>sss<25>BBB999777<2>222000012<10\ 0IO }
mm_meets_spider { ; Time 0.36.26.15 ; Albrecht Niekamp July, 03 ; ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=mfr.frm formulaname=multifractal_7 function=sin/cosxx/cos/sin passes=t center-mag=+0.36139649738980650/-0.64231765276418100/11619.78/1/-90/-1.2\ 3373533611470521e-014 params=-0.02237006744590594/-0.07473982970671712/10482.64595110656/5040.\ 0608020602/82048.02048000001/384.0000045/384.00024/128.00768/184.00768/5\ 12.0076800000001 float=y maxiter=3072 inside=maxiter outside=tdis logmap=3 periodicity=0 rseed=-2436 colors=200555<20>eeegggiiijjjlllnnn<2>sss<25>BBB999777<2>222000012<24>0b\ o0cq0es<3>0kz<25>09C08A068<2>022000211<13>UQFWSGYTH<3>e`LgbMidN<3>qjRslS\ unT<2>zsX<25>CB7A96875<3>000400<23>o00q00s00<3>z00<25>C00A00800<3>000222\ 444 } Ying&Yang { ; Time 0.19.14.27 ; Albrecht Niekamp July, 03 ; ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=mfr.frm formulaname=multifractal_7 function=sin/cosxx/cos/sin passes=t center-mag=+0.38684901922323730/-0.63969404719008790/37.1833/1/-90/-1.23\ 373533611470521e-014 params=-0.02237006744590594/-0.07473982970671712/10437.32595910656/5000.\ 0608020602/82048.02048000001/384.0000045/384.00024/128.00768/190.0076800\ 000001/384.0076800000001 float=y maxiter=3072 inside=maxiter outside=tdis logmap=3 periodicity=0 rseed=-2436 colors=200pppqqqsss<25>BBB999777<2>222000012<24>0bo0cq0es<3>0kz<25>09C08\ A068<2>022000211<13>UQFWSGYTH<3>e`LgbMidN<3>qjRslSunT<2>zsX<25>CB7A96875\ <3>000400<23>o00q00s00<3>z00<25>C00A00800<3>000<23>eeegggiiijjjlllnnn } The_Brain { ; Time 0.02.53.45 ; Albrecht Niekamp July, 03 ; Shape Phoenix ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=mfr.frm formulaname=multifractal_7 function=sin/sin/exp/sin passes=t center-mag=0/0/0.6666667 params=-0.02237006744590594/-0.07473982970671712/32946.32595710155/5000.\ 0608020602/2048.04094/384.0001645/384.00048/128.00768/384.0076800000001/\ 512.0076800000001 float=y maxiter=2048 inside=maxiter outside=tdis logmap=4 periodicity=0 rseed=-2436 colors=200033021000<4>984BA5DC6FE7HF8JH9<13>jeNlgOniPpjQrlRtnS<2>ysW<25>\ BB6995774553442220000<24>n00p00r00<3>y00<25>B00900700<3>000221<4>9A9BCBD\ EDFGFGHG<15>hihjkjklk<3>rsr<21>HIHFGFEFE<3>676454343121000<25>0bn0dp0er<\ 3>0ky<28>055 } ---------------------------------------------------------------------------- ----end-----------------------