gimp-perl for animation post-processing
[Render Effects] [Scene Transitions] [Utils. & Misc.]

Utilities

Film Noir
   
RenderFilmNoir.pl
2002/04/05
by Chris Want
RenderFilmNoir.pl processes the input frames to look like they are in a Film Noir black & white style.
Options:
-i or --pattern-in (required)
The printf formatted pattern for the input frames.
-I or --start-in (required)
The starting frame number for the input frames.
-o or --pattern-out (required)
The printf formatted pattern for the output frames.
-O or --start-out (required)
The starting frame number for the output frames A.
-n or --num-frames (required)
The number of frames in the transition.
-x or --gauss-x (optional, default = 5.0)
The x value for gaussian rle blur for the film grain
-y or --gauss-y (optional, default = 5.0)
The y value for gaussian rle blur for the film grain
-l or --noise-level (optional, default = 0.60)
The noisiness of the film grain
-c or --contrast (optional, default = 90)
This setting is used to boost the black and white tones.
-e or --effect_level (optional, default = 50)
This setting can be used to bring out the film grain and contrast more.
-h or --help (optional)
Print usage message and exit

Commandline used to create sample movie:

perl RenderFilmNoir.pl -i alien%04d.tga -I 1003 -o out%04d.tga -O 1 -n 300

This example applies the effect to 300 frames of the Alien scene.

The example uses the frames alien1003.tga - alien1302.tga from the Alien Frames, and outputs to frames out0001.tga - out0300.tga.



Sample Movie
   

Film Noir
   
RenderWizOz.pl
2002/04/05
by Chris Want
RenderWizOz.pl processes the input frames to look like they are colorized black & white film (a la Wizard of Oz)
Options:
-i or --pattern-in (required)
The printf formatted pattern for the input frames.
-I or --start-in (required)
The starting frame number for the input frames.
-o or --pattern-out (required)
The printf formatted pattern for the output frames.
-O or --start-out (required)
The starting frame number for the output frames A.
-n or --num-frames (required)
The number of frames in the transition.
-x or --gauss-x (optional, default = 5.0)
The x value for gaussian rle blur for the film grain
-y or --gauss-y (optional, default = 5.0)
The y value for gaussian rle blur for the film grain
-l or --noise-level (optional, default = 0.60)
The noisiness of the film grain
-c or --contrast (optional, default = 90)
This setting is used to boost the black and white tones.
-e or --effect_level (optional, default = 50)
This setting can be used to bring out the film grain and contrast more.
-h or --help (optional)
Print usage message and exit

Commandline used to create sample movie:

perl RenderWizOz.pl -i alien%04d.tga -I 1003 -o out%04d.tga -O 1 -n 300

This example applies the effect to 300 frames of the Alien scene.

The example uses the frames alien1003.tga - alien1302.tga from the Alien Frames, and outputs to frames out0001.tga - out0300.tga.



Sample Movie
   

Scene Transitions

Blur
   
TransBlur.pl
2002/03/28
by Chris Want
TransBlur.pl gradually blurs Scene A's frames, fades them into Scene B's frames, then gradually unblurs Scene B's frames.
Options:
-a or --pattern-in-a (required)
The printf formatted pattern for Scene A's frames.
-A or --start-in-a (required)
The starting frame number for Scene A.
-b or --pattern-in-b (required)
The printf formatted pattern for Scene B's frames.
-B or --start-in-b (required)
The starting frame number for Scene B.
-o or --pattern-out (required)
The printf formatted pattern for the output frames.
-O or --start-out (required)
The starting frame number for the output frames A.
-n or --num-frames (required)
The number of frames in the transition.
-h or --help (optional)
Print usage message and exit

Commandline used to create sample movie:

perl CopyFrames.pl -i alien%04d.tga -I 1003 -o out%04d.tga -O 1 -n 30
perl TransBlur.pl -a alien%04d.tga -A 1033 -b dewd%04d.tga -B 1 \
-o out%04d.tga -O 31 -n 60
perl CopyFrames.pl -i dewd%04d.tga -I 61 -o out%04d.tga -O 91 -n 30

This example shows 30 frames (1 second) of the Alien scene, then spends 60 frames (2 seconds) for the transition to the Dewd Scene, then concludes with (30 frames) 1 second of the Dewd scene.

The example uses the frames alien1003.tga - alien1092.tga from the Alien Frames, frames dewd0001.tga - dewd0090.tga from the Dewd Frames, and writes out to the frames out0001.tga - out0120.tga. The Copy Frames script is also used.



