\documentclass{standalone}
\usepackage{animate}
\usepackage[UTF8]{ctex}
\usepackage{amsmath}
\usepackage{amsfonts}
\usepackage{amssymb}
\usepackage{graphicx}
\usepackage{tikz}
\usetikzlibrary{decorations.markings,decorations.pathmorphing}
\usetikzlibrary{shadings}
\usepackage{ifthen} %逻辑判断宏包
\usetikzlibrary{calc}
\usetikzlibrary{intersections}
\usetikzlibrary{positioning}
\begin{document}
\begin{animateinline}[controls=all]{20}%
\multiframe{360 }{rx=0+5}{
\begin{tikzpicture}
\draw (-8,-6) rectangle (8,6);
\def\a{0}%悬挂点横坐标
\def\b{4}%悬挂点纵坐标
\pgfmathsetmacro{\x}{-4+1*sin(\rx)}
\coordinate (P) at (\a,\b+\x);
\draw [decorate,decoration={coil,segment length=-\x pt}] (\a,\b)—(P);
\shade ball color=black + (0, -1ex)$)circle (1ex);
\end{tikzpicture} }
\end{animateinline}
\end{document}