HOME | DD
Published: 2007-11-02 13:32:23 +0000 UTC; Views: 5054; Favourites: 49; Downloads: 1832
Redirect to original
Description
More of a texturizing type script. Hope you enjoy! If you've got questions or comments just shoot!Related content
Comments: 11
shaun-rules-4eva [2007-11-03 13:45:23 +0000 UTC]
I didn't like this one too much...
I've gotten used to just pressing F9 till I get the desired results, lol
anyway, I wrote a new code... well deleted all your stupid questions, that annoying while loop, and told it to check the last transform for rectangles, and adds a new one if it can't find any. Also had to reset the position to get the scaling right every time...
...
...
Would you like a copy?
👍: 0 ⏩: 1
CabinTom In reply to shaun-rules-4eva [2007-11-03 21:13:58 +0000 UTC]
Which "annoying" while loop. They're both there for very specific reasons.
I'm sorry it didn't meet your standards either. Those "stupid" questions are included because the *vast* majority of people who watch me had asked that I include options in my scripts. They help people learn and give a greater control over the result. The point of the preview is so that you can tweak the number you input so that it's just right. I'm sorry but I believe you have upset me somewhat with this comment.
👍: 0 ⏩: 1
shaun-rules-4eva In reply to CabinTom [2007-11-04 08:39:08 +0000 UTC]
Oh... sorry, i didn't want to upset you...
Just the one that wouldn't let it finish.
👍: 0 ⏩: 1
CabinTom In reply to shaun-rules-4eva [2007-11-04 13:43:05 +0000 UTC]
Which while loop doesn't let it finish? If you answer yes at the end, all you have to do is close the preview screen while your main screen updates.
👍: 0 ⏩: 1
shaun-rules-4eva In reply to CabinTom [2007-11-04 14:31:47 +0000 UTC]
Here's a copy of your code I modified
I do like the effect, one of my favorites at the moment...
but I enjoy my new user interface too, lol.
w := 0;
While w < 1.5 do
Begin
w := (Trunc((random * 10)*100))/100;
end
m := random;
sc := 0;
While sc < 3 do
Begin
sc := random * 5.5;
End
setactivetransform(transforms-1);
if transform.rectangles = 0 then AddTransform;
With Transform do
Begin
transform.A := 1;
Transform.B := 0;
Transform.C := 0;
Transform.D := 1;
Transform.E := 0;
Transform.F := 0;
linear3D := -0.1;
rectangles := -0.075;
rectangles_x := m;
rectangles_y := m/10;
weight := w;
scale(sc);
rotate(random * 360);
end
👍: 0 ⏩: 0
purple-whirlpool [2007-11-02 17:42:17 +0000 UTC]
Your supposed to be resting! Now put that computer down and get some rest! How will you ever get well if you never stop working!
Btw, Thanks
👍: 0 ⏩: 1
CabinTom In reply to purple-whirlpool [2007-11-02 23:16:35 +0000 UTC]
Don't worry! I'm feeling better now! thanks for the concern though.
👍: 0 ⏩: 0
DreamMedia-UK [2007-11-02 13:51:30 +0000 UTC]
fantastic, looks great, ill be trying it out tonight
👍: 0 ⏩: 0

























