From: den@atr-la.atr.co.jp (Yasuharu Den)
Newsgroups: fj.comp.texhax
Subject: Re: Oval enclosing a word?
Date: 24 Jul 92 02:29:32 GMT
	<4433@hoffman.cc.sophia.ac.jp>
	<KOJIMA.92Jul21213920@srd.ull.rdc.toshiba.co.jp>
	<5404@atr-la.atr.co.jp> <TSATO.92Jul23192201@ibuki.kuee.kyoto-u.ac.jp>
Distribution: fj
Organization: ATR Interpreting Telephony Research Labs., Japan
In-reply-to: tsato@ibuki.kuee.kyoto-u.ac.jp's message of 23 Jul 92 10:22:01 GMT


$@EA!w#A#T#R!?5~Bg$G$9!%(J

In article <TSATO.92Jul23192201@ibuki.kuee.kyoto-u.ac.jp> tsato@ibuki.kuee.kyoto-u.ac.jp (Toru Sato) writes:

>  $@$"$H!"$[$H$s$I5s$2B-<h$j$N$h$&$J%3%a%s%H$G(J$@$9$,!J$*$@$F$F$*$$$F(J
>  $@:G8e$K$1$A$r$D$1$k$J$I$H$O!"$^$9$^$9$*$?$/(J:-p$@!K!"(J\unitlength $@$r(J 1pt
>  $@0J30$K(J$@@_Dj$7$?>uBV$G(J \dbox $@$d(J \obox $@$r;H$&$H$*$+$7$J$3$H$K$J$j$^$;$s$+!#(J
> $@!J;d$O$?$$$F$$(J \unitlength=1mm $@$H(J$@$7$F$$$k$b$N$G5$$K$J$j$^$7$?!K!#(J
>  $@$b$H$NCM$r$I$3$+$K%;!<%V$7$F$*$$$FCf$G(J\unitelength=1pt $@$K$9$k$[$&(J$@$,(J
>  $@?F@Z$+$H;W$$$^$9!J<:Ni$7$^$7$?(J _o_ $@!K!#(J

$@8f;XE&$"$j$,$H$&$4$6$$$^$9!%;d$NITCm0U$G$7$?!%(J
$@D{@5HG$r(J$@Ej9FCW$7$^$9!%(J

$@$A$J$_$K!$(J\@RemoveDim $@$O0k:j=(<y!w#N#T#T$5$s$N(J ecltree.sty 
$@$NCf$G$O$8$a$F$*L\$K$+$+$j(J$@!$$:$$$V$s$H46F0$7$^$7$?!%(J
$@$5$9$,$O0k:j$5$s!$AjEv$*$?$C$-!<(J :-)
$@;d$J$s$>$O$^$@$^$@$+$o$$$$$b$s$G$9!%(J

$@$H$$$&$3$H$G!$:4F#$5$s!$:#G/$NJk$l$O$h$m$7$/(J ($@:G8e$OFbNX%M%?(J)$@!%(J


  $@5~ETBg3XBg3X1!(J $@9)3X8&5f2J(J $@EE5$9)(J$@3XBhFs@l96(J $@D9Hx8&5f<<(J $@#D#3(J
          $@#A#T#R<+F0K]LuEEOC8&5f=j(J $@8@8l=hM}8&5f<<(J $@BZ:_8&5f0w(J

                                                     $@EA(J $@9/@2(J
                               den@forest.kuee.kyoto-u.ac.jp
                                        den@atr-la.atr.co.jp

-----
% miscbox.sty by Yasuharu Den (23 Jul 1992)
%                             (24 Jul 1992)

% \dbox{DashDimen}{Text}
% \dashbox{DashDimen}[Wdth][Pos]{Text}
% \dashbox{DashDimen}(XDimen,YDimen)[Pos]{Text}
%
\let\@iDashpicbox\dashbox

\def\dashbox#1{%
  \@ifnextchar({\@Dashpicbox{#1}}%
               {\@ifnextchar[{\@Dashbox{#1}}{\dbox{#1}}}%
}

\long\def\dbox#1#2{%
  \leavevmode
  \setbox\@tempboxa\hbox{#2}%
  \@tempdima\fboxrule
  \advance\@tempdima\fboxsep \advance\@tempdima\dp\@tempboxa
  \setbox\@tempboxa\hbox{%
    \hskip\fboxsep
    \vbox{\vskip\fboxsep \box\@tempboxa\vskip\fboxsep}%
    \hskip\fboxsep
  }%
  \@tempdimb\wd\@tempboxa
  \edef\X@Dashbox{\expandafter\@RemoveDim\the\@tempdimb}%
  \@tempdimb\ht\@tempboxa \advance\@tempdimb\dp\@tempboxa
  \edef\Y@Dashbox{\expandafter\@RemoveDim\the\@tempdimb}%
  \@tempdimb#1\unitlength
  \edef\Dash@Dashbox{\expandafter\@RemoveDim\the\@tempdimb}%
  \hbox{\lower \@tempdima\hbox{\unitlength1pt
    \@Dashpicbox{\Dash@Dashbox}(\X@Dashbox,\Y@Dashbox){\box\@tempboxa}%
  }}%
}

\def\@Dashbox#1[#2]{%
  \@ifnextchar[{\@iDashbox#1[#2]}{\@iDashbox#1[#2][x]}%
}

\long\def\@iDashbox#1[#2][#3]#4{%
  \leavevmode
  \savebox\@tempboxa[#2][#3]{\hbox{\kern\fboxsep #4\kern\fboxsep}}%
  \@tempdima\fboxrule
  \advance\@tempdima\fboxsep \advance\@tempdima\dp\@tempboxa
  \setbox\@tempboxa\hbox{%
    \hskip-\fboxrule
    \vbox{\vskip\fboxsep \box\@tempboxa\vskip\fboxsep}%
    \hskip-\fboxrule
  }%
  \@tempdimb\wd\@tempboxa
  \edef\X@Dashbox{\expandafter\@RemoveDim\the\@tempdimb}%
  \@tempdimb\ht\@tempboxa \advance\@tempdimb\dp\@tempboxa
  \edef\Y@Dashbox{\expandafter\@RemoveDim\the\@tempdimb}%
  \@tempdimb#1\unitlength
  \edef\Dash@Dashbox{\expandafter\@RemoveDim\the\@tempdimb}%
  \hbox{\lower \@tempdima\hbox{\unitlength1pt
    \@Dashpicbox{\Dash@Dashbox}(\X@Dashbox,\Y@Dashbox){\box\@tempboxa}%
  }}%
}

\def\@Dashpicbox#1(#2,#3){%
  \@ifnextchar[{\@iDashpicbox{#1}(#2,#3)}%
               {\@iDashpicbox{#1}(#2,#3)[]}%
}

% \obox{Text}
% \ovalbox[Wdth][Pos]{Text}
% \ovalbox(XDimen,YDimen)[Pos]{Text}
%
\def\ovalbox{%
  \@ifnextchar({\@Ovalpicbox}%
               {\@ifnextchar[{\@Ovalbox}{\obox}}%
}

\long\def\obox#1{%
  \leavevmode
  \setbox\@tempboxa\hbox{#1}%
  \@tempdima\fboxrule
  \advance\@tempdima\fboxsep \advance\@tempdima\dp\@tempboxa
  \setbox\@tempboxa\hbox{%
    \hskip\fboxsep
    \vbox{\vskip\fboxsep \box\@tempboxa\vskip\fboxsep}%
    \hskip\fboxsep
  }%
  \@tempdimb\wd\@tempboxa
  \edef\X@Ovalbox{\expandafter\@RemoveDim\the\@tempdimb}%
  \@tempdimb\ht\@tempboxa \advance\@tempdimb\dp\@tempboxa
  \edef\Y@Ovalbox{\expandafter\@RemoveDim\the\@tempdimb}%
  \hbox{\lower \@tempdima\hbox{\unitlength1pt
    \@Ovalpicbox(\X@Ovalbox,\Y@Ovalbox){\box\@tempboxa}%
  }}%
}

\def\@Ovalbox[#1]{%
  \@ifnextchar[{\@iOvalbox[#1]}{\@iOvalbox[#1][x]}%
}

\long\def\@iOvalbox[#1][#2]#3{%
  \leavevmode
  \savebox\@tempboxa[#1][#2]{\hbox{\kern\fboxsep #3\kern\fboxsep}}%
  \@tempdima\fboxrule
  \advance\@tempdima\fboxsep \advance\@tempdima\dp\@tempboxa
  \setbox\@tempboxa\hbox{%
    \hskip-\fboxrule
    \vbox{\vskip\fboxsep \box\@tempboxa\vskip\fboxsep}%
    \hskip-\fboxrule
  }%
  \@tempdimb\wd\@tempboxa
  \edef\X@Ovalbox{\expandafter\@RemoveDim\the\@tempdimb}%
  \@tempdimb\ht\@tempboxa \advance\@tempdimb\dp\@tempboxa
  \edef\Y@Ovalbox{\expandafter\@RemoveDim\the\@tempdimb}%
  \hbox{\lower \@tempdima\hbox{\unitlength1pt
    \@Ovalpicbox(\X@Ovalbox,\Y@Ovalbox){\box\@tempboxa}%
  }}%
}

\def\@Ovalpicbox(#1,#2){%
  \@ifnextchar[{\@iOvalpicbox(#1,#2)}%
               {\@iOvalpicbox(#1,#2)[]}%
}

\def\@iOvalpicbox(#1,#2)[#3]#4{%
  \leavevmode
  \hbox{%
    \hskip -\@wholewidth
    \vbox{%
      \vskip -\@wholewidth
      \hbox{%
        \@imakepicbox(#1,#2)[#3]{#4}%
        \@tempdima#1\unitlength \@tempdimb#2\unitlength
        \hskip -\@tempdima
        \raise .5\@tempdimb\hbox{%
          \hskip .5\@tempdima
          \@oval(#1,#2)[]%
          \hskip .5\@tempdima}%
      }%
      \vskip -\@wholewidth
    }%
    \hskip -\@wholewidth
  }%
}

% \@RemoveDim by Hideki Isozaki
{\catcode`\p = 12 \catcode`\t = 12
\gdef\@RemoveDim#1pt{#1}}