April 2011 - Fractint - mailman.xmission.com

(Fractint) Fractint for windows
by Albrecht Niekamp 08 Apr '11

08 Apr '11

Hi Richard, maybe you have read my mails about multifractals. As preliminary versions run well with fractint for windows I wonder, if it is possible to increase the size of the internal buffer, as I get a "Buffer overrun" error if I try to load multifractal_10. Sincerely, Albrecht

2 1

FOTD 08-04-11 (Rhythm in Chronons [New 6, Old 7])
by Jim Muth 07 Apr '11

07 Apr '11

FOTD -- April 08, 2011 (Rating new-6, old-7) Fractal visionaries and enthusiasts: Today's image is lies in the same parent fractal that gave us yesterday's image. But instead of lying in the fan itself, today's scene is located in a field of chaos extending from a spurious bud just beyond the eastern limit of the parent's 'fan'. The rating of a 6 on the new scale is about equal to an old rating of a 7. The name "Rhythm in Chronons" came to mind a chronon after I decided to name the image. The 4-D spacetime universe actually extends in time as well as in space, and just as the Plank length is the shortest possible spatial distance, a chronon is the smallest possible duration of time. The calculation time of 1-3/4 minutes is neither notably fast nor slow. It is about what would be expected for a fractal on a 2000mhz machine. All problems connected with fractal calculation may be avoided by checking the finished image on the currently active FOTD web site at: <http://www.emarketingiseasy.com/TESTS/FOTD/jim_muths_fotd.html> The original FOTD web site, which has existed for 14 years, is located at: <http://www.Nahee.com/FOTD/> My own web site is very nearly ready. One remaining problem is that a lot of the old links are no longer valid. (Do I hear murmurs that my site has supposedly been nearly ready for months? Very soon these doubters will have to eat their doubts. [But I'm not sure how a doubt might be seasoned.]) The rain ended Wednesday night here at Fractal Central, but the clouds hung on all day Thursday. When the temperature got no higher than 48F +9C Thursday afternoon, the fractal cats grew disgusted and released their frustration tearing up a carpet and chasing each other up and down the long hallway. The humans' day was quite busy also. The next FOTD will be posted in 24 hours. Until then, take care, and be eager to experience whatever may happen. Jim Muth jamth(a)mindspring.com START PARAMETER FILE======================================= Rhythm_in_Chronons { ; time=0:01:47.82-SF5 on P4-2000 reset=2004 type=formula formulafile=basicer.frm formulaname=MandAutoCritInZ function=recip float=y center-mag=+4.9806165564949/-0.675127991569/2.6679\ 75e+009/1/52.5/0 params=-5.5/-1.2/-0.02/-11.3/0/0/\ 0/0 maxiter=2400 inside=0 logmap=247 periodicity=6 colors=000E0YF0WF0UF0SF0QF0PF0NF0LF0JF0IHALJ0NKHQM\ 0SNPUPAXR`ZPGUWhCmTCRqCO_CzqMLZBJmBGVBEjBBSA9hA6OA\ 4gA9WDEeGJ`JOcMcdPHbIamUA`BcjCDVDE8DFNEHBFILFJFGKH\ HLIHLFILCJPBJL7KP5TO7OR9STAVWCZYEa`FecHieJlhKpgMsm\ OwmPziXlhd_YlNmiAVrDrkGZpJzlMbnPzmSflVvkYvj`ricnhf\ hdcb`aYY_SUYMQWHNUBJI5FG0CEFHHTRTUQUVQVVQWWQWXPXXP\ YYPZZPZZO__O``Oa`OaaNbbMccLccKddKeeJefIffHggGghGhi\ Fii9ij8jk7kk7khJie0gb0e`0cU2RY0W`0`c0ef0ji0ol0th0p\ e3lb8h_DdWI`TSXQXTNaPPZOQWORPNTMNUJMVHMSILQJLPMGOK\ LOJPOHUOGYNEaNDfNBjJ6qNAnQDlTGiWJg_MdbPbeS_hVYkYWh\ VXeSYbPZ_M_XJ`UGaQBcREaSG_TIYUKWVMUWPSXTQXXOY`MZdK\ _iI`kGamEboCcqAer7cs8at8_u8Zv8Xw8cx8cy8cz7cz7cz7cz\ 7cz7cz7mz7mz7mz7mz7mz7mz7mz7mz7mz5mz7mz9mzBmzDmzFm\ zHmzJzzKzzMzzOzzQzzSzzUzzWzzYzz`zzZzzXzzVzzTzzRzzP\ zzNzzLvzJzzLzzNzzOzzQzzSzzTzzXzz`zzdzzgzzkzzozzszz\ vzzjzzjzzjzzjzzjzzjzzjzzj } frm:MandAutoCritInZ {; Jim Muth a=real(p1), b=imag(p1), d=real(p2), f=imag(p2), g=1/f, h=1/d, j=1/(f-b), z=(((-a*b*g*h)^j)+(p4)), k=real(p3)+1, l=imag(p3)+100, c=fn1(pixel): z=k*((a*(z^b))+(d*(z^f)))+c, |z| < l } END PARAMETER FILE=========================================

1 0

FOTD 07-04-11 (Augmented Ideation [New 4, Old 6])
by Jim Muth 06 Apr '11

06 Apr '11

