Yo JoTz, That "shadow Mandelbrot" is among the interesting effects in this video. Maybe even a theme in its own right. Clearly, there are many considerations in finding the optimal parameters for an animation of these kinds of sets. It seems promising though. I redesigned the T-C formula with the objective of trying to keep the size of the set from changing too much throughout the transitions, and it seems to have helped a bit. It also brought about some new effects on either side of the interval real(p3) = [1,0]. Maybe, for the fun of it, you'll give this version a little spin... ---------------------par file---------------------- Tmorph { ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=fromfile formulaname=T_C_morph passes=3 center-mag=-0.343038/-0.186895/0.4524726 params=0/0/-1.5/1.5/3/0/0/4/150/253 float=y maxiter=2000000000 outside=summ periodicity=0 colors=@grey.map } ---------------------frm file---------------------- frm:T_C_morph {;periodicity=no, outside=summ ;maxit > p5real*(p5imag+1) ;-------------------------------------------- ;p1real: Rotation about x-axis (1st rotation) ;p1imag: Rotation about y-axis (2nd rotation) ;p2real: Far clipping plane ;p2imag: Near clipping plane ;p3real: Constant coefficient ;p3imag: ;p4real: z1(0) ;p4imag: Bailout ;p5real: Maxiter per slice ;p5imag: Number of slices - 1 ;-------------------------------------------- ; bailout = imag(p4), tiefnum = imag(p5) delta = (real(p2)-imag(p2))/tiefnum tmp = pi/180 rotXax = exp(flip(real(p1)*tmp)), rotYax = exp(flip(imag(p1)*tmp)) ; HPixXY = rotYax VPixZ = real(rotXax) VPixXY = flip(conj(rotYax)) NXY = VPixZ*VPixXY NZ = imag(conj(rotXax)) VPixXY = -NZ*VPixXY ; tmp = NXY*imag(p2) + HPixXY*real(pixel) + VPixXY*imag(pixel) cx = cx0 = real(tmp), cy = cy0 = imag(tmp) cz = cz0 = NZ*imag(p2) + VPixZ*imag(pixel) ;HPixZ -> 0 tmp = NXY*delta, dcx = real(tmp), dcy = imag(tmp) dcz = NZ*delta x1 = 0, y1 = 0, z1 = real(p4) d1 = sqrt(real(p3)), d2 = sqrt(1-real(p3)) d3 = d1 + d2 j = m = i = 0: a = sqr(x1) + 2*y1*z1 b = sqr(z1) + 2*x1*y1 c = sqr(y1) + 2*x1*z1 x1 = d1*a + d2*c + cx y1 = d3*b + cy, z1 = d2*a + d1*c + cz IF (bailout >= (sqr(x1)+sqr(y1)+sqr(z1))) i = i + 1 ELSE i = 0 m = m + 1 cx = cx0 = cx0 + dcx cy = cy0 = cy0 + dcy cz = cz0 = cz0 + dcz x1 = 0, y1 = 0, z1 = real(p4) ENDIF z = m - j j = j + 1 tiefnum >= m && p5 >= i } ---------------------end file---------------------- ----- Original Message ----- From: JackOfTradeZ <JackOfTradeZ@comcast.net> To: fractint@mailman.xmission.com Subject: [Fractint] Re: quaternion product correction (Russell Walsmith) Date: Thu, 24 Nov 2005 09:44:55 -0700
11/24/2005
The Gerald Dobiasovsky / Russ Walsmith (morph + pirouette) viddie; 3D grayscale, is posted:
http://www.fractal-animation.net/morph_x.zip
640x480 AVI, 30 sec, 4.4 MEG
A shadow mandelbrot creeps across the main form momentarily - loox like a tarantula / evil ghost. I'll let someone else try to explain what's up with that. This is the "weird thing" I mentioned, I didn't recognize what it was at first.
HaPPy HoLiDaZe !
JoTz
_______________________________________________ Fractint mailing list Fractint@mailman.xmission.com http://mailman.xmission.com/cgi-bin/mailman/listinfo/fractint