☰

Создание анимации прямой линии

tag-icon • tag-icon tikz-pgf pstricks animations
Создание анимации прямой линии

Как сделать анимацию линии y=-3, которая вращается на угол $\phi$ и перпендикулярное расстояние от начала координат до этой линии. Мне также нужно проследить форму, которую образуют точки пересечения линии с перпендикулярной линией.

Извините, я забыл упомянуть, что мне также нужны оси координат.

решение1

\documentclass[border=10pt,pstricks]{standalone}
\usepackage{pst-node,pst-plot,pst-eucl,multido}

\begin{document}
\multido{\iA=0+6,\iB=1+1}{60}{%
\begin{pspicture}(-5.2,-5.2)(5.5,2.5)
    \pnode(0,0){O}
    \psaxes[linewidth=0.5pt]{->}(0,0)(-5,-5)(5,2)[$x$,0][$y$,90]
    \rput{\iA}(0,-3){\pnodes(-4,0){A}(4,0){B}\psline(A)(B)}
    \pnode(!\iA\space tan dup 0 eq { -3 0 }{1 exch div neg 5 mul 5} ifelse exch){C}
    \pstInterLL{A}{B}{O}{C}{D}
    \pnode(0,0){Aa}
    \multido{\iC=0+6}{\iB}{%
      \rput{\iC}(0,-3){\pnodes(-4,0){Ab}(4,0){Bb}}%
      \pnode(!\iC\space tan dup 0 eq { -3 0 }{1 exch div neg 5 mul 5} ifelse exch){Cb}%
      \pstInterLL[PointSymbol=none,PointName=none]{Ab}{Bb}{O}{Cb}{Db}%
      \psline(Aa)(Db)\pnode(Db){Aa}}%
    \psline[linestyle=dashed](0,0)(D)
\end{pspicture}%
}
\end{document}

Преобразовано в gifс помощью:

convert -delay 50 -loop 0 -density 200 -scale 350 -alpha remove test.pdf test.gif

введите описание изображения здесь

Связанный контент