Comando que muda sua definição na enésima vez que é usado

Question

Preciso que um comando se comporte de maneira diferente na primeira vez e nas próximas vezes em que for chamado. No momento eu uso \newcommand\foo{First\gdef\foo{Next}}, ou seja, ele se redefine na primeira vez.

Além disso, preciso “redefinir” seu significado em algum momento, por isso defino \newcommand\resetfoo{\gdef\foo{First\gdef\foo{Next}}}.

Mas isso me parece bastante difícil. Pode ser que exista uma maneira usual de fazer isso, mas não estou ciente disso (além disso, não sei quase nada sobreexpansão). Qual é a maneira correta de resolver esse tipo de problema?

Pergunta

Como afirma a pergunta, preciso de uma maneira mais geral: alguma função para alterar sua definição em seuna “expansão” (não tenho certeza se estou usando a palavra no lugar certo). Como resolveria este problema? Eu também preciso do necessário \resetfoo.

Caso ainda não tenha sido feito de alguma forma, minha ideia é ter algum comando \changedefinitionafter\foo{3}{OneTwoThree}{Next}ou algo parecido. expl3solução também é bem-vinda.

Aqui está um MWE mais geral.

\documentclass{scrartcl}

\newcommand\foo{First\gdef\foo{Next}}
\newcommand\resetfoo{\gdef\foo{First\gdef\foo{Next}}}

\begin{document}

\foo~\foo~\foo
\resetfoo~\foo~\foo

\end{document}

Além disso, tags e sugestões para o título da pergunta são bem-vindas.

Answer 1

Dê uma olhada no exemplo a seguir:

\documentclass{article}

\newcounter{testcount}

\newcommand{\modifyme}{%
\addtocounter{testcount}{1}
\ifnum\thetestcount<3%
    Hello 
\fi
\ifnum\thetestcount>2%
    World
\fi
}

\newcommand{\resetme}{\setcounter{testcount}{0}}

\begin{document}

\modifyme

\modifyme

\modifyme

\modifyme

\resetme

\modifyme

\end{document}

Answer 2

Adoro usar contadores! Aqui apenas a expansão após o número especificado em \changedefinitionafteré modificada.

\documentclass{article}
\pagestyle{empty}% for cropping
\makeatletter
\newcount\count@foo
\newcount\nth@foo
\newcommand\changedefinitionafter[4]{
    % #1: name of macro
    % #2: exceptional occurence
    % #3: normal expansion
    % #4: exceptional expansion
    \global\count@foo=0
    \global\nth@foo=#2
    \gdef#1{%
        \advance\count@foo by 1
        \ifnum\count@foo=\nth@foo
            #4%
        \else
            #3%
        \fi
    }
    \edef\resetname{reset\expandafter\@gobble\string#1}
    \expandafter\gdef\csname \resetname \endcsname{\global\count@foo=0 }
}
\makeatother
\begin{document}
\obeylines
\changedefinitionafter\foo{3}{OneTwoThree}{Next}
\foo
\foo
\foo
\foo
\resetfoo
\foo
\foo
\foo
\foo
\end{document}

Answer 3

Sem contador, mas três macros para cada comando deste tipo:

\documentclass{article}

\makeatletter
\newcommand{\newchangingcommand}[4]{%
  % #1 = macro name
  % #2 = steps
  % #3 = value until step #1
  % #4 = value from step #1
  \@namedef{\string#1@counter}{0}%
  \@namedef{\string#1@limit}{#2}%
  \def#1{%
     % step the counter
     \global\@nameedef{\string#1@counter}{\number\numexpr\@nameuse{\string#1@counter}+1\relax}%
     \ifnum\@nameuse{\string#1@counter}=\@nameuse{\string#1@limit}\relax
       \gdef#1{#4}#4%
     \else
       #3%
     \fi
  }%
}
\providecommand\@nameedef[1]{\expandafter\edef\csname#1\endcsname}
\makeatother

\newchangingcommand{\foo}{3}{Two}{Next}
\newchangingcommand{\foob}{2}{One}{Next}

\begin{document}

\foo--\foob\par
\foo--\foob\par
\foo--\foob\par
\foo--\foob\par

\end{document}

Esteja ciente de que o uso de tais comandos para mover argumentos falhará por vários motivos.