FOTD -- April 07, 2011 (Rating new 4, old 6) Fractal visionaries and enthusiasts: Today's image is named "Augmented Ideation", whatever that might mean. It is located in a minor valley on the edge of the 'fan' of the parent fractal that is created when 5.5 negative parts of Z^(-1.2) are combined with 0.02 negative parts of Z^(-11.3) and (1/C) is added. The resulting fractal consists of a main part, which is almost all 'fan', and a disconnected 'ring' lying some distance to the northeast. Today's image was given a quick extra kick by rendering it with the outside set to 'tdis'. Other options give different render- ings, though none are much better than the 'tdis' The rating of a 4 is not as bad as it seems. The rating is on the new scale. On the old scale it would rate a 6. The calculation time of 9 minutes is slower than ideal. But the ideal situation seldom prevails in this less-than-perfect world, so a bit of patience will be required. Impatience may be kept to a minimum by viewing the image on the currently active FOTD web site at: <http://www.emarketingiseasy.com/TESTS/FOTD/jim_muths_fotd.html> where the finished image is posted. The original FOTD web site is at: <http://www.Nahee.com/FOTD/> The address of my own web site will be posted as soon as we get the April images up to date. The new images will then be posted on a real-time everyday basis. It will take a while to get the entire 14-year FOTD history posted however. A sunny morning here at Fractal Central on Wednesday gave way to a cloudy midday and rainy afternoon. The temperature of 43F +6C felt like anything but spring. The fractal cats were aware of the conditions but chose to ignore them, concentrating instead on the quest for food. The humans' day was busy enough, mostly with putting the finish- ing touches on the soon-to-appear new FOTD web site. (As soon as we correct one deficiency, another appears.) The next FOTD will be posted in 24 hours. Until then, take care, and for a new view on life, look to the negative side. Jim Muth jamth(a)mindspring.com START PARAMETER FILE======================================= Augmented_Ideation { ; time=0:09:07.72-SF5 on P4-2000 reset=2004 type=formula formulafile=basicer.frm formulaname=MandAutoCritInZ function=recip float=y center-mag=+3.775590862684/+0.015254391512/2.5e+08\ /1/-137.5/0 params=-5.5/-1.2/-0.02/-11.3/0/0/0/0 maxiter=15000 inside=0 outside=tdis periodicity=6 colors=000zqMLZBJXBGVBETBBSA9QA6OA4PA9SDEVGJYJOaMT\ dPYhSakUAhBCdCD6DE8DFAEHBFIDFJFGKHHLIHLFILCJLAJL7K\ L5KO7OR9STAVWCZYEa`FecHieJlhKpjMsmOwoPziXlcd_YlNTt\ AVrDXqGZpJ`oMbnPdmSflVhkYjj`licnhfhdcb`aYY_SUYMQWH\ NUBJS5FQ0COFMRTWTUVUVVVVVWWVWXUXXUYYUZZUZZT__T``Ta\ `TaaSbbRccQccPddPeeOefNffMggLghLhiKiiJijIjkHkkHkhT\ iecgbne`ycUCRYAW`8`c7ef5ji3ol2th8peDlbIh_NdWS`TXXQ\ aTNfPPcOQ`ORZNTWNUTMVRMSSLQTLPWGOULOTPORUOQYNOaNNf\ NLjJGqNKnQNlTQiWTg_WdbZbea_hdYkgWhdXeaYbZZ_W_XT`UQ\ aQLcROaSQ_TSYUUWVWUWZSX`QXbOYdMZfK_iI`kGamEboCcqAe\ r7cs8as8_s8Zs8Xs8Vs8Us8Tq7So7Sm7Rl7Rj7Qh7Pf7Pe7Oc7\ Oa7N_7MZ7MX7LV7MV5LU7KT9KSBJRDJQFIQHIPJHOKGNMGMOFM\ QFLSEKUEJWDIY7F`DIZJKXPNVVPT_SReUPkXNqZLv`JocLifNc\ iOYlQSoSMrTQmXUi`Yed`agdXkhTolPsoLvUGjTGjSGjSGjRGj\ QGjQGjPGjOFlPGjPHhPIfPJdPKcPLaPM_PNYPOXRS_TVaUYdWa\ fXdhZak`kmYfDWaCgVCRaCO_C } frm:MandAutoCritInZ {; Jim Muth a=real(p1), b=imag(p1), d=real(p2), f=imag(p2), g=1/f, h=1/d, j=1/(f-b), z=(((-a*b*g*h)^j)+(p4)), k=real(p3)+1, l=imag(p3)+100, c=fn1(pixel): z=k*((a*(z^b))+(d*(z^f)))+c, |z| < l } END PARAMETER FILE=========================================

1 0

Fractint - MFR345G
by Albrecht Niekamp 06 Apr '11

06 Apr '11

