- Fractint - mailman.xmission.com

<Albrecht> Thanks for the MFR020F valentine!
by Hal Lane 03 Apr '11

03 Apr '11

Albrecht, All, Thanks for the MFR020F par file. I'm pretty sure that my DOS Fractint calculated it correctly (it's a red heart). I'm glad that your Fractint email list serve problems appear to be over. You said: > saw that the par-file was corrupted again. ... > Maybe someone can tell me how to avoid this bug. My understanding is that many email systems don't like long lines in their text. The email system automatically divides long lines into two or more pieces and places them onto separate lines. Fractint has a feature that allows controlling the length of the lines written when writing out a fractal's parameter file. I don't know whether any other fractal software has this feature. To control the line length when writing out parameter files in Fractint: - while viewing an image, - type <b> - type <down-arrow> to highlight the "Maximum line length" setting. - I set this to 55 and this length doesn't seem to bother email systems. - set any other parameters as needed - type the <Enter> key to write out the file. This long line length problem is most bothersome when a very long web address is cut in half and only the first half is treated as a link by the email system. (What the email system thinks is a link is usually underlined and colored blue.) When a "half-an-address" is clicked on, the intended web page *fails* to load. In these situations one can manually copy and paste the 2nd half of the web address onto the end of the 1st half of the address in your browser's address bar (address text window) to get the page to load. By the way, I also had to correct the name of the formula in the *parameter* definition to make the case of the letters exactly match the case of the letters in the formula definition: Multifractal_ni versus: multifractal_ni to get the parameter and formula file accepted by DOS Fractint. - Hal Lane ######################### # hallane(a)earthlink.net # #########################

1 0

FOTD 03-04-11 (Deceptively Simple [8])
by Jim Muth 03 Apr '11

03 Apr '11

FOTD -- April 03, 2011 (Rating 8) Fractal visionaries and enthusiasts: Today's image appears to show a minibrot near the surface of the Mandelbrot set, most likely the large minibrot on the west branch of the filament extending out from the large period-3 bud on the north side of the main bay. Well, in a way this is right, but appearances can be deceiving. The scene does show such a minibrot, however the filament it lies on does not extend from the main period-3 bud, it extends from the period-3 bud of a minibrot near the tip of the main spike of the M-set, at a depth of over 10^33, a depth that is not to be sneezed at. The thing that granted the image the honor of being declared FOTD is the smoothness of the color bands, almost giving the impression of a true-color image. (Such as those *other* fractal programs create.) A curious change may be achieved by resetting the bailout to the default 4. In fact, some may prefer the added detail achieved, though I prefer the pseudo-true-color smoothness. The name "Deceptively Simple" refers to the surprisingly large magnitude of the scene. The smoothly blended coloring earned the rating of an 8. If I had worked harder, I might have totally eliminated the color bands and raised the rating to an 8-1/2. The calculation time of 11-1/2 minutes is quite fast considering the arbitrary precision math and the magnitude. The finished image may be viewed on the active FOTD web site at: <http://www.emarketingiseasy.com/TESTS/FOTD/jim_muths_fotd.html> Don't forget the original web site with all the past images at: <http://www.Nahee.com/FOTD/> My own web site needs only a brief written introduction to fractals before it will be ready to face the judgement of the fractal world. Saturday turned rather pleasant and sunny enough, though a bit chilly for the season. The fractal cats would have preferred things a bit warmer, but were happy enough with the temperature of 52F 11C. The day of the humans was busy, which is getting to be a routine condition here at FC. The next FOTD will be posted in 24 hours. Until then, take care, and never be a slave to common sense. Jim Muth jamth(a)mindspring.com START PARAMETER FILE======================================= Deceptively_Simple { ; time=0:11:29.09-SF5 on P4-2000 reset=2004 type=mandel center-mag=-1.9999999999999\ 999871592241601197050530338/4.6074197e-35/9.27e+35\ /1/37.5/0 params=0/0 float=y maxiter=5200 bailout=36 inside=0 logmap=-388 periodicity=6 colors=000c0za0z_1zY2yU3yT4xS5xR6wQ7wP8vO9uNAtMBsL\ CrKDqNDoRDlVDjZDg`De_Ge_HeZJeYIeXHePIcIHbBGa4F`7Gd\ 9KhBOlDToFXtH_xJazG_yEVzBQy9Ly7Hz4Ex49z02x12r13m24\ h25c26Z2BS2GL2KE2N72Q14S55W96ZE8`G9aKAcLKeSUhWcl_m\ mcppgspUsoGnt2ixKhqRgjYgcdfUkdLrbJm`HcZFUXDKVBAX86\ Y56Z26_06W28T39Q4AN5BJ7DG8ED9FAAGDBKGBNJBRMCUPCYSC\ `VDdYDg`DkcEnfEriEuhEuhEuhEuhEuhEuhSuhEuhEuhEuhMvh\ EvhEvhVvgDvgQvg_vgDvgMvgPvgUvgUwgUwgVwgWwgXwfXwfXw\ fXwfXwfXwfYxfYxfYxfYxfYxfYxfYxfYxeYxeZxe_xe`yeayeb\ yecyeeyegyeiyekyemydoydqydszduzdwzdyzdzzdzzdzzdzzd\ zzdzzdzzazzZzzWzzTzzQzzNzzOzzPzzQzzNzzLzzJzzGzzEzz\ CzzAzz7zz5zz3zz1zz2zz2zz2zz2zz3zz3zz3zz3zz4zz4zz4z\ z4zz5zz5zz5zz5zz6zz6zz6zz6zz7zz7zz7zz7zz8zz8zz8zz8\ zz9zz9zz9zz9zzAzzAzzAzzAzzBzzBzzBzzBzzCzzCzzCzzCzz\ DzzDzzDzzDzzDzzEzzEzzFzzFzzGzzGzzHzzHzzHzzIzzIzzJz\ zJzzKzzKzzKzzLzzLzzMzzMzz } END PARAMETER FILE=========================================

