Mac:

mac50277 calls for mac015 in mac.ucl
I do not have mac015 and cannot find it in any of the = collections.

Larry

I like to chose formulas at random to explore. = However a large=20 portion of those just produce a blank blue or black window. Is this = supposed to=20 work this way? How do I know what to set various parameters to if I get = no=20 image? Am I doing something wrong here?

Larry Hodgson

First, try setting parameters and functions at random. If the screen remains all blue or black, you have to set a colouring algorythm. If it's blue, set it in the outside tab, and if it's black, set it in the inside tab.

I hope this helps...

Samuel

I like to chose formulas at random to explore. However a large portion of those just produce a blank blue or black window. Is this supposed to work this way? How do I know what to set various parameters to if I get no image? Am I doing something wrong here? Larry Hodgson

--
***--*-****-*-*****-*********-**-******-*****-****-...
Samuel Monnier
ICQ 18767995
http://www.crosswinds.net/~s31415/index/index.htm
**--*******-*-********-**-********-*-********-**-...

Here you go Bob:

Null { ; Kerry Mitchell 02jul99
;
; Do-nothing formula, = merely to=20 serve as a place-holder
; between transform and coloring.
;=20
init:
z =3D #pixel
;
; If both x and y flags are 0, = it=20 probably means that no
; transform was used; set to "inside" = point. =20 Otherwise,
; make an "outside" point.
;
bool=20 done=3Dtrue
int xflag=3Dround(real(#pixel)/20)
int=20 yflag=3Dround(imag(#pixel)/20)
=20 if((xflag=3D=3D0)&&(yflag=3D=3D0))
= done=3Dfalse
=20 endif
loop:
bailout:
= done=3D=3Dfalse
default:
=20 title=3D"Null"
method=3Dmultipass
= periodicity=3D0
=20 maxiter=3D1
}
Once again Bob here it is:

ZtoIndex { ; Paul Carlson
; modified by Marcelo=20 Anelli
final:
if (@forma=3D=3D0)
= #index =3D=20 ((real(#z)+1) % @sele) / @rango
elseif=20 (@forma=3D=3D1)
#index =3D ((imag(#z)+1) % @sele) = /=20 @rango
elseif (@forma=3D=3D2)
#index =3D = ((|#z|+1) %=20 @sele) / @rango
elseif (@forma=3D=3D3)
= #index =3D=20 ((cabs(#z)+1) % @sele) / @rango
elseif=20 (@forma=3D=3D4)
#index =3D ((cabs(@fn1(#z))+1) % = @sele) /=20 @rango
endif
default:
= title=3D"ZtoIndex"
param=20 forma
default =3D 0
caption = =3D=20 "Calculation"
enum =3D "Real" "Imaginary" "|z|" = "cabs(z)"=20 "function"
endparam
param = rango
=20 caption =3D "Full color range"
default =3D = 256
=20 endparam
param sele
caption =3D "Use = color=20 range"
default =3D 256
= endparam
func=20 fn1
caption =3D "Transfer = function"
=20 default =3D ident()
endfunc
}

Here's a try at one of Paul's new = formulas.

Paul'sMandelBlobs {
; (c) 1999 Faye Williams
; Paul Carlson's = Mandel=20 Blobs formula
fractal:
title=3D"Paul's Mandel Blobs" = width=3D640=20 height=3D480 author=3D"F.Williams"
created=3D"July 3, 1999"=20 numlayers=3D2
layer:
method=3Dlinear caption=3D"New Layer = 4" opacity=3D100=20 visible=3Dyes alpha=3Dno
= mergemode=3Dhardlight
mapping:
=20 center=3D0.359752539615997112/0.0914298854192832322
=20 magn=3D119857.823263180508 angle=3D133.493
formula:
= filename=3D"pwc.ufm"=20 entry=3D"pwc.ufm:Blobs_Mandel" maxiter=3D2000 percheck=3Doff
= p_Radius=3D0.105=20 p_pow=3D0.5 p_multiplier=3D0.15 p_skip=3D60 = p_RangesColors=3D8/30
inside:
=20 filename=3D"pwc.ucl" entry=3D"ZtoIndex" transfer=3Dlinear = repeat=3Dyes
=20 p_forma=3D"Real" p_rango=3D256 p_sele=3D256 = f_fn1=3Dident
outside:
=20 filename=3D"pwc.ucl" entry=3D"ZtoIndex" transfer=3Dlinear = repeat=3Dyes
=20 p_forma=3D"Real" p_rango=3D256 p_sele=3D256 = f_fn1=3Dident
=20 smooth=3Dno position=3D200 numnodes=3D14 index=3D2 color=3D0 index=3D9=20 color=3D264220
index=3D10 color=3D0 index=3D11 color=3D527396 = index=3D53=20 color=3D3958258 index=3D103
color=3D0 index=3D117 = color=3D2621480 index=3D119=20 color=3D2894848 index=3D153
color=3D10066176 index=3D202 = color=3D0 index=3D244=20 color=3D11831040 index=3D254
color=3D15916544 index=3D302 = color=3D0 index=3D349=20 color=3D16777215
layer:
method=3Dlinear caption=3D"New = Layer 2"=20 opacity=3D100 visible=3Dyes alpha=3Dno
=20 mergemode=3Dmultiply
mapping:
=20 center=3D0.359934245123604116/0.0920710086045981379
=20 magn=3D5943.83978011565222 = angle=3D166.184979877308595
formula:
=20 filename=3D"pwc.ufm" entry=3D"pwc.ufm:Blobs_Mandel" maxiter=3D500=20 percheck=3Doff
p_Radius=3D0.166 p_pow=3D0.7 p_multiplier=3D0.9 = p_skip=3D50=20 p_RangesColors=3D8/30
inside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
outside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
smooth=3Dyes position=3D129 = numnodes=3D3 index=3D14=20 color=3D1706496 index=3D147
color=3D16777215 index=3D292=20 color=3D6336767
}

“Computers are useless. They can only give you = answers”   - Pablo Picasso -

arkangel@lvcm.com
http://prime-fe2.lvc= ablemodem.com/arkangel/
------=_NextPart_000_0059_01BEC626.8714D960-- _______ ______ _____ ____ ___ __ _ post: send message to ultrafractal@icd.com unsub: send "unsubscribe" to ultrafractal-request@icd.com admin: send comments to ultrafractal-owner@icd.com info: http://www.parkenet.org/jp/ufresources.html From owner-ultrafractal@rock.icd.com Sun Jul 4 19:52:32 1999 Received: (from majordomo@localhost) by rock.icd.com (8.9.1/8.9.1) id SAA11158 for ultrafractal-list; Sun, 4 Jul 1999 18:51:22 -0500 X-Authentication-Warning: rock.icd.com: majordomo set sender to owner-ultrafractal@icd.com using -f Received: from futureone.com (root@future.futureone.com [209.250.0.132]) by rock.icd.com (8.9.1/8.9.1) with ESMTP id SAA10964 for ; Sun, 4 Jul 1999 18:20:00 -0500 Received: from larry1 (ppp1-65.presc.dialup.futureone.com [209.250.11.65]) by futureone.com (8.9.3/8.9.3) with SMTP id QAA04001 for ; Sun, 4 Jul 1999 16:29:19 -0700 (MST) Message-ID: <000001bec675\$0a16eb20\$410bfad1@larry1> From: "Larry Hodgson" To: Subject: [ultrafractal] answers Date: Sun, 4 Jul 1999 16:03:54 -0700 MIME-Version: 1.0 Content-Type: multipart/alternative; boundary="----=_NextPart_000_00B8_01BEC636.D0A59A00" X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.2314.1300 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2314.1300 Sender: owner-ultrafractal@icd.com Precedence: bulk Reply-To: ultrafractal@icd.com This is a multi-part message in MIME format. ------=_NextPart_000_00B8_01BEC636.D0A59A00 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Samuel said: Hi !=20 First, try setting parameters and functions at random. If the screen = remains all blue or black, you have to set a colouring algorythm. If = it's blue, set it in the outside tab, and if it's black, set it in the = inside tab.=20 I hope this helps...=20 Thanks Samuel Larry ------=_NextPart_000_00B8_01BEC636.D0A59A00 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable
Samuel said:

Hi !=20

First, try setting = parameters and=20 functions at random. If the screen remains all blue or black, you have = to set a=20 colouring algorythm. If it's blue, set it in the outside tab, and if = it's black,=20 set it in the inside tab.

I hope this helps... =

Thanks Samuel

Larry

To Paul Carlson:

Paul, you do such a = wonderful job of=20 writing formulas. Your Star Of David is amazing. If I could write = formulas like=20 you I would write called "Sensuous Swirls". But since I can't, I have a=20 request.
Please write one called "Sensuous Swirls". I = think we=20 can visualize what it might be like!
Is this a = possibility?

Larry

Paul:

Sensuous Swirls can be described as = follows:=20

1)   Looking into a whirlpool with = variations=20 in the waves
2)   A distorted spiral = Galaxy
3)   A spiral that reverses itself = one or=20 more times
4)   Combinations of the above = themes while=20 maintaining a smoothness

