as.ufm中的Spizzl_J这分形，我造出后，与帖图有距离，代码不复杂，大家看看如何作。
spizz1-J {
;Andrea Spinozzi(Updated Aug2004)
Init:
z=0
c=tan(3)+pixel+tan(4)
Loop:
z=fn1(z^p1)+@seed/fn2(c^p2)+fn3(z^p3)*fn4(z^p4)
c=@parb+@para+tan(z)*@parc
Bailout:
|z| < @bailout
Default:
title="Spizz1-J"
center=(-1.0,0.0)
angle=270
maxiter= 250
periodicity=0
method=multipass
param bailout
caption="Bailout Value"
default=4.0
min=0.0
endparam
Heading
caption="Parameters"
Endheading
param seed
caption="Seed Value"
default=(0.7,1.650697808e-18)
endparam
param para
caption="Parameter 1"
default=(1.0,0.0)
endparam
param parb
caption="Parameter 2"
default=(1.0,0.0)
endparam
param parc
caption="Parameter 3"
default=(1.0,0.0)
endparam
param p1
caption="Parameter 4"
default=(2.0,0.0)
endparam
param p2
caption="Parameter 5"
default=(2.0,0.0)
endparam
param p3
caption="Parameter 6"
default=(1.0,0.0)
endparam
param p4
caption="Parameter 7"
default=(3.0,0.0)
endparam
Heading
caption="Functions"
Endheading
func fn1
caption="Function 1"
default=zero()
endfunc
func fn2
caption="Function 2"
default=sqrt()
endfunc
func fn3
caption="Function 3"
default=sqrt()
endfunc
func fn4
caption="Function 4"
default=sqrt()
endfunc
param version
caption="Version"
default=1.0
visible=false
endparam
Switch:
type="Spizz1"
seed=pixel
bailout=@bailout
para=@para
parb=@parb
parc=@parc
p1=@p1
p2=@p2
p3=@p3
p4=@p4
fn1=@fn1
fn2=@fn2
fn3=@fn3
fn4=@fn4
version=@version
}
UF中的效果图：
|