2 1

Fractint - Love-san
by Albrecht Niekamp 02 Apr '11

02 Apr '11

Hi, saw that the par-file was corrupted again. In order to run press "delete" at the end of the line previous to the "\", so it is at the correct spot. Maybe someone can tell me how to avoid this bug. sincerely, Albrecht

1 0

Fractint - Japan
by Albrecht Niekamp 02 Apr '11

02 Apr '11

Hi, all this is a second try to send this message mfr020f { ; Love-san ; Albrecht Niekamp Sep.05 ; Time 00.10.51.53 AMD3500+ 1600/1200 ; Fractint Version 2004 Patchlevel 2 reset=2004 type=formula formulafile=mfrn.frm formulaname=multifractal_ni ismand=y function=cosxx/conj/cosxx passes=t debugflag=322 center-mag=-1.52935713874380600/+0.22685868455183180/2558954/1/97.499999 \ 9950250924/6.25112616531309229e-009 params=-0.8940855128635518/0.8105868709372235/384/256.1133/4094.00016/76 \ 8.0003400000001/768.0076800000001/256.01024/18937.52/5 float=y maxiter=3072 inside=maxiter outside=tdis logmap=7 periodicity=0 rseed=-2436 colors=200444222000<25>0bo0cq0es<3>0kz<25>09C08A068<2>022000211<24>oiQqj \ RslS<3>zsX<25>CB7A96875<3>000400<23>o00q00s00<3>z00<25>C00A00800<3>000<2 \ 5>iiijjjlll<3>sss<25>BBB999777555 } FRM:Multifractal_ni { ; Albrecht Niekamp 24.3.03 ; d=real(p2) fac1=trunc(d) b1=(d-fac1)*100000 ; d=imag(p2) da=d<0 if (da) d=-d endif mi1=trunc(d) d=round((d-mi1)*10000) p6=trunc(d/100)/10 d=d-1000*p6 if (da) p6=-p6 endif p7=d/10 ; d=real(p3) ba=trunc(d) mm=round((d-ba)*100000) ; d=imag(p3) fac2=trunc(d) b2=(d-fac2)*100000 ; d=real(p4) mi2=trunc(d) fac3=round((d-mi2)*100000) ; d=imag(p4) b3=trunc(d) mi3=round((d-b3)*100000) ; da=real(p5) t=da<0 if (t) da=-da endif start=2-t dd=trunc(da) da=round((da-dd)*100) if (dd<5) start=0 vb=(dd==3)+(dd==4) else d=trunc(dd/10000) vb=(d==3)+(d==4) dd=dd-d*10000 d=trunc(dd/1000) or1=d>5 d=d-5*or1 vv1=(d==3) vv2=(d==4) dd1=(d==2)+(d==4) dd=dd-d*1000 d=trunc(dd/100) or2=d>5 d=d-5*or2 vv3=(d==3) vv4=(d==4) dd2=(d==2)+(d==4) dd=dd-d*100 d=trunc(dd/10) inr1=d>5 d=d-5*inr1 v1=(d==3) v2=(d==4) d1=(d==2)+(d==4) dd=dd-10*d d=trunc(dd) inr2=d>5 d=d-5*inr2 v3=(d==3) v4=(d==4) d2=(d==2)+(d==4) endif ; d=trunc(da/10) da=da-10*d ab=d>=5 d=d-5*ab bb1=(d==1) bb2=(d==2) dd=da>=5 da=da-5*dd ab=ab+dd ab1=(da==1) ab2=(da==2) ; d=imag(p5) dd=trunc(d) d=round((d-dd)*1000000) le=d>10000 da=trunc(dd/10) so1=((da==1)+(da==3)==0) so2=((da==2)+(da==3)==0) dd=dd-10*da wo=dd>=5 dd=dd-5*wo ir1=(dd==1)+(dd==3) ir2=(dd==2)+(dd==3) if (le) freq=round((trunc(d/10000))*10) ;frequency_lake effect by S.Gallet d=d-freq*1000 level=(trunc(d/100))/100 ;water level d=d-level*10000 ampl=d/100 ;amplitude of the wave 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)) d3=2*q*t rs=2*bo*(dd+flip(1))*t z2=center+(-q-bo*dd-flip(bo))*t z=pixel-z2 d=imag(conj(d3)*z)/imag(conj(d3)*rs) if (d<=level) da=level-d z=z+2*da*(1+ampl*sin(freq*da^0.2))*rs endif z=z+z2 endif if (ismand) if (vb) c=0.4*log(sqr(pixel^mm)) z=z*le else c=z*le+pixel*(le==0) z=0 endif else c=p1 z=z*le+pixel*(le==0) endif t=0 d3=(ismand==0) u=d3 : if (vb) if (d3) z=(z*z-real(c))^(z*u+imag(c)) else z2=fn1(z)+c ;Linda Allison q=cos(z2) z=c*(1-q)/(1+q) endif elseif (ab) z=z*z+c+c*c-p7 ;Pusk s Istv n elseif (d3) z2=z*z z=z2*z2+(p6+u)*z2+c else z2=z*z ;Pusk s Istv n z=z2*z2+(p6+u)*z2+c-p1 endif bo=|z| If (wo) t=t+1 if ((t<mi1)+(bo>b1)) u=2*(fn1(t/fac1)) if (ismand) z=z*u if (vb) c=0.4*log(sqr(pixel^mm)) else c=z*le+pixel*(le==0) endif else z=z*le+pixel*(le==0) c=p1*u endif wo=0 if (ir1) t=0 endif endif elseif (start) t=t+1 if (start==2) if (bo>b2) u=2*(fn2(t/fac2)) rs=or1 ab=bb1 if (dd1) if (rs) z=pixel endif c=p1*u vb=vv2 d3=vb else d3=0 z=z*u c=z if (rs) z=0 endif vb=vv1 if (vb) if (so1) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) endif start=1 endif elseif (t>mi2) u=2*(fn2(t/fac2)) rs=inr1 ab=ab1 if (d1) if (rs) z=pixel endif c=p1*u vb=v2 d3=vb else d3=0 z=z*u c=z if (rs) z=0 endif vb=v1 if (vb) if (so1) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) endif endif start=1 if (ir2) t=0 endif endif elseif (bo>b3) u=2*(fn3(t/fac3)) ab=bb2 rs=or2 if (dd2) if (rs) z=pixel endif c=p1*u vb=vv4 d3=vb else d3=0 z=z*u c=z if (rs) z=0 endif vb=vv3 if (vb) if (so2) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) endif start=0 endif elseif (t>mi3) u=2*(fn3(t/fac3)) ab=ab2 rs=inr2 if (d2) if (rs) z=pixel endif c=p1*u vb=v4 d3=vb else d3=0 z=z*u c=z if (rs) z=0 endif vb=v3 if (vb) if (so2) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) endif endif start=0 endif endif bo<=ba } http://www.poincianacc.org/images/Japan_Prayer.jpg Sincerely, Albrecht

