From 9dd60ae1324d469e1c7063ebbc654be2fb00393a Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 12 Jan 2006 23:58:51 +0000 Subject: mceinleger git-svn-id: svn://tug.org/texlive/trunk@1078 c570f23f-e606-0410-a88d-b1316a301751 --- .../texmf-dist/tex/latex/mceinleger/mceinleger.sty | 36 ++++++++++++++++++++++ 1 file changed, 36 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/mceinleger/mceinleger.sty (limited to 'Master/texmf-dist/tex/latex/mceinleger') diff --git a/Master/texmf-dist/tex/latex/mceinleger/mceinleger.sty b/Master/texmf-dist/tex/latex/mceinleger/mceinleger.sty new file mode 100644 index 00000000000..e751618410d --- /dev/null +++ b/Master/texmf-dist/tex/latex/mceinleger/mceinleger.sty @@ -0,0 +1,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'. -- cgit v1.2.3