; Date: Sun, 23 May 2010 22:03:16 -0600 ; From: Roger Alexander ; Subject: [Fractint] Swirlies ; Id: ; --------- ; ; Today's graphic has an unexpectedly convincing 3d appearance. The swirling design could represent ; the root system of some silicon based vegetation. This brings me to a completely unrelated point. ; I run Fractint through the dos emulator D-Fend Reloaded under Vista. When generating the fractals I frequently switch ; between background and foreground processes which means the calctime values in the par files ; may longer than if generated completely in foreground mode( I use a laptop with an Intel 2 GHz T3200). ; To avoid the bother of having to prove this view the completed fractal at http://maxitersfractalfollies.blogspot.com ; fract225.gif { ;_swirlies-almost_3-d ; blank ; calctime 0:05:41.86 ; created May 23, 2010 ; Fractint Version 2004 Patchlevel 9 reset=2004 type=formula formulafile=forum_97.frm formulaname=january_gen function=abs/cabs/exp center-mag=-1.65129/0.104802/3.370408/1/24.9990000000000165/2.5833502004\ 2466112e-014 params=6/-1/10/-1 float=y maxiter=1000 proximity=2 outside=fmod decomp=256 periodicity=0 cyclerange=0/255 colors=000000000100100200400500700900B00D00G00I00L00O10Q10T10W10Z10a10e1\ 0h20k20o20r20v20y20z30z50z60z80z90zB0zC0zE0zF0zH0zI0zK0zL0zN0zO0zQ0zR0zT\ 0zU0zW0zX0zZ0z_0za0zb0zd0ze0zg0zh0zj0zk0zm0zn0zp0zq0zs0zt0zv0zw0zy0zz1zz\ 3zz4zz6zz7zz7zy7zx7zx7zw7zv7zv7zu7yt7ys7ys7yr7yq6yq6yp6yo6yo6xn6xm6xl6xl\ 6xk6xj6xj6xi5xh5wh5wg5wf5we5we5wd5wc5wc5vb5va5va5v`4v_4vZ4vZ4vY4vX4uX4uW\ 4uV4uV4uU4uT4uS3uS3uR3tQ3tQ3tP3tO3tO3tN3tM3tL3sL3sK3sJ2sJ2sI2sH2sH2sG2sF\ 2rE2rE2rD2rC2rC2rB1rA1rA1r91q81q71q71q61q51q51q41q31p20p20o20n20m20m20l2\ 0k20j20j20i20h20g20g20f20e20d20d20c20b20a20a20`20_20Z20Z20Y20X20W20W20V2\ 0U20T20T20S20R20Q20Q20P20O20N20N20M20L20K20K20J20I20H20H20G20F20E20E20E2\ 0D20D20C20C20C20B20B20A20A20A2092092092082082072072072062062052052052042\ 0420420320320220220220120120010000000000000000000000000 } frm:January_gen { ; Modified Sylvie Gallet "january" formula ; Based on Scott Burns equation solver applied to z^3-1 = 0 ; Use decomp = 256 ; generalized by Les St Clair, Dec 1997 ; use p1(real)=6, p2(real)=10, fn1=abs, fn2=cabs & fn3=exp for default behaviour z1 = pixel , iter = 0 a = 23*(0,0.0245436) ; 23 * 2i pi / 256 mz = fn1(fn2(z1)-1) : if (mz >= 0.1) z2 = z1*z1 z1 = ((1,-1)*z2*z2 + (7,1)*z1) / (2*z1*z2 + p1) mz = fn1(fn2(z1)-1) , cont = 1 iter = iter + 1 else z = fn3((iter + p2*mz)*a) cont = 0 endif cont } ; Roger Alexander ; _________________________________________________________________ ; 30 days of prizes to be won with Hotmail. Enter Here. ; http://go.microsoft.com/?linkid=9729709 ;