![沿斜边行走的人](https://linux22.com/image/331717/%E6%B2%BF%E6%96%9C%E8%BE%B9%E8%A1%8C%E8%B5%B0%E7%9A%84%E4%BA%BA.png)
我想画一个沿着斜边行走的男人。我该如何修复以下代码以使其有意义。问题是这个男人站得不正确。
1)该人应正确站在点 (0,3.5),因此他的视线从 (0,0) 到 (3,3)
2)当男人沿着斜边移动到达(3,0)点时,他应该看从(0,0)到(0,3.5)的腿。
我想介绍斜边、邻边和对边的概念。因此我想做一些对学生有意义的事情。
\documentclass[pstricks,border=12pt]{standalone}
\usepackage{pstricks-add}% http://ctan.org/pkg/pstricks-add
\usepackage{pstricks,auto-pst-pdf}
\usepackage{pst-fun}
\def\block{%
% \psaxes[ticks=none,labels=none,linestyle=dashed,linecolor=red]{->}(0,0)(-2,-2)(2,2)[$x$,90][$y$,90]%
% \psframe*[linecolor=gray,opacity=0.5](-1,-0.5)(1,0.5)%
% \rput{*0}(0,0){\psline[linecolor=blue]{->}(0,-1.2)\uput[-90](0,-1.2){$\vec{w}$}}%
}
\begin{document}
\multido{\n=.0+.1}{15}{%
\begin{pspicture}[dimen=m](-1,0)(8,9)
\pspolygon(0,3.5)(0,0)(3,0)
\pcline[linestyle=none,offset=0](0,5)(8,0)\naput[labelsep=-\pslinewidth,nrot=:U,npos=\n]{\rput(2,0){\psBill}}
\end{pspicture}}
\end{document}
答案1
\documentclass[pstricks,border=12pt]{standalone}
\usepackage{pst-fun}
\usepackage{auto-pst-pdf}
\begin{document}
\multido{\rA=.0+.1,\iA=0+1}{10}{%
\begin{pspicture}[dimen=m](-1,-1)(8,7)
\pspolygon(0,3.5)(0,0)(3,0)
\pcline[linestyle=none,offset=0](0,3.5)(3,0)
\ifnum\iA=0 \rput(0,5.5){\psBill}
\else
\ifnum\iA<9
\naput[labelsep=2,npos=\rA,nrot=:U]{\psBill}
\else
\naput[labelsep=2,npos=\rA]{\psscalebox{-1 1}{\psBill}}
\fi\fi
\end{pspicture}}
\end{document}