diff options
author | Karl Berry <karl@freefriends.org> | 2006-08-12 16:12:55 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-08-12 16:12:55 +0000 |
commit | cbcc07d7f45d448a51a7bd37225bdc276318f101 (patch) | |
tree | a3efaff7663ca2fc576ecfec30567d7c1245e297 /Master/texmf-dist/tex/latex/papercdcase | |
parent | 9d307955b11293bfafcc42264e1aa499f7fedfb9 (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.sty | 449 |
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'. |