Tah-StutterBrot {
;
;This is a version of mandelbrot that
;switches the values of C and Z every
;few (default:501) iterations.
;
init:
c = #pixel
z = @start
float f = @restart
loop:
f = f - 1
IF (f <= 0)
f = @restart
oldC = c
c = z*@sign
z = oldC
ENDIF
z = z^@power + c
bailout:
|z| <= @bailout
default:
title = "StutterBrot"
helpfile = "dmj-pub\dmj-pub-uf-stutter.htm"
center = (0,0)
periodicity = 0
maxiter = 1000
param start
caption = "Start Value"
default = (0,0)
hint = "Starting value for each point. You can use this to \
'perturb' the fractal."
endparam
param power
caption = "Exponent"
default = (2,0)
hint = "The exponent, dummy"
endparam
param bailout
caption = "Bailout"
default = 1e20
hint = "Bailout value; larger values will cause more \
iterations to be done for each point."
endparam
param restart
caption = "Restart Interval"
default = 501.0
min = 1e-10
hint = "Specifies the number of iterations before c is reset."
endparam
param sign
caption = "Sign"
default = -1.0
hint = "Specifies the sign of the new C."
endparam
switch:
type = "Tah-StutterJulia"
seed = #pixel
start = start
restart = restart
power = power
sign = sign
bailout = bailout
}
此分形,曾耗费了本版几位朋友的心血,因为那时研究UF刚刚起步,毫无经验积累,也没多余资料,靠摸索,经历了一次次失败,最后由榕坚兄首次成功,这个分形的画板制作历史就是如此。现在用计算的方法重新制作此分形,确实容易多了,只要照程序的句子的先后进行计算,易造。代码易读,不再注解,大家用前面的方法解读即可。视频文件的网盘地址:
http://u.115.com/file/f641cae7a2# |