Yo Jotz,
<br>
<br>Here's a 3D C-set to get you started (where the 2D C-set is given by z = conj(z^2+c)). The p3 = 0 setting toggles for the 3D M-set. Have fun... looking forward to seeing what you find!
<br>
<br>Ciao, Russell
<br>
<br>_____________________Par file__________________________
<br>
<br>3D_C-set           {
<br>                     ;  Version 2002 Patchlevel 5
<br>  reset=2002 type=formula formulafile=file.frm
<br>  formulaname=Rot3d_M-set passes=3
<br>  center-mag=-0.0253142/0.0234681/0.4875801
<br>  params=0/30/-2/2/1/0/0/4/150/253 float=y maxiter=2000000000
<br>  inside=0 outside=summ periodicity=0 colors=@grey.map
<br>  }
<br>
<br>_____________________frm file__________________________
<br>
<br>
<br>frm:Rot3d_M-set {;periodicity=no, outside=summ
<br>              ;maxit > p5real*(p5imag+1)
<br>  ;--------------------------------------------
<br>  ;p1real: Rotation about x-axis (1st rotation)
<br>  ;p1imag: Rotation about y-axis (2nd rotation)
<br>  ;p2real: Far clipping plane
<br>  ;p2imag: Near clipping plane
<br>  ;p3real: morph to 3D C-set
<br>  ;p3imag: 
<br>  ;p4real: z1(0)
<br>  ;p4imag: Bailout
<br>  ;p5real: Maxiter per slice
<br>  ;p5imag: Number of slices - 1
<br>  ;--------------------------------------------
<br>  ;
<br>  bailout = imag(p4), tiefnum = imag(p5)
<br>  delta = (real(p2)-imag(p2))/tiefnum
<br>  tmp = pi/180
<br>  rotXax = exp(flip(real(p1)*tmp)), rotYax = exp(flip(imag(p1)*tmp))
<br>  ;
<br>  HPixXY = rotYax
<br>  VPixZ = real(rotXax)
<br>  VPixXY = flip(conj(rotYax))
<br>  NXY = VPixZ*VPixXY
<br>  NZ = imag(conj(rotXax))
<br>  VPixXY = -NZ*VPixXY
<br>  ;
<br>  tmp = NXY*imag(p2) + HPixXY*real(pixel) + VPixXY*imag(pixel)
<br>  cx = cx0 = real(tmp), cy = cy0 = imag(tmp)
<br>  cz = cz0 = NZ*imag(p2) + VPixZ*imag(pixel)       ;HPixZ -> 0
<br>  tmp = NXY*delta, dcx = real(tmp), dcy = imag(tmp)
<br>  dcz = NZ*delta
<br>  x1 = 0
<br>  y1 = 0
<br>  z1 = real(p4)
<br>  j = m = i = 0:
<br>    a = x1^2 - y1^2 - z1^2
<br>    b = (1-p3)*2*x1*y1 - p3*2*x1*y1
<br>    c = (1-p3)*2*x1*z1 - p3*2*x1*z1
<br>    x1 = a + cx, y1 = b + cy, z1 = c + cz
<br>    IF (bailout >= (sqr(x1)+sqr(y1)+sqr(z1)))
<br>      i = i + 1
<br>    ELSE
<br>      i = 0
<br>      m = m + 1
<br>      cx = cx0 = cx0 + dcx
<br>      cy = cy0 = cy0 + dcy
<br>      cz = cz0 = cz0 + dcz
<br>      x1 = 0, y1 = 0, z1 = real(p4)
<br>    ENDIF
<br>    z = m - j
<br>    j = j + 1
<br>  tiefnum >= m && p5 >= i
<br>  }
<br>
<br>______________________End par__________________________
<br>
<br>
<br>---------[ Received Mail Content ]----------
<br>>Subject : [Fractint] Re: 4D stuff
<br>>Date : Fri, 06 Oct 2006 20:12:33 +0000
<br>>From : jackoftradez@comcast.net
<br>>To : fractint@mailman.xmission.com
<br>>
<br>>""A bit rushed at the moment, I'll post some pars later. 
<br>>""
<br>>
<br>>Hey Russ - post the complete pars for these things, like the revolution solid on your site. So I can render and tweak and maybe animate ....
<br>