Hi, Have fun! MFR345G {; Zooming Playground ; 4.4.2011, Albrecht Niekamp ; Time 0.13.33 ; XP Dos Shell 1600/1200 reset=2004 type=formula formulafile=MFR345G.par formulaname=multifractal_10 function=sin/exp/exp/sin passes=t center-mag=-0.0887779/2.498e-016/13.33333 params=-0.05825983458967864/0.3785210730307932/35187.64\ 595767025/14235.4911030602/152048.0404808048/384.160489\ 4048/384.00482000595/256.1007683001/512.1007683001/768.\ 1007683001 float=y maxiter=3071 inside=maxiter outside=tdis periodicity=0 rseed=-2436 colors=200034022000<8>IF9KHAMJBOLCQMDSOE<8>icNkeOmfP<3>\ unTwpVxqWzsX<25>CB7A96875<3>000400<23>o00q00s00<3>z00<2\ 5>C00A00800<3>000<11>LLLNNNPPPQQQSSSUUU<6>fffgggiiijjjl\ ll<3>sss<25>BBB999777<2>222000012<22>0_k0am0bo0cq<3>0jx\ 0kz0jx<27>056 } FRM:multifractal_10 { ; Albrecht Niekamp Jan2005 ; le=0 z=pixel da=real(p2) dd=trunc(da) da=round((da-dd)*100000000000)+11111 dd=dd+11111 d=trunc(dd/10000) dd=dd-d*10000 d3=(d==4)+(d==5)+(d==8)+(d==9) d4=d3==0 vb=d>5 sc=d==2 mo=d==6 px=d==7 ab=px+(d==3)+(d==5)+(d==9) d=trunc(dd/1000) dd=dd-d*1000 ex1=d>1 sc1=d==2 mo1=d==6 px1=d==7 v1m=mo1+px1 v1j=d>7 dd1=v1j+(d==4)+(d==5) ab1=px1+(d==3)+(d==5)+(d==9) d=trunc(dd/100) dd=dd-d*100 ex2=d>1 sc2=d==2 mo2=d==6 px2=d==7 v2m=mo2+px2 v2j=d>7 dd2=v2j+(d==4)+(d==5) ab2=px2+(d==3)+(d==5)+(d==9) d=trunc(dd/10) ex3=d>1 sc3=d==2 mo3=d==6 px3=d==7 v3m=mo3+px3 v3j=d>7 dd3=v3j+(d==4)+(d==5) ab3=px3+(d==3)+(d==5)+(d==9) d=dd-d*10 ba=imag(p5) mi3=trunc(ba) dd=(d>1)+(mi3>1) ex4=dd==2 sc4=d==2 mo4=d==6 px4=d==7 v4m=mo4+px4 v4j=d>7 dd4=v4j+(d==4)+(d==5) ab4=px4+(d==3)+(d==5)+(d==9) ; 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 da=da-d*10000 d=d-5*ex0 dm=(d==2)+(d==4) ir0=(d==3)+(d==4) d=trunc(da/1000) w1=d>4 da=da-d*1000 d=d-5*w1 rs1=(d==2)+(d==4) ir1=(d==3)+(d==4) d=trunc(da/100) w2=d>4 da=da-d*100 d=d-5*w2 rs2=(d==2)+(d==4) ir2=(d==3)+(d==4) d=trunc(da/10) w3=d>4 da=da-d*10 d=d-5*w3 rs3=(d==2)+(d==4) ir3=(d==3)+(d==4) d=round(da) w4=d>4 d=d-5*w4 rs4=(d==2)+(d==4) tt=ex1+ex0+ex2+ex3+ex4 ; d=real(p3) dd=trunc(d) da=(d-dd)*10000000000 pp=trunc(dd/10000) ba1=dd-10000*pp ba2=trunc(da/100000) ba3=da-100000*ba2 ; d=imag(p3) sfac=trunc(d) da=(d-sfac)*100000000000 ba4=trunc(da/1000000) ba5=da-ba4*1000000 ; d=real(p4) ofac=trunc(d) da=(d-ofac)*10000000000 bh=trunc(da/100000)/10 bl=(da-bh*1000000)/10 bs=bl/2 ; d=imag(p2) t=d<0 if (t) d=-d endif dd=trunc(d) da=round((d-dd)*10000000000) d=trunc(dd/10000) dd=dd-d*10000 bb0=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=trunc(dd/1000) dd=dd-d*1000 bb1=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=trunc(dd/100) dd=dd-d*100 bb2=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=trunc(dd/10) dd=dd-d*10 bb3=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=round(dd) bb4=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) ; d=da 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 dp=p6+p0/100 p8=trunc(d/100)/100 d=d-p8*10000 p9=d/100 ; d=imag(p4) mi1=trunc(d) da=(d-mi1)*100000000000 d=trunc(da/10000000000) bt1=d>6 da=da-d*10000000000 d=d-5*bt1 dt1=d>1 iv1=d==3 fac1=trunc(da/100000) da=da-fac1*100000 bo1=(da/100000)/10 ; d=real(p5) mi2=trunc(d) da=(d-mi2)*100000000000 d=trunc(da/10000000000) bt2=d>6 da=da-d*10000000000 d=d-5*bt2 dt2=d>1 iv2=d==3 fac2=trunc(da/100000) da=da-fac2*100000 bo2=(da/100000)/10 ; if (mi3==1) d=(ba-mi3)*1000000 fr=round((trunc(d/10000))*10) ;lake effect by S.Gallet d=d-fr*1000 lv=(trunc(d/100))/100 d=d-lv*10000 am=d/100 u=real(rotskew*pi/180) t=exp(-flip(u)) bo=1/real(magxmag) q=bo/0.75*imag(magxmag) dd=tan(imag(rotskew*pi/180)) da=2*q*t rs=2*bo*(dd+flip(1))*t zz=center+(-q-bo*dd-flip(bo))*t z=z-zz d=imag(conj(da)*z)/imag(conj(da)*rs) le=d<=lv if (le) dd=lv-d z=z+2*dd*(1+am*sin(fr*dd^0.2))*rs endif z=z+zz else da=(ba-mi3)*100000000000 d=trunc(da/10000000000) bt3=d>6 da=da-d*10000000000 d=d-5*bt3 dt3=d>1 iv3=d==3 fac3=trunc(da/100000) da=da-fac3*100000 bo3=(da/100000)/10 endif ; if (vb) if (d3) if (ab) z=z*le+pixel*(le==0) ;Spider c=p1 else z=z*le+pixel*(le==0) c=p1 ;newton endif elseif (ab) c=z ;Phoenix z=z*le+pixel*(le==0) else c=0.4*log(sqr(z^mm)) ;many mods z=0 endif elseif (d3) if (ab) c=p1 ;Julia z=z*le+pixel*(le==0) else ;bees c=p1 z=z*le+pixel*(le==0) endif elseif (ab) c=z ;Mandel z=0 else c=z ;Secant z=z*le+pixel*(le==0) endif t=0 bo=|z| p=pp z0=p7 zold=(0.0,0.0) cb=p9 ba=bb0 : if (tt) t=t+1 if (ex0) ex0=t<mi1 if (bo>bs) u=2*(fn1(t/sfac)) ex0=0 if (ir0) t=0 endif if (d4) z=z*u if (mo) c=0.4*log(sqr(z^mm)) else c=pixel endif else z=z*le+pixel*(le==0) cb=p9*u c=p1*u p=pp*u endif tt=tt-1+ex0 endif elseif ((ex1)&&bo>bl) if (bo<bh) d3=dd1 ba=bb1 ab=ab1 ex1=0 tt=tt-1 if (w1) u=2*(fn2(t/ofac)) else u=1,0 endif if (ir1) t=0 endif if (d3) vb=v1j if (rs1) z=pixel cb=p9*u c=p1*u p=pp*u else c=p1 z=z*u cb=p9 endif else vb=v1m if (rs1) c=z*u z=pixel*(sc1+px1) z0=p7*u ph=ph*u else c=z z=z*u endif if (mo1) c=0.4*log(sqr(z^mm)) endif endif endif elseif (ex2) if (dt1) if (iv1) d=bo>bo1 else d=bo<bo1 endif if (bt1) d=d+(t>mi1) endif else d=t>mi1 endif if (d) ab=ab2 d3=dd2 ba=bb2 ex2=0 tt=tt-1 if (w2) u=2*(fn2(t/fac1)) else u=1,0 endif if (ir2) t=0 endif if (d3) vb=v2j if (rs2) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif else vb=v2m if (rs2) c=z*u z=pixel*(sc2+px2) z0=p7*u ph=ph*u else c=z z=z*u endif if (mo2) c=0.4*log(sqr(z^mm)) endif endif endif elseif (ex3) if (dt2) if (iv2) d=bo>bo2 else d=bo<bo2 endif if (bt2) d=d+(t>mi2) endif else d=t>mi2 endif if (d) ab=ab3 d3=dd3 ba=bb3 ex3=0 tt=tt-1 if (w3) u=2*(fn3(t/fac2)) else u=1,0 endif if (ir3) t=0 endif if (d3) vb=v3j if (rs3) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif else vb=v3m if (rs3) c=z*u z=pixel*(sc3+px3) z0=p7*u ph=ph*u else c=z z=z*u endif vb=v3m if (mo3) c=0.4*log(sqr(z^mm)) endif endif endif elseif (ex4) if (dt3) if (iv3) d=bo>bo3 else d=bo<bo3 endif if (bt3) d=d+(t>mi3) endif else d=t>mi3 endif if (d) ab=ab4 d3=dd4 ba=bb4 ex4=0 tt=0 if (w4) u=2*(fn4(t/fac3)) else u=1,0 endif if (d3) vb=v4j if (rs4) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif else vb=v4m if (rs4) c=z*u z=pixel*(sc4+px4) z0=p7*u ph=ph*u else c=z z=z*u endif if (mo4) c=0.4*log(sqr(z^mm)) endif endif endif 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) z1=z*z+0.56+ph/100-0.5*zold ;Phoenix Mike Wareman zold=z z=z1 else z2=fn1(z)+c ;Many_mods Linda Allison z1=cos(z2) z=c*(1-z1)/(1+z1) 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) if (dm) z=z*z+c+c*c-dp ;Double Mandel else z2=z*z ;Mandel Pusk s Istv n z=z2*z2+p6*z2+c-p0 endif 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 } Sincerely, Albrecht