I have a picture somewhere that = really shows=20 what I'm thinking about. If I can find it I'll send it to you off=20 line.

Hopes this helps.

Larry Hodgson

OCEAN

Carlpaulw@aol.com wrote:

Larry,

>     Paul, you do such a wonderful job of writing formulas. Your Star Of
> David is amazing. If I could write formulas like you I would write called "
> Sensuous Swirls". But since I can't, I have a request.
>  Please write one called "Sensuous Swirls". I think we can visualize what
it
> might be like!
>      Is this a possibility?

I don't know.  Maybe it's the heat (it must be close to 90 in my computer
room),
but my imagination is a little dull at the moment - can you describe what
Sensuous
Swirls might look like?

Paul Carlson

_______ ______ _____ ____ ___ __ _
post:  send message to ultrafractal@icd.com
unsub: send "unsubscribe" to ultrafractal-request@icd.com
info:  http://www.parkenet.org/jp/ufresources.html

Paul,

You certainly make this fun.  Here's 2 from=20 your
wonderful formula.

Faye

Paul'sMyEqnJuliaCurls2 {
; (c) 1999 Faye = Williams
;=20 formula by Paul Carlson
fractal:
title=3D"Paul's MyEqn = Julia Curls=20 (2)" width=3D640 height=3D480 resolution=3D75
gamma=3D1 = author=3D"F. Williams"=20 created=3D"July 9, 1999" numlayers=3D3
layer:
= method=3Dmultipass=20 caption=3D"New Layer 3" opacity=3D100 visible=3Dyes alpha=3Dno
= mergemode=3Doverlay
mapping:
=20 center=3D-0.0537999985681407988/-0.0261460031913472023 = magn=3D0.52742616
=20 angle=3D352.945484304471299
formula:
filename=3D"pwc.ufm"=20 entry=3D"MyEqn_Julia_Curls" maxiter=3D20 percheck=3Doff
= p_JuliaCoords=3D1.240929178/0.881773806=20 p_RangesColors=3D2/125
inside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
outside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
smooth=3Dno numnodes=3D2 index=3D62 = color=3D0=20 index=3D206 color=3D9425407
layer:
method=3Dmultipass = caption=3D"New Layer=20 4" opacity=3D100 visible=3Dyes alpha=3Dno
=20 mergemode=3Ddifference
mapping:
=20 center=3D-0.0537999985681407988/-0.0261460031913472023 = magn=3D0.52742616
=20 angle=3D352.945484304471299
formula:
filename=3D"pwc.ufm"=20 entry=3D"MyEqn_Julia_Curls" maxiter=3D20 percheck=3Doff
= p_JuliaCoords=3D1.240929178/0.881773806=20 p_RangesColors=3D2/125
inside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
outside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
smooth=3Dno numnodes=3D13 = index=3D28 color=3D10878975=20 index=3D82 color=3D5931146
index=3D83 color=3D27241 index=3D84 = color=3D12356=20 index=3D101 color=3D11466495
index=3D119 color=3D0 index=3D126 = color=3D0 index=3D144=20 color=3D11466495 index=3D161
color=3D0 index=3D172 = color=3D655360 index=3D270=20 color=3D8032261 index=3D359
color=3D10752 index=3D361=20 color=3D9546
layer:
method=3Dmultipass caption=3D"New Layer = 2"=20 opacity=3D100 visible=3Dyes alpha=3Dno
=20 mergemode=3Dhardlight
mapping:
=20 center=3D-0.0537999985681407988/-0.0261460031913472023 = magn=3D0.52742616
=20 angle=3D352.945484304471299
formula:
filename=3D"pwc.ufm"=20 entry=3D"MyEqn_Julia_Curls" maxiter=3D20 percheck=3Doff
= p_JuliaCoords=3D1.240929178/0.881773806=20 p_RangesColors=3D2/125
inside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
outside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
smooth=3Dno numnodes=3D2 index=3D65 = color=3D0=20 index=3D209 color=3D9425407
}
Paul'sMyEqnJuliaCurls3 {
; (c) = 1999 Faye=20 Williams
; formula by Paul Carlson
fractal:
= title=3D"Paul's MyEqn=20 Julia Curls (3)" width=3D640 height=3D480 resolution=3D75
= gamma=3D1 author=3D"F.=20 Williams" created=3D"July 9, 1999" numlayers=3D4
layer:
=20 method=3Dmultipass caption=3D"New Layer 6" opacity=3D100 visible=3Dyes=20 alpha=3Dno
mergemode=3Ddifference
mapping:
=20 center=3D-0.0537999985681407988/-0.0261460031913472023 = magn=3D0.52742616
=20 angle=3D352.945484304471299
formula:
filename=3D"pwc.ufm"=20 entry=3D"MyEqn_Julia_Curls" maxiter=3D20 percheck=3Doff
= p_JuliaCoords=3D1.240929178/0.881773806=20 p_RangesColors=3D3/100
inside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
outside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
smooth=3Dyes position=3D-41 = numnodes=3D5 index=3D75=20 color=3D7390719 index=3D130
color=3D7340058 index=3D133 = color=3D13271136=20 index=3D142 color=3D27173 index=3D201
= color=3D13273610
layer:
=20 method=3Dmultipass caption=3D"FW 3" opacity=3D100 visible=3Dyes = alpha=3Dno
=20 mergemode=3Ddarken
mapping:
=20 center=3D-0.0537999985681407988/-0.0261460031913472023 = magn=3D0.52742616
=20 angle=3D352.945484304471299
formula:
filename=3D"pwc.ufm"=20 entry=3D"MyEqn_Julia_Curls" maxiter=3D20 percheck=3Doff
= p_JuliaCoords=3D1.240929178/0.881773806=20 p_RangesColors=3D2/125
inside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
outside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
smooth=3Dyes position=3D-157 = numnodes=3D3 index=3D41=20 color=3D16777215 index=3D172
color=3D16777215 index=3D308=20 color=3D1706496
layer:
method=3Dmultipass caption=3D"FW 2" = opacity=3D100=20 visible=3Dyes alpha=3Dno
mergemode=3Dhue
mapping:
= center=3D-0.0537999985681407988/-0.0261460031913472023 = magn=3D0.52742616
=20 angle=3D352.945484304471299
formula:
filename=3D"pwc.ufm"=20 entry=3D"MyEqn_Julia_Curls" maxiter=3D20 percheck=3Doff
= p_JuliaCoords=3D1.240929178/0.881773806=20 p_RangesColors=3D2/125
inside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
outside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
smooth=3Dno position=3D177 = numnodes=3D9 index=3D22=20 color=3D9818879 index=3D97
color=3D1842204 index=3D99 = color=3D0 index=3D100=20 color=3D16750048 index=3D168
color=3D15399424 index=3D221 = color=3D16751338=20 index=3D395 color=3D16777002
index=3D396 color=3D4470824 = index=3D397=20 color=3D5863821
layer:
method=3Dmultipass caption=3D"FW 1" = opacity=3D100=20 visible=3Dyes alpha=3Dno
= mergemode=3Dhardlight
mapping:
=20 center=3D-0.0537999985681407988/-0.0261460031913472023 = magn=3D0.52742616
=20 angle=3D352.945484304471299
formula:
filename=3D"pwc.ufm"=20 entry=3D"MyEqn_Julia_Curls" maxiter=3D20 percheck=3Doff
= p_JuliaCoords=3D1.240929178/0.881773806=20 p_RangesColors=3D2/125
inside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
outside:
filename=3D"pwc.ucl" = entry=3D"ZtoIndex"=20 transfer=3Dlinear repeat=3Dyes
p_forma=3D"Real" p_rango=3D256 = p_sele=3D256=20 f_fn1=3Dident
smooth=3Dno position=3D23 = numnodes=3D2 index=3D230=20 color=3D0 index=3D374
= color=3D9425407
}

