#!/bin/sh
# $Id: tp8x10,v 1.1 1998/09/07 14:03:51 christof Exp $
#
# this script takes 4 roborally pictures and places them to fit on two pages
# of DIN A4 paper or bigger, variant: 8x10" placement
#
# tested with netpbm
#
RM=rm

if [ ! -f ${1}1.gif ] 
then echo USAGE: $0 '<filename without ?.gif>'; 
	exit 1
fi
if [ ! -f ${1}2.gif -o ! -f ${1}3.gif -o ! -f ${1}4.gif ]
then echo one file is missing: ${1}?.gif
	exit 1
fi

giftopnm ${1}1.gif >temp_$$a.ppm
echo -n .
giftopnm ${1}3.gif | pnmcut 0 1 379 252 >temp_$$b.ppm
echo -n .
pnmcat -white -topbottom -jleft temp_$$a.ppm temp_$$b.ppm >temp_$$c.ppm
$RM temp_$$a.ppm temp_$$b.ppm
echo -n .
giftopnm ${1}2.gif | pnmcut 1 0 126 379 >temp_$$d.ppm
echo -n .
giftopnm ${1}4.gif | pnmcut 1 1 126 252 >temp_$$e.ppm
echo -n .
pnmcat -white -topbottom -jleft temp_$$d.ppm temp_$$e.ppm >temp_$$f.ppm
$RM temp_$$d.ppm temp_$$e.ppm
echo -n .
pnmcat -white -leftright -jtop temp_$$c.ppm temp_$$f.ppm >${1}A.ppm
$RM temp_$$c.ppm temp_$$f.ppm
echo -n '.|'
giftopnm ${1}2.gif | pnmcut 126 0 253 379 >temp_$$g.ppm
echo -n .
giftopnm ${1}4.gif | pnmcut 126 1 253 252 >temp_$$h.ppm
echo -n .
pnmcat -white -topbottom -jleft temp_$$g.ppm temp_$$h.ppm >temp_$$i.ppm
$RM temp_$$g.ppm temp_$$h.ppm
echo -n .
ppmmake white 2 2 | pnmdepth 255 >temp_$$S.ppm
echo -n .
giftopnm ${1}3.gif | pnmcut 0 252 379 127 >temp_$$j.ppm
echo -n .
giftopnm ${1}4.gif | pnmcut 1 252 252 127 >temp_$$k.ppm
echo -n .
pnmcat -white -leftright -jtop temp_$$j.ppm temp_$$k.ppm | pnmflip -rotate90 >temp_$$l.ppm
$RM temp_$$j.ppm temp_$$k.ppm
echo -n .
giftopnm ${1}4.gif | pnmcut 252 252 64 127 >temp_$$m.ppm
echo -n .
giftopnm ${1}4.gif | pnmcut 315 252 64 127 >temp_$$n.ppm
echo -n .
pnmcat -white -topbottom -jleft temp_$$m.ppm temp_$$S.ppm temp_$$n.ppm >temp_$$o.ppm
$RM temp_$$m.ppm temp_$$n.ppm
echo -n .
pnmcat -white -leftright temp_$$i.ppm temp_$$S.ppm temp_$$l.ppm temp_$$S.ppm temp_$$o.ppm >${1}B.ppm
$RM temp_$$i.ppm temp_$$S.ppm temp_$$l.ppm temp_$$o.ppm
echo .
pnmtops -scale 1.190476 -rle -height 11.68 ${1}A.ppm | \
	sed 's/%%BoundingBox: 17 59 595 781/%%BoundingBox: 9 59 587 781/' | \
	sed 's/^17.4286 /9 /' >${1}A.ps
pnmtops -scale 1.190476 -rle -height 11.68 ${1}B.ppm >${1}B.ps