1 0

FOTD 06-04-11 (A Paradox of Time [New 5, Old 7])
by Jim Muth 05 Apr '11

05 Apr '11

FOTD -- April 06, 2011 (Rating new 5, old 7) Fractal visionaries and enthusiasts: With today's image we start a new rating scale. The new scale will run from one to ten just as the old scale did, but in the new scale a rating of one will indicate an image just barely worth FOTD status, whereas in the old scale, anything under a 4 was discarded as too poor to be an FOTD. Today's image shows a cubic minibrot with quadratic tendencies. It is located in the area of the large minibrot on the main stem of the parent fractal, which is a Mandelbrot set caught morphing into a cubic Mandeloid. The name "A paradox of Time" has nothing to do with relativity or time travel. In fact, it has nothing to do with the image at all. It is simply what came out when I sat at the keyboard to write a name. Actually, I rather enjoy the somber dark blues areas and spider- like networks surrounding the central minibrot. It all creates an atmosphere of pleasant sadness. The calculation time of 45 seconds is almost beyond belief for an image of such magnitude created by the FinDivBrot-2 formula. It means that the first pass of the image will fill the screen before it can shift to Super-VGA mode. As equally effortless way to see the image is to surf down to the active FOTD web site at: <http://www.emarketingiseasy.com/TESTS/FOTD/jim_muths_fotd.html> where the finished image is posted. The original FOTD web site may be accessed at: <http://www.Nahee.com/FOTD/> but it is far from up to date. My own web site is close, but has not yet arrived. An unex- pectedly busy day on Tuesday prevented us from applying the intended final corrections. Tuesday here at Fractal Central began with rain and ended with sun. However the temperature fell short of what it should be at this time of year, reaching a high of only 43F 11C. The fractal cats' moods improved with the increasing sun. By mid afternoon they were as happy as indoor cats could be. The day of the humans was too busy to be as pleasant, though the work went well and was finished with an hour or so to spare. If all goes equally as well, and why should it not, the next FOTD will be posted in 24 hours. Until then, take care, and a thoughtful philosopher once said that it is a terrible waste for unconscious matter to persist for billions of years, while we conscious humans exist only a few score years, and die just when we are beginning to figure out what the world is all about. The philosopher should have distracted his mind from this harshness of reality by purchasing the latest wireless internet devices or by taking drugs. Jim Muth jamth(a)mindspring.com START PARAMETER FILE======================================= A_Paradox_of_Time { ; time=0:00:45.54-SF5 on P4-2000 reset=2004 type=formula formulafile=basicer.frm formulaname=FinDivBrot-2 function=recip float=y center-mag=-1.758490804171659/+0.00016810265582086\ /1.5e+011/1/85.5/0 params=3/25/0/0 periodicity=6 maxiter=750 inside=0 logmap=98 mathtolerance=0.05/1 colors=00000A10C20E20G31I42K53M64O75Q86S97UA8XD8cF\ 9hI9kLAoNAsQBwSBzVFvYJr_NnbQjdUfgYbjaZzcczyRzwNzuJ\ vsGzpSmmbcfQU_DKU1`c7znCulGqkJmiMihQefTaeWYc_UbbQ`\ eMZzIWzEUzFUtGUkHQcIJ_JHWKFTLOPMULN_HOeDOeAPdEQdHR\ dKScNTcRUcUVbXWb_XbbScYNcTIcODcJ8cFC`KGZPKXUNVZRcz\ VczZczacz_czZczYczWKcVK_UJXTITRIPQHMPHIUGEMFBZF7ZE\ 3JE0ZF7cFDcFJmFPmFVzG`zGfzGlzGrzGxzHszInzIizJezJ`z\ KWzKSzJQzIOzHMzGLzFJzEHzDFzCEzBCzAAz98z87z75z63z62\ zA6WD9VHCVKFUOJURMTVPTYSS`WSdZRgaRkdQnhQrkPunPxqK3\ jI7hHBgFFfEJdCNcBRb9V`8Z_6bZ5fYH`TTWOdRJpMEsQ9vT5y\ W1tX3oX5jY6eY8aY9`Z8_Z7Z_7Y_6X_5W`5V`zUazTazSazRbz\ QbzPbzNazL`zK`zI_zHZzFZzDYzCXzAXz9Wz7Vz6VzeXzXezOn\ zFvzAwz5xz1yz7vzDtzIrzOpzUnzZlzdmzjmzomzumzzmzpzzZ\ zzIzzmzzmzzmzzmzzmzzmzzmzzmzzzzzzzzzzzzzzzzzzzzzzz\ zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz\ zzzzzzzzzzzzzzzzzzzzzzzzz } frm:FinDivBrot-2 { ; Jim Muth z=(0,0), c=pixel, a=-(real(p1)-2), esc=(real(p2)+16), b=imag(p1): z=(b)*(z*z*fn1(z^(a)+b))+c |z| < esc } END PARAMETER FILE=========================================

