summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/papercdcase
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-08-12 16:12:55 +0000
committerKarl Berry <karl@freefriends.org>2006-08-12 16:12:55 +0000
commitcbcc07d7f45d448a51a7bd37225bdc276318f101 (patch)
treea3efaff7663ca2fc576ecfec30567d7c1245e297 /Master/texmf-dist/tex/latex/papercdcase
parent9d307955b11293bfafcc42264e1aa499f7fedfb9 (diff)
new latex package papercdcase
git-svn-id: svn://tug.org/texlive/trunk@1937 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/papercdcase')
-rw-r--r--Master/texmf-dist/tex/latex/papercdcase/papercdcase.sty449
1 files changed, 449 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/papercdcase/papercdcase.sty b/Master/texmf-dist/tex/latex/papercdcase/papercdcase.sty
new file mode 100644
index 00000000000..424d4774b78
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/papercdcase/papercdcase.sty
@@ -0,0 +1,449 @@
+%%
+%% This is file `papercdcase.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% papercdcase.dtx
+%%
+%% IMPORTANT NOTICE:
+%%
+%% For the copyright see the source file.
+%%
+%% Any modified versions of this file must be renamed
+%% with new filenames distinct from papercdcase.sty.
+%%
+%% For distribution of the original source see the terms
+%% for copying and modification in the file papercdcase.dtx.
+%%
+%% This generated file may be distributed as long as the
+%% original source files, as listed above, are part of the
+%% same distribution. (The sources need not necessarily be
+%% in the same archive or directory.)
+%%^^A $Id: papercdcase.dtx 11 2006-08-07 11:54:04Z tdussa $
+\def\SVNMisc$#1: #2 #3${#2}
+\def\SVNDate$#1: #2-#3-#4 #5${#2/#3/#4}
+\def\filename{papercdcase.dtx}
+\xdef\fileversion{\SVNMisc$Revision: 11 $}
+\xdef\filedate{\SVNDate$Date: 2006-08-07 13:54:04 +0200 (Mon, 07 Aug 2006) $}
+\let\docversion=\fileversion
+\let\docdate=\filedate
+\typeout{%
+%% Purpose:
+ Package: papercdcase \filedate\space\fileversion\space
+ for typesetting paper CD cases.
+}%
+%%
+%% Documentation:
+%% The documentation can be generated from the original file
+%% papercdcase.dtx with the doc style/package. LaTeX the file
+%% papercdcase.dtx to get the full documentation in dvi format.
+%%
+%%
+%% Author: Tobias Dussa
+%% Im Schlossfeld 4
+%% 77855 Achern
+%% Mail: tdussa@sdhs.de
+%%
+%% Copyright (C) 2006 Tobias Dussa
+%%
+%% papercdcase.dtx is distributed in hopes that it will be useful,
+%% but WITHOUT ANY WARRANTY. No author or distributor accepts
+%% responsibility to anyone for the consequences of using it or for
+%% whether it serves any particular purpose or works at all, unless
+%% he says so in writing.
+%%
+%% Everyone is granted permission to copy, modify and redistribute
+%% papercdcase.dtx, provided this copyright notice is preserved and
+%% any modifications are indicated.
+%%
+%%
+%% This style is still under development and may be replaced with a
+%% new version which provides an enhanced functionality.
+%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% \CharacterTable
+%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%% Digits \0\1\2\3\4\5\6\7\8\9
+%% Exclamation \! Double quote \" Hash (number) \#
+%% Dollar \$ Percent \% Ampersand \&
+%% Acute accent \' Left paren \( Right paren \)
+%% Asterisk \* Plus \+ Comma \,
+%% Minus \- Point \. Solidus \/
+%% Colon \: Semicolon \; Less than \<
+%% Equals \= Greater than \> Question mark \?
+%% Commercial at \@ Left bracket \[ Backslash \\
+%% Right bracket \] Circumflex \^ Underscore \_
+%% Grave accent \` Left brace \{ Vertical bar \|
+%% Right brace \} Tilde \~}
+%%
+\ProvidesPackage{papercdcase}[\filedate v.\fileversion{} Paper CD Case Style (TD)]
+\NeedsTeXFormat{LaTeX2e}
+
+\RequirePackage{graphicx}
+\RequirePackage{calc}
+
+\makeatletter
+
+\newcommand{\@PCDC@Latch@Matter}{}
+\newcommand{\@PCDC@Pouch@Matter}{}
+\newcommand{\@PCDC@Back@Matter}{}
+\newcommand{\@PCDC@Spine@Matter}{}
+
+\newcommand{\setcdlatchmatter}[1]{\renewcommand{\@PCDC@Latch@Matter}{#1}}
+\newcommand{\setcdpouchmatter}[1]{\renewcommand{\@PCDC@Pouch@Matter}{#1}}
+\newcommand{\setcdbackmatter}[1]{\renewcommand{\@PCDC@Back@Matter}{#1}}
+\newcommand{\setcdspinematter}[1]{\renewcommand{\@PCDC@Spine@Matter}{#1}}
+
+\DeclareRobustCommand{\papercdcase}{%
+\@ifstar%
+{\setcounter{@PCDC@Design@Height}{297}\setcounter{@PCDC@Pouch@Height}{75}\@PCDC@Typeset@Scheme}%
+{\setcounter{@PCDC@Design@Height}{279}\setcounter{@PCDC@Pouch@Height}{64}\@PCDC@Typeset@Scheme}}
+
+%% Control counters.
+%% Overall height of the folding scheme.
+\newcounter{@PCDC@Design@Height}
+%% Height of the CD pouch.
+\newcounter{@PCDC@Pouch@Height}
+%% Height (and width) of the folded paper CD case.
+\newcounter{@PCDC@Back@Height}
+%% Height of the CD case spine.
+\newcounter{@PCDC@Spine@Height}
+%% Margin between the text boxes and the edge of the CD case.
+\newcounter{@PCDC@Text@Margin}
+%% Length of regular fold marks.
+\newcounter{@PCDC@Fold@Length}
+%% Length of short fold marks.
+\newcounter{@PCDC@Fold@Short@Length}
+%% Space between fold marks and their labels.
+\newcounter{@PCDC@Label@Sep}
+
+\setcounter{@PCDC@Design@Height}{279}
+\setcounter{@PCDC@Pouch@Height}{64}
+\setcounter{@PCDC@Back@Height}{125}
+\setcounter{@PCDC@Spine@Height}{8}
+\setcounter{@PCDC@Text@Margin}{5}
+\setcounter{@PCDC@Fold@Length}{25}
+\setcounter{@PCDC@Fold@Short@Length}{20}
+\setcounter{@PCDC@Label@Sep}{1}
+
+%% Common counters.
+\newcounter{@PCDC@Design@width}
+\newcounter{@PCDC@Top@Lft@Fold}
+\newcounter{@PCDC@Top@Rgt@Fold}
+\newcounter{@PCDC@Bot@Lft@Fold}
+\newcounter{@PCDC@Bot@Rgt@Fold}
+\newcounter{@PCDC@Lwr@Top@Fold}
+\newcounter{@PCDC@Upr@Top@Fold}
+\newcounter{@PCDC@Bot@Fold}
+\newcounter{@PCDC@Text@width}
+\newcounter{@PCDC@Fold@Dash@Number}
+
+%% Counters with the actual coordinates of the folding marks.
+\newcounter{@PCDC@Fold@A@Lft@X}
+\newcounter{@PCDC@Fold@A@Lft@Y}
+\newcounter{@PCDC@Fold@A@Rgt@X}
+\newcounter{@PCDC@Fold@A@Rgt@Y}
+\newcounter{@PCDC@Fold@B@Lft@X}
+\newcounter{@PCDC@Fold@B@Lft@Y}
+\newcounter{@PCDC@Fold@B@Rgt@X}
+\newcounter{@PCDC@Fold@B@Rgt@Y}
+\newcounter{@PCDC@Fold@C@Top@X}
+\newcounter{@PCDC@Fold@C@Top@Y}
+\newcounter{@PCDC@Fold@C@Bot@X}
+\newcounter{@PCDC@Fold@C@Bot@Y}
+\newcounter{@PCDC@Fold@D@Top@X}
+\newcounter{@PCDC@Fold@D@Top@Y}
+\newcounter{@PCDC@Fold@D@Bot@X}
+\newcounter{@PCDC@Fold@D@Bot@Y}
+\newcounter{@PCDC@Fold@E@Lft@X}
+\newcounter{@PCDC@Fold@E@Lft@Y}
+\newcounter{@PCDC@Fold@E@Rgt@X}
+\newcounter{@PCDC@Fold@E@Rgt@Y}
+\newcounter{@PCDC@Fold@F@Lft@X}
+\newcounter{@PCDC@Fold@F@Lft@Y}
+\newcounter{@PCDC@Fold@F@Rgt@X}
+\newcounter{@PCDC@Fold@F@Rgt@Y}
+\newcounter{@PCDC@Fold@G@Lft@X}
+\newcounter{@PCDC@Fold@G@Lft@Y}
+\newcounter{@PCDC@Fold@G@Rgt@X}
+\newcounter{@PCDC@Fold@G@Rgt@Y}
+\newcounter{@PCDC@Fold@H@X}
+\newcounter{@PCDC@Fold@H@Y}
+\newcounter{@PCDC@Fold@I@X}
+\newcounter{@PCDC@Fold@I@Y}
+\newcounter{@PCDC@Fold@J@X}
+\newcounter{@PCDC@Fold@J@Y}
+\newcounter{@PCDC@Fold@K@X}
+\newcounter{@PCDC@Fold@K@Y}
+\newcounter{@PCDC@Fold@L@X}
+\newcounter{@PCDC@Fold@L@Y}
+\newcounter{@PCDC@Fold@M@X}
+\newcounter{@PCDC@Fold@M@Y}
+
+%% Counters with the actual coordinates of the text boxes.
+\newcounter{@PCDC@Fold@A@Lft@Label@X}
+\newcounter{@PCDC@Fold@A@Lft@Label@Y}
+\newcounter{@PCDC@Fold@A@Rgt@Label@X}
+\newcounter{@PCDC@Fold@A@Rgt@Label@Y}
+\newcounter{@PCDC@Fold@B@Lft@Label@X}
+\newcounter{@PCDC@Fold@B@Lft@Label@Y}
+\newcounter{@PCDC@Fold@B@Rgt@Label@X}
+\newcounter{@PCDC@Fold@B@Rgt@Label@Y}
+\newcounter{@PCDC@Fold@C@Top@Label@X}
+\newcounter{@PCDC@Fold@C@Top@Label@Y}
+\newcounter{@PCDC@Fold@C@Bot@Label@X}
+\newcounter{@PCDC@Fold@C@Bot@Label@Y}
+\newcounter{@PCDC@Fold@D@Top@Label@X}
+\newcounter{@PCDC@Fold@D@Top@Label@Y}
+\newcounter{@PCDC@Fold@D@Bot@Label@X}
+\newcounter{@PCDC@Fold@D@Bot@Label@Y}
+\newcounter{@PCDC@Fold@E@Lft@Label@X}
+\newcounter{@PCDC@Fold@E@Lft@Label@Y}
+\newcounter{@PCDC@Fold@E@Rgt@Label@X}
+\newcounter{@PCDC@Fold@E@Rgt@Label@Y}
+\newcounter{@PCDC@Fold@F@Lft@Label@X}
+\newcounter{@PCDC@Fold@F@Lft@Label@Y}
+\newcounter{@PCDC@Fold@F@Rgt@Label@X}
+\newcounter{@PCDC@Fold@F@Rgt@Label@Y}
+\newcounter{@PCDC@Fold@G@Lft@Label@X}
+\newcounter{@PCDC@Fold@G@Lft@Label@Y}
+\newcounter{@PCDC@Fold@G@Rgt@Label@X}
+\newcounter{@PCDC@Fold@G@Rgt@Label@Y}
+\newcounter{@PCDC@Fold@H@Label@X}
+\newcounter{@PCDC@Fold@H@Label@Y}
+\newcounter{@PCDC@Fold@I@Label@X}
+\newcounter{@PCDC@Fold@I@Label@Y}
+\newcounter{@PCDC@Fold@J@Label@X}
+\newcounter{@PCDC@Fold@J@Label@Y}
+\newcounter{@PCDC@Fold@K@Label@X}
+\newcounter{@PCDC@Fold@K@Label@Y}
+\newcounter{@PCDC@Fold@L@Label@X}
+\newcounter{@PCDC@Fold@L@Label@Y}
+\newcounter{@PCDC@Fold@M@Label@X}
+\newcounter{@PCDC@Fold@M@Label@Y}
+
+%% Counters with the actual coordinates of the text boxes.
+\newcounter{@PCDC@Pouch@Matter@X}
+\newcounter{@PCDC@Pouch@Matter@Y}
+\newcounter{@PCDC@Back@Matter@X}
+\newcounter{@PCDC@Back@Matter@Y}
+\newcounter{@PCDC@Spine@Matter@X}
+\newcounter{@PCDC@Spine@Matter@Y}
+\newcounter{@PCDC@Latch@Matter@X}
+\newcounter{@PCDC@Latch@Matter@Y}
+
+%% The actual output function.
+\newcommand{\@PCDC@Typeset@Scheme}[1][120]{%
+%% Scale the output.
+\setlength{\unitlength}{1mm}
+\multiply\unitlength by #1
+\divide\unitlength by 120
+%%
+%% Compute the actual coordinates.
+%% Common coordinates.
+\setcounter{@PCDC@Design@width}{\value{@PCDC@Back@Height}+2*\value{@PCDC@Fold@Length}}
+\setcounter{@PCDC@Top@Lft@Fold}{\value{@PCDC@Fold@Length}+1}
+\setcounter{@PCDC@Top@Rgt@Fold}{\value{@PCDC@Fold@Length}+\value{@PCDC@Back@Height}}
+\setcounter{@PCDC@Bot@Lft@Fold}{\value{@PCDC@Fold@Length}+1}
+\setcounter{@PCDC@Bot@Rgt@Fold}{\value{@PCDC@Fold@Length}+\value{@PCDC@Back@Height}}
+\setcounter{@PCDC@Lwr@Top@Fold}{2*\value{@PCDC@Pouch@Height}+2*\value{@PCDC@Back@Height}-\value{@PCDC@Design@Height}}
+\setcounter{@PCDC@Upr@Top@Fold}{\value{@PCDC@Lwr@Top@Fold}+2*\value{@PCDC@Spine@Height}}
+\setcounter{@PCDC@Bot@Fold}{2*\value{@PCDC@Pouch@Height}}
+\setcounter{@PCDC@Text@width}{\value{@PCDC@Back@Height}-2*\value{@PCDC@Text@Margin}}
+\setcounter{@PCDC@Fold@Dash@Number}{\value{@PCDC@Fold@Length}/2}
+%%
+%% Fold mark coordinates.
+\setcounter{@PCDC@Fold@A@Lft@X}{\value{@PCDC@Top@Lft@Fold}}
+\setcounter{@PCDC@Fold@A@Lft@Y}{\value{@PCDC@Design@Height}}
+\setcounter{@PCDC@Fold@A@Rgt@X}{\value{@PCDC@Top@Rgt@Fold}}
+\setcounter{@PCDC@Fold@A@Rgt@Y}{\value{@PCDC@Design@Height}}
+\setcounter{@PCDC@Fold@B@Lft@X}{\value{@PCDC@Bot@Lft@Fold}}
+\setcounter{@PCDC@Fold@B@Lft@Y}{0}
+\setcounter{@PCDC@Fold@B@Rgt@X}{\value{@PCDC@Bot@Rgt@Fold}}
+\setcounter{@PCDC@Fold@B@Rgt@Y}{0}
+\setcounter{@PCDC@Fold@C@Top@X}{\value{@PCDC@Top@Rgt@Fold}}
+\setcounter{@PCDC@Fold@C@Top@Y}{\value{@PCDC@Design@Height}}
+\setcounter{@PCDC@Fold@C@Bot@X}{\value{@PCDC@Bot@Rgt@Fold}}
+\setcounter{@PCDC@Fold@C@Bot@Y}{0}
+\setcounter{@PCDC@Fold@D@Top@X}{\value{@PCDC@Top@Lft@Fold}}
+\setcounter{@PCDC@Fold@D@Top@Y}{\value{@PCDC@Design@Height}}
+\setcounter{@PCDC@Fold@D@Bot@X}{\value{@PCDC@Bot@Lft@Fold}}
+\setcounter{@PCDC@Fold@D@Bot@Y}{0}
+\setcounter{@PCDC@Fold@E@Lft@X}{\value{@PCDC@Bot@Lft@Fold}}
+\setcounter{@PCDC@Fold@E@Lft@Y}{\value{@PCDC@Bot@Fold}}
+\setcounter{@PCDC@Fold@E@Rgt@X}{\value{@PCDC@Bot@Rgt@Fold}}
+\setcounter{@PCDC@Fold@E@Rgt@Y}{\value{@PCDC@Bot@Fold}}
+\setcounter{@PCDC@Fold@F@Lft@X}{\value{@PCDC@Bot@Lft@Fold}}
+\setcounter{@PCDC@Fold@F@Lft@Y}{\value{@PCDC@Lwr@Top@Fold}}
+\setcounter{@PCDC@Fold@F@Rgt@X}{\value{@PCDC@Bot@Rgt@Fold}}
+\setcounter{@PCDC@Fold@F@Rgt@Y}{\value{@PCDC@Lwr@Top@Fold}}
+\setcounter{@PCDC@Fold@G@Lft@X}{\value{@PCDC@Bot@Lft@Fold}}
+\setcounter{@PCDC@Fold@G@Lft@Y}{\value{@PCDC@Upr@Top@Fold}}
+\setcounter{@PCDC@Fold@G@Rgt@X}{\value{@PCDC@Bot@Rgt@Fold}}
+\setcounter{@PCDC@Fold@G@Rgt@Y}{\value{@PCDC@Upr@Top@Fold}}
+\setcounter{@PCDC@Fold@H@X}{\value{@PCDC@Bot@Rgt@Fold}}
+\setcounter{@PCDC@Fold@H@Y}{\value{@PCDC@Pouch@Height}}
+\setcounter{@PCDC@Fold@I@X}{\value{@PCDC@Bot@Rgt@Fold}}
+\setcounter{@PCDC@Fold@I@Y}{\value{@PCDC@Pouch@Height}}
+\setcounter{@PCDC@Fold@J@X}{\value{@PCDC@Bot@Lft@Fold}}
+\setcounter{@PCDC@Fold@J@Y}{\value{@PCDC@Pouch@Height}}
+\setcounter{@PCDC@Fold@K@X}{\value{@PCDC@Bot@Lft@Fold}}
+\setcounter{@PCDC@Fold@K@Y}{\value{@PCDC@Pouch@Height}}
+\setcounter{@PCDC@Fold@L@X}{\value{@PCDC@Top@Rgt@Fold}}
+\setcounter{@PCDC@Fold@L@Y}{\value{@PCDC@Design@Height}-\value{@PCDC@Fold@Short@Length}}
+\setcounter{@PCDC@Fold@M@X}{\value{@PCDC@Top@Lft@Fold}}
+\setcounter{@PCDC@Fold@M@Y}{\value{@PCDC@Design@Height}-\value{@PCDC@Fold@Short@Length}}
+%%
+%% Fold mark label coordinates.
+\setcounter{@PCDC@Fold@A@Lft@Label@X}{\value{@PCDC@Fold@A@Lft@X}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@A@Lft@Label@Y}{\value{@PCDC@Fold@A@Lft@Y}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@A@Rgt@Label@X}{\value{@PCDC@Fold@A@Rgt@X}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@A@Rgt@Label@Y}{\value{@PCDC@Fold@A@Rgt@Y}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@B@Lft@Label@X}{\value{@PCDC@Fold@B@Lft@X}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@B@Lft@Label@Y}{\value{@PCDC@Fold@B@Lft@Y}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@B@Rgt@Label@X}{\value{@PCDC@Fold@B@Rgt@X}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@B@Rgt@Label@Y}{\value{@PCDC@Fold@B@Rgt@Y}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@C@Top@Label@X}{\value{@PCDC@Fold@C@Top@X}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@C@Top@Label@Y}{\value{@PCDC@Fold@C@Top@Y}-\value{@PCDC@Fold@Length}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@C@Bot@Label@X}{\value{@PCDC@Fold@C@Bot@X}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@C@Bot@Label@Y}{\value{@PCDC@Fold@C@Bot@Y}+\value{@PCDC@Fold@Length}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@D@Top@Label@X}{\value{@PCDC@Fold@D@Top@X}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@D@Top@Label@Y}{\value{@PCDC@Fold@D@Top@Y}-\value{@PCDC@Fold@Length}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@D@Bot@Label@X}{\value{@PCDC@Fold@D@Bot@X}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@D@Bot@Label@Y}{\value{@PCDC@Fold@D@Bot@Y}+\value{@PCDC@Fold@Length}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@E@Lft@Label@X}{\value{@PCDC@Fold@E@Lft@X}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@E@Lft@Label@Y}{\value{@PCDC@Fold@E@Lft@Y}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@E@Rgt@Label@X}{\value{@PCDC@Fold@E@Rgt@X}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@E@Rgt@Label@Y}{\value{@PCDC@Fold@E@Rgt@Y}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@F@Lft@Label@X}{\value{@PCDC@Fold@F@Lft@X}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@F@Lft@Label@Y}{\value{@PCDC@Fold@F@Lft@Y}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@F@Rgt@Label@X}{\value{@PCDC@Fold@F@Rgt@X}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@F@Rgt@Label@Y}{\value{@PCDC@Fold@F@Rgt@Y}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@G@Lft@Label@X}{\value{@PCDC@Fold@G@Lft@X}-\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@G@Lft@Label@Y}{\value{@PCDC@Fold@G@Lft@Y}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@G@Rgt@Label@X}{\value{@PCDC@Fold@G@Rgt@X}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@G@Rgt@Label@Y}{\value{@PCDC@Fold@G@Rgt@Y}+\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@H@Label@X}{\value{@PCDC@Fold@H@X}+5*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@H@Label@Y}{\value{@PCDC@Fold@H@Y}+4*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@I@Label@X}{\value{@PCDC@Fold@I@X}+5*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@I@Label@Y}{\value{@PCDC@Fold@I@Y}-6*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@J@Label@X}{\value{@PCDC@Fold@J@X}-5*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@J@Label@Y}{\value{@PCDC@Fold@J@Y}+4*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@K@Label@X}{\value{@PCDC@Fold@K@X}-5*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@K@Label@Y}{\value{@PCDC@Fold@K@Y}-6*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@L@Label@X}{\value{@PCDC@Fold@L@X}+5*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@L@Label@Y}{\value{@PCDC@Fold@L@Y}+4*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@M@Label@X}{\value{@PCDC@Fold@M@X}-5*\value{@PCDC@Label@Sep}}
+\setcounter{@PCDC@Fold@M@Label@Y}{\value{@PCDC@Fold@M@Y}+4*\value{@PCDC@Label@Sep}}
+%%
+%% Text box coordinates.
+\setcounter{@PCDC@Pouch@Matter@X}{\value{@PCDC@Fold@Length}+\value{@PCDC@Text@Margin}}
+\setcounter{@PCDC@Pouch@Matter@Y}{\value{@PCDC@Text@Margin}}
+\setcounter{@PCDC@Back@Matter@X}{\value{@PCDC@Fold@Length}+\value{@PCDC@Text@Margin}}
+\setcounter{@PCDC@Back@Matter@Y}{\value{@PCDC@Pouch@Height}+\value{@PCDC@Back@Height}-\value{@PCDC@Text@Margin}}
+\setcounter{@PCDC@Spine@Matter@X}{\value{@PCDC@Fold@Length}+\value{@PCDC@Back@Height}/2}
+\setcounter{@PCDC@Spine@Matter@Y}{\value{@PCDC@Back@Matter@Y}+\value{@PCDC@Spine@Height}/2+\value{@PCDC@Text@Margin}}
+\setcounter{@PCDC@Latch@Matter@X}{\value{@PCDC@Fold@Length}+\value{@PCDC@Text@Margin}}
+\setcounter{@PCDC@Latch@Matter@Y}{\value{@PCDC@Spine@Matter@Y}+\value{@PCDC@Spine@Height}/2+\value{@PCDC@Text@Margin}}
+%%
+%% Typeset the folding scheme
+\begin{picture}(\value{@PCDC@Design@width}, \value{@PCDC@Design@Height})
+%% Fold mark 1, left
+\put(\value{@PCDC@Fold@A@Lft@X}, \value{@PCDC@Fold@A@Lft@Y}){\line(-1, 0){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@A@Lft@Label@X}, \value{@PCDC@Fold@A@Lft@Label@Y}){\makebox(0, 0)[br]{\rotatebox{180}{1}}}
+%%
+%% Fold mark 1, right
+\put(\value{@PCDC@Fold@A@Rgt@X}, \value{@PCDC@Fold@A@Rgt@Y}){\line(1, 0){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@A@Rgt@Label@X}, \value{@PCDC@Fold@A@Rgt@Label@Y}){\makebox(0, 0)[bl]{\rotatebox{180}{1}}}
+%%
+%% Fold mark 2, left
+\put(\value{@PCDC@Fold@B@Lft@X}, \value{@PCDC@Fold@B@Lft@Y}){\line(-1, 0){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@B@Lft@Label@X}, \value{@PCDC@Fold@B@Lft@Label@Y}){\makebox(0, 0)[tr]{2}}
+%%
+%% Fold mark 2, right
+\put(\value{@PCDC@Fold@B@Rgt@X}, \value{@PCDC@Fold@B@Rgt@Y}){\line(1, 0){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@B@Rgt@Label@X}, \value{@PCDC@Fold@B@Rgt@Label@Y}){\makebox(0, 0)[tl]{2}}
+%%
+%% Fold mark 3, top
+\put(\value{@PCDC@Fold@C@Top@X}, \value{@PCDC@Fold@C@Top@Y}){\line(0, -1){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@C@Top@Label@X}, \value{@PCDC@Fold@C@Top@Label@Y}){\makebox(0, 0)[bl]{\rotatebox{90}{3}}}
+%%
+%% Fold mark 3, bottom
+\put(\value{@PCDC@Fold@C@Bot@X}, \value{@PCDC@Fold@C@Bot@Y}){\line(0, 1){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@C@Bot@Label@X}, \value{@PCDC@Fold@C@Bot@Label@Y}){\makebox(0, 0)[tl]{\rotatebox{90}{3}}}
+%%
+%% Fold mark 4, top
+\put(\value{@PCDC@Fold@D@Top@X}, \value{@PCDC@Fold@D@Top@Y}){\line(0, -1){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@D@Top@Label@X}, \value{@PCDC@Fold@D@Top@Label@Y}){\makebox(0, 0)[br]{\rotatebox{270}{4}}}
+%%
+%% Fold mark 4, bottom
+\put(\value{@PCDC@Fold@D@Bot@X}, \value{@PCDC@Fold@D@Bot@Y}){\line(0, 1){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@D@Bot@Label@X}, \value{@PCDC@Fold@D@Bot@Label@Y}){\makebox(0, 0)[tr]{\rotatebox{270}{4}}}
+%%
+%% Fold mark 5, left
+\multiput(\value{@PCDC@Fold@E@Lft@X}, \value{@PCDC@Fold@E@Lft@Y})(-2, 0){\value{@PCDC@Fold@Dash@Number}}{\line(-1, 0){1}}
+\put(\value{@PCDC@Fold@E@Lft@Label@X}, \value{@PCDC@Fold@E@Lft@Label@Y}){\makebox(0, 0)[tr]{5 (bottom)}}
+%%
+%% Fold mark 5, right
+\multiput(\value{@PCDC@Fold@E@Rgt@X}, \value{@PCDC@Fold@E@Rgt@Y})(2, 0){\value{@PCDC@Fold@Dash@Number}}{\line(1, 0){1}}
+\put(\value{@PCDC@Fold@E@Rgt@Label@X}, \value{@PCDC@Fold@E@Rgt@Label@Y}){\makebox(0, 0)[tl]{5 (bottom)}}
+%%
+%% Fold mark 6, left
+\multiput(\value{@PCDC@Fold@F@Lft@X}, \value{@PCDC@Fold@F@Lft@Y})(-2, 0){\value{@PCDC@Fold@Dash@Number}}{\line(-1, 0){1}}
+\put(\value{@PCDC@Fold@F@Lft@Label@X}, \value{@PCDC@Fold@F@Lft@Label@Y}){\makebox(0, 0)[br]{\rotatebox{180}{6 (top)}}}
+%%
+%% Fold mark 6, right
+\multiput(\value{@PCDC@Fold@F@Rgt@X}, \value{@PCDC@Fold@F@Rgt@Y})(2, 0){\value{@PCDC@Fold@Dash@Number}}{\line(1, 0){1}}
+\put(\value{@PCDC@Fold@F@Rgt@Label@X}, \value{@PCDC@Fold@F@Rgt@Label@Y}){\makebox(0, 0)[bl]{\rotatebox{180}{6 (top)}}}
+%%
+%% Fold mark 7, left
+\multiput(\value{@PCDC@Fold@G@Lft@X}, \value{@PCDC@Fold@G@Lft@Y})(-2, 0){\value{@PCDC@Fold@Dash@Number}}{\line(-1, 0){1}}
+\put(\value{@PCDC@Fold@G@Lft@Label@X}, \value{@PCDC@Fold@G@Lft@Label@Y}){\makebox(0, 0)[br]{\rotatebox{180}{7 (top)}}}
+%%
+%% Fold mark 7, right
+\multiput(\value{@PCDC@Fold@G@Rgt@X}, \value{@PCDC@Fold@G@Rgt@Y})(2, 0){\value{@PCDC@Fold@Dash@Number}}{\line(1, 0){1}}
+\put(\value{@PCDC@Fold@G@Rgt@Label@X}, \value{@PCDC@Fold@G@Rgt@Label@Y}){\makebox(0, 0)[bl]{\rotatebox{180}{7 (top)}}}
+%%
+%% Fold mark 8
+\put(\value{@PCDC@Fold@H@X}, \value{@PCDC@Fold@H@Y}){\line(1, 1){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@H@Label@X}, \value{@PCDC@Fold@H@Label@Y}){\makebox(0, 0)[tl]{\rotatebox{ 45}{8}}}
+%%
+%% Fold mark 9
+\put(\value{@PCDC@Fold@I@X}, \value{@PCDC@Fold@I@Y}){\line(1, -1){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@I@Label@X}, \value{@PCDC@Fold@I@Label@Y}){\makebox(0, 0)[tr]{\rotatebox{315}{9}}}
+%%
+%% Fold mark 10
+\put(\value{@PCDC@Fold@J@X}, \value{@PCDC@Fold@J@Y}){\line(-1, 1){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@J@Label@X}, \value{@PCDC@Fold@J@Label@Y}){\makebox(0, 0)[tr]{\rotatebox{315}{10}}}
+%%
+%% Fold mark 11
+\put(\value{@PCDC@Fold@K@X}, \value{@PCDC@Fold@K@Y}){\line(-1, -1){\value{@PCDC@Fold@Length}}}
+\put(\value{@PCDC@Fold@K@Label@X}, \value{@PCDC@Fold@K@Label@Y}){\makebox(0, 0)[tl]{\rotatebox{ 45}{11}}}
+%%
+%% Fold mark 12
+\put(\value{@PCDC@Fold@L@X}, \value{@PCDC@Fold@L@Y}){\line(1, 1){\value{@PCDC@Fold@Short@Length}}}
+\put(\value{@PCDC@Fold@L@Label@X}, \value{@PCDC@Fold@L@Label@Y}){\makebox(0, 0)[tl]{\rotatebox{ 45}{12}}}
+%%
+%% Fold mark 13
+\put(\value{@PCDC@Fold@M@X}, \value{@PCDC@Fold@M@Y}){\line(-1, 1){\value{@PCDC@Fold@Short@Length}}}
+\put(\value{@PCDC@Fold@M@Label@X}, \value{@PCDC@Fold@M@Label@Y}){\makebox(0, 0)[tr]{\rotatebox{315}{13}}}
+%%
+%% Latch matter
+\put(\value{@PCDC@Latch@Matter@X}, \value{@PCDC@Latch@Matter@Y}){\makebox(0, 0)[bl]{\rotatebox{180}{\parbox{\value{@PCDC@Text@width}\unitlength}{\@PCDC@Latch@Matter}}}}
+%%
+%% Spine matter
+\put(\value{@PCDC@Spine@Matter@X}, \value{@PCDC@Spine@Matter@Y}){\makebox(0, 0)[cc]{\@PCDC@Spine@Matter}}
+%%
+%% Back matter
+\put(\value{@PCDC@Back@Matter@X}, \value{@PCDC@Back@Matter@Y}){\makebox(0, 0)[tl]{\parbox{\value{@PCDC@Text@width}\unitlength}{\@PCDC@Back@Matter}}}
+%%
+%% Pouch matter
+\put(\value{@PCDC@Pouch@Matter@X}, \value{@PCDC@Pouch@Matter@Y}){\makebox(0, 0)[bl]{\rotatebox{180}{\parbox{\value{@PCDC@Text@width}\unitlength}{\@PCDC@Pouch@Matter}}}}
+\end{picture}}
+
+\makeatother
+\endinput
+%%
+%% End of file `papercdcase.sty'.