%%% 水平移動量の計算
\setbox\z@\hbox{\hskip5mm\@bannerfont\the\@bannertoken}
\dimen@\wd\z@ \advance\dimen@5mm
\edef\@put@totalpage@hshift{\the\dimen@}
\def\@put@totalpage{%
   \rlap{%
      \vbox to\z@{\vss
         \hbox to\z@{%
            \dimen@\@saved@oddsidemargin
            \if@twoside \ifodd\c@page\else
               \dimen@\@saved@evensidemargin
            \fi\fi
            \hskip-\dimen@
            \hbox to\paperwidth{%%% (*)表示変更の際この付近を変更
               \hskip\@put@totalpage@hshift
               \normalfont\ttfamily\#\number\@totalpage
               \hfil}%
            \hss}%
         %%% 垂直移動量の計算
         \dimen@\headheight
         \advance\dimen@\topmargin \advance\dimen@ 1in
         \advance\dimen@ 3mm \advance\dimen@4\p@
         \vskip\dimen@}}}
%%% 総ページ数を取得するための細工
\newcount\@totalpage
\let\@primitive@shipout\shipout
\def\shipout{%
   \global\advance\@totalpage\@ne
   \@primitive@shipout}
%%% 左右の余白量の保存
\dimen@\oddsidemargin \advance\dimen@ 1in
\edef\@saved@oddsidemargin{\the\dimen@}
\dimen@\evensidemargin \advance\dimen@ 1in
\edef\@saved@evensidemargin{\the\dimen@}