Hiro さん，石原 さん

ご意見有難うございました。
制御点の設定が面倒ですね。

円弧が無難ではあるのですが．．．．．

% ------------------------------
\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
  \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
  \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