emath BBS

新規発言一覧最新記事過去一覧検索HOME

No.710  Re:\Henko 新設予定
発言者: 石原 守
発言日: 2004 01/25 06:01
発言元: 61.124.191.250
%色々数値をいじったのですが,a(長いとき)と
%b(短いとき)と両方とも気に入るようにするのが難しくて,
%うまくいきません。ちょっとだけ丸みを帯びるようにしてみました。
%これがよいかはわかりません。
\documentclass[a4j]{jarticle}
\usepackage{showexample}
\AtBeginDvi{\special{papersize=\the\paperwidth,\the\paperheight}}
\usepackage{emathPh}[2004/01/23]
\begin{document}
\makeatletter
\def\Henko#1#2#3{{%
  \edef\henko@sep{1pt}%
  \Bunten{#1}{#2}11\Henk@M
  \ukansan{2.11ex}\Henk@H
  \Kaiten[\Henk@H]\Henk@M{#2}{-90}\Henk@V
  \ukansan{0.546ex}\rHenk@P
  \ukansan{1.693ex}\rHenk@Q
  \Kaiten[\rHenk@P]{#1}{#2}{-76}\Henk@P
  \Kaiten[\rHenk@Q]{#1}{#2}{-39}\Henk@Q
  \Kaiten[\rHenk@P]{#2}{#1}{76}\Henk@PP
  \Kaiten[\rHenk@Q]{#2}{#1}{39}\Henk@QQ
  \Drawtpic{#1\Henk@P\Henk@Q\Henk@V\Henk@QQ\Henk@PP#2}
  \Bunten\Henk@M\Henk@V61\Henk@N
  \fboxsep=\henko@sep
  \emathPut\Henk@N(0,0){\colorbox{white}{#3}}%
}}
\makeatother
\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*}

\begin{showpEx}(0.9,0.5){}
!\makeatletter
\def\Henko#1#2#3{{%
  \edef\henko@sep{1pt}%
  \Bunten{#1}{#2}11\Henk@M
  \ukansan{1.8ex}\Henk@H
  \Kaiten[\Henk@H]\Henk@M{#2}{-90}\Henk@V
  \ukansan{0.5ex}\rHenk@P
  \ukansan{1.6ex}\rHenk@Q
  \Kaiten[\rHenk@P]{#1}{#2}{-60}\Henk@P
  \Kaiten[\rHenk@Q]{#1}{#2}{-39}\Henk@Q
  \Kaiten[\rHenk@P]{#2}{#1}{60}\Henk@PP
  \Kaiten[\rHenk@Q]{#2}{#1}{39}\Henk@QQ
  \Drawtpic{#1\Henk@P\Henk@Q\Henk@V\Henk@QQ\Henk@PP#2}
  \Bunten\Henk@M\Henk@V61\Henk@N
  \fboxsep=\henko@sep
  \emathPut\Henk@N(0,0){\colorbox{white}{#3}}%
}}
!\makeatother
!\begin{zahyou*}[ul=10mm](-3,3)(-1,1.5)
!  \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{showpEx}
\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

Pass 保存


CGIROOM