After writing letter and small conversation with the author of Buddhabrot algorithm I added equalisation to my variation of not so buddhabrot of the thread:
http://www.fractalforums.com/fractal-programs/problems-with-implementing-budhabrot-in-uf/Equalisation with sigmoid function looks kind of better than plain equalisation. Now it's possible to create less rought images, becouse this allows more hit density. But it allaways tend to be somewhat dark even when the (modified) sigmoid function lightens the result.
;for Equalisation only
; additional loop calculates brightest colour.
IF (@equalisation==true)
x=0
y=0
while x < #width
y = 0
while y < #height
pixR[x, y]=abs(pixR[x, y])
pixG[x, y]=abs(pixG[x, y])
pixB[x, y]=abs(pixB[x, y])
IF ( pixR[x, y] > maxcolour)
maxcolour=pixR[x, y]
ENDIF
IF( pixG[x, y] > maxcolour)
maxcolour=pixG[x, y]
ENDIF
IF( pixB[x, y] > maxcolour)
maxcolour=pixB[x, y]
ENDIF
y = y + 1
endwhile
x = x + 1
endwhile
ENDIF
;goes throught pixels
;for equalisation. Uses sigmoid function.
IF (@equalisation==true)
resultR=6*(resultR)/(5+maxcolour)
resultG=6*(resultG)/(5+maxcolour)
resultB=6*(resultB)/(5+maxcolour)
ENDIF
Normal mandelbrot:
Formula by Kram:
Will need long time to wait. But since most of forum members have much younger PCs with number of times more processor frequencies than mine, it woun't be long. Quad Gen formula, Ultra Fractal parameter:
Quad_Gen_SE {
fractal:
title="Quad_Gen_SE" width=800 height=600 layers=1
credits="Edgar;5/23/2013"
layer:
caption="Background" opacity=100 transparent=yes
mapping:
center=0/0 magn=0.85
formula:
maxiter=100 filename="Standard.ufm" entry="Pixel"
inside:
transfer=none
outside:
transfer=linear filename="em.ucl" entry="Brahmabrot"
p_sampleDensity=20000 p_maxiter=125 p_seedinput=-8
p_formula="Quadratic General" p_power=2 p_starpower=7 p_stargeom=0.5
p_unitvector=-0.5 p_talisadd=1 p_quadfactor=2 p_frequency=1 p_spin=1
p_settype=Mset p_julia=-0.4/0.25 p_srcWidth=5 p_srcHeight=4
p_switchRGB="Switch Red and Green" p_ambient=0.2 p_postfn="0- None"
p_palette="Direct Colouring" p_equalisation=yes p_lightR=0.38
p_scalarR=0.7 p_lightG=0.98 p_scalarG=1.6 p_lightB=0.14
p_scalarB=0.3
gradient:
smooth=yes index=0 color=8716288 index=100 color=16121855 index=200
color=46591 index=300 color=156
opacity:
smooth=no index=0 opacity=255
}
Faster. Bird of prey -> abs(z^3) +c:
a_birdofprey {
fractal:
title="a_birdofprey" width=800 height=600 layers=1
credits="Edgar;5/28/2013"
layer:
caption="Background" opacity=100 transparent=yes
mapping:
center=0.05/0.1125 magn=1.1428571
formula:
maxiter=100 filename="Standard.ufm" entry="Pixel"
inside:
transfer=none
outside:
transfer=linear filename="em.ucl" entry="Brahmabrot"
p_sampleDensity=26000 p_maxiter=150 p_seedinput=0
p_formula=BurningSihp p_power=3 p_starpower=7 p_stargeom=0.5
p_unitvector=-0.5 p_talisadd=1 p_quadfactor=2 p_frequency=1 p_spin=1
p_settype=Mset p_julia=-0.4/0.25 p_srcWidth=5 p_srcHeight=4
p_switchRGB="Switch Red and Blue" p_ambient=-0.5 p_postfn="0- None"
p_palette="Direct Colouring" p_equalisation=yes p_lightR=0.38
p_scalarR=0.7 p_lightG=0.98 p_scalarG=1.6 p_lightB=0.14
p_scalarB=0.3
gradient:
smooth=yes index=0 color=8716288 index=100 color=16121855 index=200
color=46591 index=300 color=156
opacity:
smooth=no index=0 opacity=255
}