#!/bin/csh -f
###########################################
# First some big examples.
###########################################
echo Doing the full scale images...
pnmtile 502 11 guide-white.ppm > top.ppm
ln -s top.ppm bottom.ppm
####
# Grayscale output
# stick some frames together and chop out what we want
pnmcat -lr grayscale.1.pgm line.ppm grayscale.17.pgm line.ppm grayscale.65.pgm line.ppm grayscale.105.pgm line.ppm grayscale.145.pgm | pnmcut 130 1 502 139 > grayscale-middle.ppm
# stick the tops and bottoms on the middle
pnmcat -tb top.ppm grayscale-middle.ppm bottom.ppm > grayscale-film.ppm
####
# One-sided output
# stick some frames together and chop out what we want
pnmcat -lr one-sided.1.ppm line.ppm one-sided.17.ppm line.ppm one-sided.65.ppm line.ppm one-sided.105.ppm line.ppm one-sided.145.ppm | pnmcut 130 1 502 139 > one-sided-middle.ppm
# stick the tops and bottoms on the middle
pnmcat -tb top.ppm one-sided-middle.ppm bottom.ppm > one-sided-film.ppm
####
# Two-sided output
# stick some frames together and chop out what we want
pnmcat -lr two-sided.1.ppm line.ppm two-sided.17.ppm line.ppm two-sided.65.ppm line.ppm two-sided.105.ppm line.ppm two-sided.145.ppm | pnmcut 130 1 502 139 > two-sided-middle.ppm
# stick the tops and bottoms on the middle
pnmcat -tb top.ppm two-sided-middle.ppm bottom.ppm > two-sided-film.ppm
rm *middle.p*
###############################################
# Now the compressed GIF stuff for the WEB page
###############################################
echo Doing the half-sized GIF images...
pnmtile 802 11 guide-white.ppm > top.ppm
###
# Grayscale output
# stick some frames together and chop out what we want
pnmcat -lr grayscale.1.pgm line.ppm grayscale.17.pgm line.ppm grayscale.65.pgm line.ppm grayscale.105.pgm line.ppm grayscale.145.pgm line.ppm grayscale.185.pgm line.ppm grayscale.220.pgm | pnmcut 130 1 805 139 > grayscale-middle.ppm
# stick the tops and bottoms on the middle
pnmcat -tb top.ppm grayscale-middle.ppm bottom.ppm > tmp.ppm
pnmscale 0.5 tmp.ppm > grayscale-small.ppm
ppmquant 256 grayscale-small.ppm | ppmtogif > grayscale-small.gif
###
# One-Sided output
# stick some frames together and chop out what we want
pnmcat -lr one-sided.1.ppm line.ppm one-sided.17.ppm line.ppm one-sided.65.ppm line.ppm one-sided.105.ppm line.ppm one-sided.145.ppm line.ppm one-sided.185.ppm line.ppm one-sided.220.ppm | pnmcut 130 1 805 139 > one-sided-middle.ppm
# stick the tops and bottoms on the middle
pnmcat -tb top.ppm one-sided-middle.ppm bottom.ppm > tmp.ppm
pnmscale 0.5 tmp.ppm > one-sided-small.ppm
ppmquant 256 one-sided-small.ppm | ppmtogif > one-sided-small.gif
###
# two-sided output
# stick some frames together and chop out what we want
pnmcat -lr two-sided.1.ppm line.ppm two-sided.17.ppm line.ppm two-sided.65.ppm line.ppm two-sided.105.ppm line.ppm two-sided.145.ppm line.ppm two-sided.185.ppm line.ppm two-sided.220.ppm | pnmcut 130 1 805 139 > two-sided-middle.ppm
# stick the tops and bottoms on the middle
pnmcat -tb top.ppm two-sided-middle.ppm bottom.ppm > tmp.ppm
pnmscale 0.5 tmp.ppm > two-sided-small.ppm
ppmquant 256 two-sided-small.ppm | ppmtogif > two-sided-small.gif
#######
rm tmp.ppm *small.ppm
exit