source/eskdtitlebase.sty.in

   1 % Copyright 2006 Konstantin Korikov <lostclus@ua.fm>
   2 %
   3 % This work may be distributed and/or modified under the
   4 % conditions of the LaTeX Project Public License, either version 1.3
   5 % of this license or (at your option) any later version.
   6 % The latest version of this license is in
   7 %   http://www.latex-project.org/lppl.txt
   8 % and version 1.3 or later is part of all distributions of LaTeX
   9 % version 2003/12/01 or later.
  10 %
  11 % This work has the LPPL maintenance status "maintained".
  12 %
  13 % This Current Maintainer of this work is Konstantin Korikov.
  14 %
  15 % This work consists of all files listed in manifest.txt.
  16 %
  17 m4_ESKDX_INIT
  18 m4_FILE_INIT
  19 \NeedsTeXFormat{LaTeX2e}
  20 \ProvidesPackage{eskdtitlebase}[m4_dnl
  21 m4_FILE_ID([[$Date::            $]]) Base Title Commands]
  22
  23 m4_dnl ÄÏÌÖÎÏÓÔØ É ÆÁÍÉÌÉÑ ÕÔ×ÅÒÖÄÁÀÝÅÇÏ
  24 \newcommand{\ESKDtitleApprovedBy}[2]{%
  25   \@namedef{ESKD@title@approved@post@1}{#1}
  26   \@namedef{ESKD@title@approved@name@1}{#2}}
  27
  28 \newcount\ESKD@title@agreed@cnt
  29 \newcount\ESKD@title@designed@cnt
  30 \ESKD@title@agreed@cnt = 0
  31 \ESKD@title@designed@cnt = 0
  32
  33 m4_dnl ÄÏÂÁ×ÌÑÅÔ ÓÏÇÌÁÓÏ×Á×ÛÅÇÏ × ÓÐÉÓÏË ÓÏÇÌÁÓÏ×Á×ÛÉÈ
  34 \newcommand{\ESKDtitleAgreedBy}[2]{%
  35   \advance \ESKD@title@agreed@cnt 1
  36   \@namedef{ESKD@title@agreed@post@\number\ESKD@title@agreed@cnt}{#1}
  37   \@namedef{ESKD@title@agreed@name@\number\ESKD@title@agreed@cnt}{#2}}
  38
  39 m4_dnl ÄÏÂÁ×ÌÑÅÔ Á×ÔÏÒÁ × ÓÐÉÓÏË Á×ÔÏÒÏ×
  40 \newcommand{\ESKDtitleDesignedBy}[2]{%
  41   \advance \ESKD@title@designed@cnt 1
  42   \@namedef{ESKD@title@designed@post@\number\ESKD@title@designed@cnt}{#1}
  43   \@namedef{ESKD@title@designed@name@\number\ESKD@title@designed@cnt}{#2}}
  44
  45 \let\ESKD@title@approving@sheet\@undefinded
  46 m4_dnl × ÎÁÌÉÞÉÉ ÌÉÓÔ ÕÔ×ÅÒÖÄÅÎÉÑ
  47 \newcommand{\ESKDtitleApprovingSheet}[1]{%
  48   \def\ESKD@title@approving@sheet{#1}}
  49
  50 m4_dnl ÐÅÞÁÔÁÅÔ ÇÒÉÆ ÓÏÇÌÁÓÏ×ÁÎÉÑ/ÕÔ×ÅÒÖÄÅÎÉÑ
  51 \newcommand{\ESKDtitleMakeStamp}[2]{#1\\\rule{2cm}{.1mm}\ #2\\
  52 ``\rule{.8cm}{.1mm}'' \rule{2.3cm}{.1mm}\ \rule{1.5cm}{.1mm}}
  53
  54 \newcommand{\ESKD@title@make@stamp}[2]{%
  55   \ESKDtitleMakeStamp{%
  56     \@nameuse{ESKD@title@#1@post@#2}}{%
  57     \@nameuse{ESKD@title@#1@name@#2}}}
  58
  59 m4_dnl ÐÏÌÑ ÔÉÔÕÌØÎÏÇÏ ÌÉÓÔÁ
  60 \newcommand{\ESKDtheTitleFieldI}{}
  61 \newcommand{\ESKDtheTitleFieldII}{}
  62 \newcommand{\ESKDtheTitleFieldIII}{}
  63 \newcommand{\ESKDtheTitleFieldIV}{}
  64 \newcommand{\ESKDtheTitleFieldV}{}
  65 \newcommand{\ESKDtheTitleFieldVI}{}
  66 \newcommand{\ESKDtheTitleFieldVII}{}
  67 \newcommand{\ESKDtheTitleFieldVIII}{}
  68 \newcommand{\ESKDtheTitleFieldIX}{}
  69 \newcommand{\ESKDtheTitleFieldX}{}
  70 \newcommand{\ESKDtitleFontI}{}
  71 \newcommand{\ESKDtitleFontII}{}
  72 \newcommand{\ESKDtitleFontIII}{}
  73 \newcommand{\ESKDtitleFontIV}{}
  74 \newcommand{\ESKDtitleFontV}{}
  75 \newcommand{\ESKDtitleFontVI}{}
  76 \newcommand{\ESKDtitleFontVII}{}
  77 \newcommand{\ESKDtitleFontVIII}{}
  78 \newcommand{\ESKDtitleFontIX}{}
  79 \newcommand{\ESKDtitleFontX}{}
  80
  81 \def\ESKD@title@after@page{%
  82   \ESKDclearDoublePage
  83   \ESKDstyle{\ESKD@default@style@other}
  84   \ESKDthisStyle{\ESKD@default@style@first}}
  85
  86 m4_dnl ÂÁÚÏ×ÙÊ ÛÁÂÌÏÎ ÄÌÑ ÌÀÂÏÇÏ ÔÉÔÕÌØÎÏÇÏ ÌÉÓÔÁ
  87 \newenvironment{ESKDtitlePage}{%
  88   \begin{ESKDpadding}{5mm}{5mm}
  89   \ESKDstyle{\ESKD@default@style@title}}{%
  90   \end{ESKDpadding}
  91   \aftergroup\ESKD@title@after@page}
  92
  93 m4_dnl vim:ft=tex:sw=2:ai