emath BBS

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

No.7974  Re:\Enkoのhasenオプション
発言者: 石原 守
発言日: 2009 02/17 13:14
発言元: fw.chiba-c.ed.jp
>   <hasen=[破線の長さ][破線の間隔]>で,いずれも \unitlength を単位とする無名数です
> の意味がわかりかねています.
中心角が一定のようです。
\documentclass[a4j]{jarticle}
\usepackage{emathP}
\begin{document}
        \begin{zahyou*}[haiti=t,ul=5mm](-6,6)(-6,6)
        \Enko<hasen=[1][1]>\O{1}{0}{180}
        \Enko<hasen=[1][1]>\O{2}{0}{180}
        \Enko<hasen=[1][1]>\O{3}{0}{180}
        \Enko<hasen=[1][1]>\O{4}{0}{180}
        \end{zahyou*}
\end{document}
で確認できるかな。拡大してみてください。

HenKo(Enko)で呼ばれているマクロをいじってみました。
副作用のチェックはしていません。
変なことになっても怒らないでくださいね。
\documentclass{jarticle}
\usepackage{emathP}
\makeatletter
\def\@@@Daenko[#1][#2]#3#4#5#6{%
  \ifthenelse{\equal{#1}{\empty}}%
  {%
    \Add{#3}{#3}\@x\Add{#4}{#4}\@y%
    \Sub{#6}{#5}{\@tyuusinkaku}\Sub{360}{#6}\@hazimekaku%
    \Add{\@hazimekaku}{\@tyuusinkaku}{\@owarikaku}%
    \DegRad{\@hazimekaku}{\@hazimekaku}%
    \DegRad{\@owarikaku}{\@owarikaku}%
    \put(0,0){{%
      \ifthenelse{\equal\iro@\empty}{}{\@iro{\iro@}}%
      \@arc\@x\@y{\@hazimekaku}{\@owarikaku}}}%
  }{%\else
    \edef\@hazimekaku{#5}\edef\@owarikaku{#6}%
    \DegRad{\@hazimekaku}{\@hazimekaku}\DegRad{\@owarikaku}{\@owarikaku}%
    \edef\@x{#3}\edef\@y{#4}%
    \Mul{#2}{0.18}\@dx
    \Div\@dx#3\@dx%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%追加
    \Mul{#1}{0.1}\@lx
    \Div\@lx#4\@lx%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%追加
    \For\@t{\@hazimekaku}{\@owarikaku}{\@dx}\Do{%
      \Add\@t{\@lx}\@@t%
      \ifthenelse{\lengthtest{\@@t pt>\@owarikaku pt}}{%
        \edef\@@t{\@owarikaku}}{}%
      \Cos\@t\@xi
      \Mul\@x\@xi\@xi
      \Cos\@@t\@xii
      \Mul\@x\@xii\@xii%
      \Sin\@t\@yi
      \Mul\@y\@yi\@yi
      \Sin\@@t\@yii
      \Mul\@y\@yii\@yii%
      \drawline(\@xi,\@yi)(\@xii,\@yii)}%
  }%
  \ifthenelse{\lengthtest{\arrow@headsize\p@>\z@}}{%
    \ifx\empty\yazirusi@opt
    \else
      \DaYenko[\yazirusi@opt]{#3}{#4}{#5}{#6}%
    \fi
  }{}%
\egroup
% \ifnum\EMps@mode=\@ne\grestore\fi%%   ---> emathPs.sty
}%
\makeatother
\begin{document}
        \begin{zahyou*}[haiti=t,ul=5mm](-6,8)(-4,10)
        \rtenretu*{A(-3,0);B(6,0);C(9,85);D(2,265)}
        \Gaisetuen\A\B\C
        \Drawline{\A\B}
        \Drawline{\C\D}
        \HenKo<hasen=[.8][.6]>\B\O6
        \HenKo<hasen=[.8][.6]>\O\A3
        \HenKo<hasen=[.8][.6]>\C\O9
        \HenKo<hasen=[.8][.6]>\D\O{$x$}
%        \zahyouMemori[g][n]
        \end{zahyou*}
        \begin{zahyou*}[haiti=t,ul=5mm](-6,8)(-4,10)
        \rtenretu*{A(-3,0);B(6,0);C(9,85);D(2,265)}
        \Gaisetuen\A\B\C
        \Drawline{\A\B}
        \Drawline{\C\D}
        \HenKo<hasen=[.8][1.2]>\B\O6
        \HenKo<hasen=[.8][1.2]>\O\A3
        \HenKo<hasen=[.8][1.2]>\C\O9
        \HenKo<hasen=[.8][1.2]>\D\O{$x$}
%        \zahyouMemori[g][n]
        \end{zahyou*}
\end{document}


▼関連発言

7973:\Enkoのhasenオプション [Quasi] 02/17 10:02
 ├7974:Re:\Enkoのhasenオプション [石原 守] 02/17 13:14
 │├7975:Re[2]:\Enkoのhasenオプション [石原 守] 02/17 16:17
 │└7976:Re[2]:\Enkoのhasenオプション [Quasi] 02/17 21:13
 └7977:Re:\Enkoのhasenオプション [tDB] 02/18 14:08
  ├7978:Re[2]:\Enkoのhasenオプション [Quasi] 02/18 18:20
  ├7984:--- [---] 02/20 09:11
  └7985:Re[2]:\Enkoのhasenオプション [st] 02/22 23:18
   └7986:Re[3]:dvioutでの破線表示 [石原 守] 02/23 10:22
    └7994:Re[4]:dvioutでの破線表示 [st] 03/01 05:59
     └7995:Re[5]:dvioutでの破線表示 [Quasi] 03/01 09:55
      ├7996:Re[6]:dvioutでの破線表示 [tDB] 03/01 10:07
      └7997:Re[6]:dvioutでの破線表示 [石原 守] 03/01 10:58
       └8003:Re[7]:dvioutでの破線表示 [st] 03/03 00:14<-last

Pass 保存


CGIROOM