Would anybody be able to point me to a script for Apophysis that combines the default animation with a gradient step animation? I've tried combining the default animation script with a gradient animating script I have, but the end result is allways a runtime error :( Many thanks in advance, Don

{ Rotates the gradient } { Rotates the reference Triangle } { Hit any key to stop } Flame.SampleDensity := 1; while not Stopped do begin RotateReference(3.6); for i := 0 to 255 do begin Flame.Gradient[i][0] := Flame.Gradient[(i + 1) mod 256][0]; Flame.Gradient[i][1] := Flame.Gradient[(i + 1) mod 256][1]; Flame.Gradient[i][2] := Flame.Gradient[(i + 1) mod 256][2]; end; Preview; end;

Thank you. Unfortunately I didnt supply enough detail with my request. What I'm actually looking for/trying to do is animate the flame while rotating the gradient and exporting each flame as a seperate bmp. I have a script that does the animating and rendering but cant get a gradient rotation to run alongside it. Apologies for the confusion. Don

Renderer.Width := 320; Renderer.Height := 240; SetRenderBounds; Flame.SampleDensity := 10; for j := 0 to 99 do // 100 frames, begin for i := 0 to 255 do begin Flame.Gradient[i][0] := Flame.Gradient[(i + 1) mod 256][0]; Flame.Gradient[i][1] := Flame.Gradient[(i + 1) mod 256][1]; Flame.Gradient[i][2] := Flame.Gradient[(i + 1) mod 256][2]; end; for i := 0 to Transforms - 1 do begin SetActiveTransform(i); Rotate(3.6); end; Renderer.Filename := 'c:rendersBMPANI' + Format('%.2d', [j]) + '.bmp'; Render; end; UpdateFlame := False;

Absolutely perfect. Thank you very much :)