Shop Mobile More Submit  Join Login
Crucial threads script by IDeviant Crucial threads script by IDeviant
Finally, I have it - the script based on my iconic 'No escape'. This idea arose during a discussion with ~zweeZwyy: I was identifying the crucial elements of those parameters when I suddenly thought "Hey, I could script this!" Replicating editor movements using scripts proved... painful. As for trying to nail the coefficients, well... An addition to the basics is a 256-point randomised bright gradient for chromatic interest. If you don't like it, just replace with your gradient of choice! If you really like it, see here for a method of making it available to other scripts, or simply save it as a stand-alone. Get weaving!
Add a Comment:
 
:iconfractal1:
fractal1 Featured By Owner Jul 28, 2011
Thank you for this pretty script and for the instructions on using the Fine Gradient Procedure! I like a lot of colour variety in my fractals, so I'll be using Fine Gradient a lot. Your Crucial threads script is not the easiest to "tweak," I think. I enjoy a challenge, though, and ended up creating this with it: Nightfall. The effort was worth it! I am interested in seeing what other people create with this script.
Reply
:iconideviant:
IDeviant Featured By Owner Aug 4, 2011  Hobbyist Digital Artist
Indeed, the script wasn't really meant for tweaking - the randomising parts were built on trial-and-error. The idea is just to keep pressing F9 until you get something half-decent. Or you could add a batch wrapper...
Reply
:iconfractal1:
fractal1 Featured By Owner Aug 4, 2011
Oh, I see. I'd like to learn how to make batch scripts and that kind of thing.
Reply
:iconideviant:
IDeviant Featured By Owner Aug 4, 2011  Hobbyist Digital Artist
Here's a 'batch wrapper' for the script:

DeleteFile(INSTALLPATH + 'apophysis.rand');
for k := 0 to Options.BatchSize - 1 do
begin
ShowStatus('Processing ' + IntToStr(k + 1) + ' of ' + IntToSTr(Options.BatchSize));

---SCRIPT GOES HERE---

Flame.Name := Options.RandomPrefix + DateCode + '-' + IntToStr(BatchIndex);
BatchIndex := BatchIndex + 1;
SaveFlame(INSTALLPATH + 'apophysis.rand');
end;
ListFile(INSTALLPATH + 'apophysis.rand');
UpdateFlame := False;

This uses whatever value you have entered under Settings, Random, Batch size.
Reply
:iconfractal1:
fractal1 Featured By Owner Aug 5, 2011
Aren't you sweet! I'll try it!
Reply
:iconideviant:
IDeviant Featured By Owner Aug 6, 2011  Hobbyist Digital Artist
:laughing: I'm just a big ol' softy ;P
Reply
:iconartnimages:
artNimages Featured By Owner Jul 26, 2011
Love the texture.
Reply
:iconlupsiberg:
Lupsiberg Featured By Owner Dec 14, 2009   General Artist
Thank you very much for sharing :bow: :rose:
Reply
:iconstartrekomega:
StarTrekOmega Featured By Owner Sep 4, 2009  Hobbyist General Artist
Interesting effects when the color symmetry is made negative, especially when it's a decimal negative. :D
Reply
:iconargothar:
Argothar Featured By Owner Nov 13, 2008  Hobbyist General Artist
how you get all the different colours?

When I run the script it stays monotone.
Reply
:iconideviant:
IDeviant Featured By Owner Nov 14, 2008  Hobbyist Digital Artist
I suspect missing (reference to the) Functions.asc file. The script uses a procedure called CalculateColors stored in this file. First, go into Options and look on the Paths tab. Under Function library, it should have "C:\Program Files\Apophysis 2.0\Scripts\Functions.asc" or something like, depending on where you installed Apo. Click on the folder icon next to this and then navigate to, and select, Functions.asc. Then re-try the script. Otherwise create a file and name it Functions.asc, then add the following to it:

procedure CalculateColors;
{ Spreads the color parameters evenly }
begin
for i := 0 to Transforms - 1 do
begin
SetActiveTransform(i);
Transform.Color := i / (Transforms - 1);
end
end;

