diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/latex/contrib/tsemlines |
Initial commit
Diffstat (limited to 'macros/latex/contrib/tsemlines')
-rw-r--r-- | macros/latex/contrib/tsemlines/tsemlines.sty | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/macros/latex/contrib/tsemlines/tsemlines.sty b/macros/latex/contrib/tsemlines/tsemlines.sty new file mode 100644 index 0000000000..f46f8b5988 --- /dev/null +++ b/macros/latex/contrib/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{} |