FracFan Forum :: View topic

Posted: Sun Jul 01, 2007 8:36 am

OK - my recent images here in the Showcase forum have all been started by a little script I made... I call it "Tech"...

It returns the exact same result every time it is run, so it's great to use as a starting point.

Just start playing with the sizes of Transforms 1 and 2; change the position, size, shape, and variations on the Final Xform...

------------------------------

Clear;

AddTransform;
AddTransform;

SetActiveTransform(transforms);
with Transform do
begin
a := 0.5;
b := -0.5;
c := 0.5;
d := 0.5;
e := 0.4;
f := 0;
linear := 0;
spherical := 1;
end;

SetActiveTransform(0);
with Transform do
begin
linear := 0;
julian := 1;
julian_power := 4;
julian_dist := -1;
Transform.Color := 0;
Weight := 3;
Symmetry := 0;
a := 0.15;
b := 0;
c := 0;
d := 0.15;
e := 0;
f := 0;
end;

SetActiveTransform(1);
with Transform do
begin
linear := 0;
disc := 1;
Transform.Color := 1;
Weight := 3.5;
Symmetry := 0;
a := 0.5;
b := 0;
c := 0;
d := 0.5;
e := 0;
f := 0;
end;

Flame.FinalXformEnabled := true;
ResetLocation := true;

----------------------------------------

Enjoy!

T.

Posted: Sun Jul 01, 2007 11:47 am

Thanks for the new script. I get very interesting flames from it. Here's one from a randomly generated flame with no additional tweaking.

Corridors

With the full view at here.

Posted: Sun Jul 01, 2007 12:20 pm

How about this one? White background and a little bit of transform tweaking...

T.

Posted: Sun Jul 01, 2007 12:28 pm

Nifty! I like it. Very Happy

Posted: Sun Jul 01, 2007 1:32 pm

Thanks for sharing the script! Can't wait to play with it :)

puppy

Posted: Sun Jul 01, 2007 2:02 pm

This is great!! Got one rendering right now...and thank you so much for sharing this. The possiblities are endless with this.

Very Happy

Posted: Sun Jul 01, 2007 6:12 pm

Got a variation on the above script... try this one too...

---------------------------------

Clear;

AddTransform;
AddTransform;

SetActiveTransform(0);
with Transform do
begin
linear := 0;
juliascope := 1;
juliascope_power := -250;
juliascope_dist := 10;
Transform.Color := 0;
Weight := 0.5;
Symmetry := 0;
a := 0.15;
b := 0;
c := 0;
d := 0.15;
e := 0;
f := 0;
end;

SetActiveTransform(1);
with Transform do
begin
linear := 0;
disc := 1;
Transform.Color := 1;
Weight := 10;
Symmetry := 0;
a := 0.5;
b := 0;
c := 0;
d := 0.5;
e := 0;
f := 0;
end;

Flame.scale := 20

--------------------------------------

Enjoy!

T.

Posted: Sun Jul 01, 2007 10:23 pm

A new variation to play with - Christmas comes in July now! Smile

Posted: Mon Jul 02, 2007 6:43 am

Hahaha! Thanks Mags!

T.

Posted: Mon Jul 02, 2007 8:06 am

ooooh, cool script!
thank you!

Posted: Mon Jul 02, 2007 11:04 am

thanks T.! i almost wish i'd found this sooner, as i am now delving into these and had to make them by hand. lol thanks again.

Posted: Mon Jul 02, 2007 8:17 pm

Beautiful, thanks for the script.

Posted: Mon Jul 02, 2007 9:05 pm

Good work, Tracey Very Happy

My try, after over an hour of playing with the flame...

Ventilation shaft sightseeing

Posted: Mon Jul 02, 2007 10:06 pm

Very nice!!!

Posted: Tue Jul 03, 2007 6:32 am

Nice work Piotr!

T.

Posted: Tue Jul 03, 2007 8:52 pm

I've shared these scripts with CabinTom at DeviantArt, and he's working on improving them by adding some random elements, etc... so don't anybody freak out when he releases those, OK?

T.

Posted: Tue Jul 03, 2007 11:51 pm

That's cool, he does some really great scripts. Can't wait to see what he does with them. You should do more, also. I really like the ones you have posted so far. I can't do much with them except a little editing here and there.

Terrye Very Happy

Posted: Wed Jul 04, 2007 2:09 am

Great Script, T. Been scratching my head on how to make those. Thank you.

Lisa Smile

Posted: Thu Jul 05, 2007 11:49 pm

OMG T!!! Let me pick myself up off the floor and try these!!! Your Blue image has made me speachless!!!

Posted: Fri Jul 06, 2007 6:38 am

I can't wait to see what you make with them Patti...

T.