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
|
%% Vorlage für Musikkassetten-Einleger
%% Autor: Florian Benischke, Wien 2002
%% Copyright (C) 2002 Florian Benischke. All
%% rights reserved. Permission is granted to to customize the
%% declarations in this file to serve the needs of your installation.
%% However, no permission is granted to distribute a modified version of
%% this file under its original name.
%%
%% Anmerkung: Benötigt zusätzlich das Package 'rotating.sty' !
\def\RInfo{2002/07/07, v1.0}
%% File: mceinleger.sty Copyright (C) 2002
\ProvidesPackage{mceinleger}[\RInfo\space Einleger und Hüllen für
Musikkassetten]
\NeedsTeXFormat{LaTeX2e}
\setlength{\unitlength}{1.0cm}
\newcommand{\huelle}[4]{%
\begin{picture}(15.0,15.0)
\put(1.0,1.0){\framebox(2.5,10.2){\begin{turn}{270}#1\end{turn}}}
\put(3.5,1.0){\framebox(1.3,10.2){\begin{turn}{270}#2\end{turn}}}
\put(4.8,1.0){\framebox(6.4,10.2)[#4]{\parbox{6.4cm}{\begin{center}#3\end{center}}}}
\end{picture}
}
\newcommand{\einleger}[6]{%
\begin{picture}(15.0,15.0)
\put(1.0,1.0){\framebox(2.5,10.2){\begin{turn}{270}#1\end{turn}}}
\put(3.5,1.0){\framebox(1.3,10.2){\begin{turn}{270}#2\end{turn}}}
\put(4.8,1.0){\framebox(6.4,10.2)[#4]{\parbox{6.4cm}{\begin{center}#3\end{center}}}}
\put(11.2,1.0){\framebox(6.4,10.2)[#6]{\parbox{6.4cm}{\begin{center}#5\end{center}}}}
\end{picture}
}
%%
%% End of file `mceinleger.sty'.
|