自己レスで失礼します。
先の No.1993 での CandL が偶然に頼る
# 交点の座標の大小に関係している
部分が懸念されたので
外側と内側という方法で計算し
JellyBeans というマクロを作成してみました。
# エラー処理はしていません。m(__)m

\documentclass{jarticle}
\usepackage{emathPh}

\makeatletter
\def\JellyBeans#1#2#3#4{%
\def\@O{#1}% 中心
\def\@A{#2}% 開始点の中心
\def\@B{#3}% 終了点の中心
\def\@r{#4}% 幅
\Kyori\@O\@A\@R%
\Sub\@R\@r\@RI%
\Add\@R\@r\@RO%
\Subvec\@A\@O\@OA%
\Subvec\@B\@O\@OB%
\Div{1}\@R\@Vlen%
\Mul\@Vlen\@r\@Vlen%
\Mulvec\@Vlen\@OA\@@A%
\Mulvec\@Vlen\@OB\@@B%
\Addvec\@OA\@@A\@AO%
\Subvec\@OA\@@A\@AI%
\Addvec\@OB\@@B\@BO%
\Subvec\@OB\@@B\@BI%
\Enko\@O{\@RI}{hazimeten=\@AI}{owariten=\@BI}%
\Enko\@O{\@RO}{hazimeten=\@AO}{owariten=\@BO}%
\Enko\@A{\@r}{hazimeten=\@AI}{owariten=\@AO}%
\Enko\@B{\@r}{hazimeten=\@BO}{owariten=\@BI}%
}
\makeatother
\begin{document}
\begin{zahyou*}[ul=10mm,haiti=c](-1.3,1.5)(-1.3,1.3)
\rtenretu*{A(1,90);B(1,130);C(1,170);D(1,210);E(1,250);%
F(1,290);G(1,330);H(1,10);I(1,50);a(1,270)}%
{\def\sensyu{%
\dashline[40]{.1}}
\Tyokusen\A\a{}{}}%
%%%
\begin{color}{red}%
\JellyBeans\O\F\I{0.3}%
\end{color}%
\begin{color}{green}%
\JellyBeans\O\B\D{0.3}%
\end{color}%
%%%
\Put\A(0,0){\emPmaru{透}}
\Put\B(0,0){\emPmaru{赤}}
\Put\C(0,0){\emPmaru{赤}}
\Put\D(0,0){\emPmaru{赤}}
\Put\E(0,0){\emPmaru{青}}
\Put\F(0,0){\emPmaru{青}}
\Put\G(0,0){\emPmaru{赤}}
\Put\H(0,0){\emPmaru{赤}}
\Put\I(0,0){\emPmaru{赤}}
\end{zahyou*}
\end{document}

▼関連発言
│
└◆1992:囲み方 [genio] 10/26 02:10
　└◆1993:Re:囲み方 [田中徹] 10/26 03:02
　　└◆1994:Re[2]:囲み方 [田中徹] 10/26 14:05
　　　└◆1997:Re[3]:囲み方 [genio] 10/26 23:45<-last