LaTeX: Beamerで御清聴をアレする件

spinning-goseicho.tex

% pLaTeX 文書
\documentclass[dvipdfmx]{beamer}
\usepackage{bxdpx-beamer}
\usepackage{pxjahyper}
\usepackage{tikz}
\usepackage[deluxe]{otf}
% フォント設定は適当に
\usepackage[ipaex]{pxchfon}
\setxboldgothicfont[0]{hgrpp1.ttc}%HG創英角ﾎﾟｯﾌﾟ体
\renewcommand{\kanjifamilydefault}{\gtdefault}
\usetheme{EastLansing}

\title{Beamerで御清聴をアレする件}
\author{某ZR}
\date{はっぴぃ\aj半角{ナントカ}で～}

\newcount\myFrameIndex
\begin{document}

\begin{frame}
  \maketitle
\end{frame}

\begin{frame}
\frametitle{まとめ}
\animate<1-129>
\animatevalue<1-129>\myFrameIndex{0}{128}
\pgfmathsetmacro\myP{\myFrameIndex/128}
\pgfmathsetmacro\myR{1-\myP}
\pgfmathsetmacro\myX{\myR*\myR*7}
\pgfmathsetmacro\myY{\myR*2}
\pgfmathsetmacro\myS{\myP*2+0.1}
\pgfmathsetmacro\myT{\myP*100}
\pgfmathsetmacro\myA{mod(sqrt(\myP)*360*5,360)}
\begin{center}\begin{tikzpicture}
  \useasboundingbox(0,0);
  \node[font=\ebseries, text=red!\myT,
    scale=\myS, rotate=\myA]
    at (\myX,\myY)
    {御清聴ありがとうございました。};
\end{tikzpicture}\end{center}
\end{frame}

\end{document}