1 0

fractint - blacklist
by Albrecht Niekamp 02 Apr '11

02 Apr '11

Received a message from mailman.xmission.com that I´m whitelisted again. This is a test. Albrecht

1 0

FOTD 02-04-11 (An Island Universe [7])
by Jim Muth 01 Apr '11

01 Apr '11

FOTD -- April 02, 2011 (Rating 7) Fractal visionaries and enthusiasts: The minibrots in some fractals are connected to the main body of the larger fractal in which they exist. The minibrots surround- ing the Mandelbrot set are all connected by thin filaments to the main body of the M-set in this manner. Other minibrots have no connection to the rest of their fractal, and exist as island universes, scattered around the fractal's main body like moons frozen in time. Today's FOTD image shows one of these disconnected minibrots. The parent fractal is a tiny Mandelbrot set surrounded by a cloud of minibrots, which in turn are surrounded by smaller clouds of minibrots, etc, etc., all the way down. The image shows a minibrot near a larger minibrot in one of these sub- clouds. Since the larger minibrot is itself disconnected, the pattern surrounding the minibrot in today's image consists of disconnec- ted patches, filled with still smaller clouds of minibrots, all of which are well beyond resolution. In my fractals, I usually try to avoid overly busy and brilliant colors, but in today's image the excessively gaudy color palette actually seems to improve the overall appearance. If I had had more time, I might have gotten a bit more action from the under- lying iteration bands, but even as the image is, it earns its place as FOTD for April 02. The name "An Island Universe" tells it like it is. The image is part of an island, and it has a universe within its depths. The rating of a 7 is becoming so common that the FOTD rating system is starting to become redundant. The calculation time of a fireball 18 seconds seems too good to be true, but take my word, the image calculates in just that time. Another way to see the image is to view it in finished form on the currently active FOTD web site at: <http://www.emarketingiseasy.com/TESTS/FOTD/jim_muths_fotd.html> The venerable original FOTD web site is still available at: <http://www.Nahee.com/FOTD/> My own web site is almost ready. All I want to do is prepare a proper home page with a brief introduction to the world of fractals. I have also decided to include a gallery of several hundred images that I saved to disks in the years before I began the FOTD. These old images, which go back to the late 1980's, were created with various fractal programs. Most have no parameter information embedded. They are not up to current standards, but they are still interesting images, showing how I launched my fractal explorations. Friday here at Fractal Central began with wet snow that melted as it fell. By midday the snow had changed to rain, which slacked off to sprinkles in mid-afternoon and ended by sunset. The temperature reached a chilly high of 43F +6C, keeping the fractal cats within leaping distance of the heat. The rest of the day was filled with routine everyday stuff such as making money. The next FOTD will likely be posted in 24 hours. Until then, take care, and if you know what a lemac is, you're probably not a teen-ager. Jim Muth jamth(a)mindspring.com START PARAMETER FILE======================================= An_Island_Universe { ; time=0:00:18.56-SF5 on P4-2000 reset=2004 type=formula formulafile=basicer.frm formulaname=MandAutoCritInZ function=ident float=y center-mag=-4.027874401682518/+0.4760310157376794/\ 2.0925e+11/1/117.5/0 params=3/0.75/0.8/-3.3/0/0/0/0 maxiter=1500 inside=0 logmap=67 mathtolerance=/1 colors=000UOUURcKSWSVMOdUrmmeVLSJEEC7zU6jM4QF3D71p\ 4kKxGFhCAU85F4aTXIkK44f33h22T1104zQz04aC3P82C41zz0\ gONTGFE87ec`SQOEDCJbQCQH6D8`_AII5CW68L44N2agCTXALO\ 8891abvPQbCDJWCXO9OG6G838Ad65K3kGiO8NpKIbFDQA9D543\ Hw18UqtK_aDIJ6455_AwyA`d6OK3Cf8qS5_E2I5jUPQiCDNeIR\ m2Qos8be6QS4DE2L6KY0`P0RH0I809SujIaV9JFv4dT2KEp_7Q\ IPWgCGMNeuBLTB`M7OE3C73iu2Yf1NT0BEnfMYSEHE7A_l7R_5\ IO29CnNbPBJOEiG9U84FUyNMiHFVB7F5fCJW9EOYcSccYhbXic\ WicWicVjcVjcUjcUjcTkcTkcSkcSlcRlcRlcQlcQmcPmcPmcOm\ cOncNncNncMocMocLocLocKpcKpcJpcJpcIqcIqcHqcHrcGrcG\ rcFrcFscEscUscUscUtcUtcUtcUucUucUuccuccvccvccvccub\ cvccvccvcmvcmvcmvcmvcmvcmwcmwcmwcmwcmwcmwcmwdmwdmx\ dmxdmxdmxdmxdzxdzxdzxdzxdzydzydzydzyezyezyezyezyez\ zezzezzezzezzezzezzezzezzezxdzzdzzdzzdzzdzzdzzczzc\ zzczzczzczzczzczzbzzbzzbzzbzzbzzbzzazzazzazzazzazz\ azzazz`zz`zz`zz`zz`zz`zz_ } 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

