summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/tsemlines
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-08-07 18:32:28 +0000
committerKarl Berry <karl@freefriends.org>2011-08-07 18:32:28 +0000
commita3cd600b44da24478a8f19f3f98b2ab1b277bb24 (patch)
treecc762a185ad3428413d2cb204fbe402fbb3024ff /Master/texmf-dist/tex/latex/tsemlines
parentfa3c9eff8919065ef3f2717564e474428dcadfc6 (diff)
new latex .sty (28jun11)
git-svn-id: svn://tug.org/texlive/trunk@23440 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/tsemlines')
-rw-r--r--Master/texmf-dist/tex/latex/tsemlines/tsemlines.sty39
1 files changed, 39 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/tsemlines/tsemlines.sty b/Master/texmf-dist/tex/latex/tsemlines/tsemlines.sty
new file mode 100644
index 00000000000..f46f8b59882
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/tsemlines/tsemlines.sty
@@ -0,0 +1,39 @@
+% tsemlines.sty 2011, Tobias Schlemmer
+% License: Public domain.
+%
+% Macros for drawing lines with arbitrary slopes. This package is
+% intended to assist the usage of old pictures with TeX systems and
+% DVI drivers that don't support the em specials.
+%
+% Emulation of emlines.sty by Georg Horn / Eberhard Mattes.
+%
+% No further EmTeX specials will be used. \emline will use \unitlength
+% and \linethickness from the standard picture environment instaed.
+%
+% Usage:
+% \usepackage{tikz,tsemlines}
+% ...
+% \begin{picture}%
+% \emline{1.1}{2.5}{4}{-3.4}{6.6}{5}%
+% \end{picture}
+%
+% As a special benefit the first coodinate will be availlable via
+% (em point picturelabel #3) and the last one via
+% (em point picturelabel #6). picturelabel can be changed with
+% \newpic{newpicturelabel}. After the package has been loaded it
+% defaults to the empty string.
+
+\ProvidesPackage{tsemlines}[2011/06/23 v1.0 line support for emTeX's TeXcad]
+
+
+\def\newpic#1{%
+ \def\emline##1##2##3##4##5##6{%
+ \put(0,0){\tikz[remember picture,x=\unitlength,y=\unitlength,
+ line width=\@wholewidth]{\draw(##1,##2)
+ coordinate (em point #1 ##3) -- (##4,##5) coordinate
+ (em point #1 ##6);
+ \useasboundingbox (0,0) -- (em point #1
+ ##3) -- (em point #1 ##6);}%
+ }}}
+
+\newpic{}