1 0

Fractint - MFR133
by Albrecht Niekamp 05 Apr '11

05 Apr '11

Hi Jack, yes, we do. As a multifractal image it consists of several parts (separate fractal formulas). Zoom out and you´ll see. Sincerely, Albrecht

1 0

Re: [Fractint] MFR133 The Mirror
by JackOfTradeZ＠comcast.net 05 Apr '11

05 Apr '11

. It's a cool image, but do we really need that humongous FRM file ?? How do people write these things....... .

2 1

FOTD 05-04-11 (Extra Redundancy [7])
by Jim Muth 05 Apr '11

05 Apr '11

FOTD -- April 05, 2011 (Rating 7) Fractal visionaries and enthusiasts: The skewed minibrot in today's image lies in the Z^(2.1)+C Mandeloid as it appears PI levels up the complex logarithmic hyperladder when no function is applied. This parent Mandeloid closely resembles the minibrot at the center of today's image, though it is rotated so that the main period-2 bud lies on the north side of the main bay. This bud has small valleys on its east and west sides. Today's image lies in the western valley. The name "Extra Redundancy" is a play on words. Since the word 'redundant' implies an overabundance, the word 'extra' is itself redundant. Today's exponent of 2.1 is also redundant, since it is more than enough to draw the classic Mandelbrot set, which, at least IMO, is the world's best fractal. Today's image rates a 7. The rating of a 7 is getting to be all too routine, so I might recalibrate the rating scale so that a present rating of 7 would become a new rating of a 5. Then, a present 6 would equal a new 4, and so on. Today's image calculates in 5-1/2 minutes, somewhat slower than ideal, but still fast enough to prevent a big disappointment. Those who wish to view without calculating may do so by hopping down to the currently active FOTD web site at: <http://www.emarketingiseasy.com/TESTS/FOTD/jim_muths_fotd.html> and viewing the finished image there. The original web site is still available at: <http://www.Nahee.com/FOTD/> My own FOTD web site is still in the building, checking and adjusting stage, but I have a feeling that I may post the web address in tomorrow's FOTD. Lots of clouds spoiled Monday here at Fractal Central, though the temperature reached a mild 63F 17C. The fractal cats spent several hours waiting for the sun to appear. Finally, when it did not, they made sympathetic faces and asked for extra treats. In the human department, the day was average busy, the web site made progress, and nothing unexpected turned up. If all goes well, tomorrow could be the same. The next FOTD fractal will probably be posted in 24 hours. Until then, take care, and I read in the morning paper that some scientists are seriously considering intentionally altering the earth's atmosphere in an attempt to slow 'man-made' global warming. If they actually try to do so, we will know who to blame for any subsequent disasters due to severe weather. (Lawyers start advertising now.) Jim Muth jamth(a)mindspring.com START PARAMETER FILE======================================= Extra_Redundancy { ; time=0:05:32.79-SF5 on P4-2000 reset=2004 type=formula formulafile=basicer.frm formulaname=MandelbrotBC3 function=ident passes=1 center-mag=-0.35834972189/+0.92985649615/393902/1/\ 137.5/0 params=2.1/0/3.14159265358979/0 float=y maxiter=15000 inside=0 logmap=240 periodicity=6 colors=000KkZLlYMnXNoW`_XnKXlIVkGTjERiCPhANg9LcDM_\ HMWLMSPMPSMOULOWKOYKO_JNaINcINeHNgGNiGMkFMmEMoEMqD\ MrDSlGYfIbaKhWMmROsLQxGS0vr5unAukEuhJteOtaStZXsWas\ TesQfqUfoXfm_fkbfiffgifelfcohfijhcljZnlTooNqqIssCu\ uAvwKwwUxxcyymzuwxrrvmmthhrccpZZmUZlPZlK`jHbiFdhJf\ fOheTjdXlbanafp`jrZotYtvXxxWurVsmUpgTnbSkXRiSQfMPd\ HOaBN_6NY1QX4SW7VW9XVC_UFaUHdTKfTMiSPkRSnRUpQXsP_u\ PaxOdzOfwMgtLhrJioIjLBcNBhQBmSBrVCnXDjZEf`EbbFZdGV\ fHRhHNbGKXGIRFFLFDFEA9E83E64H84JA5LC5ND6PF6RH7TJ7V\ K8XM8ZO9`Q9bRCcUFcXHdZKdaMdcPefRehUfkWfmZfp`grcgue\ gwddvdavcZvcXvcUvbRvbOvbMvaJvaGvaEv_HvYKvWNvUQvUTv\ UVvUYvM`vUcvcfvchvckvcnvcqvctvcvvmtwmrxmqymozmmzml\ zrjzzizzfzzdzzbzz`zzZzzXzzYzzZzm_zmazmczmezmgzmizm\ kzmmzmozmqzmszmuzmwzmwzmwzmwzmwzmwzmwzmwzmwzmwzmwz\ mwzzwzzwzzwzzwzzwzzwzzwzzwzzwzzwzzwzzwzzwzzwzzwzzw\ zzwzzwzzwzzwzzwzzwzzwzzwz } frm:MandelbrotBC3 { ; by several Fractint users e=p1, a=imag(p2)+100 p=real(p2)+PI q=2*PI*fn1(p/(2*PI)) r=real(p2)+PI-q Z=C=Pixel: Z=log(Z) IF(imag(Z)>r) Z=Z+flip(2*PI) ENDIF Z=exp(e*(Z+flip(q)))+C |Z|<a } END PARAMETER FILE=========================================