<Albrecht>Is this the correct fractal?
by Hal Lane 31 Mar '11

31 Mar '11

Albrecht, all, You said: > hope YouÂ´ll like this image. I do. > Please advise, if You have any difficulties generating. > Probably will not run under Windows. If the image I calculated is the one you created, then, yes, I like it a lot. Is this (below) the correct fractal, Albrecht? I adjusted the .PAR info and calculated the image using DOS Fractint 20.04.4 under WinXP. Here's the adjusted version of your .PAR file that I used: http://www.emarketingiseasy.com/TESTS/FOTD/MFR149F.PAR I also applied Damiscena Korwin's Leather Gem color map. Her 1998 Fractal Art Contest entry Leather Gem is here: http://www.fractalartcontests.com/1998/entries/01-013.htm My anti-aliased 1200x900 pixel image is here: http://www.emarketingiseasy.com/TESTS/FOTD/MFR149G.jpg For the adventuresome who might be interested in the greater (unanti-aliased) detail in the image before it was downsampled, here's the 3MB 4096x3072 version: http://www.emarketingiseasy.com/TESTS/FOTD/MFR149F.gif Both Firefox & IE7 can show the large file OK on my WinXP system. Be sure to click the image once to see it at full size. (I like to use an image viewer that allows me to "drag" different areas of an oversize image onto the screen -- instead of having to find and "aim for" and exactly "hit" the scroll bars in my browser.) - Hal Lane ######################### # hallane(a)earthlink.net # #########################

