[Tex/LaTex] How to raise or lower text

Question

How to do automatic raising text?

1pt-2pt-3pt … 12pt

Related to: https://www.tug.org/texshowcase/diminuendo.tex

Answer 1

A version with expl3 and looping of \str variable.

\documentclass{article}
\usepackage{graphicx}

\usepackage{xparse}


\ExplSyntaxOn
\cs_new:Nn \resize_me:nn {
  \str_set:Nx \l_tmpa_str {#2}
  \fp_set:Nn \l_tmpa_fp {1.0}
  \int_step_inline:nnnn {1}{1}{\str_count:N \l_tmpa_str}{%
    \scalebox{\fp_use:N \l_tmpa_fp}{\str_item:Nn \l_tmpa_str {##1}}
    \fp_add:Nn \l_tmpa_fp {#1}
  }
}

\newcommand{\raisetext}[2][0.5]{%
\resize_me:nn{#1}{#2}
}
\ExplSyntaxOff
\begin{document}

\raisetext[0.3]{A very long useless text}

\end{document}