1 0

FOTD 04-04-11 (Briefly Beautiful [6])
by Jim Muth 04 Apr '11

04 Apr '11

FOTD -- April 04, 2011 (Rating 6) Fractal visionaries and enthusiasts: Today's image rates only a 6, and the major part of that rating was earned when I rendered the scene with the outside set to 'tdis'. The parent fractal is a grossly oversized thing with a 'fan' and lots of filaments terminating in rings, the features that are typical of fractals created by double negative powers of Z. Today's image lies inside one of these terminal rings. I named the image "Briefly Beautiful" because at one time I found a color palette that would have raised its rating to an 8. But when I struck the wrong key, I lost the palette. Rather frustrated, I substituted today's lackluster 'tdis' palette. The calculation time of 2-1/2 minutes is brief enough that little effort will have been wasted if the image turns out disappointing. And as always, the finished image may be found on the current FOTD web site at: <http://www.emarketingiseasy.com/TESTS/FOTD/jim_muths_fotd.html> The original FOTD web site may be accessed at: <http://www.Nahee.com/FOTD/> My own web site is coming. No, it is not just a fantasy; it really is under construction. The delay is due to unexpected problems that keep arising. Sunday began pleasant enough here at Fractal Central, but things went downhill as the day progressed, and by afternoon heavy clouds filled the sky. Luckily, the rain held off until after dark. The fractal cats approved of the temperature of 54F 12C, though they would have enjoyed a bit more sun. I passed the day getting caught up in a pile of loose ends, while FL pondered this year's garden. The next FOTD will be posted in time to be thoroughly enjoyed. Until whenever, take care, and could the so-called obesity epidemic be a sign that our technology is turning on its creators like a Frankenstein monster? Jim Muth jamth(a)mindspring.com START PARAMETER FILE======================================= Briefly_Beautiful { ; time=0:02:31.88-SF5 on P4-2000 reset=2004 type=formula formulafile=basicer.frm formulaname=MandAutoCritInZ function=recip passes=1 center-mag=+198.7100824673263/+516.0210595923169/\ 1.568941e+007/1/-82.5/0 params=-1.1/-4.2/-4.4/-1.2\ /0/0/0/0 float=y maxiter=1500 inside=0 outside=tdis periodicity=0 colors=000zkVzkTzkRzkPzjOzjMWjKYjIZiGziEbiCdiAzi9z\ j8zk7zl7zmzzn5znzzo4zpzzq3zrzzs1zszzr3zrzzr5zqzzq8\ zqzzpAzpBzpDzoEzoFzoGznIznJznKzmLzmNzmOzlPzlQzlSzk\ THkUGkVHlSHlQHmOImMInJInHJoFJoDJoCJoBKnELmHLlKMkNN\ jPNiSOhVOgYPf_QebQdeRchSdkRcjQbjQbiPaiP`iO`hN_hNZh\ MZgMYgLYgKXfKWfJWeJVeIUeHUdHTdGSdGScFRcDPdFRcHScJT\ cLUbNWbPXbRYaTZaV_aWa`Yb`_c`ad_ce_eg_ghZiiZkjZlkZh\ i_eh_af`Ze`VcaSbaQXgPaaOfWOkRNpLNuGPtJRsMTrPVrSXqV\ YpY_o`aoccnfemigllhlnfjldhkcfjadi_bhZ`gXZfVXeUVdST\ cQSbPQaNO`LM_KKZIIYGGXFEWDCVBAU98VA9TB9RBAPCANCALD\ BJDBHEBFFCDFCBGC9GD7HD5IC1HD3HE4HF6HG7HH9HIAGJBGKD\ GLEGMGGNHHMHGOIFPIEQIDSICTJBUJAVJ9XJ8YJ7ZK6`K5aK4b\ KKTf4cK5aL6_M6ZM7XN8WN8UO9SPARPAPQBOQBMRCLRDJSDHTE\ GTFEUFDUGBVE9XGAVHBUICTJDSKERLFQMGPNHOOINPJMQKKRLJ\ SMITNHUOGLKPKLPKNQJPRJRSJSTIUUIWVHYWHZWG`XGbYGdZFe\ _Fg`EiaEkbCmdElbGl`IlZKlX } frm:MandAutoCritInZ {; Jim Muth a=real(p1), b=imag(p1), d=real(p2), f=imag(p2), g=1/f, h=1/d, j=1/(f-b), z=(((-a*b*g*h)^j)+(p4)), k=real(p3)+1, l=imag(p3)+100, c=fn1(pixel): z=k*((a*(z^b))+(d*(z^f)))+c, |z| < l } END PARAMETER FILE=========================================