Or, in the transform editor, select xform #2, go to the Colors tab and move the slider all the way to the right.
Reply
:iconargothar:
Argothar Featured By Owner Nov 14, 2008  Hobbyist General Artist
Thanks a lot!
Reply
:iconspringdreams:
springdreams Featured By Owner Sep 8, 2008   Digital Artist
Downloaded. It looks interesting.
Reply
:iconideviant:
IDeviant Featured By Owner Sep 11, 2008  Hobbyist Digital Artist
Cool! Hope you get something interesting :D
Reply
:iconanjaleck:
anjaleck Featured By Owner Feb 29, 2008  Hobbyist General Artist
Gorgeous fractal and thank you for sharing the script. I love to play with them to see what I can create.
Hugs,
Anj
Reply
:iconideviant:
IDeviant Featured By Owner Mar 3, 2008  Hobbyist Digital Artist
Most welcome - writing scripts helps greatly in exploring the range and limitations of a style :D
Reply
:iconanjaleck:
anjaleck Featured By Owner Mar 4, 2008  Hobbyist General Artist
Exactly! I love scripts for that reason... and a lot of time I head left with them, coming up with different kinds of results. Those are actually the type of scripts I like best, the ones where I can fiddle after I run the script.
Hugs,
Anj
Reply
:iconcontrarymary:
contrarymary Featured By Owner Feb 10, 2008  Hobbyist General Artist
That's really clever. Thanks for sharing!
Reply
:iconbluesman219:
bluesman219 Featured By Owner Feb 9, 2008
I've made these type of fractals before so I'm curous as to what your script looks like.
Lots of linear?? :D
Reply
:iconideviant:
IDeviant Featured By Owner Feb 10, 2008  Hobbyist Digital Artist
Oh, yes - all linear! I should have released a batch version. Never mind, with the Editor open, it's easy to see the working by serially running the thing.
Reply
:iconisis44:
Isis44 Featured By Owner Jan 28, 2008
Wow,this looks really cool,thankyou for sharing it with us.
Reply
:iconideviant:
IDeviant Featured By Owner Jan 29, 2008  Hobbyist Digital Artist
Thanks! Hope you have fun with it :D
Reply
:iconkdietrich:
kdietrich Featured By Owner Jan 28, 2008
Wow -- really lovely!
Reply
:iconideviant:
IDeviant Featured By Owner Jan 29, 2008  Hobbyist Digital Artist
:thanks:
Reply
:iconlapetitballerina:
lapetitballerina Featured By Owner Jan 27, 2008
that is gorgeous
Reply
:iconideviant:
IDeviant Featured By Owner Jan 28, 2008  Hobbyist Digital Artist
:thanks:
Reply
:iconsquaresoul:
SquareSoul Featured By Owner Jan 26, 2008
Ooh, a new script for me to play with. Thanks for offering it :)
Reply
:iconideviant:
IDeviant Featured By Owner Jan 28, 2008  Hobbyist Digital Artist
Let me know if you get anything good! I tend to use scripts as a starting point, after which anything can happen :D
Reply
:iconann-mclaren:
Ann-McLaren Featured By Owner Jan 25, 2008  Hobbyist General Artist
Just what I need.. Somethng new to play with..
Reply
:iconideviant:
IDeviant Featured By Owner Jan 28, 2008  Hobbyist Digital Artist
Indeed! I too have been lifted in the past with a new script or flame pack - it suddenly gives a fresh way in to what had become stale :nod:
Reply
:iconann-mclaren:
Ann-McLaren Featured By Owner Jan 29, 2008  Hobbyist General Artist
I have been worried about my apo muse.. She seems to be taking a nap.. I will play with your script later today.. Hopefully she will wake up..
Reply
:iconideviant:
IDeviant Featured By Owner Jan 29, 2008  Hobbyist Digital Artist
So has mine :( I've drifted into the technical side again, hence the script. The sinusoidal nature of inspiration ;)
Reply
:iconann-mclaren:
Ann-McLaren Featured By Owner Jan 30, 2008  Hobbyist General Artist
I've gotten into making desktop wallpapers ias well as of fractals right now.. They are quite challenging.. Technical things are beyind me..
Reply
:iconideviant:
IDeviant Featured By Owner Jan 30, 2008  Hobbyist Digital Artist
Scripts are my limit! Creating new variations is beyond me - programmer territory :D
Reply
:iconann-mclaren:
Ann-McLaren Featured By Owner Jan 30, 2008  Hobbyist General Artist
I am severely dyslexic.. Just learning to use a fractal program has been a strugle.. I work at it every day.. What most people learn in a day takes me months..I am always getting things backwards..
Reply
:iconideviant:
IDeviant Featured By Owner Jan 31, 2008  Hobbyist Digital Artist
Then that makes your achievements even more amazing - over 2000 deviations? It'll be some years before I approach that :nod:
Reply
(1 Reply)
:iconeduardodapy:
EduardodaPy Featured By Owner Jan 25, 2008
Interesting script!

I hope my scripts will reach this level
Reply
:iconideviant:
IDeviant Featured By Owner Jan 28, 2008  Hobbyist Digital Artist
Thanks! The key with this type of script is that the flame permits a certain amount of variation. This should be explored manually to test its limits and then a random element built into the script :nod:
Reply
:iconfracfx:
FracFx Featured By Owner Jan 24, 2008  Hobbyist Digital Artist
Cool script, I used it here and thanks for sharing :thanks::
[link]

If you really want to "nail the coefficients" you can use my Crystal Ball Plastic script as an example on how to do it (or rather how I did it, if you have any questions feel free to note me):
[link]
Reply
:iconideviant:
IDeviant Featured By Owner Jan 24, 2008  Hobbyist Digital Artist
By "nail the coefficients", I was meaning that I can't marry up the various numbers:

- from flame.pdf, the coeffs of the equation Fi(x, y) = (ai x + bi y + ci, di x + ei y + fi)
- the numbers in the boxes against X, Y, and O in both the Triangle and Transform tabs in the Editor
- the script commands Transform.A(to F) :=
- the 6 coeffs listed in the .flame file

I naively assumed that those in the .flame file would be, in order, A to F, as in the equation. Putting these into the script put the triangle in a quite different position.

I see in your script that you use the form transform.coefs[0,0] (which I'd quite forgotten about) - I guess that this corresponds to the left-hand pair of the X coeffs in the Transform (not Triangle) tab? Many thanks for that, it'll make initial transform positions much easier for scripting. Trying to emulate Editor movements is a real pain :D
Reply
:iconfracfx:
FracFx Featured By Owner Jan 25, 2008  Hobbyist Digital Artist
Yep you got it, transform, not triangle, The "A,B,C,D,E,F" values would translate like this: where x0 is the left side of the transform tab, and x1 is the right side value and so on.
You can open your flame in apo or in notepad, or both (easier in notepad I think) and use the values at the top of the flame parameters to write your script, by using this you automatically assure the proper positioning and scale of the transform(s), then change the other variables you want after doing that part. You could write the script where it produces the same flame every time but what's the fun in that? :D

transform.coefs[0,0] := -0.229304 //x0 value shown in left side of "X" transform box

transform.coefs[0,1] := -0.969931 //x1 value shown in the right side of "X" transform box

transform.coefs[1,0] := 0.969931 //y0
transform.coefs[1,1] := -0.229304 //y1
transform.coefs[2,0] := -0.928969 //o0
transform.coefs[2,1] := -0.480904 //o1
You could think of it like this if this makes any sense to you:
a [0,0] c [0,1] = x0, x1
b [1,0] d [1,1] =y0, y1
e [2,0] f [2,1] = o0, o1
Reply
:iconideviant:
IDeviant Featured By Owner Jan 25, 2008  Hobbyist Digital Artist
Ah, that clears up the trouble I was having with the letters - I tried left-right, top-bottom then top-bottom, left-right. And it turns out to be a mixture! Still can't see how it relates to the equation for Fi(x, y), though :confused:
Reply
:iconfracfx:
FracFx Featured By Owner Jan 25, 2008  Hobbyist Digital Artist
Yeah I haven't really figured that part out yet either, been searching the 'net and looking for things that might explain it better, here's a formula page if you ever solve the "mystery" :D :[link]
Reply
:iconideviant:
IDeviant Featured By Owner Jan 25, 2008  Hobbyist Digital Artist
That's a large collection! But they're all complex (Mandelbrot-type) rather than IFS. I know that the coeffs have something to do with translation, shear and scale (I think :confused:). Perhaps matrix multiplication comes into it? Now you've set me on a mission :D
Reply
:iconzweezwyy:
zweeZwyy Featured By Owner Jan 24, 2008
Cat Got My Scrumbles [link]
is a first fumble with this. More to come. Yiippee!
Reply
:iconzweezwyy:
zweeZwyy Featured By Owner Jan 24, 2008
Brilliant! Job well done, so pleased.
Now children, let's PLAY!
Reply
:icondjeaton3162:
djeaton3162 Featured By Owner Jan 24, 2008  Hobbyist Digital Artist
This is absolutely GORGEOUS! I can't wait to play with it.
Reply
:iconideviant:
IDeviant Featured By Owner Jan 25, 2008  Hobbyist Digital Artist
Thanks! It's fairly limited in its scope, but manually tweaking xform #2 (and indeed exchanging variations) can extend its output :D
Reply
:iconvoncrowd:
VonCrowd Featured By Owner Jan 24, 2008
:o

It's so awesome that my eye twitched
Reply
:iconideviant:
IDeviant Featured By Owner Jan 24, 2008  Hobbyist Digital Artist
:rofl:
Reply
Add a Comment:
 
×
Download ZIP download, 366 bytes




Details

Submitted on
January 24, 2008
File Size
366 bytes
Link
Thumb
Embed

Stats

Views
6,063
Favourites
78 (who?)
Comments
71
Downloads
1,283
×