%% itembbox.sty by tDB(CQB00260@nifty.ne.jp)

%% eepic.sty $B$H$N6&B8$K$D$$$F$O!$(B
%% nifty:FSNOTE/MES13/05080 $B!J8=(B FPIM)
%% 05080 HGF02265  Roy              screen,itembox$B$NC<$,$D$V$l$k$N$O2?8N(B?
%% $B$+$i$N%D%j!<$NCf$K$*$1$k(B $B>>ED(B $B0lO/(B $B$5$s$N$4H/8@(B
%% 05096 JAC01307  $B>>ED(B $B0lO/(B        RE:screen,itembox$B$NC<$,$D$V$l$k$N$O2?8N(B
%% 05105 JAC01307  $B>>ED(B $B0lO/(B        RE:screen,itembox$B$NC<$,$D$V$l$k$N$O2?8N(B
%% $B$r;29M$K$5$;$F$$$?$@$-$^$7$?!%$*Ni$r?=$7>e$2$^$9!%(Bm(__)m

\def\tmpname{LaTeX2e}%
\ifx\fmtname\tmpname%
\ProvidesPackage{itembbox}[2004/08/10 v 0.19]%
\RequirePackage{ascmac}
\RequirePackage{keyval}
\def\ltxoval(#1,#2){\@ifnextchar[{\ltx@oval(#1,#2)}{\ltx@oval(#1,#2)[]}}%
\def\ltx@ovhorz{\hb@xt@\@ovxx{\kern \@ovro
    \if@ovr \else \kern \@ovdx \fi
    \leaders \hrule \@height \@wholewidth \hfil
    \if@ovl \else \kern \@ovdx \fi
    \kern \@ovri}}
\def\ltx@oval(#1,#2)[#3]{\begingroup\boxmaxdepth \maxdimen
  \@ovttrue \@ovbtrue \@ovltrue \@ovrtrue
  \@tfor\reserved@a :=#3\do{\csname @ov\reserved@a false\endcsname}%
  \@ovxx
  #1\unitlength \@ovyy #2\unitlength
  \@tempdimb \ifdim \@ovyy >\@ovxx \@ovxx\else \@ovyy \fi
  \advance \@tempdimb -2\p@
  \@getcirc \@tempdimb
  \@ovro \ht\@tempboxa \@ovri \dp\@tempboxa
  \@ovdx\@ovxx \advance\@ovdx -\@tempdima \divide\@ovdx \tw@
  \@ovdy\@ovyy \advance\@ovdy -\@tempdima \divide\@ovdy \tw@
  \@circlefnt \setbox\@tempboxa
  \hbox{\if@ovr \@ovvert32\kern -\@tempdima \fi
  \if@ovl \kern \@ovxx \@ovvert01\kern -\@tempdima \kern -\@ovxx \fi
  \if@ovt \ltx@ovhorz \kern -\@ovxx \fi
  \if@ovb \raise \@ovyy \ltx@ovhorz \fi}\advance\@ovdx\@ovro
  \advance\@ovdy\@ovro \ht\@tempboxa\z@ \dp\@tempboxa\z@
  \@put{-\@ovdx}{-\@ovdy}{\box\@tempboxa}%
  \endgroup}%
\def\@hobox#1#2#3{\hbox to\@scw{\ltx@oval(#3,#3)[#1]\hfil\ltx@oval(#3,#3)[#2]}}
\else
\newdimen\@savetbaselineshift
\fi%

%%% $B6&DLJQ?t(B
%
%\newtoks\iboxstr@
\newtoks\iboxpos@
\newbox\sc@itemb@x%     ascmac.sty $B$N(B \@iboxstr $B$KAjEv$9$k!%(B
                  %     $B>-MhE*$K$O$=$A$i$K9g$o$;!$:o=|$9$k!%(B
\newbox\sc@itemb@x@
\def\EMitemboxindent{1zw}

\define@key{emIB}{indent}{\def\IBindent{#1}}%
\define@key{emIB}{sep}{\def\IBsep{#1}}%

%%
%% (1) $B3Q$N4]$$!$2<8+=P$7$D$-%\%C%/%9(B
%%
%% itembbox environment
%%
%% \begin{itembbox}[$BG[CV(B]{$B8+=P$7(B}
%%        $BG[CV$N%G%U%)%k%H$O(B r
%%


\def\itembbox{\@ifnextchar[{\@itembbox}{\@itembbox[r]}}%
\def\@itembbox[#1]#2{%
  \@savetbaselineshift\tbaselineshift\tbaselineshift\z@%
  \par\vspace{.3\baselineskip}%
  \setbox\sc@itemb@x=\hbox{#2}%                                     %
  \@itemh\ht\sc@itemb@x\advance\@itemh\dp\sc@itemb@x%               %
% \vspace{.5\@itemh}%
  \bgroup\@scw\linewidth
  \advance\@scw -20pt\iboxpos@={#1}%
  \setbox\scb@x=\hbox%
  \bgroup\begin{minipage}{\@scw}
  \tbaselineshift\@savetbaselineshift\vspace*{.5\baselineskip}%
  \parindent\EMitemboxindent}%

\def\enditembbox{\end{minipage}\egroup%
  \setbox\scscb@x=\hbox to\linewidth{%
  \hfil%
  \vbox{\offinterlineskip%
    \thicklines\setlength{\unitlength}{1pt}%
    \kern-.8pt\hrule height.8pt%
    \kern9.6pt\@hobox{tl}{tr}{20}\kern-15pt% $B>eM>Gr(B
    \box\scb@x%
    \kern.5\@itemh%   $B2<M>Gr(B
    \@hobox{bl}{br}{20}\kern-.8pt%
    \hbox to\@scw{\if l\the\iboxpos@\else\@hleader\fi%
    \ \vbox to.8pt{\vss\hbox{\box\sc@itemb@x}\vss}\ %
    \if r\the\iboxpos@\else\@hleader\fi}%
    }\hfil}%
  \dimen0=\ht\scscb@x%
  \noindent\hbox to\linewidth{%
  \hbox to.6pt{\vbox to\dimen0{\@vrf@{10pt}{.8pt}}\hss}%
  \box\scscb@x%
  \hbox to.6pt{\hss\vbox to\dimen0{\@vrf@{10pt}{.9pt}}}\hss}%
  \egroup\vspace{.5\@itemh}}
%%
%% (2) $B3Q$N4]$$>e2<8+=P$7$D$-%\%C%/%9(B
%%
%% itemtbbox environment
%%
%% \begin{itemtbbox}<$B>e8+=P$7G[CV(B>[$B2<8+=P$7G[CV(B]{$B>e8+=P$7(B}{$B2<8+=P$7(B}
%%            $B>e8+=P$7G[CV$N%G%U%)%k%H$O(B l $B!J:8!K(B
%%            $B2<8+=P$7G[CV$N%G%U%)%k%H$O(B r $B!J1&!K(B
%%
\def\itemtbbox{\@ifnextchar<{\itemtb@box}{\itemtb@box<l>}}%
\def\itemtb@box<#1>{\@ifnextchar[{\@itemtbbox<#1>}{\@itemtbbox<#1>[r]}}%
\def\@itemtbbox<#1>[#2]#3#4{%
  \@savetbaselineshift\tbaselineshift\tbaselineshift\z@%
  \par\vspace{.3\baselineskip}%
  \setbox\sc@itemb@x=\hbox{#3}%
  \iboxpos@={#2}%\iboxstr@={#4}%
  \@iboxpos={#1}%\@iboxstr={#3}%
  \setbox\sc@itemb@x@=\hbox{#4}%
  \@itemh\ht\sc@itemb@x\advance\@itemh\dp\sc@itemb@x%
  \vspace{.5\@itemh}\bgroup\@scw\linewidth
  \advance\@scw -20pt
  \setbox\scb@x=\hbox%
  \bgroup\begin{minipage}{\@scw}
  \tbaselineshift\@savetbaselineshift\vspace*{.5\@itemh}%
  \parindent\EMitemboxindent}%

\def\enditemtbbox{\end{minipage}\egroup%
  \setbox\scscb@x=\hbox to\linewidth{%
  \hfil\vbox{\offinterlineskip%
  \thicklines\setlength{\unitlength}{1pt}%
  \hbox to\@scw{%
    \if l\the\@iboxpos\else\@hleader\fi%
%   \ \vbox to.8pt{\vss\hbox{\the\@iboxstr}\vss}\ %
    \ \vbox to.8pt{\vss\hbox{\box\sc@itemb@x}\vss}\ %
    \if r\the\@iboxpos\else\@hleader\fi%
    }%
  \kern9.6pt\@hobox{tl}{tr}{20}\kern-15pt% $B>eM>Gr(B
  \box\scb@x%
  \@itemh\ht\sc@itemb@x@\advance\@itemh\dp\sc@itemb@x@%
  \kern.5\@itemh%   $B2<M>Gr(B
  \@hobox{bl}{br}{20}\kern-.8pt%
  \hbox to\@scw{\if l\the\iboxpos@\else\@hleader\fi%
% \ifx\empty\the\iboxstr@\else%
% \ \vbox to.8pt{\vss\hbox{\the\iboxstr@}\vss}\ %
% \fi%
  \ \vbox to.8pt{\vss\hbox{\box\sc@itemb@x@}\vss}\ %
  \if r\the\iboxpos@\else\@hleader\fi}%
  }\hfil}%
  \dimen0=\ht\scscb@x%
  \noindent\hbox to\linewidth{%
  \hbox to.6pt{\vbox to\dimen0{\@vrf@{10pt}{.8pt}}\hss}%
  \box\scscb@x%
  \hbox to.6pt{\hss\vbox to\dimen0{\@vrf@{10pt}{.9pt}}}\hss}%
  \egroup\vspace{.5\@itemh}}

%% -----------------------------------------------------------------------
%%
%% (3) $B3Q$N;M3Q$J>e8+=P$7$D$-%\%C%/%9(B
%%
%% itemsquarebox environment
%%
%% \begin{itemsquarebox}<key=val>[$BG[CV(B]{$B8+=P$7(B}
%%        key:
%%          indent=dimen $B%?%$%H%k$N0LCV!J(B[l], [r] $B%*%W%7%g%s$N:]!K(B
%%          sep=dimen    $B%?%$%H%k$H7S@~$H$N4V3V(B
%%        $BG[CV$N%G%U%)%k%H$O(B c $B!JCf1{!K(B
%%
\def\itemsquarebox{\def\IBindent{20pt}\def\IBsep{3.3333pt}%
  \@ifnextchar<{\itemsquarebox@}{\@itemsquarebox}}
\def\itemsquarebox@<#1>{\setkeys{emIB}{#1}\@itemsquarebox}
\def\@itemsquarebox{\@ifnextchar[{\@@itemsquarebox}{\@@itemsquarebox[c]}}
\def\@@itemsquarebox[#1]#2{%
  \@savetbaselineshift\tbaselineshift\tbaselineshift\z@
  \par\vspace{.3\baselineskip}%
  \setbox\sc@itemb@x=\hbox{#2}\@itemh\ht\sc@itemb@x
  \advance\@itemh\dp\sc@itemb@x
  \vspace{.5\@itemh}\bgroup\@scw\linewidth
  \advance\@scw-20pt\@iboxpos={#1}%
  \setbox\scb@x=\hbox\bgroup\begin{minipage}{\@scw}%
  \tbaselineshift\@savetbaselineshift% (KN:1998/02/27)
  \vspace*{.5\@itemh}%
  \parindent\EMitemboxindent}%
\def\enditemsquarebox{\end{minipage}\egroup%
  \setbox\scscb@x=\hbox to\linewidth{\hfil\vbox{\offinterlineskip%
  \thicklines\setlength{\unitlength}{1pt}%
  \hbox to\linewidth{%
    \if l\the\@iboxpos\vbox{\hrule width \IBindent height.8pt}%
    \else\@hleader\fi%   $B2#I}JQ99(B
    \hspace{\IBsep}%
    \vbox to.8pt{\vss\hbox{\box\sc@itemb@x}\vss}%
    \hspace{\IBsep}%
    \if r\the\@iboxpos\vbox{\hrule width \IBindent height.8pt}%
    \else \@hleader\fi}%
  \kern9.6\p@%            $B>eM>Gr(B
  \hbox{\kern10\p@\box\scb@x\hfil}% $BK\BN!J:8M>GrIm2C!K(B
  \kern10\p@%             $B2<M>Gr(B
  \kern-.8pt\hrule height.8pt%
  }\hfil}\dimen0=\ht\scscb@x%
  \noindent
  \hbox to\linewidth{%
  \hbox to 0.6pt{\vbox to\dimen0{\@vrf@{0pt}{.8pt}}\hss}% $B:87S@~(B
  \box\scscb@x%
  \hbox to.6pt{\hss\vbox to\dimen0{\@vrf@{0pt}{.9pt}}}% $B1&7S@~!J7S@~D9JQ99!K(B
  \hss}%
  \egroup}

%%
%% (4) $B3Q$N;M3Q$J2<8+=P$7$D$-%\%C%/%9(B
%%
%% itembsquarebox environment
%%
%% \begin{itembsquarebox}[$BG[CV(B]{$B8+=P$7(B}
%%        $BG[CV$N%G%U%)%k%H$O(B r $B!J1&!K(B

\def\itembsquarebox{\@ifnextchar[{\@itembsquarebox}{\@itembsquarebox[r]}}
\def\@itembsquarebox[#1]#2{%
\@savetbaselineshift\tbaselineshift\tbaselineshift\z@
\par\vspace{.3\baselineskip}%
\setbox\sc@itemb@x@=\hbox{#2}%
\@itemh\ht\sc@itemb@x@\advance\@itemh\dp\sc@itemb@x@%
\bgroup\@scw\linewidth%
\setlength{\@tempdima}{\@scw}%
\addtolength{\@tempdima}{-20pt}%
\@iboxpos={#1}%\@iboxstr={#2}%
\setbox\scb@x=\hbox\bgroup\begin{minipage}{\@tempdima}
\tbaselineshift\@savetbaselineshift\vspace*{.5\baselineskip}%
\parindent\EMitemboxindent}%

\def\enditembsquarebox{\end{minipage}\egroup%
\setbox\scscb@x=\hbox to\linewidth{\hfil\vbox{\offinterlineskip%
\thicklines\setlength{\unitlength}{1pt}\kern-.8pt%
\hrule height.8pt%
\vskip4.8pt
\hbox to \linewidth{\kern10pt\box\scb@x\hfil}%
\kern.5\@itemh
\kern4.8pt%
\hbox to\linewidth{\if l\the\@iboxpos\vbox{\hrule width 20pt height.8pt}\else
\@hleader\fi%
\ \vbox to.8pt{\vss\hbox{\box\sc@itemb@x@}\vss}\ \if r\the\@iboxpos%
\vbox{\hrule width 20pt height.8pt}\else\@hleader\fi}}\hfil}%
\dimen0=\ht\scscb@x%
\advance\dimen0.8pt\relax%    $B7S@~D9$ND4@0(B 2001/04/20
\noindent\hbox to\linewidth{\hbox to.6pt{\vbox to\dimen0{\@vrf@{0pt}{.8pt}}%
\hss}\box\scscb@x\hbox to.6pt{\hss\vbox to\dimen0{\@vrf@{0pt}{.9pt}}}\hss}%
\egroup\vspace{.5\@itemh}}

%%
%% (5) $B3Q$N;M3Q$J>e2<8+=P$7$D$-%\%C%/%9(B
%%
%% itemtbsquarebox environment
%%
%% \begin{itemtbsquarebox}<$B>e8+=P$7G[CV(B>[$B2<8+=P$7G[CV(B]{$B>e8+=P$7(B}{$B2<8+=P$7(B}
%%            $B>e8+=P$7G[CV$N%G%U%)%k%H$O(B l $B!J:8!K(B
%%            $B2<8+=P$7G[CV$N%G%U%)%k%H$O(B r $B!J1&!K(B

\def\itemtbsquarebox{\@ifnextchar<{\itemtb@squarebox}{\itemtb@squarebox<l>}}%
\def\itemtb@squarebox<#1>{%
\@ifnextchar[{\@itemtbsquarebox<#1>}{\@itemtbsquarebox<#1>[r]}}%
\def\@itemtbsquarebox<#1>[#2]#3#4{%
\@savetbaselineshift\tbaselineshift\tbaselineshift\z@%
\par\vspace{.3\baselineskip}%
\setbox\sc@itemb@x=\hbox{#3}%
\setbox\sc@itemb@x@=\hbox{#4}%
\@itemh\ht\sc@itemb@x\advance\@itemh\dp\sc@itemb@x%
\vspace{.5\@itemh}\bgroup\@scw\linewidth%
\@iboxpos={#1}%\@iboxstr={#3}%
\iboxpos@={#2}%\iboxstr@={#4}%
\setlength{\@tempdima}{\@scw}%
\addtolength{\@tempdima}{-20pt}%
\setbox\scb@x=\hbox\bgroup\begin{minipage}{\@tempdima}
\tbaselineshift\@savetbaselineshift\vspace*{.75\@itemh}\parindent\EMitemboxindent}%
\def\enditemtbsquarebox{\end{minipage}\egroup%
\setbox\scscb@x=\hbox to\linewidth{\hfil\vbox{\offinterlineskip%
\thicklines\setlength{\unitlength}{1pt}%
\hbox to\linewidth{\if l\the\@iboxpos\vbox{\hrule width 20pt height.8pt}%
\else\@hleader\fi%
\ \vbox to.8pt{\vss\hbox{\box\sc@itemb@x}\vss}\ \if r\the\@iboxpos%
\vbox{\hrule width 20pt height.8pt}\else\@hleader\fi}%
\@itemh\ht\sc@itemb@x@\advance\@itemh\dp\sc@itemb@x@%
\kern9.6pt%
\hbox{\kern10pt\box\scb@x}
\kern.75\@itemh
\kern4.8pt%
\hbox to\linewidth{\if l\the\iboxpos@\vbox{\hrule width 20pt height.8pt}\else
\@hleader\fi
\ \vbox to.8pt{\vss\hbox{\box\sc@itemb@x@}\vss}\ \if r\the\iboxpos@%
\vbox{\hrule width 20pt height.8pt}\else\@hleader\fi}}\hfil}%
\dimen0=\ht\scscb@x%
\noindent\hbox to\linewidth{\hbox to.6pt{\vbox to\dimen0{\@vrf@{0pt}{.8pt}}%
\hss}\box\scscb@x\hbox to.6pt{\hss\vbox to\dimen0{\@vrf@{0pt}{.9pt}}}\hss}%
\egroup\vspace{.5\@itemh}}%

%% -----------------------------------------------------------------------
%%
%% (6) $B8+=P$7$N$"$k1F$D$-%\%C%/%9(B
%%
%% itemshadebox environment
%%
%% \begin{itemshadebox}[$BG[CV(B]{$B8+=P$7(B}
%%        $BG[CV$N%G%U%)%k%H$O(B c $B!JCf1{!K(B

\newdimen\@itemw%
\newdimen\shaderule\shaderule 5pt
\def\itemshadebox{\@ifnextchar[{\@itemshadebox}{\itemshadebox[c]}}%
\def\@itemshadebox[#1]#2{%
\lineskiplimit=\z@\normallineskiplimit=\z@
\lineskip=\p@\normallineskip=\p@
\setbox\sc@itemb@x=\hbox{#2}%
\@itemh\ht\sc@itemb@x\advance\@itemh\dp\sc@itemb@x%
\@iboxpos={#1}%\@iboxstr={#2}%
\dimen0\linewidth \advance\dimen0-20pt
\advance\dimen0-2\fboxrule \advance\dimen0-\shaderule
\global\@itemw\dimen0\advance\@itemw19pt%
\vskip.5\@itemh\noindent%
\setbox\@tempboxa=\hbox\bgroup\minipage{\dimen0}\vskip\@itemh}
\def\enditemshadebox{%
\vspace{.2\baselineskip}%
\endminipage\egroup\dimen0=10pt \advance\dimen0-\fboxrule
\setbox\@tempboxa=\hbox{\kern\dimen0\unhbox\@tempboxa\kern\dimen0}%
\setbox0=\vbox{%
\hbox to \@itemw{\vspace{-1pt}\if l\the\@iboxpos\vbox{\hrule width 20pt height.8pt}%
\else\@hleader\fi%
\ \vbox to.8pt{\vss\hbox{\box\sc@itemb@x}\vss}\ \if r\the\@iboxpos%
\vbox{\hrule width 20pt height.8pt}\else\@hleader\fi}%
\hbox{\vrule \@width \fboxrule \hskip-\fboxrule
\vbox{\vskip\fboxsep \box\@tempboxa\vskip\fboxsep}%
\hskip-\fboxrule\vrule \@width \fboxrule}\hrule \@height \fboxrule}%
\dimen0=\ht0 \advance\dimen0-\shaderule
\leavevmode\hbox{\hbox to \shaderule{\copy0\hss}\kern 0pt
\vrule width\wd0 height0pt depth\shaderule\hskip-\shaderule
\vrule width\shaderule height\dimen0}}%

%% -----------------------------------------------------------------------
%%
%% squarebox
%%
%%    $BIaDL$NOH(B
%%
\def\squarebox{%
\@savetbaselineshift\tbaselineshift\tbaselineshift\z@%
\par\vspace{.3\baselineskip}%
\bgroup\@scw\linewidth%
\setlength{\@tempdima}{\@scw}%
\addtolength{\@tempdima}{-18pt}%
\setbox\scb@x=\hbox\bgroup\begin{minipage}{\@tempdima}
\tbaselineshift\@savetbaselineshift\parindent\EMitemboxindent}%
\def\endsquarebox{\end{minipage}\egroup%
\setbox\scscb@x=\hbox to\linewidth{\hfil\vbox{\offinterlineskip%
\thicklines\setlength{\unitlength}{1pt}%
\kern-.8pt\hrule height.8pt
\kern6.4pt%
\hbox to \linewidth{\kern10pt\box\scb@x\hfil}%
\kern6.4pt%
\kern-.8pt\hrule height.8pt}\hfil}\dimen0=\ht\scscb@x%
\advance\dimen0.76pt\relax%    $B7S@~D9$ND4@0(B 2001/04/20
\noindent\hbox to\linewidth{\hbox to.6pt{\vbox to\dimen0{\@vrf@{0pt}{.8pt}}%
\hss}\box\scscb@x\hbox to.6pt{\hss\vbox to\dimen0{\@vrf@{0pt}{.9pt}}}\hss}%
\egroup}%

%% -----------------------------------------------------------------------
%%
%% dblbox
%%
%%    $BFs=EOH(B
%%
\newdimen\dblboxrule\dblboxrule1.2pt%         $B30OH$NB@$5(B
\newdimen\dblboxrulein\dblboxrulein0.2pt%     $BFbOH$NB@$5(B
\newdimen\dblboxsep\dblboxsep2.5pt%           $B30OH$HFbOH$N4V3V(B
\def\@hleaderin{\leaders\hrule height \dblboxrulein depth 0pt\hfil}%
\def\dblbox{%
\@savetbaselineshift\tbaselineshift\tbaselineshift\z@%
\par\vspace{.3\baselineskip}%
\bgroup\@scw\linewidth%
\setlength{\@tempdima}{\@scw}%
\addtolength{\@tempdima}{-20pt}%
\setbox\scb@x=\hbox\bgroup\begin{minipage}{\@tempdima}
\tbaselineshift\@savetbaselineshift\parindent\EMitemboxindent}%
\def\enddblbox{\end{minipage}\egroup%
\setbox\scscb@x=\hbox to\linewidth{\hfil\vbox{\offinterlineskip%
\thicklines\setlength{\unitlength}{1pt}%
\kern-\dblboxrule\hrule height\dblboxrule\vskip\dblboxsep%
\kern-\dblboxrule%
\hbox to \linewidth{\hskip\dblboxsep\@hleaderin\hskip\dblboxsep}%
\kern6.4pt%
\hbox to \linewidth{\kern10pt\box\scb@x\hfil}%
\kern6.4pt%
\kern-\dblboxrule\hbox to \@scw{\hskip\dblboxsep\@hleaderin%
\hskip\dblboxsep}\vskip\dblboxsep%
\kern-\dblboxrule\hrule height\dblboxrule}\hfil}%
\dimen0=\ht\scscb@x%
\advance\dimen0\dblboxrule% $B7S@~D9$ND4@0(B 2001/04/20
%\advance\dimen0-.5\dblboxrulein% $B7S@~D9$ND4@0(B 2001/04/20
\advance\dimen0-.6\dblboxrulein% $B7S@~D9$ND4@0(B 2001/04/20
\noindent
\hbox to\linewidth{%
  \hbox to 0.6pt{%
    \vbox to\dimen0{\@vrf@{0pt}{.8pt}}\kern2.2pt% $B:87S@~!J7S@~D9JQ99!K(B
    \vbox to\dimen0{\@vrf@{2.4pt}{.2pt}}\hss}%  $B:8Fb7S@~!J7S@~D9JQ99!K(B
  \box\scscb@x%
  \hbox to.6pt{%
  \hss\vbox to\dimen0{\@vrf@{2.4pt}{.2pt}}\kern2.2pt%
  \vbox to\dimen0{\@vrf@{0pt}{.9pt}}}% $B1&7S@~!J7S@~D9JQ99!K(B
  \hss}%
\egroup}%

% boxnote
\def\boxnote{\par\vspace{\baselineskip}
\@savetbaselineshift\tbaselineshift\tbaselineshift\z@
\setbox\@nbox=\hbox{\@ascgrp\vrule width1.08pt depth35pt b\hss a\hss b}
\@whiledim \wd\@nbox<\hsize \do{
\setbox\@nbox=\hbox{\@ascgrp\unhbox\@nbox \hss a\hss b}}
\setbox\@nbox=\hbox to\hsize{\@ascgrp\unhbox\@nbox \hss a\hss b%
\vrule width1.08pt depth35pt}
\@bw=\wd\@nbox\advance\@bw -40pt
\begin{lrbox}{\@nbody}\begin{minipage}{\@bw}% (KN:1998/02/27)
  \tbaselineshift\@savetbaselineshift}%
\def\endboxnote{\end{minipage}\end{lrbox}%
\vbox{\parindent=0pt\offinterlineskip\copy\@nbox
\hbox to\wd\@nbox{\vrule width1.08pt\hfil\box\@nbody\hfil\vrule width1.08pt}
\hbox to\wd\@nbox{\vrule width1.08pt height15pt\hfil
\vrule width1.08pt height15pt}\hrule height1.08pt}}
%
% shadebox $B=$@5(B
%
\let\asciishadebox\shadebox
\let\endasciishadebox\endshadebox
\def\shadebox{\par\noindent\asciishadebox}%
\def\endshadebox{\endasciishadebox\par}%
%
% keytop : okumacro.sty $B$NDj5A$r(B epic, eepic $B$H$NJ;MQ$K8~$1$F=$@5(B
%
\let\asckeytop\keytop
\def\removept#1#2{%
    \edef#2{\expandafter\@removePT\the#1}}%
{\catcode`p=12 \catcode`t=12 \gdef\@removePT#1pt{#1}}%
\def\keytop#1{{\leavevmode\kern1pt
  \setbox1=\hbox{\normalfont\sffamily [}%
  \dimen1=\ht1
  \removept{\dimen1}{\tempC}%
  \setbox0=\hbox{\normalfont\sffamily #1}%
  \dp0=0pt
  \dimen0=\wd0
  \ifdim\dimen0<\ht1 \dimen0=\ht1 \fi
  \advance \dimen0 by 5pt
  \removept{\dimen0}{\tempA}%
  \divide \dimen0 by 2
  \removept{\dimen0}{\tempB}%
  \unitlength=1pt
  \advance \dimen1 by 2pt
  \hbox{\vrule height\dimen1 depth2pt width0pt}%
  \begin{picture}(\tempA,\tempC)
    \put(0,0){\line(0,1){\tempC}}
    \put(\tempA,0){\line(0,1){\tempC}}
    \put(\tempB,0){\ltxoval(\tempA,4)[b]}
    \put(\tempB,\tempC){\ltxoval(\tempA,4)[t]}
    \put(\tempB,0){\makebox(0,0)[b]{\box0}}
  \end{picture}\kern1pt}}
%
% \EMkeytop
%
\def\EMkeytop@font{\normalfont}
\def\EMkeytopfont#1{\def\EMkeytop@font{#1}}
\def\EMkeytop@cornersize{4}%
\def\EMkeytopcornersize#1{\edef\EMkeytop@cornersize{#1}}%
\def\EMkeytop#1{{\leavevmode%\kern1pt
  \setbox1=\hbox{\EMkeytop@font [}%
  \dimen1=\ht1
  \removept{\dimen1}{\temp@C}%
  \setbox0=\hbox{\EMkeytop@font #1}%
  \dimen0=\ht0\removept{\dimen0}{\temp@H}%
  \dimen0=\dp0\removept{\dimen0}{\temp@D}%
  \Add\temp@D\temp@H\temp@HD
  \dimen0=\wd0
  \ifdim\dimen0<\ht1 \dimen0=\ht1 \fi
  \advance \dimen0 by \EMkeytop@cornersize\p@
  \removept{\dimen0}{\temp@A}%
  \divide \dimen0 by 2
  \removept{\dimen0}{\temp@B}%
  \unitlength=1pt
  \advance \dimen1 by 2pt
  \Div\EMkeytop@cornersize{2}\EMkeytop@@cornersize
  \Add\temp@H{\EMkeytop@@cornersize}\temp@HH
  \Add\temp@D{\EMkeytop@@cornersize}\temp@DD
  \hbox{\vrule height\temp@HH\p@ depth\temp@DD\p@ width0pt}%
  \begin{picture}(\temp@A,\temp@C)
    \put(0,-\temp@D){\line(0,1){\temp@HD}}
    \put(\temp@A,-\temp@D){\line(0,1){\temp@HD}}
    \put(\temp@B,-\temp@D){\ltxoval(\temp@A,\EMkeytop@cornersize)[b]}
    \put(\temp@B,\temp@H){\ltxoval(\temp@A,\EMkeytop@cornersize)[t]}
    \Tyuuten{(\temp@B,\temp@H)}{(\temp@B,-\temp@D)}\temp@M
    \Put\temp@M{\makebox(0,0)[c]{\box0}}
  \end{picture}%\kern1pt%
}}
%
\endinput
%\end of itembbox.sty
%
%% $B2~HGMzNr(B
%%
%% ver.0.00   1998/04/11
%% ver.0.01   1998/08/08
%%    $B3Q$N;M3Q$J%\%C%/%9(B \item(t,b)squarebox
%%    $B1F$D$-%\%C%/%9(B     \itemshadebox
%% ver.0.01a  1998/08/25
%%    tascmac.sty $B$N2~JQ(B (1998/02/27) $B$KBP1~(B
%%    eepic $B$H$N6&B8$r2DG=$H$9$k!%(B
%% ver.0.01b  1998/10/16
%%    $B8+=P$7$K(B \footnotemark $B$r$D$1$k$HHV9f$,Ht$V8=>]$r2r>C(B
%% ver.0.01c  1998/11/29
%%    tascmac.sty $B$N2~Dj$KBP1~(B
%% ver.0.02a  1999/04/17
%   boxnote $B$r(B color.sty $B$HJ;MQ$9$k:]$NIT6q9g$N=$@5(B
%  ver.0.04   1999/07/24
%   shadebox \leavevmode -> \noindent
%  v0.05      2000/06/06
%   \usepackage{ascmac}$B$rIU2C(B
%  v0.06      2000/09/01
%  v 0.07     2001/04/10
%     itemsquarebox $B2<JU7S@~D9$rL@<($9$k!#(B
%     shadebox \hbox $B$NA0$K(B \leavevmode $BIm2C!#(B
%  v 0.08     2001/04/14
%     $B3F(B box $B4D6-Fb$N%$%s%G%s%H$r(B1zw$B$H$7$F$$$?$,!$(B
%       \itemboxindent
%     $B$G;XDj$G$-$k$h$&$K$9$k!#(B
%  v 0.09     2001/04/20
%     squrebox, dblbox $B7S@~D9$ND4@0(B
%  v 0.10     2001/09/29
%     tascmac.sty $B$K$*$1$k(B boxnote $B4D6-$N=$@5$KH<$$!$(B
%     $BEv%U%!%$%k$N%Q%C%A$OITMW$H$J$k!#(B
%  v 0.11     2001/12/26
%     tascmac.sty $B5lHG$K$bBP1~(B
%     list $B7O4D6-Fb$G$N;HMQ2DG=(B
%  v 0.12     2001/12/28
%     itemsquarebox[l] or [r] $B$K$*$1$k(B item $B$N0LCVD4@0(B
%  v 0.13     2001/12/28
%     itemsquarebox
%       <#1> $B%*%W%7%g%s$G%?%$%H%k$N0LCV!J:81&$+$i$N!K(B
%                        $B%?%$%H%k$H7S@~$H$N4V3VD4@0(B
%  v 0.14     2002/01/27
%     itemsquarebox
%       \iboxstr@ ---> \sc@itemb@x
%  v 0.15     2002/09/30
%     itemshadebox
%       \lineskip $B$J$I$r%G%U%)%k%H$KLa$9!#(B
%  v 0.16     2004/06/20
%     itemtbsquarebox : $B7S@~$NB@$5;XDj$,H4$1$F$$$kItJ,$r=$@5(B
%  v 0.17     2004/08/05
%     \keytop : okumacro $B$NDj5A$r(B epic, eepic $B$H$NJ;MQ$K8~$1$F=$@5(B
%  v 0.18     2004/08/09
%     ascmac.sty $B$N(B \keytop $B$r(B \asckeytop $B$H$7$FJ]B8(B
%  v 0.19     2004/08/10
%     \EMkeytop