Sample Movie
   

Cubism
   
TransCubism.pl
2002/03/28
by Chris Want
TransCubism.pl applies a cubism filter to Scene A's frames, gradually increasing the tile size and fades them into Scene B's frames with a high tile size cubism filter, then gradually decreases the tile size to reveal Scene B's frames.
Options:
-a or --pattern-in-a (required)
The printf formatted pattern for Scene A's frames.
-A or --start-in-a (required)
The starting frame number for Scene A.
-b or --pattern-in-b (required)
The printf formatted pattern for Scene B's frames.
-B or --start-in-b (required)
The starting frame number for Scene B.
-o or --pattern-out (required)
The printf formatted pattern for the output frames.
-O or --start-out (required)
The starting frame number for the output frames A.
-n or --num-frames (required)
The number of frames in the transition.
-h or --help (optional)
Print usage message and exit

Commandline used to create sample movie:

perl CopyFrames.pl -i alien%04d.tga -I 1003 -o out%04d.tga -O 1 -n 30
perl TransCubism.pl -a alien%04d.tga -A 1033 -b dewd%04d.tga -B 1 \
-o out%04d.tga -O 31 -n 60
perl CopyFrames.pl -i dewd%04d.tga -I 61 -o out%04d.tga -O 91 -n 30

This example shows 30 frames (1 second) of the Alien scene, then spends 60 frames (2 seconds) for the transition to the Dewd Scene, then concludes with (30 frames) 1 second of the Dewd scene.

The example uses the frames alien1003.tga - alien1092.tga from the Alien Frames, frames dewd0001.tga - dewd0090.tga from the Dewd Frames, and writes out to the frames out0001.tga - out0120.tga. The Copy Frames script is also used.



Sample Movie
   

Eat The Film
   
TransEatTheFilm.pl
2002/04/05
by Guillermo S. Romero
TransEatTheFilm.pl gradually eats away Scene A's frames to reveal Scene B's frames.
Options:
-a or --pattern-in-a (required)
The printf formatted pattern for Scene A's frames.
-A or --start-in-a (required)
The starting frame number for Scene A.
-b or --pattern-in-b (required)
The printf formatted pattern for Scene B's frames.
-B or --start-in-b (required)
The starting frame number for Scene B.
-o or --pattern-out (required)
The printf formatted pattern for the output frames.
-O or --start-out (required)
The starting frame number for the output frames A.
-n or --num-frames (required)
The number of frames in the transition.
-s or --noise-seed (optional, default = 1)
The seed for the random noise
-x or --noise-x (optional, default = 3)
The x value for solid noise
-y or --noise-y (optional, default = 2)
The y value for solid noise
-X or --blur-x (optional, default = 10)
The x value for gaussian rle blur
-Y or --blur-y (optional, default = 10)
The y value for gaussian rle blur
-h or --help (optional)
Print usage message and exit

Commandline used to create sample movie:

perl CopyFrames.pl -i alien%04d.tga -I 1003 -o out%04d.tga -O 1 -n 30
perl TransEatTheFilm.pl -a alien%04d.tga -A 1033 -b dewd%04d.tga -B 1 \
-o out%04d.tga -O 31 -n 60
perl CopyFrames.pl -i dewd%04d.tga -I 61 -o out%04d.tga -O 91 -n 30

This example shows 30 frames (1 second) of the Alien scene, then spends 60 frames (2 seconds) for the transition to the Dewd Scene, then concludes with (30 frames) 1 second of the Dewd scene.

The example uses the frames alien1003.tga - alien1092.tga from the Alien Frames, frames dewd0001.tga - dewd0090.tga from the Dewd Frames, and writes out to the frames out0001.tga - out0120.tga. The Copy Frames script is also used.



Sample Movie
   

Mozilla
   
TransMozilla.pl
2002/04/05
by Chris Want
TransMozilla.pl spins a set of blocks to gradually show Scene B's. This was inspired by the Mozilla "throbber" (the thingy that shows that Mozilla is busy downloading content).
Options:
-a or --pattern-in-a (required)
The printf formatted pattern for Scene A's frames.
-A or --start-in-a (required)
The starting frame number for Scene A.
-b or --pattern-in-b (required)
The printf formatted pattern for Scene B's frames.
-B or --start-in-b (required)
The starting frame number for Scene B.
-o or --pattern-out (required)
The printf formatted pattern for the output frames.
-O or --start-out (required)
The starting frame number for the output frames A.
-n or --num-frames (required)
The number of frames in the transition.
-k or --block-size (required)
This specifies the size of the square rotating blocks. This number must divide both the width and the height of the images.
-h or --help (optional)
Print usage message and exit

