発言者: 田中徹
発言日: 2004 01/27 16:44
発言元: 202.223.106.163
No.708
> 1. \Hen_ko では,弧の部分を \qbezier を用いていますが,
> 辺の部分より太くなってしまう。
> 2. 辺の両端に近い部分では,辺と弧が重なってしまう。
をクリアーしているかどうかわかりませんが
No.711
> 円弧が無難ではあるのですが.....
に反応して
楕円弧ならばどうかと考えてみました。
(証文の出し遅れは否めませんがご容赦を)
\documentclass{jarticle}
\usepackage{emathPh}
\makeatletter
\def\HenKo{\@ifnextchar<{\@HenKo}{\@HenKo<\empty>}}
\def\@HenKo<#1>#2#3#4{{%
\def\henko@sep{1pt}%
\def\henko@H{1.5ex}%
\def\hasen@opt{\empty}%
\ifx\empty#1\else\setkeys{emP}{#1}\fi
\Bunten{#2}{#3}11\HenKo@M
\Kyori{#2}{\HenKo@M}\AM
\Subvec{\HenKo@M}{#2}\d@vec%<==追加
\Argvec{\d@vec}\d@deg%<==追加
\Add\d@deg{180}\d@deg%<==追加
\ukansan\henko@H\HenKo@MV
\Div\AM\HenKo@MV\HenKo@r
\Mul\HenKo@r\AM\HenKo@r
\Add\HenKo@r\HenKo@MV\HenKo@r
\Div\HenKo@r{2}\HenKo@r
\Sub\HenKo@r\HenKo@MV\HenKo@CM
\Put\HenKo@M{\rotatebox{\d@deg}{\Daenko{\AM}{\HenKo@MV}{0}{180}}}%<==追加
\Kaiten[\HenKo@CM]\HenKo@M{#3}{90}\HenKo@C
% \Enko\HenKo@C\HenKo@r{hazimeten=#2}{owariten=#3}%<==コメントアウト
\ifthenelse{\equal{#4}\empty}{}{%
\Kaiten[\HenKo@MV]\HenKo@M{#3}{-90}\Henko@V
\fboxsep=\henko@sep
\Put\Henko@V(0,0)[c]{\colorbox{white}{#4}}%
}%
}}
\makeatother
\begin{document}
\begin{zahyou*}[ul=10mm](-3,3)(-1,1)
\tenretu{A(-2,0)sw;B(2,0)se;C(2,1)ne;D(0,1)(1pt,4pt)[rb]}
\Drawline{\A\B\C\D\A}
\HenKo\A\B{$a$}
\HenKo\B\C{$b$}
\HenKo\C\D{$c$}
\HenKo\D\A{$d$}
\end{zahyou*}
\end{document}
▼関連発言
│
└◆708:\Henko 新設予定 [tDB] 01/24 12:52
├◆709:Re:\Henko 新設予定 [Hiro] 01/25 00:27
├◆710:Re:\Henko 新設予定 [石原 守] 01/25 06:01
└◆711:Re:\Henko 新設予定 [tDB] 01/25 12:24
└◆717:Re[2]:\Henko 新設予定 [田中徹] 01/27 16:44
└◆718:Re[3]:\Henko 新設予定 [tDB] 01/27 20:19<-last