Path: news.uni-jena.de!server2.rz.uni-leipzig.de!news.urz.tu-dresden.de!irz401!fauern!news.th-darmstadt.de!terra.wiwi.uni-frankfurt.de!zeus.rbi.informatik.uni-frankfurt.de!news.dfn.de!urmel.informatik.rwth-aachen.de!zruty.dfv.rwth-aachen.de!sungate.fido.de!sungate-ftn.fido.de!hippo.fido.de!not-for-mail
Date: Fri, 01 Jul 1994 12:50:00 +0200
From: Helmut_Kindler@S3.maus.de (Helmut Kindler)
Subject: Re: Cassetten-Label.Sty
Message-ID: <199407011250.a56556@s3.maus.de>
References: <199406281237.a49442@hh2.maus.de>
Newsgroups: de.comp.tex
X-Comment-To: (Thomas Heier)
Organization: Fido.DE domain gateway (IN e.V.)
Lines: 223
X-Gateway: FIDOGATE 3.7.1
X-FTN-Origin: MAUS Stuttgart 3: 0711-2368367 (2:2452/101.6)
X-FTN-Tearline: LinkIt v2.41
X-FTN-Path: 4200/6 242/42 2452/110

TH> Welcher Style ist fuer Compackt-Cassetten geeignet? Bitte Name und ggf.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                                                          %
% cass.tex      (c) 1993 Helmut Kindler                                    %
%                                                                          %
% $VER: cass V1.1 (7.4.93)                                                 %
%                                                                          %
% Befehle zur Layout-Erstellung von Cassetten-Labeln                       %
%                                                                          %
% Autor:  Helmut Kindler             Helmut Kindler                        %
%         Stirnbrandstr. 13          Breitestr. 34                         %
%         70193 Stuttgart            72513 Hettingen                       %
%                                                                          %
% E-Mail: helmut@ifswps4.fertigungstechnik.uni-stuttgart.de                %
%         Helmut_Kindler@s3.maus.de                                        %
%         Helmut_Kindler@bl.maus.de                                        %
%                                                                          %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                                                          %
% Dieses File darf frei weitergegeben werden, solange der Copyright-       %
% Vermerk in der 3. Zeile nicht entfernt wird.                             %
%                                                                          %
% "Uber eine kleine Mail (E-Mail oder Post) von Benutzern w"urde ich mich  %
% sehr freuen. Also frisch an die Tasten und lostippen.                    %
%                                                                          %
% Verbesserungsvorschl"age sind jederzeit willkommen.                      %
%                                                                          %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                                                          %
% Aufruf: \input cass                                                      %
%         man braucht danach kein '\documentstyle'                         %
%                                                                          %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                                                          %
% Neue Befehle:                                                            %
%                                                                          %
% \cass {}{}{}{}     Erzeugt ein Cassettenlabel. Die erste Klammer ergibt  %
%                    die Stirnseite (s.u.), die beiden n"achsten Klammern  %
%                    sind die Texte f"ur die 1. und 2. Seite. Die letzte   %
%                    Klammer wird ins rechte untere Eck gesetzt und ist    %
%                    fuer Strings wie "dolby C" gedacht.                    %
% \cassno {}{}{}{}{} wie \cass, nur wird in der 1.Klammer eine maximal     %
%                    3-stellige, fortlaufende Nummer eingesetzt. Dabei     %
%                    m"u"sen die einzelnen Ziffern mit "\\" getrennt       %
%                    werde (Beispiel: {1\\2\\3}).                          %
%                    Die restlichen Klammern werden analog zu \cass ausge- %
%                    f"ullt.                                               %
%                                                                          %
%                                                                          %
% Hilfsbefehle f"ur die Stirnseite:                                        %
%                                                                          %
% \titel  {}{}{}{}   Hilfsmakro f"ur die Stirnseite. Klammern in folgender %
%                    Reihenfolge ausf"ullen:                               %
%                    TitelA UntertitelA TitelB UntertitelB                 %
% \titelc  {}{}{}    wie \titel, allerdings gibt es nur einen Titel.       %
% \titelC  {}{}{}    wie \titelc, aber anderes Layout.                     %
% \titelcc {}{}      wie \titelc, allerdings gibt es nur einen Untertitel. %
% \titelT  {}        wie \titelcc, es gibt jedoch keinen Untertitel.       %
%                                                                          %
%                                                                          %
% Befehle, die intern benutzt werden, aber auch extern aufrufbar sind:     %
%                                                                          %
% \CassLabel {}      wie \cass, jedoch wird nur die Stirnseite erstellt    %
% \CassLabelNo {}{}  wie \cassno, jedoch wird nur die Stirnseite erstellt  %
% \CassText {}{}{}   wie \cass, jedoch wird keine Stirnseite erstellt      %
%                                                                          %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                                                          %
% Ein fertiges Label sieht also so aus:                                    %
%                                                                          %
%   \cassno {1\\2\\3}                % Oder einfach \cass                  %
%     { \titel {TA} {UA} {TB} {UB} } % Oder ein anderer "\titelxxx"-Befehl %
%     { Lied 1\\                                                           %
%       Lied 2\\                                                           %
%       ...                                                                %
%       Lied x                       % Die "\\" hier wirklich weglassen    %
%     }                              % Sonst erh"alt man eine Warnung!     %
%     { ... }                                                              %
%     { dolby C }                    % Oder was sonst gef"allt             %
%                                                                          %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\documentstyle [german] {article}
\pagestyle {empty}
\parindent0pt            % kein Absatzeinzug
\parskip0pt              % Kein Absatzabstand
\topmargin0pt            % Kein oberer Rand
\headheight0pt           % Kein Kopf
\headsep0pt              % Auch kein Kopfabstand
\footheight0pt           % Kein Fuss
\footskip0pt             % Auch kein Fussabstand
\topskip0pt              % Kein Abstand vom Textbeginn
\evensidemargin2.4668mm       % Linker Rand Xmm
\oddsidemargin2.4668mm        % Auch auf ungeraden Seiten
\textwidth204mm          % Textbreite
\voffset-0.5in           % Druckbeginn 0,5 Zoll von oben
\hoffset-0.9in           % Druckbeginn 0,1 Zoll von links
\textheight260mm         % Texth"ohe

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                                                         %
% Hauptmakros zum Erstellen der Labels (Benutzermakros)                   %
%                                                                         %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Komplettes Label                                                        %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand {\cass} [4]                         %
{   \unitlength1mm                              % normales Label
    \begin {picture}(100,79.5)                  %
        \put (-1,66.5) {\CassLabel {#1}}        % Titel
        \put (-1,0) {\CassText {#2} {#3} {#4}}  % Texte
    \end {picture}                              %
}

\newcommand {\cassno} [5]                       %
{   \unitlength1mm                              % nummeriertes Label
    \begin {picture}(100,79.5)                  %
        \put (-1,66.5) {\CassLabelNo {#1} {#2}} % Titel
        \put (-1,0) {\CassText {#3} {#4} {#5}}  % Texte
    \end {picture}                              %
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Stirnseite                                                              %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand {\CassLabel} [1]                    %
{   \unitlength1mm                              % normales Label
    \begin {picture}(100,13)                    %
        \put (0,0)                              %
        {   \framebox (101,12){}                % Titel
        }                                       %
        \put (1,5.5)                            %
        {   \begin {minipage} {99mm}            %
                #1%                             %
            \end {minipage}                     %
        }
    \end {picture}
}

\newcommand {\CassLabelNo} [2]                  %
{   \unitlength1mm                              % nummeriertes Label
    \begin {picture}(100,13)                    %
        \put (97,0)                             %
        {   \framebox (4,12)                    % Nummer
            {\large\shortstack{#1}}             %
        }
        \put (0,0)                              %
        {   \framebox (96,12){}                 % Titel
        }                                       %
        \put (1,5.5)                            %
        {   \begin {minipage} {94mm}            %
                #2%                             %
            \end {minipage}                     %
        }
    \end {picture}
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Text                                                                    %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand {\CassText} [3]
{   \unitlength1mm
    \begin {picture}(100,65)
        \put (0,0)   {\CassRahmen}          % Text Seite A
        \put (0,64)  {\CassSpalte {#1}}     %
        \put (51,0)  {\CassRahmen}          % Text Seite B
        \put (51,64) {\CassSpalte {#2}}     %
        \put (100,2)                        %
        {   \makebox (0,0) [br] {#3}        % dolby X
        }                                   %
    \end {picture}
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Makros zur Gestaltung vom Text                                          %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand {\CassRahmen}
{   \framebox (50,65) [tl] {}}

\newcommand {\CassSpalte} [1]
{   \makebox (0,0) [tl]
    {   \begin {minipage} [t] {48mm}
            #1%
        \end {minipage}
    }
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                                                         %
% Hier ein paar Hilfsmakros f"ur die Stirnseite (Benutzermakros)          %
%                                                                         %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand {\titel} [4]            %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
{   \huge  #1 \hfill \huge  #3\\    %Titel A             Titel B%
    \small #2 \hfill \small #4}     %Untertitel A   Untertitel B%
                                    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand {\titelc} [3]           %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
{   \centerline {\huge  #1}         %           Titel           %
    \small #2 \hfill \small #3}     %Untertitel A   Untertitel B%
                                    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand {\titelC} [3]           %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
{   \small #2 \hfill \Huge  #1%     %Untert.A   TITEL   Untert.B%
    \hfill \small #3}               %%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand {\titelcc} [2]          %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
{   \centerline {\huge  #1}         %           Titel           %
    \centerline {\small #2}}        %         Untertitel        %
                                    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\newcommand {\titelT} [1]           %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
{   \centerline {\Huge  #1}}        %           Titel           %
                                    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%

