nico3333fr opened this issue on Mar 08, 2006 ยท 8 posts
nico3333fr posted Fri, 10 March 2006 at 2:08 AM
Quick tip ! First, you make your fractal ! In "scripts" folder there is an "Animation Render.asc" script (it must be modified a bit for number of frames and motion speed). It can render a simple image sequence (rotating angle from 0 ... 360). Open it, then edit it. { ************************************ } { } { Animation rendering example script. } { Mark Townsend, September 2003. } { } { *************************************} { Set the size of the rendered frames. } Renderer.Width := 720; Renderer.Height := 400; { Need to calculate the scale of the flame for the image size... } SetRenderBounds; { I set sample density set for reasonable speed. Increase it for higher quality images, which will take longer to render. The other Flame parameters will use the default display values. } Flame.SampleDensity := 800; Flame.Oversample := 2; Flame.FilterRadius := 0.3; rot := 0.15; { *************************************} for j := 1 to 1500 do begin for i := 0 to Transforms - 1 do begin SetActiveTransform(i); { 360 degrees / 100 will give an animation that cycles seamlessly. } Rotate(rot); end; { The filename needs to be changed for each frame, otherwise they'd just be rendered over and over to the same file. I use 00.jpg to 99.jpg } Renderer.Filename := 'E:ProgrammeApophysis 2.0moviez' + Format('%.5d', [j]) + '.bmp'; Render; end; UpdateFlame := False; Then you just have to save and launch this script... and wait ! I hope this helps you ! See you, Nico