Commandline used to create sample movie:

perl CopyFrames.pl -i alien%04d.tga -I 1003 -o out%04d.tga -O 1 -n 30
perl TransMozilla.pl -a alien%04d.tga -A 1033 -b dewd%04d.tga -B 1 \
-o out%04d.tga -O 31 -n 60 -k 40
perl CopyFrames.pl -i dewd%04d.tga -I 61 -o out%04d.tga -O 91 -n 30

This example shows 30 frames (1 second) of the Alien scene, then spends 60 frames (2 seconds) for the transition to the Dewd Scene, then concludes with (30 frames) 1 second of the Dewd scene.

The example uses the frames alien1003.tga - alien1092.tga from the Alien Frames, frames dewd0001.tga - dewd0090.tga from the Dewd Frames, and writes out to the frames out0001.tga - out0120.tga. The Copy Frames script is also used.



Sample Movie
   

Spread
   
TransSpread.pl
2002/04/05
by Chris Want
TransSpread.pl gradually applies spread to Scene A's frames, fades them into Scene B's frames, then gradually unspreads Scene B's frames.
Options:
-a or --pattern-in-a (required)
The printf formatted pattern for Scene A's frames.
-A or --start-in-a (required)
The starting frame number for Scene A.
-b or --pattern-in-b (required)
The printf formatted pattern for Scene B's frames.
-B or --start-in-b (required)
The starting frame number for Scene B.
-o or --pattern-out (required)
The printf formatted pattern for the output frames.
-O or --start-out (required)
The starting frame number for the output frames A.
-n or --num-frames (required)
The number of frames in the transition.
-h or --help (optional)
Print usage message and exit

Commandline used to create sample movie:

perl CopyFrames.pl -i alien%04d.tga -I 1003 -o out%04d.tga -O 1 -n 30
perl TransBlur.pl -a alien%04d.tga -A 1033 -b dewd%04d.tga -B 1 \
-o out%04d.tga -O 31 -n 60
perl CopyFrames.pl -i dewd%04d.tga -I 61 -o out%04d.tga -O 91 -n 30

This example shows 30 frames (1 second) of the Alien scene, then spends 60 frames (2 seconds) for the transition to the Dewd Scene, then concludes with (30 frames) 1 second of the Dewd scene.

The example uses the frames alien1003.tga - alien1092.tga from the Alien Frames, frames dewd0001.tga - dewd0090.tga from the Dewd Frames, and writes out to the frames out0001.tga - out0120.tga. The Copy Frames script is also used.



Sample Movie
   

Utilities

AlienFrames
   
AlienFrames.tar.bz2 (9 MB)
2002/04/05
by Chris Want

These are the frames alien1003.tga - alien1302.tga that are used to construct the example movies on this page.


These frames are from an entry for the January 2002 round of the 10 Seconds Club character animation contest.

The animation was created using Blender, and the source files can be obtained here.

   

DewdFrames
   
DewdFrames.tar.bz2 (3.5 MB)
2002/04/05
by Chris Want

These are the frames dewd0001.tga - dewd0260.tga that are used to construct the example movies on this page.


These frames are from an entry for the February 2002 round of the 10 Seconds Club character animation contest.

The animation was created using Blender, and the source files can be obtained here.

   

CopyFrames
   
CopyFrames.pl
2002/04/05
by Chris Want
CopyFrames.pl copies the input frames to the output frames, with no processing done.
Options:
-i or --pattern-in (required)
The printf formatted pattern for the input frames.
-I or --start-in (required)
The starting frame number for the input frames.
-o or --pattern-out (required)
The printf formatted pattern for the output frames.
-O or --start-out (required)
The starting frame number for the output frames A.
-n or --num-frames (required)
The number of frames to copy.
-h or --help (optional)
Print usage message and exit

Example:
perl CopyFrames.pl -i in%d.tga -I 31 -o out%06d.png -O 47 -n 500

copies frames in31.tga ... in530.tga to frames out000047.tga ... out000546.tga.

   

Copyright © 2001 Chris Want. All rights reserved.
(yeah, yeah, I know -- the little film strips look more like 35mm film than they do movie film. Big deal!)