%%% 水平移動量の計算
\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@}
%%% 各ページスタイルの再定義
\def\ps@plain{%
  \let\@mkboth\@gobbletwo
  \let\@oddfoot\@empty
  \let\@evenfoot\@empty
  \def\@evenhead{\@put@totalpage\hss
    \hbox to \fullwidth{\textbf{\thepage}\hfil}}%
  \def\@oddhead{\@put@totalpage%
    \hbox to \fullwidth{\hfil\textbf{\thepage}}\hss}}
\def\ps@headings{%
  \let\@oddfoot\@empty
  \let\@evenfoot\@empty
  \def\@evenhead{\@put@totalpage\hss
    \underline{\hbox to \fullwidth{\autoxspacing
        \textbf{\thepage}\hfil\leftmark}}}%
  \def\@oddhead{\@put@totalpage\underline{\hbox to \fullwidth{\autoxspacing
        {\rightmark}\hfil\textbf{\thepage}}}\hss}%
  \let\@mkboth\markboth
  \def\chaptermark##1{\markboth{%
    \ifnum \c@secnumdepth >\m@ne
      \if@mainmatter
        \@chapapp\thechapter\@chappos\hskip1zw
      \fi
    \fi
    ##1}{}}%
  \def\sectionmark##1{\markright{%
    \ifnum \c@secnumdepth >\z@ \thesection \hskip1zw\fi
    ##1}}}%
\def\ps@myheadings{%
  \let\@oddfoot\@empty\let\@evenfoot\@empty
  \def\@evenhead{\@put@totalpage\thepage\hfil\leftmark}%
  \def\@oddhead{{\@put@totalpage\rightmark}\hfil\thepage}%
  \let\@mkboth\@gobbletwo
  \let\chaptermark\@gobble
  \let\sectionmark\@gobble
}
\def\ps@empty{%
  \let\@mkboth\@gobbletwo
  \def\@oddhead{\@put@totalpage\hfil}%
  \let\@oddfoot\@empty
  \def\@evenhead{\@put@totalpage\hfil}%
  \let\@evenfoot\@empty}
\pagestyle{headings}
\makeatother