/* example Postscript script file for MPMorph */
/* This script converts each image using ppm  */
/* and wasp and then deletes the original     */
/* $VER: ToHam_MPM 4.4 (23.2.97)
 */
parse arg Frame TotalFrames Single FileName
/* Frame       - current frame number starting from Start
 * TotalFrames - total number of frames
 * Single      - 1 for Single image warp, 0 for two image morph
 * FileName    - Name of 24 bit image just produced
 */

/* Convert to ppm format in ram:temp */
address command '24toppm '||FileName||' ram:temp'

/* Convert to HAM format in ram:temp.n where n = frame number */
address command 'wasp ram:temp ram:temp.'||Frame

/* Delete original and temporary files */
address command 'delete '||FileName
address command 'delete ram:temp'

exit