\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{xespdframe}[2019/05/09 v0.98 Frame Page Style]

\RequirePackage{xespdstamp}
\RequirePackage{calc}
\RequirePackage{setspace}

\def\XESPD@frame@vt{%
  \setlength{\XESPD@tmpdimc}{%
    \XESPDframeY+\XESPDframeH-\XESPD@padding@v}}

\def\XESPD@frame@vb{%
  \setlength{\XESPD@tmpdimc}{%
    \XESPDframeY+\XESPD@padding@v-15mm}}

\def\XESPD@frame@hl{%
  \ifXESPD@twoside
    \ifodd\c@page\raggedright\else\raggedleft\fi
  \else\raggedright\fi}

\def\XESPD@frame@hr{%
  \ifXESPD@twoside
    \ifodd\c@page\raggedleft\else\raggedright\fi
  \else\raggedleft\fi}

\def\XESPD@frame@hc{\centering}

\let\XESPD@frame@ha\XESPD@frame@hc
\let\XESPD@frame@va\XESPD@frame@vb

\DeclareOption{numbertop}{\let\XESPD@frame@va\XESPD@frame@vt}
\DeclareOption{numberbottom}{\let\XESPD@frame@va\XESPD@frame@vb}
\DeclareOption{numberleft}{\let\XESPD@frame@ha\XESPD@frame@hl}
\DeclareOption{numbercenter}{\let\XESPD@frame@ha\XESPD@frame@hc}
\DeclareOption{numberright}{\let\XESPD@frame@ha\XESPD@frame@hr}

\ProcessOptions\relax

% Колонтитул
\newcommand{\XESPDdrawFramePageNumber}{
  \setlength{\XESPD@tmpdima}{\XESPDframeX+\XESPD@padding@h}
  \setlength{\XESPD@tmpdimb}{\XESPDframeW-2\XESPD@padding@h}
  \XESPD@frame@va
  \put(\XESPDltu{\XESPD@tmpdima},\XESPDltu{\XESPD@tmpdimc}){%
    \parbox[b][25mm][c]{\XESPD@tmpdimb}{%
      \begin{singlespace}
      \reset@font\normalsize
      \XESPD@frame@ha\thepage \\ \MakeUppercase\XESPDtheSignature
      \end{singlespace}}}}

\XESPDnewStyle{frame}{0mm}
\XESPDputOnStyle{frame}{pagenumber}{\XESPDdrawFramePageNumber}
\renewcommand{\XESPDdrawFrame}{}

\XESPDdefaultTitleStyle{title}
\XESPDdefaultFirstStyle{frame}
\XESPDdefaultStyle{frame}