2 1

FOTD 01-04-11 (Pentagon Parameters [7])
by Jim Muth 31 Mar '11

31 Mar '11

FOTD -- April 01, 2011 (Rating 7) Fractal visionaries and enthusiasts: The soon-to-appear FOTD web site is making great progress. With today's image, I will try to return to the usual every-day schedule of FOTD's. I make no promises however -- not in this world where the unexpected can always go wrong. Normally, not much can be done with quintic minibrots. They tend to all look the same. But when calculated with the FinDivBrot-2 formula, the quintics can really come to life. Today's scene shows one of these quintic minibrots doing a good deal more than would be expected from it. The parent fractal is a corrupt Mandelbrot set, well on the way to becoming an order-5 Mandeloid. Today's scene is located in a tiny spurious valley on the negative X-axis. The name "Pentagon Parameters" is little more than a play on words. The rating of a 7 might be a little excessive, but so what? Tomorrow, I might decide the image is worth only a 5. The image may be seen and appreciated by running the included parameter file. The running time of a mere 30 seconds will make the task a minor one. The image may be accessed without the need for calculation at the currently active web site at: <http://www.emarketingiseasy.com/TESTS/FOTD/jim_muths_fotd.html> The original FOTD web site may still be accessed at: <http://www.Nahee.com/FOTD/> The address of my own web site will be announced in a matter of a day or two. Thursday proved to be very unpleasant here at Fractal Central. Heavy clouds filled the sky, while the temperature hovered around 39F +4C and a misty drizzle fell most all day. The forecast is for several inches of wet sloppy snow overnight and on Friday. The fractal cats were unconcerned with outside conditions, and spent the day wishing they could have the excite- ment the old fractal cats had when they spent their days back at Old FC, exploring the holly hollow at the bottom of the yard. (Actually, the two pairs of fractal cats never met.) The day of the humans on Thursday was once again busy, mostly with ironing out the pesky problems that keep arising on the new FOTD web site. The next FOTD will be posted in 24 hours, or maybe 48 hours if unexpected problems arise. Until next time, take care, and if two people dream they are observing the Statue of Liberty, is it the same statue image they are experiencing? Jim Muth jamth(a)mindspring.com START PARAMETER FILE======================================= PentagonParameters { ; time=0:00:30.26-SF5 on P4-2000 reset=2004 type=formula formulafile=basicer.frm formulaname=FinDivBrot-2 function=recip maxiter=400 center-mag=-1.380477612401757/+0.0031445704992233/\ 5.8e+12/1/-4.25/0 params=5/500/0/0 float=y inside=0 logmap=82 periodicity=6 mathtolerance=0.05/1 colors=00089UAAUCCUEEUGGUIIULLUOOURRUUUUZYVcaPheKm\ iLrmOppRssUvvXzzzzzzzzzzzz00FztFupDqlCnh9kd6i_3jW5\ kT6kQ7iN8eJ9cGAaDB_ACYBIWBOUBUSB_QBeOUCHzzGuzFqzFn\ zEjmEfcDcUD_OCXHCTFBPDBMCAIAAF9EDGHCUKBcOAmR9zU8zc\ BzmDzmGz_IoaKpbNpcPpeRpfUphWqiYqk`qlbqmdqUOsA8uBBq\ CEnCHkDKgENdEQaFTZGWVGZSHaPHcMJgPLjSMnUOqXPtZKikGZ\ wJXuMWsPVqSUoVTmYSk`RicQgfOeiNclMaoL_rKYuJWxIUzHTt\ LSnOSiRScUSZXST_SObSIeSDhS7kS2nS5jU7fVAbXCZYEVZHR`\ JNaMJcOFdQCeNEcKGbII`FJ_CLZANX7PW5QV9RXDSZHT`LUbPV\ cTWeXXg`YidZjh_ll`npapsaqp`mm_jjZggYdzXazWZzVWzUSz\ TPzSMzRJzQGzmDzmAzm7zm7zm7zm7zm7zm7zm7zm7zm7zm8zm8\ zm8zm8zm8zm8zm8zm8zm8zm8zm8zm8zm8Gm8Gm8Gm8jmEimDhm\ DhmDgmDgmDfmDfmDemDemDdmCdmCcmC7zyuz5hzkgzjfzjezjd\ zjczjbzjgzmbzjZzhUzeQzcLz`HzZ5zI9zQDzXHzdLzkLzsOzr\ QzrSzrUzrWzrQznLzjGzfBzcmzynzvnztnzqnzoozmozjozhwz\ gtzfqzfozflzfFzADzBCzBBzC } 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

