Hi,
I am Albrecht (Al) from Duesseldorf, Germany and I`m new
on the list.
I have plaid with fractals for a long time, some previous pars
and formulas are available on the fractint homepage ("Multifrac").
The pars where not good though, mainly to prove that my formulas at all
delivered pictures and to invite others to make own modifications.
Please note my new address Albrecht.niekamp(a)-online.de
My first contribution is something I came upon when I was meditating
about what could make a fractal look 3d. ---..The 4-dimensional room can
be seen as a warped 3-dimensional room and a "3d"fractal accordingly
should be a warped version of the basic fractal.
The way it is warped of course is determined by the depth of the
fractal.
Also I found out, that double iterating opens the possibilty to use the first
pass for the "warp"factor and the second pass lets you control what is inside
and what is outside.
I dont know if this has been done before, anyway I`ve never seen anything
like it, and hope there will be a discussion about this.I know that T-dis
has a great part in the 3d-effects, but T-dis alone doesnt do the job.
I´ll be happy to get some feedback of any kind!
My second main interest is conversion of fractals into fractal (midi)
music with "infinite" fractal rhythms that are similar but never repeat.
Iïm convinced that there IS something like fractal music.
If you`re interested, please email me privately or on the list.
This is the first part of my submission. The final part will follow tomorrow.
-------------------------------start-pars-and-formulas-----------------------------------------------------------------
multi04x { ; Insideworld
; Albrecht Niekamp feb,03
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=Multifrac_204f function=exp passes=t
center-mag=-0.99816535334584000/+0.27347839866555330/42.19409
params=768/1024/128/512 float=y maxiter=2048 inside=maxiter
outside=tdis periodicity=0
colors=200<24>o00q00s00<3>z00<25>C00A00800<3>000<25>iiijjjlll<3>sss<25>B\
BB999777<2>222000012<24>0bo0cq0es<2>0jy0kz0jy<24>09C08A068<2>022000211<2\
4>oiQqjRslS<3>zsX<31>000
}
multi04xa { ; First zoom
; Albrecht Niekamp feb,03
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=Multifrac_204f function=exp passes=t
center-mag=-0.99215759849906070/+0.28142452043369340/310.2507
params=768/1024/128/512 float=y maxiter=2048 inside=maxiter
outside=tdis periodicity=0
colors=2000Uc<13>09C08A068<2>022000111<24>niQpjRrlS<3>ysX<25>BB7996775<3\
>000<24>n00p00r00<3>y00<25>B00900700<2>100000011<24>hiiijjkll<3>rss<25>A\
BB899677<2>122000012<24>0bo0cq0es<2>0jy0kz0jy<9>0We
}
multi04xb { ; Second zoom
; Albrecht Niekamp feb,03
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=multifrac_204f function=exp passes=t
center-mag=-1.00006253908692800/+0.28063386155129140/843.8819
params=1536/2048/512/1024 float=y maxiter=4096 inside=maxiter
periodicity=0
colors=2000gu0hw0jy0kz<25>09C08A068<2>022000211<22>keOmgPoiQqjRslSunT<2>\
zsX<25>CB7A96875<3>000400<23>o00q00s00<3>z00<25>C00A00800<3>000<23>eeegg\
giiijjjlllnnn<2>sss<21>IIIGGGFFF<3>777555444222000<27>0es
}
multi204xc { ; Inoutkey
; Albrecht Niekamp feb,03
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=multifrac_204f function=exp passes=t
center-mag=-0.99967796372118100/+0.28089082568746140/84388.19
params=1536/2048/512/868 float=y maxiter=2048 inside=maxiter
periodicity=0
colors=200777<2>222000012<24>0bo0cq0es<2>0jy0kz0jy<24>09C08A068<2>022000\
211<24>oiQqjRslS<3>zsX<25>CB7A96875<3>000400<23>o00q00s00<3>z00<25>C00A0\
0800<3>000<25>iiijjjlll<3>sss<26>999
}
multi215 { ; Based on Multifrac7
; Albrecht Niekamp feb,03
; Version 2002 Patchlevel 4
;
reset=2002 type=formula formulafile=multi5.frm
formulaname=Multifrac_215 function=exp passes=t
center-mag=-0.648135/-3.77476e-015/0.6666667/1/-90/3.88578058618804789e-\
016 params=768/1024/512/245/0.75/0.375 float=y maxiter=1024
inside=maxiter outside=tdis periodicity=0
colors=000<3>000<9>X0a_0dc0h<3>p0w<4>_0dX0aU0Y<2>K0NH0JG0NE1R<3>7UX6`Z4h\
_2oa0wc<11>2TG2RE3OC<3>4D3<17>kkammcpoe<3>zwm<6>cYO`UKYQG<3>KA0000<43>00\
0<4>000330<11>110110110<3>000KA4<7>gcOjgRmjT<3>zzc<9>UOFRKDOGA<3>A00<9>f\
0Ci0Dl0F<3>z0K<6>Z0EV0DR0C<3>A08004000<27>000
}
multi215a { ; Brasswork
; Albrecht Niekamp feb,03
;
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=Multifrac_215 function=exp passes=t
center-mag=-0.648135/-3.9968e-015/0.6666667/1/90/3.88578058618804789e-01\
6 params=768/1024/512/512/0.5/0.75 float=y maxiter=1024
inside=maxiter outside=tdis periodicity=0
colors=200022000<25>oiQqjRslS<3>zsX<25>CB7A96875<3>000400<23>o00q00s00<3\
>z00<25>C00A00800<3>000<25>iiijjjlll<3>sss<25>BBB999777<2>222000012<24>0\
bo0cq0es<2>0jy0kz0jy<28>034
}
multi218 { ; Mandjulin
; Albrecht Niekamp feb,03
; Mandel with Julia inside
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=Multifrac_218 function=exp/sin passes=t
center-mag=-0.114536/0.775646/7.751938
params=768/2048/128/512/-0.5/0.375 float=y maxiter=1024
inside=maxiter outside=tdis periodicity=0
colors=200iii<3>ppprrrsss<25>BBB999777<2>222000012<24>0bo0cq0es<2>0jy0kz\
0jy<24>09C08A068<2>022000211<24>oiQqjRslS<3>zsX<25>CB7A96875<3>000400<23\
>o00q00s00<3>z00<25>C00A00800<3>000<24>ggg
}
multi218a { ; Mandjulin_2
; Albrecht Niekamp feb,03
; Mandel with Julia inside
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=Multifrac_218 function=exp/sin passes=t
center-mag=-0.114536/0.775646/7.751938
params=768/2048/128/512/-0.5/0.375 float=y maxiter=1024
inside=maxiter periodicity=0
colors=200554<22>iihjjillk<3>ssr<25>BBA998776<2>221000011<24>0bn0cp0er<2\
>0jx0ky0jx<24>09B089067<2>021000210<24>oiPqjQslR<3>zsW<25>CB6A95874<3>00\
0400<23>o00q00s00<3>z00<25>C00A00800<3>000110332
}
multi218b { ; Mandjulin_3
; Albrecht Niekamp feb,03
; inside tdis
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=Multifrac_218a function=exp/sin passes=t
center-mag=-0.550344/3.33067e-016/0.8503401
params=768/2048/256/512/-0.5/0.375 float=y maxiter=2048
inside=maxiter outside=tdis logmap=yes periodicity=0
colors=200G00<4>600<2>000<25>iiijjjlll<3>sss<25>BBB999777<2>222000012<24\
>0bo0cq0es<2>0jy0kz0jy<24>09C08A068<2>022000211<24>oiQqjRslS<3>zsX<25>CB\
7A96875<3>000400<23>o00q00s00<3>z00<22>I00
}
multi219a { ; Inside Exp-Julia
; Albrecht Niekamp feb,03
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=Multifrac_219a function=exp/exp passes=t
center-mag=-1.00313/0.18015/5.464481
params=1024/4094/256/512/0.5/-0.375 float=y maxiter=2048
inside=maxiter outside=tdis periodicity=0
colors=200G00<4>600<2>000<25>iiijjjlll<3>sss<25>BBB999777<2>222000012<24\
>0bo0cq0es<2>0jy0kz0jy<24>09C08A068<2>022000211<24>oiQqjRslS<3>zsX<25>CB\
7A96875<3>000400<23>o00q00s00<3>z00<22>I00
}
multi219c { ; Mandel Machine
; Albrecht Niekamp feb,03
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=Multifrac_219c function=exp/exp passes=t
center-mag=-0.597874/2.22045e-016/0.8912656
params=1024/4094/256/512/0.25/0 float=y maxiter=2048 inside=maxiter
outside=tdis logmap=yes periodicity=0
colors=200ggg<3>nnnppprrrsss<25>BBB999777<2>222000012<24>0bo0cq0es<2>0jy\
0kz0jy<24>09C08A068<2>022000211<24>oiQqjRslS<3>zsX<25>CB7A96875<3>000400\
<23>o00q00s00<3>z00<25>C00A00800<3>000<23>eee
}
multi219d { ; Machinehead
; Albrecht Niekamp feb,03
; Version 2002 Patchlevel 4
reset=2002 type=formula formulafile=multi5.frm
formulaname=Multifrac_219d function=exp/exp passes=t
center-mag=0.411007/0.347039/21.09705
params=1024/4094/256/512/-0.125/-0.375 float=y maxiter=2048
inside=maxiter outside=tdis periodicity=0
colors=200SSS<9>iiijjjlll<3>sss<25>BBB999777<2>222000012<24>0bo0cq0es<2>\
0jy0kz0jy<24>09C08A068<2>022000211<24>oiQqjRslS<3>zsX<25>CB7A96875<3>000\
400<23>o00q00s00<3>z00<25>C00A00800<3>000<14>QQQ
}
---------------------------------Start-Formulas-----------------------------
FRM:Multifrac_204f {;Albrecht Niekamp Feb,03
fac=real(p1)
bailout=imag(p1)
border=real(p2)
out=imag(p2)
z=0
t=0
start=1
c=pixel
:
z=z^2+c
if (start)
t=t+1
if (|z|>=border)
u=2*(fn1(t/fac))
z=z^u
start=0
endif
if (t>out)
u=2*(fn1(t/fac))
z=z/u
start=0
endif
endif
|z|<=bailout
}
FRM:Multifrac_215 {;Albrecht Niekamp Feb,03
;p3=julia seed
fac=real (p1)
bailout=imag(p1)
out=real(p2)
border=imag(p2)
z=pixel
c=p3
t=0
start=1
x=0
y=0
:
y2=y*y
x2=x*x
x=x2-y2-real(c)
y=2*x*y-imag(c)
z=(z*x)^(z*y)
if (start)
t=t+1
if (|z|>=border) || (t>out)
u=2*(fn1(t/fac))
z=pixel
c=p3*u
start=0
x=0
y=0
endif
endif
|z| <=bailout
}
FRM:Multifrac_218 {;Albrecht Niekamp Feb,03
fac=real(p1)
bailout=imag(p1)
border=real(p2)
out=imag(p2)
z=0
t=0
start=1
c=pixel
:
z=z^2+c
if (start)
t=t+1
if (|z|>=border)
u=2*(fn1(t/fac))
z=z^u
start=0
endif
if (t>out)
u=2*(fn2(t/fac))
z=pixel
c=p3*u
start=0
endif
endif
|z|<=bailout
}
FRM:Multifrac_218a {;Albrecht Niekamp Feb,03
fac=real(p1)
bailout=imag(p1)
border=real(p2)
out=imag(p2)
z=0
t=0
start=1
c=pixel
:
z=z^2+c
if (start)
t=t+1
if (|z|>=border)
u=2*(fn1(t/fac))
z=z^u
start=0
endif
if (t>out)
u=2*(fn2(t/fac))
c=p3*u
start=0
endif
endif
|z|<=bailout
}
FRM:Multifrac_219a {;Albrecht Niekamp Feb,03
fac=real(p1)
bailout=imag(p1)
border=real(p2)
out=imag(p2)
z=0
t=0
start=1
c=pixel
:
if (start)
z=z^2+c
t=t+1
if (|z|>=border)
u=2*(fn1(t/fac))
z=z^u
start=0
endif
if (t>out)
u=2*(fn2(t/fac))
z=z/u
c=p3*u
start=0
endif
else
z=z^z+c
endif
|z|<=bailout
}
FRM:Multifrac_219c {;Albrecht Niekamp Feb,03
fac=real(p1)
bailout=imag(p1)
border=real(p2)
out=imag(p2)
z=0
t=0
start=1
c=pixel
:
if (start)
z=z^2+c
t=t+1
if (|z|>=border)
u=2*(fn1(t/fac))
z=z^u
start=0
endif
if (t>out)
u=2*(fn2(t/fac))
z=z/u
c=p3/u
start=0
endif
else
z=z^z+c
endif
|z|<=bailout
}
FRM:Multifrac_219d {;Albrecht Niekamp Feb,03
fac=real(p1)
bailout=imag(p1)
border=real(p2)
out=imag(p2)
z=0
t=0
start=1
c=pixel
:
if (start)
z=z^2+c
t=t+1
if (|z|>=border)
u=2*(fn1(t/fac))
z=z^u
start=0
endif
if (t>out)
u=2*(fn2(t/fac))
z=z/u
c=p3^u
start=0
endif
else
z=z^z+c
endif
|z|<=bailout
}
--------------------------------------------------end-formulas------------------------------------------------