1 0

fractint_multifractal
by Albrecht Niekamp 04 Apr '11

04 Apr '11

Hi, T H A N K you Hal for your support. Hopefully I got it. I haven´t plaid with Fractint since 6 or 7 years, doing other things. For example my own kind of fractal music, "never" ending self similar rhythms and melodies created using the RGB values of fractal images. If anyone is interested I´ll try to place an example here, problem is the 50KB limitation. If there is some interest from other fractalists I´ll submit some more of my favorite or maybe new multifractal images in the near future. "The Mirror" IS one of my favorites. I´ve tested it using the bootable DOS of another machine, the image generates 10 min faster, although the CPU is slower, but I prefer to use the DOS shell, because I can switch between Windows and DOS vv. I use a Nvidia Geforce GTX460, which has full Vesa support, the latest NV driver had to be installed. I skipped the input section of my formula, dont expect somebody to create own images with it. Correct me if I´m wrong. MFR133 {; The Mirror ; Albrecht Niekamp 3.4.11 ; Time 1.15.38 AMD Athlon X4 620 ; XP Dos Shell 1600/1200 reset=2004 type=formula formulafile=mfr133.par formulaname=multifractal_9 function=sin/sin/exp/sin passes=t center-mag=+0.80171336679346910/-0.00196806836550609/72\ 3857.6/1/-59.9999999999812559/1.45008234586629925e-010 params=-0.05825983458967864/0.3785210730307932/21222.32\ 595705021/15423.0506030602/51024.02048000094/384.044969\ 0484/384.0242000145/256.1007683001/512.1007683001/768.1\ 007683001 float=y maxiter=3072 inside=maxiter outside=tdis logmap=4 periodicity=0 rseed=-2436 colors=200012<24>0bo0cq0es<3>0kz<25>09C08A068<2>0220002\ 11<21>icNkeOmfP<3>unTwpVxqWzsX<25>CB7A96875<3>000400<23\ >o00q00s00<3>z00<25>C00A00800<3>000<21>bbbdddfffgggiiij\ jj<3>qqqsssqqq<24>BBB999777555444222000 } FRM:multifractal_9 { ; Albrecht Niekamp 050903 ; da=real(p2) dd=trunc(da) da=round((da-dd)*100000000000)+11111 dd=dd+11111 d=trunc(dd/10000) dd=dd-d*10000 d3=(d==4)+(d==5)+(d==8)+(d==9) d4=(d3==0) vb=d>5 ab=(d==3)+(d==5)+(d==7)+(d==9) d=trunc(dd/1000) dd=dd-d*1000 ex1=d>1 v1m=(d==6)+(d==7) v1j=d>7 dd1=(d==4)+(d==5)+v1j ab1=(d==3)+(d==5)+(d==7)+(d==9) d=trunc(dd/100) dd=dd-d*100 ex2=d>1 v2m=(d==6)+(d==7) v2j=d>7 dd2=(d==4)+(d==5)+v2j ab2=(d==3)+(d==5)+(d==7)+(d==9) d=trunc(dd/10) ex3=d>1 v3m=(d==6)+(d==7) v3j=d>7 dd3=(d==4)+(d==5)+v3j ab3=(d==3)+(d==5)+(d==7)+(d==9) d=dd-d*10 ex4=d>1 v4m=(d==6)+(d==7) v4j=d>7 dd4=(d==4)+(d==5)+v4j ab4=(d==3)+(d==5)+(d==7)+(d==9) ; 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 da=da-d*10000 d=d-5*ex0 ir0=(d==3)+(d==4) d=trunc(da/1000) w1=d>4 da=da-d*1000 d=d-5*w1 rs1=(d==2)+(d==4) ir1=(d==3)+(d==4) d=trunc(da/100) w2=d>4 da=da-d*100 d=d-5*w2 rs2=(d==2)+(d==4) ir2=(d==3)+(d==4) d=trunc(da/10) w3=d>4 da=da-d*10 d=d-5*w3 rs3=(d==2)+(d==4) ir3=(d==3)+(d==4) d=round(da) w4=d>4 d=d-5*w4 rs4=(d==2)+(d==4) tt=ex0+ex1+ex2+ex3+ex4 ; d=real(p3) dd=trunc(d) da=(d-dd)*10000000000 pp=trunc(dd/10000) ba1=dd-10000*pp ba2=trunc(da/100000) ba3=da-100000*ba2 ; d=imag(p3) sfac=trunc(d) da=(d-sfac)*10000000000 ba4=trunc(da/100000) ba5=da-ba4*100000 ; d=real(p4) ofac=trunc(d) da=(d-ofac)*10000000000 bh=trunc(da/100000)/10 bl=(da-bh*1000000)/10 bs=bl/2 ; d=imag(p2) t=d<0 if (t) d=-d endif dd=trunc(d) da=round((d-dd)*10000000000) d=trunc(dd/10000) dd=dd-d*10000 bb0=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=trunc(dd/1000) dd=dd-d*1000 bb1=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=trunc(dd/100) dd=dd-d*100 bb2=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=trunc(dd/10) dd=dd-d*10 bb3=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=round(dd) bb4=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) ; d=da 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=imag(p4) mi1=trunc(d) da=(d-mi1)*100000000000 d=trunc(da/10000000000) bt1=d>6 da=da-d*10000000000 d=d-5*bt1 dt1=d>1 iv1=(d==3) fac1=trunc(da/100000) da=da-fac1*100000 bo1=(da/100000)/10 ; d=real(p5) mi2=trunc(d) da=(d-mi2)*100000000000 d=trunc(da/10000000000) bt2=d>6 da=da-d*10000000000 d=d-5*bt2 dt2=d>1 iv2=(d==3) fac2=trunc(da/100000) da=da-fac2*100000 bo2=(da/100000)/10 ; d=imag(p5) mi3=trunc(d) da=(d-mi3)*100000000000 d=trunc(da/10000000000) bt3=d>6 da=da-d*10000000000 d=d-5*bt3 dt3=d>1 iv3=(d==3) fac3=trunc(da/100000) da=da-fac3*100000 bo3=(da/100000)/10 ; 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 bo=|z| p=pp z0=p7 zold=(0.0,0.0) cb=p9 ba=bb0 : if (tt) t=t+1 if (ex0) ex0=t<mi1 if (bo>bs) u=2*(fn1(t/sfac)) ex0=0 if (ir0) t=0 endif if (d4) z=z*u if (mo) c=0.4*log(sqr(pixel^mm)) else c=pixel endif else z=pixel cb=p9*u c=p1*u p=pp*u endif endif tt=tt-1+ex0 elseif ((ex1)&&bo>bl) if (bo<bh) d3=dd1 ba=bb1 ab=ab1 ex1=0 tt=tt-1 if (w1) u=2*(fn2(t/ofac)) else u=1,0 endif if (ir1) t=0 endif if (d3) vb=v1j if (rs1) z=pixel cb=p9*u c=p1*u p=pp*u else c=p1 z=z*u cb=p9 endif else vb=v1m if (rs1) c=z*u z=pixel*(sc1+px1) z0=p7*u ph=ph*u else c=z z=z*u endif if (mo1) c=0.4*log(sqr(pixel^mm)) endif endif endif elseif (ex2) if (dt1) if (iv1) d=bo>bo1 else d=bo<bo1 endif if (bt1) d=d+(t>mi1) endif else d=t>mi1 endif if (d) ab=ab2 d3=dd2 ba=bb2 ex2=0 tt=tt-1 if (w2) u=2*(fn2(t/fac1)) else u=1,0 endif if (ir2) t=0 endif if (d3) vb=v2j if (rs2) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif else vb=v2m if (rs2) c=z*u z=pixel*(sc2+px2) z0=p7*u ph=ph*u else c=z z=z*u endif if (mo2) c=0.4*log(sqr(pixel^mm)) endif endif endif elseif (ex3) if (dt2) if (iv2) d=bo>bo2 else d=bo<bo2 endif if (bt2) d=d+(t>mi2) endif else d=t>mi2 endif if (d) ab=ab3 d3=dd3 ba=bb3 ex3=0 tt=tt-1 if (w3) u=2*(fn3(t/fac2)) else u=1,0 endif if (ir3) t=0 endif if (d3) vb=v3j if (rs3) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif else vb=v3m if (rs3) c=z*u z=pixel*(sc3+px3) z0=p7*u ph=ph*u else c=z z=z*u endif vb=v3m if (mo3) c=0.4*log(sqr(pixel^mm)) endif endif endif elseif (ex4) if (dt3) if (iv3) d=bo>bo3 else d=bo<bo3 endif if (bt3) d=d+(t>mi3) endif else d=t>mi3 endif if (d) ab=ab4 d3=dd4 ba=bb4 ex4=0 tt=0 if (w4) u=2*(fn4(t/fac3)) else u=1,0 endif if (d3) vb=v4j if (rs4) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif else vb=v4m if (rs4) c=z*u z=pixel*(sc4+px4) z0=p7*u ph=ph*u else c=z z=z*u endif if (mo4) c=0.4*log(sqr(pixel^mm)) endif endif endif 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) z1=z*z+ph-0.5*zold ;Phoenix Mike Wareman zold=z z=z1 else z2=fn1(z)+c ;Many_mods Linda Allison z1=cos(z2) z=c*(1-z1)/(1+z1) 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 }

1 0