沿斜边行走的人

Question

我想画一个沿着斜边行走的男人。我该如何修复以下代码以使其有意义。问题是这个男人站得不正确。

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}

Answer 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}