Newsgroups: fj.comp.texhax
Path: galaxy.trc.rwcp.or.jp!jaist-news!cs.titech!wnoc-tyo-news!sh.wide!fgw!fdm!flab!cobalt!yamanaka
From: yamanaka@flab.fujitsu.co.jp (Hideki Yamanaka)
Subject: Re: plain version of epsbox
In-Reply-To: kakuto@apple.cc.fuk.kindai.ac.jp's message of Sat, 20 Mar 1993 01:58:52 GMT
Message-ID: <YAMANAKA.93Mar22124802@dipa.syslab.iias.flab.fujitsu.co.jp>
Lines: 45
Sender: usenet@iias.flab.fujitsu.co.jp
Nntp-Posting-Host: dipa.syslab.iias.flab.fujitsu.co.jp
Organization: IIAS-SIS, FUJITSU LABORATORIES LTD., JAPAN.
References: <KAKUTO.93Mar20104957@apple.cc.fuk.kindai.ac.jp>
Distribution: fj
Date: Mon, 22 Mar 1993 03:48:06 GMT
Xref: galaxy.trc.rwcp.or.jp fj.comp.texhax:3426
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.comp.texhax&nb=3426&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

In article <KAKUTO.93Mar20104957@apple.cc.fuk.kindai.ac.jp>,
  Akira KAKUTO writes:

kakuto> jdvi2kps $BMQ$N(B epsbox.sty $B$N(B plain TeX version epsbox.tex
kakuto> $B$O$J$$$G$7$g$&$+(B ? $B$h$m$7$/!#(B

$B0l;~<+J,$G:n$m$&$+$H;W$$$^$7$?$,!$LLE]$J$N$G2<$N(Bscript$B$N=PNO$r(B
TeX$BJ8=q$K<j$GA^F~$7$F$^$9!%C1$J$k(Bvbox$B$,0l8D=P$F$/$k$@$1$J$N$G!$(B
$B47$l$l$P!$(Blayout$B$,<+M3$JJ,$@$1(Bepsbox.sty$B$h$jJXMx$+$b$7$l$^$;$s!%(B


$B;3Cf!wIY;NDL8&(B

---
#! /bin/sh
# $Id: epsbox,v 1.4 1992/11/18 07:34:00 yamanaka Exp $
#
# Epsbox generates TeX commands to include encapsulated PostScript files
# with a scaling factor for "dvi2ps (j-version)".
#
# written by H Yamanaka.
#

export PATH; PATH=/bin:/usr/bin:/usr/local/bin:/usr/local/gnu
AWK=gawk
scale=1.0

case $1 in 
  -s) scale=$2;shift;shift;;
  -h) echo "Usage: epsbox [-s factor] file1 file2 ..."; exit;;
esac
for i in $* ; do
if [ -r $i ]; then
  $AWK '
  /^%%BoundingBox:/ { print "\\vbox to " ($5-$3)*scale "bp{\n  \\hbox to " \
 ($4-$2)*scale "bp{\\special{epsfile=" FILENAME " hscale=" scale \
 " vscale=" scale "}\n  \\hfill}\n\\vfill}"  ; exit}
  ' scale=$scale $i
else
  echo "$i not read"
fi
done
exit 0