Tyranny is always better organized than = freedom.
-Charles=20 Peguy

arkangel@lvcm.com
http://prime-fe2.lvc= ablemodem.com/arkangel/
Zelda:

Here's Curve Traps

CurvesTrap {
; Paul = Carlson
;=20 Coloring Method extraced from "MyEqn_Jula_Curls".
; By Ken = Childress=20 July 1999.
init:
bool trapped =3D FALSE
= float=20 num_ranges =3D real(@RangesColors)
float colors_in_range =3D=20 imag(@RangesColors)
float cx =3D 8.0 * #pi * @alpha
= float=20 twopi =3D #pi + #pi
float fourpi =3D twopi + twopi
= float sixpi =3D=20 fourpi + twopi
float range_num =3D 0
float = color_index =3D=20 0
float index_factor =3D colors_in_range - 1
int = iter =3D=20 0

loop:
IF !trapped && (iter >=3D=20 @skip)
float rz =3D real(#z)
= float iz=20 =3D imag(#z)
float deltax =3D rz - = cx
=20 complex v =3D deltax + flip(iz)
float theta =3D=20 atan2(v)

float ssize =3D @width * = abs(sin(theta *=20 @beads))
ELSE
= ssize =3D=20 @width
ENDIF
=
=20 float sr =3D @alpha * theta
complex m =3D  cx = + sr *=20 exp(flip(theta))
float dist =3D sqrt(|#z -=20 m|)

IF (dist <=20 ssize)
trapped =3D = TRUE
=20 ENDIF

IF=20 (!trapped)
sr =3D @alpha * (theta +=20 twopi)
m =3D  cx + sr * exp(flip = (theta +=20 twopi))
dist =3D sqrt(|#z -=20 m|)

= IF=20 (dist < ssize)
trapped = =3D=20 TRUE
ENDIF
=20 ENDIF

IF=20 (!trapped)
sr =3D @alpha * (theta +=20 fourpi)
m =3D cx + sr * exp(flip = (theta +=20 fourpi))
dist =3D sqrt(|#z -=20 m|)

= IF=20 (dist < ssize)
trapped = =3D=20 TRUE
ENDIF
=20 ENDIF

IF=20 (!trapped)
sr =3D @alpha * (theta +=20 sixpi)
m =3D cx + sr * exp(flip (theta = +=20 sixpi))
dist =3D sqrt(|#z -=20 m|)

= IF=20 (dist < ssize)
trapped = =3D=20 TRUE
ENDIF
=20 ENDIF

IF=20 (trapped)
index_factor =3D = (colors_in_range - 1)=20 / ssize
range_num =3D iter %=20 num_ranges
color_index =3D = index_factor * dist +=20 range_num * colors_in_range
ENDIF
=20 ENDIF

iter =3D iter + 1

final:
IF=20 trapped
#index =3D ((real(color_index)+1) % 256) / = 256
ELSE
IF=20 @solid
#solid =3D = TRUE
=20 ELSE
#index =3D @back_color /=20 256
ENDIF
ENDIF
=20
default:
title =3D "Curves Trap"

param=20 alpha
caption =3D "Angle = Multiplier"
=20 default =3D 0.3
hint =3D "Controls spiral = size."
=20 endparam

param width
caption =3D = "Width=20 Factor"
default =3D 0.3
hint = =3D=20 "Controls spiral thickness."
endparam

=20 default =3D -1
hint =3D "An integer, usualy 5 t0 = 30"
=20 endparam

param skip
caption =3D = "Iterations to=20 skip"
default =3D 0
hint =3D = "Iterations=20 to skip."
endparam

param=20 RangesColors
caption =3D "Ranges and=20 Colors"
default =3D (2, 125)
= hint =3D=20 "Number of Color Ranges and Number of Colors in each Range."
=20 endparam

param back_color
caption = =3D=20 "Background Color"
hint =3D "This is the color = used for=20 orbits that aren't trapped. It has=20 \
no = effect if=20 the background is solid."
default =3D=20 254
min =3D 0
max =3D = 255
=20 endparam

param solid
caption =3D = "Solid=20 Background"
hint =3D "If this is enabled orbits = that aren't=20 trapped become solid."
default =3D false
= endparam
}

Hi:

I am just beginning to read = this forum=20 - and to work with UltraFractal.

One of the most confusing = parts about=20 this - deals with how to handle and work with - especially how and where = to save=20 - the postings.  As an example, Where do save "Curve Traps" to - = what file=20 type do you save it with (e.g. .ucl, .frm, .upr) etc.

There are so many = incredibly helpful=20 notes passing through this forum that, at times, it is a little = frustrating and=20 intimidating when something as basic as how, where and what to do with = files=20 becomes the personal issue.

After reading some of the = earlier=20 postings in the past 2 days, I suspect that I'm not the only "newbie" = having=20 this problem.

Any help would be greatly=20 appreciated.

Thanks.

Gary Curtis
----- Original Message -----
From:=20 Larry=20 Hodgson
Sent: Saturday, July 10, 1999 = 5:44=20 PM
Subject: [ultrafractal] Curves=20 Traps

Zelda:

Here's Curve Traps

CurvesTrap {
; Paul = Carlson
;=20 Coloring Method extraced from "MyEqn_Jula_Curls".
; By Ken = Childress=20 July 1999.
init:
bool trapped =3D FALSE
= float=20 num_ranges =3D real(@RangesColors)
float colors_in_range =3D = imag(@RangesColors)
float cx =3D 8.0 * #pi * = @alpha
float=20 twopi =3D #pi + #pi
float fourpi =3D twopi + twopi
= float sixpi=20 =3D fourpi + twopi
float range_num =3D 0
float = color_index =3D=20 0
float index_factor =3D colors_in_range - 1
int = iter =3D=20 0

loop:
IF !trapped && (iter >=3D=20 @skip)
float rz =3D = real(#z)
float=20 iz =3D imag(#z)
float deltax =3D rz -=20 cx
complex v =3D deltax + = flip(iz)
=20 float theta =3D atan2(v)

float ssize =3D @width * = abs(sin(theta=20 * @beads))
= ELSE
ssize=20 =3D @width
ENDIF
=20
float sr =3D @alpha * = theta
complex=20 m =3D  cx + sr * exp(flip(theta))
float = dist =3D=20 sqrt(|#z - m|)

IF (dist = <=20 ssize)
trapped =3D = TRUE
=20 ENDIF

IF=20 (!trapped)
sr =3D @alpha * (theta +=20 twopi)
m =3D  cx + sr * = exp(flip (theta +=20 twopi))
dist =3D sqrt(|#z -=20 m|)
=
IF=20 (dist < ssize)
= trapped =3D=20 TRUE
ENDIF
=20 ENDIF

IF=20 (!trapped)
sr =3D @alpha * (theta +=20 fourpi)
m =3D cx + sr * exp(flip = (theta +=20 fourpi))
dist =3D sqrt(|#z -=20 m|)
=
IF=20 (dist < ssize)
= trapped =3D=20 TRUE
ENDIF
=20 ENDIF

IF=20 (!trapped)
sr =3D @alpha * (theta +=20 sixpi)
m =3D cx + sr * exp(flip = (theta +=20 sixpi))
dist =3D sqrt(|#z -=20 m|)
=
IF=20 (dist < ssize)
= trapped =3D=20 TRUE
ENDIF
=20 ENDIF

IF=20 (trapped)
index_factor =3D = (colors_in_range -=20 1) / ssize
range_num =3D iter %=20 num_ranges
color_index =3D = index_factor * dist=20 + range_num * colors_in_range
ENDIF
=20 ENDIF

iter =3D iter + 1

final:
IF=20 trapped
#index =3D ((real(color_index)+1) % 256) = /=20 256
ELSE
IF=20 @solid
#solid =3D = TRUE
=20 ELSE
#index =3D @back_color /=20 256
ENDIF
ENDIF
=20
default:
title =3D "Curves Trap"

param=20 alpha
caption =3D "Angle = Multiplier"
=20 default =3D 0.3
hint =3D "Controls spiral = size."
=20 endparam

param width
caption =3D = "Width=20 Factor"
default =3D 0.3
= hint =3D=20 "Controls spiral thickness."
endparam

=20 default =3D -1
hint =3D "An integer, usualy 5 t0 = 30"
endparam

param skip
= caption=20 =3D "Iterations to skip"
default =3D = 0
=20 hint =3D "Iterations to skip."
endparam

param=20 RangesColors
caption =3D "Ranges and=20 Colors"
default =3D (2, = 125)
hint =3D=20 "Number of Color Ranges and Number of Colors in each Range."
= endparam

param back_color
caption = =3D=20 "Background Color"
hint =3D "This is the color = used for=20 orbits that aren't trapped. It has=20 \
no = effect if=20 the background is solid."
default =3D=20 254
min =3D 0
max =3D = 255
=20 endparam

param solid
caption =3D = "Solid=20 Background"
hint =3D "If this is enabled orbits = that=20 aren't trapped become solid."
default =3D = false
=20 endparam
}

HI,

My name is Richard Rusin from Belgium. I find ULTRA = FRACTAL a=20 terrific
software. I have a lot to learn and your tutorials = are a good=20 way to achieve this.
For my first intervention in this group I would like = how to=20 purchase the demo CD.
I read that members receive this cd and I would like = how to=20 receice him.
Thanks a lot.
Best Regards.
Richard Rusin

Regarding Richard's=20 comment:

I also have seen some = reference to a=20 "demo" CD.  If this is available - and if it would be useful for a = novice -=20 please let us know who to contact to purchase it.

I have been fascinated with = fractals=20 for a number of years; however, the 1st fractal generator that I tried = to use=20 was so intimidating that I gave up.  Once I began to see the = diversity and=20 beauty of the fractals in AltBinaryPictures, I realized that a great = deal had=20 changed since 1990.

I find that working in = UltraFractal=20 allows a mental relaxation from the normal day's stress - and - even = more=20 important, I actually believe that I can generate an image with = intricate beauty=20 and colors.

If the mentioned CD or any = other=20 reference might help us, please direct us down the path.

Thank you.

Gary Curtis
----- Original Message -----
From:=20 uva69=20
Sent: Sunday, July 11, 1999 = 5:05 AM
Subject: [ultrafractal] Demo CD = /=20 Newbie

HI,

My name is Richard Rusin from Belgium. I find = ULTRA FRACTAL=20 a terrific
software. I have a lot to learn and your tutorials = are a=20 good way to achieve this.
For my first intervention in this group I would = like how to=20 purchase the demo CD.
I read that members receive this cd and I would = like how to=20 receice him.
Thanks a lot.
Best Regards.
Richard Rusin

This is my first attempt to = post and=20 one of my earliest images.

Hope this works - Hope you = like=20 it.

Thanks to everyone whose = work this=20 borrows from.

Gary

GBC-10 = {
fractal:
=20 title=3D"GBC-10" width=3D640 height=3D480 resolution=3D500=20 numlayers=3D4
layer:
caption=3D"New Layer 3" opacity=3D68 = visible=3Dyes=20 alpha=3Dno mergemode=3Dcolor
mapping:
=20 center=3D-1.55499999985093899/-9.53990435495888475E-10
=20 magn=3D28.5714285714285714 = angle=3D270.000000683245321
formula:
=20 filename=3D"lkm.ufm" entry=3D"embossed-explog-newton" = maxiter=3D250
=20 percheck=3Doff p_bailout=3D1000 p_parttype=3D"iteration" = p_numsect=3D2
=20 p_lightangle=3D0 p_sizefac=3D1
inside:
filename=3D"dmj.ucl" = entry=3D"dmj-Trap" transfer=3Dlinear repeat=3Dyes
= p_trapshape=3D"point"=20 p_trapcolor=3D"distance" p_traptype=3D"closest"
= p_traporder=3D4 p_trapfreq=3D1=20 p_trapcenter=3D0/0 p_trapdrift=3D0/0
p_traporbit=3D0/0 = p_movetrap=3Dno=20 p_aspect=3D1 p_threshold=3D0.25 p_diameter=3D1
p_angle=3D0 = p_anglestep=3D0=20 p_skew=3D0 p_skewstep=3D0 p_trapstart=3D0
p_trapiter=3D10000 = p_trapskip=3D0=20 p_gauss=3D0 p_gaussr=3D0 p_gausss=3D0
outside:
= filename=3D"Standard.ucl"=20 entry=3D"Default" transfer=3Dlinear repeat=3Dyes
= smooth=3Dyes=20 numnodes=3D6 index=3D52 color=3D16711680 index=3D118 = color=3D11864986
index=3D197=20 color=3D2300645 index=3D266 color=3D1398005 index=3D333 = color=3D4055295
=20 index=3D394 color=3D167936
layer:
caption=3D"New Layer 2" = visible=3Dyes=20 alpha=3Dno
mapping:
=20 center=3D-1.55499999985093899/-9.53990435495888475E-10
=20 magn=3D28.5714285714285714 = angle=3D270.000000683245321
formula:
=20 filename=3D"lkm.ufm" entry=3D"embossed-explog-newton" = maxiter=3D250
=20 percheck=3Doff p_bailout=3D1000 p_parttype=3D"iteration" = p_numsect=3D2
=20 p_lightangle=3D0 p_sizefac=3D1
inside:
filename=3D"dmj.ucl" = entry=3D"dmj-Trap" transfer=3Dlinear repeat=3Dyes
= p_trapshape=3D"point"=20 p_trapcolor=3D"distance" p_traptype=3D"closest"
= p_traporder=3D4 p_trapfreq=3D1=20 p_trapcenter=3D0/0 p_trapdrift=3D0/0
p_traporbit=3D0/0 = p_movetrap=3Dno=20 p_aspect=3D1 p_threshold=3D0.25 p_diameter=3D1
p_angle=3D0 = p_anglestep=3D0=20 p_skew=3D0 p_skewstep=3D0 p_trapstart=3D0
p_trapiter=3D10000 = p_trapskip=3D0=20 p_gauss=3D0 p_gaussr=3D0 p_gausss=3D0
outside:
= filename=3D"Standard.ucl"=20 entry=3D"Default" transfer=3Dlinear repeat=3Dyes
= smooth=3Dyes=20 numnodes=3D6 index=3D37 color=3D1398005 index=3D104 = color=3D4055295
index=3D165=20 color=3D167936 index=3D223 color=3D16711680 index=3D289 = color=3D11864986
=20 index=3D368 color=3D2300645
layer:
caption=3D"New Layer 1" = visible=3Dyes=20 alpha=3Dno
mapping:
=20 center=3D-1.55499999985093899/-9.53990435495888475E-10
=20 magn=3D28.5714285714285714 = angle=3D270.000000683245321
formula:
=20 filename=3D"lkm.ufm" entry=3D"embossed-explog-newton" = maxiter=3D250
=20 percheck=3Doff p_bailout=3D1000 p_parttype=3D"iteration" = p_numsect=3D2
=20 p_lightangle=3D0 p_sizefac=3D1
inside:
filename=3D"dmj.ucl" = entry=3D"dmj-Trap" transfer=3Dlinear repeat=3Dyes
= p_trapshape=3D"point"=20 p_trapcolor=3D"distance" p_traptype=3D"closest"
= p_traporder=3D4 p_trapfreq=3D1=20 p_trapcenter=3D0/0 p_trapdrift=3D0/0
p_traporbit=3D0/0 = p_movetrap=3Dno=20 p_aspect=3D1 p_threshold=3D0.25 p_diameter=3D1
p_angle=3D0 = p_anglestep=3D0=20 p_skew=3D0 p_skewstep=3D0 p_trapstart=3D0
p_trapiter=3D10000 = p_trapskip=3D0=20 p_gauss=3D0 p_gaussr=3D0 p_gausss=3D0
outside:
= filename=3D"Standard.ucl"=20 entry=3D"Default" transfer=3Dlinear repeat=3Dyes
= smooth=3Dyes=20 numnodes=3D3 index=3D64 color=3D1280 index=3D280 color=3D0 = index=3D397
=20 color=3D16777215
layer:
caption=3D"Layer 1" visible=3Dyes=20 alpha=3Dno
mapping:
=20 center=3D-1.55499999985093899/-9.53990435495888475E-10
=20 magn=3D28.5714285714285714 = angle=3D270.000000683245321
formula:
=20 filename=3D"lkm.ufm" entry=3D"embossed-explog-newton" = maxiter=3D250
=20 percheck=3Doff p_bailout=3D1000 p_parttype=3D"iteration" = p_numsect=3D2
=20 p_lightangle=3D0 p_sizefac=3D1
inside:
filename=3D"dmj.ucl" = entry=3D"dmj-Trap" transfer=3Dlinear repeat=3Dyes
= p_trapshape=3D"point"=20 p_trapcolor=3D"distance" p_traptype=3D"closest"
= p_traporder=3D4 p_trapfreq=3D1=20 p_trapcenter=3D0/0 p_trapdrift=3D0/0
p_traporbit=3D0/0 = p_movetrap=3Dno=20 p_aspect=3D1 p_threshold=3D0.25 p_diameter=3D1
p_angle=3D0 = p_anglestep=3D0=20 p_skew=3D0 p_skewstep=3D0 p_trapstart=3D0
p_trapiter=3D10000 = p_trapskip=3D0=20 p_gauss=3D0 p_gaussr=3D0 p_gausss=3D0