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'.
|
