summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/pspicture/pspicture.sty
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-06-21 13:38:41 +0000
committerKarl Berry <karl@freefriends.org>2006-06-21 13:38:41 +0000
commite447faa0c35a303add97ae12c4d405245a8bf2b5 (patch)
treeddb41bc77b22a558dede8c89ebb74e46717758fa /Master/texmf-dist/tex/latex/pspicture/pspicture.sty
parent2893c6b2ec424b0b9aacbc8583b1274c7352a505 (diff)
pspicture split out from carlisle now
git-svn-id: svn://tug.org/texlive/trunk@1715 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/pspicture/pspicture.sty')
-rw-r--r--Master/texmf-dist/tex/latex/pspicture/pspicture.sty111
1 files changed, 111 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/pspicture/pspicture.sty b/Master/texmf-dist/tex/latex/pspicture/pspicture.sty
new file mode 100644
index 00000000000..5b7659798ce
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/pspicture/pspicture.sty
@@ -0,0 +1,111 @@
+%%
+%% This is file `pspicture.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% pspicture.dtx (with options: `package,dvips')
+%%
+%%
+%% Source File `pspicture.dtx'.
+%% Copyright (C) 1992 1999 David Carlisle
+%% This file may be distributed under the terms of the LPPL.
+%% See 00readme.txt for details.
+%%
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{pspicture}
+ [1999/04/11/ v2.02 Picture mode via PS specials (DPC)]
+
+ \def\PS@header#1{\special{header=#1}}
+\PS@header{pspicture.ps}
+ \def\PS@special#1{\special{"#1}}
+{\catcode`t=12\catcode`p=12\gdef\noPT#1pt{#1}}
+\def\strippt#1{\expandafter\noPT\the#1\space}
+\def\@circle#1{%
+ \@tempdimb #1\unitlength
+ \PS@special{%
+ \strippt\@wholewidth
+ \strippt\@tempdimb
+ !C}}
+\def\@dot#1{%
+ \@tempdimb #1\unitlength
+ \PS@special{%
+ \strippt\@tempdimb
+ !D}}
+\def\line(#1,#2)#3{%
+ \@linelen=#3\unitlength
+ \PS@special{%
+ \strippt\@wholewidth
+ #1
+ #2
+ \strippt\@linelen
+ !L}}
+\def\vector(#1,#2)#3{%
+ \@linelen=#3\unitlength
+ \PS@special{%
+ \strippt\@arrowlength
+ \strippt\@wholewidth
+ #1
+ #2
+ \strippt\@linelen
+ !V}}
+\def\oval{%
+ \@ifnextchar[%
+ {\@ov@l}%
+ {\count@=\maxdimen \divide\count@ by \unitlength \@ov@l[\count@]}}
+\def\@ov@l[#1](#2,#3){%
+ \@ifnextchar[{\@oval[#1](#2,#3)}{\@oval[#1](#2,#3)[]}}%
+\def\@oval[#1](#2,#3)[#4]{\begingroup
+ \@tempdimb #1\unitlength
+ \@ovxx #2\unitlength
+ \@ovyy #3\unitlength
+ \def\r{\def\TL{0 }\def\BL{0 }}%
+ \def\l{\def\TR{0 }\def\BR{0 }}%
+ \def\t{\def\BL{0 }\def\BR{0 }}%
+ \def\b{\def\TL{0 }\def\TR{0 }}%
+ \def\TL{1 }\def\BL{1 }\def\TR{1 }\def\BR{1 }%
+ \@tfor\@tempa :=#4\do{\csname\@tempa\endcsname}%
+ \PS@special{%
+ \BR\BL\TR\TL
+ \strippt\@wholewidth
+ \strippt\@tempdimb
+ \strippt\@ovxx
+ \strippt\@ovyy
+ !O}%
+ \endgroup}
+\def\Line(#1,#2){%
+ \@ovxx #1\unitlength
+ \@ovyy #2\unitlength
+ \PS@special{%
+ \strippt\@wholewidth
+ \strippt\@ovxx
+ \strippt\@ovyy
+ !L2}}
+\def\Curve(#1,#2)#3{%
+ \@ovxx #1\unitlength
+ \@ovyy #2\unitlength
+ \PS@special{%
+ \strippt\@wholewidth
+ \strippt\@ovxx
+ \strippt\@ovyy
+ #3
+ !C2}}
+\def\Vector(#1,#2){%
+ \@ovxx #1\unitlength
+ \@ovyy #2\unitlength
+ \PS@special{%
+ \strippt\@arrowlength
+ \strippt\@wholewidth
+ \strippt\@ovxx
+ \strippt\@ovyy
+ !V2}}
+\newdimen\@arrowlength
+\def\arrowlength#1{\@arrowlength #1}
+\arrowlength{8pt}
+ \endinput
+
+
+
+\endinput
+%%
+%% End of file `pspicture.sty'.