Article View: fj.lang.postscript
Article #104Re: REPORT: NeWSprint 2.0 (J)
From: Akihisa Kurashima
Date: Mon, 14 Dec 1992 03:47
Date: Mon, 14 Dec 1992 03:47
23 lines
1686 bytes
1686 bytes
$@$9$_$^$;$s!#D{@5$G(J$@$9!#(J
ProcSet$@$X$N%Q%C%A$G!"(J
kura> ! newpath clippath 0
kura> ! {pop pop 3 add}{pop pop 3 add}{pop pop pop pop pop pop 7 add}{1 add}pathforall
kura> ! 4 dict begin array/ary xdf/cnt 0 def/putxy {ary cnt 4 -1 roll put ary cnt 1 add
kura> ! 3 -1 roll put cnt 2 add/cnt xdf} def/pute {ary cnt 3 -1 roll put cnt 1 add/cnt
kura> ! xdf} def
kura> ! {transform putxy {itransform moveto} pute}
kura> ! {transform putxy {itransform lineto} pute}
kura> ! {6 -2 roll transform putxy 4 -2 roll transform putxy transform putxy
kura> ! {itransform 6 2 roll itransform 6 2 roll itransform 6 2 roll curveto} pute}
kura> ! {{closepath} pute}pathforall newpath ary end/gc xdf pop ct 39 0 put
~~~
$@$3$N:G8e$N9T$N(Jpop$@$,M>7W$G$7$?!#(J(patch$@A0$N(Jmark$@$r>C$9$?$a$N(Jpop$@$@$C$?$s$G(J
$@$9(J) $@$*OM$S$7$FD{@5$5$;$F$$$?$@$-$^$9!#(J
--
$@AREg(J $@82>0(J JM1VSP $@El5~Bg3XBg3X1!9)3X7O8&5f2JEE5$9)3X@l96(J
E-MAIL:kura@nacsis.ac.jp $@0BC#8&5f<<(J($@3X=Q>pJs%;%s%?!<Fb(J)
TEL:(03)3942-6995 FAX:(03)5395-7064($@0B(J$@C#8&5f<<5$IU(J)
Technical Details
Message-ID:
<KURA.92Dec14124729@lexus.nacsis.ac.jp>Path:
arc1-ca.pugleaf.net!sparky!uunet!ccut!nacsisrd!lexus.nacsis!kuraReferences:
<KURA.92Dec9202613@lexus.nacsis.ac.jp>Show Full Headers
Complete Article Headers
Newsgroups: fj.lang.postscript Path: arc1-ca.pugleaf.net!sparky!uunet!ccut!nacsisrd!lexus.nacsis!kura From: kura@nacsis.ac.jp (Akihisa Kurashima) Subject: Re: REPORT: NeWSprint 2.0 (J) In-Reply-To: kura@nacsis.ac.jp's message of Wed, 9 Dec 1992 11:26:13 GMT Message-ID: <KURA.92Dec14124729@lexus.nacsis.ac.jp> Sender: news@lexus.nacsis.ac.jp Nntp-Posting-Host: lexus Organization: University of Tokyo, Japan. References: <KURA.92Dec9202613@lexus.nacsis.ac.jp> Distribution: fj Date: Mon, 14 Dec 1992 03:47:29 GMT Lines: 23