我想要获得一条一致的曲折线,用来模拟物理弹簧。
\documentclass[pstricks,border=12pt]{standalone}
\usepackage{pst-coil,multido}
\usepackage[nomessages]{fp}
\FPset\CoilArm{.2}
\FPset\Windings{7}
\psset
{
coilarm=\CoilArm,
linejoin=1,
}
\def\System#1#2{% #1: total length includes the arms, #2: coil width
\FPeval\CoilWidth{trunc(#2,9)}%
\FPeval\CoilHeight{trunc((#1-2*CoilArm)/(CoilWidth*Windings),9)}%
\pszigzag[coilwidth=\CoilWidth,coilheight=\CoilHeight](1,0)(1,-#1)%
\ignorespaces
}
\begin{document}
\begin{pspicture}(13,-7)
\multido{\nx=0+1.25,\nl=2.50+.50,\nw=1.00+-0.10}{10}{\rput(\nx,0){\System{\nl}{\nw}}}
\end{pspicture}
\end{document}
在下图中,红色十字表示不一致的锯齿线,因为其顶端以不同的线段方向开始。
我通过选择较大的数字来提高精度trunc
。但似乎不起作用。如何解决这个问题?
事实
消除这种不一致的一种方法是选择一个常数coilwidth
。但是,使用常数,coilwidth
动画看起来就不再逼真了。这就是问题所在。
答案1
最后的手段:不要依赖pst-coil
!
\documentclass[pstricks,border=12pt]{standalone}
\usepackage{pst-node,pst-plot}
\usepackage[nomessages]{fp}
\FPset\CoilArm{.6}
\FPset\Windings{7}
\def\System#1#2{% #1: total length includes the arms, #2: coil width
\FPeval\CoilWidth{#2}%
\FPeval\Lambda{(#1-2*CoilArm)/Windings}%
\FPeval\PlotPoints{trunc(4*Windings+1,0)}%
\curvepnodes[plotpoints=\PlotPoints,algebraic]{0}{\Lambda\space \Windings\space mul}{\CoilWidth*sin(2*Pi*t/\Lambda)|-t-\CoilArm}{P}%
\pscustom[linejoin=1]
{
\psline(0,0)
\psnline(0,\Pnodecount){P}
\psline(0,-#1)
}%
\ignorespaces
}
\begin{document}
\begin{pspicture}(13,-7)
\multido{\nx=1.00+1.25,\nl=2.50+.50,\nw=.50+-.05}{10}{\rput(\nx,0){\System{\nl}{\nw}}}
\end{pspicture}
\end{document}