Multifractal MFR149
by Albrecht Niekamp 30 Mar '11

30 Mar '11

Hi, hope You´ll like this image. I do. Please advise, if You have any difficulties generating. Probably will not run under Windows. MFR149 {; Time 0.12.13 (XP Dos-shell) reset=2004 type=formula formulafile=mfrn.frm formulaname=multifractal_5 ismand=y function=cos/exp/exp/sin passes=t center-mag=-0.302531/-0.00478368/0.842554/1.0685/180 params=-0.1156346324045534/-0.5338602862636189/19287.3210001/53000.13140 \ 81613/2048.02048/384.0000135/768.00056/128.0076800000001/768.00768000000 \ 01/1024.00768 float=y maxiter=2048 inside=maxiter outside=tdis logmap=4 periodicity=0 rseed=-2436 colors=000<2>110110000KA4<7>gcOjgRmjT<3>zzc<9>UOFRKDOGA<3>A00<9>f0Ci0Dl0 \ F<3>z0K<6>Z0EV0DR0C<3>A08004000<26>000<4>000<9>X0a_0dc0h<3>p0w<4>_0dX0aU \ 0Y<2>K0NH0JG0NE1R<3>7UX6`Z4h_2oa0wc<11>2TG2RE3OC<3>4D3<17>kkammcpoe<3>zw \ m<6>cYO`UKYQG<3>KA0000<43>000<4>000330<12>110 } FRM:Multifractal_5 { ; Albrecht Niekamp 230603 ;only integers as first input, second input 5 digits to the right ;real(p2) 5digits: shape, outside, in1, in2, in3 ; 0_off 1_mand 2_jul/bees 3_many_mods 4_newtjul +5_reset digit1: +5_warp ; input2 : 2digits_many_mods 5digits_frm2 use : 0_no 1_yes ;imag(p2)(-) 2-4digits : quasinewton input (max 2000) ; 1digit : many_mods multipl. off 1_out 2_in1 3_in2 4_all ; 1digit : iter-reset 1_out 2_in1 3_in2 4_all ; input2 : 4digits(-)_frm1 2digits_frm2 4digits_bees ;real(p3) many_mods bailout, bailout ;imag(p3) shape : factor (fn1), outside : border-in ;real(p4) outside : factor (fn2), border-out ;imag(p4) inside1 : maxiter1, factor1 (fn2) ;real(p5) inside2 : maxiter2, factor2 (fn3) ;imag(p5) inside3 : maxiter3, factor3 (fn4) ; da=real(p2) dd=trunc(da) da=round((da-dd)*10000000)+11111 d=trunc(dd/10000) ex0=d>5 d=d-5*ex0 vb=(d==3)+(d==4) dd=dd-d*10000 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) tt=ex0+ex1+ex2+ex3+ex4 ; mm=trunc(da/100000) da=da-mm*100000 d=trunc(da/10000) ab=(d==2) da=da-d*10000 d=trunc(da/1000) ab1=(d==2) da=da-d*1000 d=trunc(da/100) ab2=(d==2) da=da-d*100 d=trunc(da/10) ab3=(d==2) da=da-d*10 ab4=(da==2) ; 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 ; bg=((ab+vb)==0) bg1=((ab1+v1j)==0) bg2=((ab2+v2j)==0) bg3=((ab3+v3j)==0) bg4=((ab4+v4j)==0) ; if (ismand) z=0 if (vb) c=0.4*log(sqr(pixel^mm)) else c=pixel endif else if (bg) c=p9 else c=p1 endif z=pixel endif t=0 d3=(ismand==0) u=d3 bo=z p=pp : If (tt) t=t+1 if ((ex0) && bo>b0) u=2*(fn1(t/sfac)) if (ismand) z=z*u if (vb) c=0.4*log(sqr(pixel^mm)) ba=mb else c=pixel endif else z=pixel if (bg) c=p9*u else c=p1*u p=pp+u endif endif ex0=0 tt=tt-1 elseif ((ex1) && bo>b1 && bo<b2) u=2*(fn2(t/ofac)) rs=rs1 ab=ab1 if (dd1) if (rs) z=pixel endif vb=v1j d3=1 if (bg1) c=p9*u else c=p1*u p=pp+u endif else d3=0 z=z*u c=z if (rs) z=0 endif vb=v1m if (vb) 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) u=2*(fn2(t/fac1)) rs=rs2 ab=ab2 if (dd2) if (rs) z=pixel endif vb=v2j if (bg2) c=p9*u else c=p1*u p=pp+u endif d3=1 else d3=0 z=z*u c=z if (rs) z=0 endif vb=v2m if (vb) 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) u=2*(fn3(t/fac2)) ab=ab3 rs=rs3 if (dd3) if (rs) z=pixel endif vb=v3j if (bg3) c=p9*u else c=p1*u p=pp+u endif d3=1 else d3=0 z=z*u c=z if (rs) z=0 endif vb=v3m if (vb) 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) u=2*(fn4(t/fac3)) ab=ab4 rs=rs4 if (dd4) if (rs) z=pixel endif vb=v4j if (bg4) c=p9*u else c=p1*u p=pp+u endif d3=1 else d3=0 z=z*u c=z if (rs) z=0 endif vb=v4m if (vb) 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) n=z^p-1 d=p*z*z z=z-n/d else z2=fn1(z)+c ;Linda Allison q=cos(z2) z=c*(1-q)/(1+q) endif elseif (ab) z=z*z+c+c*c-p7 ;Puskas Istvan elseif (d3) z1=fn1(z)-c ;Ray Girvan z2=z1^p8-1 z3=p8*(z1^(p8-1)) z=z-(z2/z3) else z2=z*z ;Puskas Istvan z=z2*z2+(p6+u)*z2+c-p0 endif bo=|z| bo<=ba } Sincerely, Albrecht

