1*219b2ee8SDavid du Colombier#!/bin/rc 2*219b2ee8SDavid du Colombier# Center pages and put cropmarks at each corner. Physical page size 3*219b2ee8SDavid du Colombier# is set with -w and -h. The default is 8.5 by 11.0 inches. Device 4*219b2ee8SDavid du Colombier# dependent code to change paper size (e.g. with setpageparams) goes 5*219b2ee8SDavid du Colombier# in the prologue. You may need to customize the device dependent 6*219b2ee8SDavid du Colombier# code that we distribute. By default it only supports variable page 7*219b2ee8SDavid du Colombier# sizes on Linotronic typesetters, and assumes those typesetters are 8*219b2ee8SDavid du Colombier# using 12 inch wide paper. Use -d to disable execution of device 9*219b2ee8SDavid du Colombier# dependent PostScript code. 10*219b2ee8SDavid du Colombier# 11*219b2ee8SDavid du Colombier# What's here was written quickly and will likely be very different 12*219b2ee8SDavid du Colombier# in our next release. It should be part of a more general program!! 13*219b2ee8SDavid du Colombier# 14*219b2ee8SDavid du Colombier 15*219b2ee8SDavid du ColombierPOSTLIB=/sys/lib/postscript/prologues 16*219b2ee8SDavid du ColombierPROLOGUE=$POSTLIB/cropmarks.ps 17*219b2ee8SDavid du Colombier 18*219b2ee8SDavid du ColombierEXPANDPAGE=true 19*219b2ee8SDavid du ColombierPAGEWIDTH=8.5 20*219b2ee8SDavid du ColombierPAGEHEIGHT=11.0 21*219b2ee8SDavid du ColombierSCALETOFIT=false 22*219b2ee8SDavid du ColombierXOFFSET=0.0 23*219b2ee8SDavid du ColombierYOFFSET=0.0 24*219b2ee8SDavid du Colombier 25*219b2ee8SDavid du ColombierNONCONFORMING=%!PS 26*219b2ee8SDavid du ColombierENDPROLOG=%%EndProlog 27*219b2ee8SDavid du ColombierBEGINSETUP=%%BeginSetup 28*219b2ee8SDavid du ColombierENDSETUP=%%EndSetup 29*219b2ee8SDavid du Colombier 30*219b2ee8SDavid du Colombierwhile (! ~ $#* 0 && ~ $1 -*) { 31*219b2ee8SDavid du Colombier switch ($1) { 32*219b2ee8SDavid du Colombier case -d; EXPANDPAGE=false 33*219b2ee8SDavid du Colombier 34*219b2ee8SDavid du Colombier case -h; shift; PAGEHEIGHT=$1 35*219b2ee8SDavid du Colombier case -h*; PAGEHEIGHT=`{echo $1 | sed s/-h//} 36*219b2ee8SDavid du Colombier 37*219b2ee8SDavid du Colombier case -s; SCALETOFIT=true 38*219b2ee8SDavid du Colombier 39*219b2ee8SDavid du Colombier case -w; shift; PAGEWIDTH=$1 40*219b2ee8SDavid du Colombier case -w*; PAGEWIDTH=`{echo $1 | sed s/-w//} 41*219b2ee8SDavid du Colombier 42*219b2ee8SDavid du Colombier case -x; shift; XOFFSET=$1 43*219b2ee8SDavid du Colombier case -x*; XOFFSET=`{echo $1 | sed s/-x//} 44*219b2ee8SDavid du Colombier 45*219b2ee8SDavid du Colombier case -y; shift; YOFFSET=$1 46*219b2ee8SDavid du Colombier case -y*; YOFFSET=`{echo $1 | sed s/-y//} 47*219b2ee8SDavid du Colombier 48*219b2ee8SDavid du Colombier case -L; shift; PROLOGUE=$1 49*219b2ee8SDavid du Colombier case -L*; PROLOGUE=`{echo $1 | sed s/-L//} 50*219b2ee8SDavid du Colombier 51*219b2ee8SDavid du Colombier case --; 52*219b2ee8SDavid du Colombier 53*219b2ee8SDavid du Colombier case -*; echo '$0: illegal option $1' >[1=2]; exit 1 54*219b2ee8SDavid du Colombier 55*219b2ee8SDavid du Colombier } 56*219b2ee8SDavid du Colombier shift 57*219b2ee8SDavid du Colombier} 58*219b2ee8SDavid du Colombier 59*219b2ee8SDavid du Colombierecho $NONCONFORMING 60*219b2ee8SDavid du Colombiercat $PROLOGUE 61*219b2ee8SDavid du Colombierecho $ENDPROLOG 62*219b2ee8SDavid du Colombierecho $BEGINSETUP 63*219b2ee8SDavid du Colombierecho 'CropmarkDict begin' 64*219b2ee8SDavid du Colombierecho '/pageheight '$PAGEHEIGHT' def' 65*219b2ee8SDavid du Colombierecho '/pagewidth '$PAGEWIDTH' def' 66*219b2ee8SDavid du Colombierecho '/expandpage '$EXPANDPAGE' def' 67*219b2ee8SDavid du Colombierecho '/scaletofit '$SCALETOFIT' def' 68*219b2ee8SDavid du Colombierecho '/xoffset '$XOFFSET' def' 69*219b2ee8SDavid du Colombierecho '/yoffset '$YOFFSET' def' 70*219b2ee8SDavid du Colombierecho 'setup' 71*219b2ee8SDavid du Colombierecho 'end' 72*219b2ee8SDavid du Colombierecho $ENDSETUP 73*219b2ee8SDavid du Colombier 74*219b2ee8SDavid du Colombiercat $* 75