|
 
- UID
- 7
- 帖子
- 2888
- 精华
- 10
- 积分
- 2836
|
这两个分形就真的怪了，总是做不成功。只好再次请求协作:Magnet2Mandelbrot {
;
; Magnetic Mandelbrot set type 2. Use Switch Mode to select a
; magnetic Julia set.
;
init:
z = p1
loop:
z = sqr( (z^3 + 3 * (pixel-1) * z + (pixel-1) * (pixel-2)) / \
(3 * z^2 + 3 * (pixel-2) * z + (pixel-1) * (pixel-2) + 1) )
bailout:
|z| < @bailout && |z - 1| > @lowerbailout
default:
title = "Magnet 2 (Mandelbrot)"
helpfile = "Uf*.chm"
helptopic = "Html\formulas\standard\magnet.html"
center = (1.1, 0)
magn = 0.77
maxiter = 100
periodicity = 0
param p1
caption = "Perturbation"
default = (0, 0)
hint = "Starting value for each point. You can use this to \
'perturb' the fractal. Use (0, 0) for the classic set."
endparam
param bailout
caption = "Bailout value"
default = 100.0
min = 1
$IFDEF VER40
exponential = true
$ENDIF
hint = "This parameter defines how soon an orbit bails out while \
iterating. Larger values give smoother outlines; smaller values \
generally produce more interesting shapes around the set."
endparam
param lowerbailout
caption = "Convergent bailout value"
default = 0.00005
min = 0
$IFDEF VER40
exponential = true
$ENDIF
hint = "This parameter defines how soon a convergent orbit bails out while \
iterating. Smaller values give more precise results but usually \
require more iterations."
endparam
switch:
type = "Magnet2Julia"
p1 = #pixel
bailout = bailout
} |
-
-
捕获.JPG
(77.83 KB)
|
