summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/metafont/mftoeps/m2esamp/holeclip.tex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-11 23:49:34 +0000
committerKarl Berry <karl@freefriends.org>2006-01-11 23:49:34 +0000
commit0bf7dc87971bc4f426fb6abdd893a26a6ae65d0b (patch)
tree4d53bded23dec78efc81b258f039469fa2832271 /Master/texmf-dist/source/metafont/mftoeps/m2esamp/holeclip.tex
parentd780c57e68c80655669a3b01af46b9978f5698ef (diff)
trunk/Master/texmf-dist/source/metafont
git-svn-id: svn://tug.org/texlive/trunk@116 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/metafont/mftoeps/m2esamp/holeclip.tex')
-rw-r--r--Master/texmf-dist/source/metafont/mftoeps/m2esamp/holeclip.tex22
1 files changed, 22 insertions, 0 deletions
diff --git a/Master/texmf-dist/source/metafont/mftoeps/m2esamp/holeclip.tex b/Master/texmf-dist/source/metafont/mftoeps/m2esamp/holeclip.tex
new file mode 100644
index 00000000000..8f314a6ba89
--- /dev/null
+++ b/Master/texmf-dist/source/metafont/mftoeps/m2esamp/holeclip.tex
@@ -0,0 +1,22 @@
+\input epsf
+
+\centerline{
+\setbox0\vbox{
+ \hbox{It is a clipped text.}\hbox{It is a clipped text.}
+ \hbox{It is a clipped text.}\hbox{It is a clipped text.}
+ \vss % no depth
+}%
+\special{ps:
+ /mftoeps_save save def % the snapshoot of a current stage
+ /mftoeps_bhook {/q {} def /Q {} def} def
+ /CM matrix currentmatrix def
+ currentpoint /cy exch def /cx exch def
+ /ori@endspecial /@endspecial load def
+ /@endspecial {} def % neutralize /@endspecial locally
+}
+\hbox to\wd0{\hss\epsfysize\ht0\epsffile{holeclip.eps}\hss}% perform clipping
+\special{ps:cx cy moveto CM setmatrix}\llap{\copy0}% set the text
+\special{ps:ori@endspecial mftoeps_save restore}% restore a previous stage
+}
+
+\end