1 0

FOTD 31-03-11 (Little Lost Orphan [No Rating])
by Jim Muth 30 Mar '11

30 Mar '11

FOTD -- March 31, 2011 (No Rating) Fractal visionaries and enthusiasts: NOTICE! Do not try to recreate today's image from the included parameter file, which contains only the 3-D transform informa- tion. To view the image, you must go to the FOTD web site at: <http://www.emarketingiseasy.com/TESTS/FOTD/jim_muths_fotd.html> where Hal has posted it. Today's image is named "Little Lost Orphan" because it has lost its parent fractal. It is an image from years ago, when I briefly experimented with making 3-D transforms of type=plasma images. Such transforms can make rather convincing landscapes, but for some reason I quickly grew bored with the icy images. A few rather impressive scenes showed up before I turned to the 4-D Julibrot stuff however. The type=plasma image to which the transform was originally applied was long ago discarded, but today's parameter file may be applied to any other type=plasma image (or any Fractint image at all) to create different landscapes, so feel free to create as many scenes as your adventurous heart desires. (The process is a bit convoluted, so I recommend reading the 3-D transform instructions.) I have no idea how today's image might compare with what might be possible using the 3-D transform feature on type=plasma images, so I could give the image no rating. The calculation time of 3-1/3 minutes is the time it took for the original transform to calculate on the old 80486-100mhz machine. On modern units, the image would finish in a matter of seconds. A bit of good news is that the start of my own FOTD web site has been uploaded and needs only a bit of link-tweaking before being made public. In view of all this excitement, do not forget the original web site at: <http://www.Nahee.com/FOTD/> Tuesday brought lots of sun and a temperature of 50F 10C to Fractal Central. Wednesday brought heavy clouds and similar temperatures. The fractal cats enjoyed the sun on Tuesday and complained about the lack of it on Wednesday. My day, as well as FL's day, was quite busy both Tuesday and Wednesday. Things that do not work right keep popping up on the web site. But the goal is in sight, so all that patience will soon be rewarded. The next FOTD will be posted in 48 hours or so. Until then, take care, and I have lots of answers but I've lost the questions. Jim Muth jamth(a)mindspring.com START PARAMETER FILE======================================= Little_Lost_Orphan { ; time= 0:03:20.36-SF5 on P4-2000 3d=yes scalexyz=125/100 roughness=125 waterline=45 filltype=6 lightsource=1/-1/1 smoothing=7 randomize=5 ambient=20 rotation=73/0/0 perspective=160 xyshift=0/0 colors=muz9IU9IU9IU9IU9IW9JW9JW9JW9JW9JW9JX9JX9KX9\ KX9KX9JX9JZ9JZ9JZ9JZ9LZ9LZ9L_9K_9K_9K_9K_9L_9La9La\ 9La9Ka9Ka9KaALcALcALcBLcBLcBLcDLcDLcDMcEMcEMcFMcFM\ cFMcFMcGMcGOcGOcHOcHOcHOcJOcJOcJOcJPcJPcKPcKPcKPcK\ PcKPcLPcLRcLRcLRcLRcMRcMRcMRcMRcMTcMTcOTcOTcOTcOTc\ OTcQTcQUcQUcQUcQUcRUcRUcRUcRUcRVcTVcTVcTVcTVcTVcUV\ cUXcUXcUXcUXcVXcVXcVXcVXcVYcXYcXYcXYcXYcXYcYYcYYcY\ _cY_cY_cY_c__c__c__c__c_ac`ac`ac`ac`ac`acbacbacbbc\ bbcbbcdbcdbcdbcdbcdbcedcedcedcedcedcfdcfdckgckgckg\ cmecmecm`ccjychyeeyjhyeeyjhyefyjiyegyegyclycbycglh\ glcglhglcglhglallfglaglfglaglfglaglfdledledledledl\ eblebleblebldbldbldbldbldbldaldaldacbacbacbacbacba\ lbalb_lb_l`_l`_l`_b`_l`_l`_l`_l`Yc_Yc_Yc_Yc_Yc_Yc_\ Yc_Yc_YcYYcYXcYXcYXcYXcYXcYXcYXcXXcXXcXVcXVcXVcXVc\ XVcXVcVVcVVcVVcVUcVUcVUcVUcVUcUUcUUcUUcUUcUTcUTcUT\ cUTcTTcTTcTTcTTcTTcTRcTRc } END PARAMETER FILE=========================================

1 0