FnGlynn {
;
; Based on GLYNN, a formula by Jon Horner.
; Mutated Fractint and UF version by Bradley Beacham.
; See blb.txt for comments.
; 13 March 2003
;
global:
power = @p1
c = @p2
fc = fn1(@p2)
init:
z = #pixel
loop:
if @FuncAffects == "Z"
z = fn1(z^power) + c
elseif @FuncAffects == "C"
z = z^power + fc
elseif @FuncAffects == "Whole"
z = fn1(z^power + c)
else ;"Both"
z = fn1(z^power) + fc
endif
bailout:
|z| <= @bailout
default:
title = "FnGlynn"
param p1
caption = "Power"
default = (1.5,0)
endparam
param p2
caption = "Julia Seed"
default = (-0.2,0)
endparam
param bailout
caption = "Bailout value"
default = 4
min = 0
endparam
func fn1
caption = "Function"
default = ident()
endfunc
param FuncAffects
caption = "Function Affects"
enum = "Z" "C" "Whole" "Both"
default = 2 ; "Whole" is the default
hint = "What part of iterated function is affected by the user function? \
Options are 'Z': [fn(z^power)] + c; 'C': z^power + fn(c); \
'Whole': fn(z^power + c); and 'Both': fn(z^power) + fn(c)."
endparam
}
 FnGlynn.gsp (14.51 KB)
|
