発言者： 田中徹
発言日： 2010 08/29 23:24
発言元： p6e8e28.nigtnt01.ap.so-net.ne.jp
> 三角関数についてあまり深く勉強しておらず、よく分かりませんでした。
\iiiBGurafu について の誤記であることを祈ります。
> もっとスマートにかけると思うのですが・・・。
1. 空間座標 Zahyou 環境を用いて らしく見えるように Ex, Ey, Ez を適当に設定する。
2. 先に円柱部分を塗りつぶし、紙の部分を上書きで白塗りする。
3. \iiiBGurafu で曲線の描画
の順で描画してみました。
点 A の z 座標が 0 であり、左端の偏角が 2$pi の整数倍です。
\Hosei と \ACRatio の値を適当にいじってください。
\documentclass[b5j]{jarticle}
\usepackage[papersize,notMy]{emath}
\usepackage{emathP}
\pagestyle{empty}
\begin{document}
\def\上{8}%
\def\下{-8}%
\begin{Zahyou*}[ul=10mm,Ex={r(1,-180)},Ey={r(0.2,-90)},Ez={r(0.7,90)}](-3,3)(-3,3)(\下,\上)%
\def\半径{3}%
\def\AD{6}%
\def\ACRatio{0.3}%% 適当に変更
%\calcval{(1/(sqrt(($pi)**2+1)))*2*$pi}\ACRatio%% おそらく正確な値
\def\Hosei{(0.3*$pi)}% 適当に変更
\def\Fx{\半径*cos(T)}%
\def\Fy{\半径*sin(T)}%
\def\Hx{\半径*cos(T+\Hosei)}%
\def\Hy{\半径*sin(T+\Hosei)}%
%%%%%%%%%%%%% 各点の座標計算
\calcval{\半径*cos(\Hosei)}\Ax%
\calcval{\半径*sin(\Hosei)}\Ay%
\calcval{\半径*cos(\Hosei+$pi)}\Ex%
\calcval{\半径*sin(\Hosei+$pi)}\Ey%
\def\Az{0}%
\calcval{\Az+(\AD/2)}\Ez%
\calcval{\Az+\AD}\Dz%
\let\Dx\Ax%
\let\Dy\Ay%
\calcval{\半径*cos(\Hosei+\ACRatio)}\Cx%
\calcval{\半径*sin(\Hosei+\ACRatio)}\Cy%
\calcval{\AD*(\ACRatio)/(2*$pi)}\Cz%
\calcval{\Cz-\AD}\Bz%
\let\Bx\Cx%
\let\By\Cy%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\iiiBKinziOresen\Fx\Fy{\下}{0*$pi}{1*$pi}{0.1}\Oreseni%
\iiiBKinziOresen\Fx\Fy{\上}{1*$pi}{2*$pi}{0.1}\Oresenii%
\edef\Oresen{}%
\EMedefappend\Oresen\Oreseni%
\EMedefappend\Oresen\Oresenii%
\iiiNuritubusi[0.3]\Oresen%
\iiiBKinziOresen\Hx\Hy{T*\AD/(2*$pi)}{-1*$pi-\Hosei}{-2*$pi+\ACRatio}{-0.1}\Oreseni%
\iiiBKinziOresen\Hx\Hy{T*\AD/(2*$pi)}{0*$pi}{1*$pi-\Hosei}{0.1}\Oresenii%
\edef\Oresen{}%
\EMedefappend\Oresen\Oreseni%
\EMedefappend\Oresen\Oresenii%
\iiiNuritubusi[0]\Oresen%
\edef\Oresen{}%
\iiiBKinziOresen\Hx\Hy{T*\AD/(2*$pi)}{-1*$pi-\Hosei}{0*$pi-\Hosei}{0.1}\Oreseni%
\iiiBKinziOresen\Hx\Hy{T*\AD/(2*$pi)}{0*$pi}{1*$pi-\Hosei}{0.1}\Oresenii%
\EMedefappend\Oresen\Oreseni%
\EMedefappend\Oresen\Oresenii%
\iiiNuritubusi[0]\Oresen%
\edef\Oresen{}%
\iiiBKinziOresen\Hx\Hy{T*\AD/(2*$pi)}{0*$pi-\Hosei}{0*$pi+\ACRatio}{0.1}\Oreseni%
\iiiBKinziOresen\Hx\Hy{T*\AD/(2*$pi)}{2*$pi}{2*$pi-\Hosei}{-0.01}\Oresenii%
\EMedefappend\Oresen\Oreseni%
\EMedefappend\Oresen\Oresenii%
\iiiNuritubusi[0]\Oresen%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\iiiBGurafu\Fx\Fy{\下}{0*$pi}{1*$pi}%
\iiiBGurafu(0.12)(0.04)\Fx\Fy{\下}{1*$pi}{2*$pi}%
\iiiBGurafu\Fx\Fy{\上}{0}{2*$pi}%
\iiiBGurafu{3}{0}{T}{\下}{\上}%
\iiiBGurafu{-3}{0}{T}{\下}{\上}%
\iiiBGurafu(0.1)(0.02){3*cos(\Hosei)}{3*sin(\Hosei)}{T}{\下}{\上}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% AD
\iiiBGurafu\Hx\Hy{T*\AD/(2*$pi)}{0*$pi}{1*$pi-\Hosei}%
\iiiBGurafu(0.12)(0.02)\Hx\Hy{T*\AD/(2*$pi)}{1*$pi-\Hosei}{2*$pi-\Hosei}%
\iiiBGurafu\Hx\Hy{T*\AD/(2*$pi)}{2*$pi-\Hosei}{2*$pi}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% BC
\iiiBGurafu\Hx\Hy{T*\AD/(2*$pi)}{-2*$pi+\ACRatio}{-1*$pi-\Hosei}%
\iiiBGurafu(0.12)(0.02)\Hx\Hy{T*\AD/(2*$pi)}{-1*$pi-\Hosei}{0*$pi-\Hosei}%
\iiiBGurafu\Hx\Hy{T*\AD/(2*$pi)}{0*$pi-\Hosei}{0*$pi}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\iiiKuromaru{(\Ax,\Ay,\Az)}% 必要なければコメントアウト
\iiiKuromaru{(\Dx,\Dy,\Dz)}% 〃
\iiiKuromaru{(\Ex,\Ey,\Ez)}% 〃
\iiiKuromaru{(\Cx,\Cy,\Cz)}% 〃
\iiiKuromaru{(\Bx,\By,\Bz)}% 〃
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\iiiPut{(\Ax,\Ay,\Az)}[nw]{A}%
\iiiPut{(\Dx,\Dy,\Dz)}[ne]{D}%
\iiiPut{(\Ex,\Ey,\Ez)}[ne]{E}%
\iiiPut{(\Cx,\Cy,\Cz)}[se]{C}%
\iiiPut{(\Bx,\By,\Bz)}[s]{B}%
\iiiDrawline{(\Cx,\Cy,\Cz)(\Dx,\Dy,\Dz)}%
\iiiDrawline{(\Ax,\Ay,\Az)(\Bx,\By,\Bz)}%
\iiiDashline[20]{0.2}{(\Ax,\Ay,\Az)(\Ex,\Ey,\Ez)}%
\end{Zahyou*}
\end{document}
▼関連発言
│
└◆9149:円柱に巻き付く紙について [リー] 08/29 16:21
└◆9150:Re:円柱に巻き付く紙について [田中徹] 08/29 23:24
└◆9151:Re[2]:円柱に巻き付く紙について [リー] 08/30 19:35
└◆9153:Re[3]:円柱に巻き付く紙について [田中徹] 08/31 12:08
└◆9154:Re[4]:円柱に巻き付く紙について [リー] 08/31 12:36
└◆9156:Re[5]:円柱に巻き付く紙について [tDB] 08/31 12:49
└◆9157:Re[6]:円柱に巻き付く紙について [リー] 08/31 13:06
└◆9158:Re[7]:円柱に巻き付く紙について [tDB] 08/31 13:33
├◆9161:Re[8]:円柱に巻き付く紙について [tDB] 08/31 16:03
└◆9163:Re[8]:円柱に巻き付く紙について [リー] 08/31 18:25
└◆9164:Re[9]:円柱に巻き付く紙について [tDB] 08/31 19:08
├◆9165:Re[10]:円柱に巻き付く紙について [リー] 08/31 20:32
└◆9166:Re[10]:円柱に巻き付く紙について [tDB] 08/31 22:06
└◆9174:Re[11]:円柱に巻き付く紙について [リー] 09/01 19:03
└◆9178:Re[12]:円柱に巻き付く紙について [tDB] 09/02 09:53
└◆9207:Re[13]:円柱に巻き付く紙について [リー] 09/02 21:08
└◆9208:Re[14]:円柱に巻き付く紙について [tDB] 09/03 09:54
└◆9215:Re[15]:円柱に巻き付く紙につい... [リー] 09/04 17:42<-last