summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/randbild/randbild.sty
blob: c815c4a9ec1ee3ce7c53427f00b26613ae0c9a11 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
%%
%% This is file `randbild.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% randbild.dtx  (with options: `package')
%% 
%%  ,--------------------------------------------------.
%%  |  Das ist eine generierte Datei.                  |
%%  |                                                  |
%%  | (c) 2005-2006 Paul Ebermann.                     |
%%  '--------------------------------------------------'
%% 
%%  (C) 2005-2006 Paul Ebermann
%%
%%   Package randbild, zum Setzen von Bildern von Kurven am Rand
%%   der Seite.
%%   Die Datei randbild.dtx sowie die dazugehörige
%%   randbild.ins sowie die damit generierte
%%   randbild.sty stehen unter der
%%   "LaTeX Project Public License" (LPPL, zu finden
%%   unter http://www.latex-project.org/lppl/, sowie
%%   auch in den meisten TeX-Distributionen in
%%   texmf/docs/latex/base/lppl*.txt), Version 1.3b oder
%%   später (nach Wahl des Verwenders).
%%
%%   Der 'maintenance-status' ist (zur Zeit) 'author-maintained'.
%%
%%   Das heißt u.a., die Dateien dürfen frei vertrieben werden,
%%   bei Änderungen (durch andere Personen als Paul Ebermann)
%%   ist aber der Name der Datei zu ändern.
\NeedsTeXFormat{LaTeX2e}[2003/12/01]
\ProvidesPackage{randbild}
 [2007/05/15 v0.2 Bild am Seitenrand (PE)]
\RequirePackage{pst-plot}
\newsavebox{\randbild@box}
\newcommand{\randbild@titel}{bla}
\newenvironment*{randbild}[3][\ ]{%
  \@bsphack%
   \begin{randbildbasis}[#1]{#2}{#3}%
      {\tiny%
         \psaxes[ticksize=1pt,labelsep=2pt]{->}(0,0)(#2)(#3){}%
      }%
}{%
   \end{randbildbasis}%
   \@Esphack%
}
\newenvironment*{randbildbasis}[3][\ ]{%
  \@bsphack%
   \renewcommand{\randbild@titel}{#1}%
   \psset{linewidth=.5pt,unit=0.5cm}%
   \begin{lrbox}{\randbild@box}%
      \begin{pspicture}(#2)(#3)%
         \ignorespaces
}{%
      \end{pspicture}%
   \end{lrbox}%
   \marginpar{%
      \centering%
      \fbox{%
        \clipbox[0.2]{%
          \usebox{\randbild@box}%
        }%
      }%
      \\[0.2\psunit]%
      {\small\randbild@titel}%
   }%
   \@Esphack%
}%
  \expandafter\let\csname randbild*\endcsname\randbildbasis
  \expandafter\let\csname endrandbild*\endcsname\endrandbildbasis
 \newpsobject{showgrid}{psgrid}%
    {%
      subgriddiv=1,%
      griddots=5,%
      gridwidth=0.4pt,%
      gridlabels=0pt%
    }
\endinput
%%
%% End of file `randbild.sty'.