%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%% mytitle.sty   Ver. 1.2  last updated : <2000/01/17>  %%%
%%%                        by Nakano Shin'ya             %%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%                                                          %%
%% title$B$NBN:[$rJQ99$9$k!#(B                         $B!!!!!!(B   %%
%%  ($B>/$70LCV$r>e$K$:$i$9!#FC$K(Bheader$B$,$J$$$H$-$O!"(B $B!!!!!!(B  %%
%%   $B$+$J$j>e$K$:$i$9!#(B)                           $B!!!!!!(B   %%
%%                                                          %%
%%   <option>                                               %%
%%     bold:  title$B$r(Bbold$BBN$G=PNO$9$k!#(B                     %%
%%           (steps0ku$B$J$I!"Bg$-$$(Bsize$B$N(Bbold$B$N(Bfont$B$,MQ0U(B    %%
%%            $B$5$l$F$J$$$H$3$m$G$O!"8+1I$($,0-$/$J$k$N$G!"(B  %%
%%            $BCm0U$9$k!#(B)                                   %%
%%     date:   title$B$KF|IU$rE:$($k!#(B(default$B$G$OIU$+$J$$!#(B) %%
%%    (nodate: title$B$KF|IU$rIU$1$J$$!#(B)                     %%
%%                                                          %%
%%    $B0J2<$O!$(Btitle page $B$r:n$i$J$$$H$-$N$_M-8z!%(B           %%
%%     frame:  title$B$KOH$rIU$9!#(B                            %%
%%     shade:  title$B$K1F$D$-OH$rIU$9!#(B                      %%
%%             (shadetitle.sty $B$+$i0\$7$?5!G=!%(B)            %%
%%                                                          %%

\usepackage{ascmac}

%%% Option$B$N@k8@(B %%%
\newif\if@frametitle
\DeclareOption{frame}{\@frametitletrue}
\newif\if@shadetitle
\DeclareOption{shade}{\@shadetitletrue}

\newif\if@titledate
\DeclareOption{date}{\@titledatetrue}
\DeclareOption{nodate}{\@titledatefalse}

\newif\if@titlebold
\DeclareOption{bold}{\@titleboldtrue}

\ExecuteOptions{nodate}
\ProcessOptions

\if@titlebold
	\def\@titleboldornot{\bfseries}
\else
	\def\@titleboldornot{\relax}
\fi

\if@titlepage
  \renewcommand{\maketitle}{\begin{titlepage}%
  \let\footnotesize\small
  \let\footnoterule\relax
  \let\footnote\thanks
  \null\vfill
%  \null\vfil
%  \vskip 60\p@
  \begin{center}%
    {\@titleboldornot\LARGE \@title \par}%
    \vskip 5em%
    {\Large
     \lineskip .75em%
      \begin{tabular}[t]{c}%
        \@author
      \end{tabular}\par}%
			\vfill\vfill\vfill%
			\if@titledate
%  	    \vskip 1.5em%
	    	{\normalsize \@date \par}%
%	  	  {\large \@date \par}%       % Set date in \large size.
			\fi
%	 \vbox to10cm{ }
  \end{center}\par
  \@thanks\vfill\vfill\null
%  \@thanks\vfil\null
  \end{titlepage}%
  \setcounter{footnote}{0}%
  \global\let\thanks\relax
  \global\let\maketitle\relax
  \global\let\p@thanks\relax
  \global\let\@thanks\@empty
  \global\let\@author\@empty
  \global\let\@date\@empty
  \global\let\@title\@empty
  \global\let\title\relax
  \global\let\author\relax
  \global\let\date\relax
  \global\let\and\relax
  }%
\else
  \renewcommand{\maketitle}{\par
  \begingroup
    \renewcommand{\thefootnote}{\fnsymbol{footnote}}%
    \def\@makefnmark{\hbox{\ifydir $\m@th^{\@thefnmark}$
      \else\hbox{\yoko$\m@th^{\@thefnmark}$}\fi}}%
     \long\def\@makefntext##1{\parindent 1em\noindent
       \hbox to1.8em{\hss$\m@th^{\@thefnmark}$}##1}%
    \if@twocolumn
      \ifnum \col@number=\@ne \@maketitle
      \else \twocolumn[\@maketitle]%
      \fi
    \else
      \newpage
      \global\@topnum\z@   % Prevents figures from going at top of page.
      \@maketitle
    \fi
		\thispagestyle{jpl@in}\@thanks
  \endgroup
  \setcounter{footnote}{0}%
  \global\let\thanks\relax
  \global\let\maketitle\relax
  \global\let\p@thanks\relax
  \global\let\@thanks\@empty
  \global\let\@author\@empty
  \global\let\@date\@empty
  \global\let\@title\@empty
  \global\let\title\relax
  \global\let\author\relax
  \global\let\date\relax
  \global\let\and\relax
  }
  \def\@maketitle{%
  \newpage\null
%
%% header$B$,$"$k$+$J$$$+(B(header$B$,$J$1$l$P(Btitle$B$N0LCV$r>e$2$k(B)
	\ifx\ps@jpl@in\ps@plain
		\vspace{-21mm}
%		\vspace{-7em}
	\else
		\ifx\ps@jpl@in\ps@empty
		  \vspace{-21mm}
%			\vspace{-7em}
		\else
			\vspace{-6mm}
%			\vspace{-2em}
		\fi
	\fi
%
%% frame$B$r$D$1$k$+H]$+(B
	\if@frametitle %% plain frame$B$r$D$1$k>l9g(B
		\noindent\hspace{-.5zw}\framebox{
	\else %% $B1F$D$-(Bframe$B$r$D$1$k>l9g(B
		\if@shadetitle
		\begin{shadebox}
		\fi
	\fi
	\parbox{\textwidth}{%
  	\begin{center}%
  	\let\footnote\thanks
    	{\@titleboldornot\LARGE \@title \par}%
    	\vskip 1.5em%
   	{\large
     	 \lineskip .5em%
      	\begin{tabular}[t]{c}%
        	\@author
      	\end{tabular}\par}%
		\if@titledate
    	\vskip .7em%
    	{\normalsize \@date}%
%    	{\large \@date}%
		\fi
  	\end{center}%
%% (Again) frame$B$r$D$1$k$+H]$+(B
	}%
	\if@frametitle
		}%
		\par\vskip 4em
	\else
		\if@shadetitle
			\end{shadebox}
			\par\vskip 4em
		\else
		  \par\vskip 2.5em
		\fi
	\fi
	}
%  \par\vskip 1.5em}
\fi

\endinput
