latex-style-esdpx/xespdsect.sty

% Copyright 2006 Konstantin Korikov <lostclus@ua.fm>
%
% This work may be distributed and/or modified under the
% conditions of the LaTeX Project Public License, either version 1.3
% of this license or (at your option) any later version.
% The latest version of this license is in
%   http://www.latex-project.org/lppl.txt
% and version 1.3 or later is part of all distributions of LaTeX
% version 2003/12/01 or later.
%
% This work has the LPPL maintenance status "maintained".
% 
% This Current Maintainer of this work is Konstantin Korikov.
%
% This work consists of all files listed in manifest.txt.
%

%
% This is automaticaly generated file, do not edit it.
%

\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{xespdsect}[2020/03/20 v1.00 Sectioning]

\newcommand{\XESPD@point@style}{single}

\DeclareOption{pointsingle}{\renewcommand{\XESPD@point@style}{single}}
\DeclareOption{pointsection}{\renewcommand{\XESPD@point@style}{section}}
\DeclareOption{pointsubsection}{\renewcommand{\XESPD@point@style}{subsection}}

\ProcessOptions\relax

\def\@startsection#1#2#3#4#5#6{%
  \if@noskipsec \leavevmode \fi
  \par
  \@tempskipa #4\relax
  \@afterindenttrue
  \ifdim \@tempskipa <\z@
    \@tempskipa -\@tempskipa \@afterindentfalse
  \fi
  \if@nobreak
    \everypar{}%
    \divide \@tempskipa by 2
    \vskip -\@tempskipa
    \vskip\z@skip
  \else
    \addpenalty\@secpenalty\addvspace\@tempskipa
  \fi
  \@ifstar
    {\@ssect{#3}{#4}{#5}{#6}}%
    {\@dblarg{\@sect{#1}{#2}{#3}{#4}{#5}{#6}}}}

\newcommand{\XESPDsectAlignLeft}{%
  \let\\\@centercr\@rightskip\@flushglue \rightskip\@rightskip%
  \leftskip\z@skip}
\newcommand{\XESPDsectAlignRight}{%
  \let\\\@centercr\rightskip\z@skip\leftskip\@flushglue
  \parindent\z@\parfillskip\z@skip}
\newcommand{\XESPDsectAlignCenter}{%
  \let\\\@centercr
  \rightskip\@flushglue\leftskip\@flushglue
  \parindent\z@\parfillskip\z@skip}

\newcommand{\XESPDsectionAlign}{\XESPDsectAlignLeft}
\newcommand{\XESPDsubsectionAlign}{\XESPDsectAlignLeft}
\newcommand{\XESPDsubsubsectionAlign}{\XESPDsectAlignLeft}

\newcommand{\XESPDsectAlign}[2]{%
  \expandafter\renewcommand\csname\string XESPD#1Align\endcsname{%
  \@nameuse{XESPDsectAlign#2}}}

\newcommand{\XESPDsectionStyle}{\normalfont\Large\bfseries\MakeUppercase}
\newcommand{\XESPDsubsectionStyle}{\normalfont\large\bfseries}
\newcommand{\XESPDsubsubsectionStyle}{\normalfont\normalsize\bfseries}

\newcommand{\XESPDsectStyle}[2]{%
  \expandafter\renewcommand\csname\string XESPD#1Style\endcsname{#2}}

\newlength{\XESPDsectionSkipBefore}
\newlength{\XESPDsectionSkipAfter}
\setlength{\XESPDsectionSkipBefore}{-15mm \@plus -3mm \@minus -2mm}
\setlength{\XESPDsectionSkipAfter}{15mm \@plus 1mm \@minus 2mm}
\newlength{\XESPDsubsectionSkipBefore}
\newlength{\XESPDsubsectionSkipAfter}
\setlength{\XESPDsubsectionSkipBefore}{-15mm \@plus -3mm \@minus -2mm}
\setlength{\XESPDsubsectionSkipAfter}{15mm \@plus 1mm \@minus 2mm}
\newlength{\XESPDsubsubsectionSkipBefore}
\newlength{\XESPDsubsubsectionSkipAfter}
\setlength{\XESPDsubsubsectionSkipBefore}{-15mm \@plus -3mm \@minus -2mm}
\setlength{\XESPDsubsubsectionSkipAfter}{15mm \@plus 1mm \@minus 2mm}

\providecommand{\plus}{\@plus}
\providecommand{\minus}{\@minus}

\newcommand{\XESPDsectSkip}[3]{%
  \expandafter\setlength\csname\string XESPD#1SkipBefore\endcsname{#2}%
  \expandafter\setlength\csname\string XESPD#1SkipAfter\endcsname{#3}}

\renewcommand\section{\@startsection {section}{1}{\parindent}%
                                   {\XESPDsectionSkipBefore}%
                                   {\XESPDsectionSkipAfter}%
                                   {\XESPDsectionAlign\XESPDsectionStyle}}
\renewcommand\subsection{\@startsection{subsection}{2}{\parindent}%
                                     {\XESPDsubsectionSkipBefore}%
                                     {\XESPDsubsectionSkipAfter}%
                                     {\XESPDsubsectionAlign\XESPDsubsectionStyle}}
\renewcommand\subsubsection{\@startsection{subsubsection}{3}{\parindent}%
                                     {\XESPDsubsubsectionSkipBefore}%
                                     {\XESPDsubsubsectionSkipAfter}%
                                     {\XESPDsubsubsectionAlign\XESPDsubsubsectionStyle}}

\renewcommand{\thesection}{\arabic{section}}
\renewcommand{\thesubsection}{\thesection.\arabic{subsection}}
\renewcommand{\thesubsubsection}{\thesubsection.\arabic{subsubsection}}
\newif\ifXESPD@point@style@single
\XESPD@point@style@singlefalse

\newcommand{\XESPD@point@style@single}{
  \newcounter{point}
  \renewcommand{\thepoint}{\arabic{point}}
  \newcommand{\theHpoint}{\arabic{point}}
  \XESPD@point@style@singletrue}

\newcommand{\XESPD@point@style@section}{
  \newcounter{point}[section]
  \renewcommand{\thepoint}{\thesection.\arabic{point}}
  \newcommand{\theHpoint}{\theHsection.\arabic{point}}}

\newcommand{\XESPD@point@style@subsection}{
  \newcounter{point}[subsection]
  \renewcommand{\thepoint}{\thesubsection.\arabic{point}}
  \newcommand{\theHpoint}{\theHsubsection.\arabic{point}}}

\@nameuse{XESPD@point@style@\XESPD@point@style}
\newcounter{subpoint}[point]
\newcounter{subsubpoint}[subpoint]
\renewcommand{\thesubpoint}{\thepoint.\arabic{subpoint}}
\newcommand{\theHsubpoint}{\theHpoint.\arabic{subpoint}}
\renewcommand{\thesubsubpoint}{\thesubpoint.\arabic{subsubpoint}}
\newcommand{\theHsubsubpoint}{\theHsubpoint.\arabic{subsubpoint}}

\newcommand{\point}{%
  \par\refstepcounter{point}\thepoint\quad}
\newcommand{\subpoint}{%
  \par\refstepcounter{subpoint}\thesubpoint\quad}
\newcommand{\subsubpoint}{%
  \par\refstepcounter{subsubpoint}\thesubsubpoint\quad}

\newcounter{appendix}
\renewcommand{\theappendix}{\Asbuk{appendix}}
\newlength{\XESPDappendixSkip}
\setlength{\XESPDappendixSkip}{15mm \@plus 3mm \@minus 10mm}

\newcommand{\XESPDappendix}[2]{%
  \XESPDclearDoublePage%
  \refstepcounter{appendix}%
  \setcounter{point}{0}%
  \ifXESPD@point@style@single%
    \renewcommand{\thepoint}{\theappendix.\arabic{point}}%
  \fi
  \setcounter{section}{0}%
  \renewcommand{\thesection}{\theappendix.\arabic{section}}%
  \setcounter{equation}{0}%
  \renewcommand{\theequation}{\theappendix.\arabic{equation}}%
  \setcounter{figure}{0}%
  \renewcommand{\thefigure}{\theappendix.\arabic{figure}}%
  \setcounter{table}{0}%
  \renewcommand{\thetable}{\theappendix.\arabic{table}}%
  \addcontentsline{toc}{section}{\appendixname\ \theappendix\ #2}%
  \begin{list}{}{%
    \setlength{\itemindent}{0mm}%
    \setlength{\labelwidth}{0mm}%
    \setlength{\labelsep}{0mm}%
    \setlength{\leftmargin}{0mm}%
    \setlength{\topsep}{0mm}%
    \setlength{\parskip}{0mm}%
    \setlength{\partopsep}{0mm}%
    \setlength{\itemsep}{0mm}%
    \setlength{\parsep}{0mm}}
    \item\centering\appendixname\ \theappendix
    \ifx#1\@empty\else\\(#1)\fi\\
    \item\centering\bf #2
  \end{list}%
  \par\nobreak\addvspace{\XESPDappendixSkip}}

\renewcommand\tableofcontents{%
  \begingroup
  \XESPDsectAlign{section}{Center}
  \section*{\contentsname
    \@mkboth{%
      \MakeUppercase\contentsname}{\MakeUppercase\contentsname}}%
  \endgroup
  \@starttoc{toc}}