You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
584 lines
20 KiB
584 lines
20 KiB
%%
|
|
%% This is file `visualize.lco',
|
|
%% generated with the docstrip utility, extended by scrdocstrip.
|
|
%%
|
|
%% The original source files were:
|
|
%%
|
|
%% scrkernel-version.dtx (with options: `trace')
|
|
%% scrkernel-letterclassoptions.dtx (with options: `lco,visualize,head')
|
|
%% scrkernel-letterclassoptions.dtx (with options: `lco,visualize,body')
|
|
%% scrkernel-notepaper.dtx (with options: `lco,visualize,body')
|
|
%%
|
|
%% Copyright (c) 1994-2019 Markus Kohm [komascript at gmx info]
|
|
%%
|
|
%% This file was generated from file(s) of the KOMA-Script bundle.
|
|
%% ---------------------------------------------------------------
|
|
%%
|
|
%% It may be distributed under the conditions of the
|
|
%% LaTeX Project Public License in the version distributed together
|
|
%% with KOMA-Script, see file `lppl.txt' or `lppl-de.txt'.
|
|
%%
|
|
%% This file may only be distributed together with a copy of the
|
|
%% KOMA-Script bundle. You may however distribute the
|
|
%% KOMA-Script bundle without all such generated files. See also
|
|
%% `lppl.txt' or `lppl-de.txt' for additional information.
|
|
%%
|
|
%% The list of files belonging to KOMA-Script distribution is given in
|
|
%% the file `manifest.txt'. See also `lppl.txt' or `lppl-de.txt' for
|
|
%% additional information.
|
|
%%
|
|
%% If this file is a beta version, you may not be allowed to distribute
|
|
%% it. Look at the comments below to see if this is the case.
|
|
%%
|
|
%% English and German manuals are part of KOMA-Script bundle.
|
|
%% ----------------------------------------------------------
|
|
%%
|
|
%% See `README'.
|
|
%%
|
|
%% The KOMA-Script bundle (but maybe not this file) was based upon the
|
|
%% LaTeX 2.09 Script family created by Frank Neukam 1993 and the LaTeX2e
|
|
%% standard classes created by The LaTeX3 Project 1994-1996. You can
|
|
%% find a complete unmodified copy of LaTeX2e at
|
|
%% <http://mirror.ctan.org/tex-archive/macros/latex/base/>.
|
|
%%
|
|
%%% From File: $Id: scrkernel-version.dtx 3510 2020-07-22 13:29:13Z kohm $
|
|
\begingroup
|
|
\catcode`\@11\relax
|
|
\ifx\KOMAScriptVersion\undefined
|
|
\newcommand*{\@CheckKOMAScriptVersion}[1]{%
|
|
\gdef\KOMAScriptVersion{#1}%
|
|
}%
|
|
\else
|
|
\newcommand*{\@CheckKOMAScriptVersion}[1]{%
|
|
\def\@tempa{#1}%
|
|
\ifx\KOMAScriptVersion\@tempa\else
|
|
\@latex@warning@no@line{%
|
|
\noexpand\KOMAScriptVersion\space is
|
|
`\KOMAScriptVersion',\MessageBreak
|
|
but `#1' was expected!\MessageBreak
|
|
You should not use classes, packages or files
|
|
from\MessageBreak
|
|
different KOMA-Script versions%
|
|
}%
|
|
\fi
|
|
}
|
|
\fi
|
|
\@CheckKOMAScriptVersion{2020/07/22 v3.31 KOMA-Script}%
|
|
\endgroup
|
|
%%% From File: $Id: scrkernel-letterclassoptions.dtx 3453 2020-02-25 07:33:30Z kohm $
|
|
%%% (run: head)
|
|
\ProvidesFile{%
|
|
visualize%
|
|
.lco}[\KOMAScriptVersion\space letter-class-option]
|
|
\providecommand*\LCOWarningNoLine[2]{%
|
|
\LCOWarning{#1}{#2\@gobble}%
|
|
}
|
|
\providecommand*\LCOWarning[2]{%
|
|
\GenericWarning{%
|
|
(#1)\@spaces\@spaces\@spaces\@spaces\@spaces\@spaces\@spaces
|
|
}{%
|
|
Letter class option #1 Warning: #2%
|
|
}%
|
|
}
|
|
%%% From File: $Id: scrkernel-letterclassoptions.dtx 3453 2020-02-25 07:33:30Z kohm $
|
|
%%% (run: body)
|
|
\RequirePackage{eso-pic}
|
|
\newcommand*{\showfields}[1]{%
|
|
\AtBeginLetter{%
|
|
\begingroup
|
|
\@for \@tempa:=#1\do{%
|
|
\scr@trim@spaces\@tempa
|
|
\ifx\@tempa\@empty\else
|
|
\@ifundefined{showfield@\@tempa}{%
|
|
\LCOWarning{visualize}{Unknown field `\@tempa' ignored}%
|
|
}{%
|
|
\edef\@tempa{%
|
|
\noexpand\AddToShipoutPicture*{%
|
|
\noexpand\AtPageUpperLeft{%
|
|
\noexpand\usekomafont{field}%
|
|
\noexpand\@nameuse{showfield@\@tempa}%
|
|
}%
|
|
}%
|
|
}\@tempa
|
|
}%
|
|
\fi
|
|
}%
|
|
\endgroup
|
|
}%
|
|
}
|
|
\newkomafont{field}{\normalcolor}
|
|
\newcommand*{\showfield@by@frame}[4]{%
|
|
\thinlines
|
|
\ifdim #4<\z@
|
|
\put(\LenToUnit{#1},-\LenToUnit{#2}){\line(1,0){\LenToUnit{#3}}}%
|
|
\setlength{\@tempdima}{\dimexpr #1+#3\relax}%
|
|
\setlength{\@tempdimb}{#4}
|
|
\put(\LenToUnit{#1},-\LenToUnit{#2}){%
|
|
\vector(0,-1){\LenToUnit{-\@tempdimb}}}%
|
|
\put(\LenToUnit\@tempdima,-\LenToUnit{#2}){%
|
|
\vector(0,-1){\LenToUnit{-\@tempdimb}}}%
|
|
\else
|
|
\put(\LenToUnit{#1},-\LenToUnit{#2}){\line(1,0){\LenToUnit{#3}}}%
|
|
\put(\LenToUnit{#1},-\LenToUnit{#2}){\line(0,-1){\LenToUnit{#4}}}%
|
|
\setlength{\@tempdima}{\dimexpr #1+#3\relax}%
|
|
\setlength{\@tempdimb}{\dimexpr #2+#4\relax}%
|
|
\put(\LenToUnit\@tempdima,\LenToUnit{-\@tempdimb}){%
|
|
\line(-1,0){\LenToUnit{#3}}}%
|
|
\put(\LenToUnit\@tempdima,\LenToUnit{-\@tempdimb}){%
|
|
\line(0,1){\LenToUnit{#4}}}%
|
|
\fi
|
|
}
|
|
\newcommand*{\showfield@by@edges}[4]{%
|
|
\thinlines
|
|
\setlength{\@tempdima}{\dimexpr #1+#3\relax}%
|
|
\put(\LenToUnit{#1},-\LenToUnit{#2}){\line(1,0){\LenToUnit{\edgesize}}}%
|
|
\put(\LenToUnit{#1},-\LenToUnit{#2}){\line(0,-1){\LenToUnit{\edgesize}}}%
|
|
\put(\LenToUnit{\@tempdima},-\LenToUnit{#2}){\line(-1,0){\LenToUnit{\edgesize}}}%
|
|
\put(\LenToUnit{\@tempdima},-\LenToUnit{#2}){\line(0,-1){\LenToUnit{\edgesize}}}%
|
|
\ifdim #4<\z@\else
|
|
\setlength{\@tempdimb}{\dimexpr #2+#4\relax}%
|
|
\put(\LenToUnit{#1},-\LenToUnit{\@tempdimb}){\line(1,0){\LenToUnit{\edgesize}}}%
|
|
\put(\LenToUnit{#1},-\LenToUnit{\@tempdimb}){\line(0,1){\LenToUnit{\edgesize}}}%
|
|
\put(\LenToUnit{\@tempdima},-\LenToUnit{\@tempdimb}){\line(-1,0){\LenToUnit{\edgesize}}}%
|
|
\put(\LenToUnit{\@tempdima},-\LenToUnit{\@tempdimb}){\line(0,1){\LenToUnit{\edgesize}}}%
|
|
\fi
|
|
}
|
|
\newcommand*{\edgesize}{1ex}
|
|
\newcommand*{\showfield@by@rule}[4]{%
|
|
\ifdim #4<\z@
|
|
\put(\LenToUnit{#1},-\LenToUnit{#2}){\rule[#4]{#3}{-#4}}%
|
|
\else
|
|
\put(\LenToUnit{#1},-\LenToUnit{#2}){\rule[-#4]{#3}{#4}}%
|
|
\fi
|
|
}
|
|
\newcommand*{\showfield}{}
|
|
\let\showfield\showfield@by@frame
|
|
\newcommand*{\setshowstyle}[1]{%
|
|
\@ifundefined{showfield@by@#1}{%
|
|
\LCOWarning{visualize}{Unknown show type `#1'.\MessageBreak
|
|
You should simply set one of the supported\MessageBreak
|
|
show types `frame', `edges', `rule'.\MessageBreak
|
|
Style `frame' will be used instead}%
|
|
\let\showfield\showfield@by@frame
|
|
}{%
|
|
\expandafter\let\expandafter\showfield\csname showfield@by@#1\endcsname
|
|
}%
|
|
}
|
|
\newcommand*{\showfield@test}{%
|
|
\showfield{1cm}{1cm}{10cm}{15cm}%
|
|
}
|
|
\newcommand*{\showfield@head}{%
|
|
\ifdim\useplength{firstheadhpos}<\paperwidth
|
|
\ifdim \useplength{firstheadhpos}>-\paperwidth
|
|
\ifdim \useplength{firstheadhpos}<\z@
|
|
\setlength\@tempskipa{\paperwidth}%
|
|
\addtolengthplength{\@tempskipa}{firstheadhpos}%
|
|
\addtolengthplength[-]{\@tempskipa}{firstheadwidth}%
|
|
\else
|
|
\setlength{\@tempskipa}{\useplength{firstheadhpos}}%
|
|
\fi
|
|
\else
|
|
\setlength\@tempskipa{\oddsidemargin}%
|
|
\addtolength\@tempskipa{1in}%
|
|
\fi
|
|
\else
|
|
\setlength\@tempskipa{.5\paperwidth}%
|
|
\addtolengthplength[-.5]{\@tempskipa}{firstheadwidth}%
|
|
\fi
|
|
\showfield{\@tempskipa}%
|
|
{\useplength{firstheadvpos}}%
|
|
{\useplength{firstheadwidth}}%
|
|
{-\headheight}%
|
|
}
|
|
\newcommand*{\showfield@foot}{%
|
|
\ifdim\useplength{firstfoothpos}<\paperwidth
|
|
\ifdim \useplength{firstfoothpos}>-\paperwidth
|
|
\ifdim \useplength{firstfoothpos}<\z@
|
|
\setlength\@tempskipa{\paperwidth}%
|
|
\addtolengthplength{\@tempskipa}{firstfoothpos}%
|
|
\addtolengthplength[-]{\@tempskipa}{firstfootwidth}%
|
|
\else
|
|
\setlength{\@tempskipa}{\useplength{firstfoothpos}}%
|
|
\fi
|
|
\else
|
|
\setlength\@tempskipa{\oddsidemargin}%
|
|
\addtolength\@tempskipa{1in}%
|
|
\fi
|
|
\else
|
|
\setlength\@tempskipa{.5\paperwidth}%
|
|
\addtolengthplength[-.5]{\@tempskipa}{firstfootwidth}%
|
|
\fi
|
|
\showfield{\@tempskipa}%
|
|
{\useplength{firstfootvpos}}%
|
|
{\useplength{firstfootwidth}}%
|
|
{-\baselineskip}%
|
|
}
|
|
\newcommand*{\showfield@address}{%
|
|
\setlengthtoplength{\@tempskipa}{toaddrhpos}%
|
|
\ifdim \@tempskipa<\z@
|
|
\addtolength{\@tempskipa}{\paperwidth}%
|
|
\addtolengthplength[-]{\@tempskipa}{toaddrwidth}%
|
|
\fi
|
|
\showfield{\@tempskipa}{\useplength{toaddrvpos}}%
|
|
{\useplength{toaddrwidth}}%
|
|
{\dimexpr\useplength{toaddrheight}\relax}%
|
|
}
|
|
\newcommand*{\showfield@location}{%
|
|
\begingroup
|
|
\ifdim \useplength{locwidth}=\z@%
|
|
\@setplength{locwidth}{\paperwidth}%
|
|
\ifdim \useplength{toaddrhpos}>\z@
|
|
\@addtoplength[-2]{locwidth}{\useplength{toaddrhpos}}%
|
|
\else
|
|
\@addtoplength[2]{locwidth}{\useplength{toaddrhpos}}%
|
|
\fi
|
|
\@addtoplength[-1]{locwidth}{\useplength{toaddrwidth}}%
|
|
\if@bigloc%
|
|
\@setplength[.66667]{locwidth}{\useplength{locwidth}}%
|
|
\else%
|
|
\@setplength[.5]{locwidth}{\useplength{locwidth}}%
|
|
\fi%
|
|
\fi%
|
|
\ifdim \useplength{lochpos}=\z@%
|
|
\@setplength{lochpos}{\useplength{toaddrhpos}}%
|
|
\fi
|
|
\ifdim \useplength{locvpos}=\z@%
|
|
\@setplength{locvpos}{\useplength{toaddrvpos}}%
|
|
\fi
|
|
\ifdim \useplength{locheight}=\z@%
|
|
\@setplength{locheight}{\useplength{toaddrheight}}%
|
|
\fi
|
|
\setlengthtoplength[-]{\@tempskipa}{lochpos}%
|
|
\ifdim \@tempskipa<\z@
|
|
\addtolength{\@tempskipa}{\paperwidth}%
|
|
\else
|
|
\addtolengthplength{\@tempskipa}{locwidth}%
|
|
\fi
|
|
\addtolengthplength[-]{\@tempskipa}{locwidth}%
|
|
\showfield{\@tempskipa}{\useplength{locvpos}}%
|
|
{\useplength{locwidth}}{\useplength{locheight}}%
|
|
\endgroup
|
|
}
|
|
\newcommand*{\showfield@refline}{%
|
|
\begingroup
|
|
\ifdim\useplength{refwidth}=\z@
|
|
\if@refwide
|
|
\@setplength{refwidth}{\paperwidth}%
|
|
\ifdim \useplength{toaddrhpos}>\z@
|
|
\@setplength{refhpos}{\useplength{toaddrhpos}}%
|
|
\else
|
|
\@setplength[-]{refhpos}{\useplength{toaddrhpos}}%
|
|
\fi
|
|
\@addtoplength[-2]{refwidth}{\useplength{refhpos}}%
|
|
\else
|
|
\@setplength{refwidth}{\textwidth}%
|
|
\@setplength{refhpos}{\oddsidemargin}%
|
|
\@addtoplength{refhpos}{1in}%
|
|
\fi
|
|
\else\ifdim\useplength{refhpos}=\z@
|
|
\begingroup
|
|
\setlength\@tempdima{\textwidth}%
|
|
\addtolengthplength[-]{\@tempdima}{refwidth}%
|
|
\setlength\@tempdimb{\oddsidemargin}%
|
|
\addtolength\@tempdimb{1in}%
|
|
\setlength{\@tempdimc}{\paperwidth}%
|
|
\addtolength{\@tempdimc}{-\textwidth}%
|
|
\divide\@tempdimb by 32768\relax
|
|
\divide\@tempdimc by 32768\relax
|
|
\ifdim\@tempdimc=\z@\else
|
|
\multiply\@tempdima by\@tempdimb
|
|
\divide\@tempdima by\@tempdimc
|
|
\fi
|
|
\edef\@tempa{\noexpand\endgroup
|
|
\noexpand\@setplength{refhpos}{\the\@tempdima}}%
|
|
\@tempa
|
|
\fi\fi
|
|
\showfield{\useplength{refhpos}}{\useplength{refvpos}}%
|
|
{\useplength{refwidth}}{-1.5\baselineskip}%
|
|
\endgroup
|
|
}
|
|
\RequirePackage{graphicx}
|
|
\newcommand*{\showenvelope}{}
|
|
\newcommand*{\@@showenvelope}{}
|
|
\newcommand*{\@@@showenvelope}{}
|
|
\def\showenvelope(#1,#2){%
|
|
\kernel@ifnextchar (%)
|
|
{\@showenvelope({#1},{#2})}%
|
|
{\@@@showenvelope({#1},{#2})}%
|
|
}
|
|
\def\@@@showenvelope(#1,#2){%
|
|
\begingroup
|
|
\def\@tempa{\endgroup}%
|
|
\ifdim \paperwidth>#1\relax
|
|
\LCOWarning{visualize}{%
|
|
\string\paperwidth\space > envelope width not supported}%
|
|
\else
|
|
\ifdim \paperheight>#2\relax
|
|
\ifdim .5\paperheight>#2\relax
|
|
\expandafter\ifdim \useplength{tfoldmarkvpos}>#2\relax
|
|
\LCOWarning{visualize}{%
|
|
tfoldmarkvpos > envelope height not supported}%
|
|
\else
|
|
\def\@tempa{\endgroup
|
|
\@showenvelope({#1},{#2})%
|
|
({\dimexpr (#1-\paperwidth)/2\relax},%
|
|
{\dimexpr (#2-\expandafter\dimexpr
|
|
\useplength{tfoldmarkvpos}\relax)%
|
|
/2\relax})%
|
|
}%
|
|
\fi
|
|
\else
|
|
\def\@tempa{\endgroup
|
|
\@showenvelope({#1},{#2})%
|
|
({\dimexpr (#1-\paperwidth)/2\relax},%
|
|
{\dimexpr (#2-.5\paperheight)/2\relax})%
|
|
}%
|
|
\fi
|
|
\else
|
|
\def\@tempa{\endgroup
|
|
\@showenvelope({#1},{#2})%
|
|
({\dimexpr (#1-\paperwidth)/2\relax},%
|
|
{\dimexpr (#2-\paperheight)/2\relax})%
|
|
}%
|
|
\fi
|
|
\fi
|
|
\@tempa
|
|
}
|
|
\def\@showenvelope(#1,#2)(#3,#4){%
|
|
\kernel@ifnextchar [%]
|
|
{\@@showenvelope({#1},{#2})({#3},{#4})}%
|
|
{\@@showenvelope({#1},{#2})({#3},{#4})[]}%
|
|
}
|
|
\def\@@showenvelope(#1,#2)(#3,#4)[#5]{%
|
|
\newpage
|
|
\vspace*{\fill}
|
|
\rotatebox{90}{%
|
|
\begin{picture}(0,0)
|
|
\begin{picture}(\LenToUnit{#1},\LenToUnit{#2})(0,\LenToUnit{#2})
|
|
\newcommand*{\PlusHOffset}[1]{%
|
|
\dimexpr \expandafter\dimexpr ##1\relax + #3\relax
|
|
}%
|
|
\newcommand*{\MinusHOffset}[1]{%
|
|
\dimexpr \expandafter\dimexpr ##1\relax - #3\relax
|
|
}%
|
|
\newcommand*{\PlusVOffset}[1]{%
|
|
\dimexpr \expandafter\dimexpr ##1\relax + #4\relax
|
|
}%
|
|
\newcommand*{\MinusVOffset}[1]{%
|
|
\dimexpr \expandafter\dimexpr ##1\relax - #4\relax
|
|
}%
|
|
\newcommand{\AtEnvelopeUpperLeft}[1]{%
|
|
\put(\LenToUnit{\PlusHOffset\z@},\LenToUnit{\MinusVOffset{#2}}){##1}%
|
|
}%
|
|
\newcommand{\AtEnvelopeLowerLeft}[1]{%
|
|
\put(\LenToUnit{\PlusHOffset\z@},\LenToUnit{\PlusVOffset\z@}){##1}%
|
|
}%
|
|
\newcommand{\AtEnvelopeUpperRight}[1]{%
|
|
\put(\LenToUnit{\MinusHOffset{#1}},\LenToUnit{\MinusVOffset{#2}}){##1}%
|
|
}%
|
|
\newcommand{\AtEnvelopeLowerRight}[1]{%
|
|
\put(\LenToUnit{\MinusHOffset{#1}},\LenToUnit{\PlusVOffset\z@}){##1}%
|
|
}%
|
|
\newcommand*{\measuredIFrame}{}%
|
|
\def\measuredIFrame(##1,##2)(##3,##4){%
|
|
\put(\LenToUnit{##1},\LenToUnit{##2}){%
|
|
\measuredFrameLB({##3},{##4})%
|
|
}%
|
|
\put(\LenToUnit{\MinusHOffset\z@},%
|
|
\LenToUnit{\dimexpr ##2-.5mm\relax}){%
|
|
\measureLineHB{\PlusHOffset{##1}}%
|
|
}%
|
|
\put(\LenToUnit{\dimexpr ##1+##3\relax},%
|
|
\LenToUnit{\dimexpr ##2-.5mm\relax}){%
|
|
\measureLineHB{\dimexpr #1-%
|
|
\PlusHOffset{\dimexpr ##1+##3\relax}\relax}%
|
|
}%
|
|
\put(\LenToUnit{\dimexpr ##1-.5mm\relax},%
|
|
\LenToUnit{\dimexpr ##2+##4\relax}){%
|
|
\measureLineVL{\PlusVOffset{\dimexpr -##2-##4\relax}}%
|
|
}%
|
|
\put(\LenToUnit{\dimexpr ##1-.5mm\relax},%
|
|
\LenToUnit{\PlusVOffset{-#2}}){%
|
|
\measureLineVL{\dimexpr #2-%
|
|
\PlusVOffset{\dimexpr -##2\relax}\relax}%
|
|
}%
|
|
}%
|
|
\put(0,0){%
|
|
\thicklines
|
|
\usekomafont{envelope}%
|
|
\measuredFrameLB({#1},{#2})%
|
|
}%
|
|
\AtEnvelopeLowerLeft{%
|
|
\usekomafont{letter}%
|
|
\dashbox{\LenToUnit{1mm}}%
|
|
(\LenToUnit{\MinusHOffset{\MinusHOffset{#1}}},%
|
|
\LenToUnit{\MinusVOffset{\MinusVOffset{#2}}}){}%
|
|
}%
|
|
\expandafter\ifdim \useplength{toaddrhpos}<\z@
|
|
\AtEnvelopeUpperLeft{%
|
|
\thicklines
|
|
\usekomafont{envelope}%
|
|
\measuredIFrame(\expandafter\dimexpr \useplength{toaddrhpos}+
|
|
\MinusHOffset{\MinusHOffset{#1}}\relax,%
|
|
-\dimexpr %
|
|
\expandafter\dimexpr\useplength{toaddrvpos}\relax
|
|
+
|
|
\expandafter
|
|
\dimexpr\useplength{toaddrheight}\relax
|
|
\relax)%
|
|
(\useplength{toaddrwidth},\useplength{toaddrheight})%
|
|
}%
|
|
\else
|
|
\AtEnvelopeUpperLeft{%
|
|
\thicklines
|
|
\usekomafont{envelope}%
|
|
\measuredIFrame(\useplength{toaddrhpos},%
|
|
-\dimexpr %
|
|
\expandafter\dimexpr\useplength{toaddrvpos}\relax
|
|
+
|
|
\expandafter
|
|
\dimexpr\useplength{toaddrheight}\relax
|
|
\relax)%
|
|
(\useplength{toaddrwidth},\useplength{toaddrheight})%
|
|
}%
|
|
\fi
|
|
\AtEnvelopeUpperLeft{#5}%
|
|
\end{picture}
|
|
\end{picture}
|
|
}%
|
|
\newpage
|
|
}
|
|
\newkomafont{envelope}{\normalcolor}
|
|
\newkomafont{letter}{\normalcolor}
|
|
\newcommand*{\unmeasuredFrame}{}
|
|
\def\unmeasuredFrame(#1,#2){%
|
|
\put(0,0){\line(1,0){\LenToUnit{#1}}}%
|
|
\put(\LenToUnit{#1},0){\line(0,1){\LenToUnit{#2}}}%
|
|
\put(\LenToUnit{#1},\LenToUnit{#2}){\line(-1,0){\LenToUnit{#1}}}%
|
|
\put(0,\LenToUnit{#2}){\line(0,-1){\LenToUnit{#2}}}%
|
|
}
|
|
\newcommand*{\measuredFrameLB}{}
|
|
\def\measuredFrameLB(#1,#2){%
|
|
\unmeasuredFrame({#1},{#2})%
|
|
\put(\LenToUnit{-.5mm},0){\measureLineVL{#2}}%
|
|
\put(0,\LenToUnit{-.5mm}){\measureLineHB{#1}}%
|
|
}
|
|
\newcommand*{\measuredFrameLT}{}
|
|
\def\measuredFrameLT(#1,#2){%
|
|
\unmeasuredFrame({#1},{#2})%
|
|
\put(\LenToUnit{-.5mm},0){\measureLineVL{#2}}%
|
|
\put(0,\LenToUnit{\expandafter\dimexpr #2+.5mm\relax}){\measureLineHT{#1}}%
|
|
}
|
|
\newcommand*{\measuredFrameRB}{}
|
|
\def\measuredFrameRB(#1,#2){%
|
|
\unmeasuredFrame({#1},{#2})%
|
|
\put(\LenToUnit{\expandafter\dimexpr #1+.5mm\relax},0){\measureLineVR{#2}}%
|
|
\put(0,\LenToUnit{-.5mm}){\measureLineHB{#1}}%
|
|
}
|
|
\newcommand*{\measuredFrameRT}{}
|
|
\def\measuredFrameRT(#1,#2){%
|
|
\unmeasuredFrame({#1},{#2})%
|
|
\put(\LenToUnit{\expandafter\dimexpr #1+.5mm\relax},0){\measureLineVR{#2}}%
|
|
\put(0,\LenToUnit{\expandafter\dimexpr #2+.5mm\relax}){\measureLineHT{#1}}%
|
|
}
|
|
\newcommand*{\measureLineV}[1]{%
|
|
\begin{picture}(0,0)
|
|
\thinlines
|
|
\usekomafont{measure}%
|
|
\put(0,0){\vector(0,1){\LenToUnit{#1}}}%
|
|
\put(0,\LenToUnit{#1}){\vector(0,-1){\LenToUnit{#1}}}%
|
|
\end{picture}
|
|
}
|
|
\newcommand*{\measureLineVL}[1]{%
|
|
\begin{picture}(0,0)
|
|
\usekomafont{measure}%
|
|
\put(0,0){\measureLineV{#1}}%
|
|
\put(0,0){\makebox(0,\LenToUnit{#1})[r]{\ValPerUnit{#1}}}%
|
|
\end{picture}
|
|
}
|
|
\newcommand*{\measureLineVR}[1]{%
|
|
\begin{picture}(0,0)
|
|
\usekomafont{measure}%
|
|
\put(0,0){\measureLineV{#1}}%
|
|
\put(0,0){\makebox(0,\LenToUnit{#1})[l]{\ValPerUnit{#1}}}%
|
|
\end{picture}
|
|
}
|
|
\newcommand*{\ValPerUnit}[1]{%
|
|
\begingroup
|
|
\setlength{\@tempdima}{%
|
|
\dimexpr #1/(\unitlength/\unitfactor)*\p@/\unitfactor\relax
|
|
}%
|
|
\strip@pt\@tempdima
|
|
\endgroup
|
|
}
|
|
\newcommand*{\unitfactor}{1}
|
|
\newcommand*{\measureLineH}[1]{%
|
|
\begin{picture}(0,0)
|
|
\usekomafont{measure}%
|
|
\put(0,0){\vector(1,0){\LenToUnit{#1}}}%
|
|
\put(\LenToUnit{#1},0){\vector(-1,0){\LenToUnit{#1}}}%
|
|
\end{picture}
|
|
}
|
|
\newcommand*{\measureLineHB}[1]{%
|
|
\begin{picture}(0,0)
|
|
\usekomafont{measure}%
|
|
\put(0,0){\measureLineH{#1}}%
|
|
\put(0,\LenToUnit{\dimexpr -\ht\strutbox-.5mm\relax}){%
|
|
\makebox(\LenToUnit{#1},\LenToUnit{\baselineskip})[c]{\ValPerUnit{#1}}}%
|
|
\end{picture}
|
|
}
|
|
\newcommand*{\measureLineHT}[1]{%
|
|
\begin{picture}(0,0)
|
|
\usekomafont{measure}%
|
|
\put(0,0){\measureLineH{#1}}%
|
|
\put(0,0){%
|
|
\makebox(\LenToUnit{#1},\LenToUnit{\baselineskip})[c]{\ValPerUnit{#1}}}%
|
|
\end{picture}
|
|
}
|
|
\newkomafont{measure}{\normalcolor}
|
|
\newcommand*{\showISOenvelope}[1]{%
|
|
\Ifstr{#1}{C4}{%
|
|
\showenvelope(324mm,229mm)%
|
|
}{%
|
|
\Ifstr{#1}{C5}{%
|
|
\showenvelope(229mm,162mm)%
|
|
}{%
|
|
\Ifstr{#1}{C5/6}{%
|
|
\showenvelope(220mm,110mm)%
|
|
}{%
|
|
\Ifstr{#1}{DL}{%
|
|
\showenvelope(220mm,110mm)%
|
|
}{%
|
|
\Ifstr{#1}{C6/5}{%
|
|
\showenvelope(229mm,114mm)%
|
|
}{%
|
|
\Ifstr{#1}{C6}{%
|
|
\showenvelope(162mm,114mm)%
|
|
}{%
|
|
\LCOWarning{visualize}{envelope size `ISO #1' unsupported}%
|
|
}%
|
|
}%
|
|
}%
|
|
}%
|
|
}%
|
|
}%
|
|
}
|
|
\newcommand*{\showUScommercial}[1]{%
|
|
\Ifstr{#1}{9}{%
|
|
\showenvelope(8.875in,3.875in)%
|
|
}{%
|
|
\Ifstr{#1}{10}{%
|
|
\showenvelope(9.5in,4.125in)%
|
|
}{%
|
|
\LCOWarning{visualize}{envelope size `US commercial #1' unsupported}%
|
|
}%
|
|
}%
|
|
}
|
|
\newcommand*{\showUScheck}{%
|
|
\showenvelope(8.625in,3.625in)%
|
|
}
|
|
%%% From File: $Id: scrkernel-notepaper.dtx 3472 2020-03-27 11:01:45Z kohm $
|
|
%%% (run: body)
|
|
\endinput
|
|
%%
|
|
%% End of file `visualize.lco'.
|
|
|