NOVA分形
mathcad吧
全部回复
仅看楼主
level 13
LNSZDZG 楼主
在画板论坛里学的,本来应该发到画板论坛,可是今天发不了图片,就发在这了。
2014年09月17日 13点09分 1
level 12
呵呵,就是先发在这儿,没错。
2014年09月17日 14点09分 2
level 15
很好。等有时间,我也来学做。
2014年09月18日 03点09分 3
level 13
LNSZDZG 楼主
2014年09月19日 08点09分 4
level 13
LNSZDZG 楼主
UF代码
Nova {
; c=1/c
init:
complex zs = (0,0)
complex zc = (0,0)
complex z = (1,0)
complex zold = (0,0)
; complex c = (0,0)
c = #pixel
z = c
z = z - 1/z
loop:
zold = z
z = z - ([url]http://z^@power-1)/(@power*z^(@power-1))+c*0.12[/url]
bailout:
|z - zold| > @bailout
default:
title = "Nova (Mandelbrot)"
helpfile = "dmj-pub\dmj-pub-uf-hn.htm"
maxiter = 1000
periodicity = 0
center = (-0.5,0)
magn = 1.0
param power
caption = "Exponent"
default = (6,0)
hint = "Overall exponent for the equation. (6,0) gives \
the classic HalleyNovaM type."
endparam
param bailout
caption = "Bailout"
default = 0.00001
hint = "Bailout value; smaller values will cause more \
iterations to be done for each point."
endparam
switch:
type = "Nova "
seed = #pixel
power = @power
bailout = @bailout
}
2014年09月19日 08点09分 5
level 13
LNSZDZG 楼主
2014年09月19日 08点09分 6
level 13
LNSZDZG 楼主
2014年09月19日 08点09分 7
level 13
LNSZDZG 楼主
2014年09月20日 15点09分 8
1