我正在制作一个工厂宏 (A)，它会产生另一个宏 (B)。宏 B 的作用是影响它在调用时作为参数传递给变量的内容。我目前可以在没有 A 的情况下完成所有这些工作，但这不可扩展，因为它需要大量重写。
我猜我这里缺少的是对在调用 B 期间必须扩展的参数的引用。我尝试使用多个，#因为这似乎是嵌套参数，但我觉得这不是我需要的。
我纠结的一点是：“ #1（指向调用自身函数的函数中的第一个参数（即\variable1））”应该替换为“Laetitia”，因为它是宏 B 的第一个参数。
您将在 MWE 中找到：
- 自动化试验 1：我尝试不使用
xparse - 自动化试验 2：
xparse - 我想要实现的手工代码。
通过在开头切换\iffalse/指令，可以一次执行所有这 3 个指令。\iftrue
任何指示都会有帮助！
\documentclass[twoside]{article}
% package pour utiliser une macro nested ac ses propres args
\usepackage{xparse}
\errorcontextlines32
\begin{document}
%==================================================================================
% Prerequisite : lines of code to define variableI to variableXVI
%==================================================================================
\newcommand{\DefinitVariable}[1]{%
\expandafter\newcommand\csname variable\Roman{#1}\endcsname{}%
}%
% Loop for defining all the variable
\newcounter{ctr}
\loop
\stepcounter{ctr}
\expandafter\DefinitVariable{ctr}%
\ifnum\thectr<16
\repeat
%==================================================================================
% Automation trial 1 :
%\iftrue
\iffalse
\newcommand\DeuxiemeAffecteVariable[1]{%%
\setcounter{ctr}{1}%
\expandafter\renewcommand\csname variable\Roman{ctr}\endcsname{\#1 (to point to the first argument within the function calling self function (ie \textbackslash variable1))}%
}
\newcommand\definecommand[1]{%%
\expandafter\def\csname#1\endcsname{%
\setcounter{ctr}{1}%
\expandafter\DeuxiemeAffecteVariable{\arabic{ctr}}%
}%%
}%
\definecommand{DefinitionVariablesN}%
\DefinitionVariablesN{Laetitia}%
La variable 1 est : \variableI \\ FIN\\
\fi
%==================================================================================
% Automation trial 2 with xparse :
\iftrue
%\iffalse
\newcounter{cpteurLocal}
\NewDocumentCommand{\AffecteVariable}{m}
{%
\setcounter{cpteurLocal}{#1}%
\expandafter\RenewDocumentCommand\csname variable\Roman{cpteurLocal}\endcsname {m}%
{\#1 (to point to the first argument within the function calling self function (ie \textbackslash variable1))}%
%{m}%
%{##1}%
%{########1}%
%{contenu vraiable}%
}%
% Macro factory (A)
\newcommand{\DefinitFonctionDeDefinition}[1]{%
\expandafter\newcommand\csname DefinitionVariablesN\endcsname{%
\expandafter\AffecteVariable{#1}%
%\expandafter\expandafter\AffecteVariable{#1}%
%\AffecteVariable{#1}%
}%
}
\setcounter{ctr}{1}%
\DefinitFonctionDeDefinition{\arabic{ctr}}%
\DefinitionVariablesN{Laetitia}
La variable 1 est : \variableI \\ FIN\\
\fi
%==================================================================================
% Goal to reach, but this is 'handmade' (not scalable) :
\iffalse
%\iftrue
\newcommand{\DefinitionVariablesI}[9]{
\renewcommand{\variableI}{#1}
\renewcommand{\variableII}{#2}
\renewcommand{\variableIII}{#3}
\renewcommand{\variableIV}{#4}
\renewcommand{\variableV}{#5}
\renewcommand{\variableVI}{#6}
\renewcommand{\variableVII}{#7}
\renewcommand{\variableVIII}{#8}
\renewcommand{\variableIX}{#9}
}
\newcommand{\DefinitionVariablesII}[7]{
\renewcommand{\variableX}{#1}
\renewcommand{\variableXI}{#2}
\renewcommand{\variableXII}{#3}
\renewcommand{\variableXIII}{#4}
\renewcommand{\variableXIV}{#5}
\renewcommand{\variableXV}{#6}
\renewcommand{\variableXVI}{#7}
}
\DefinitionVariablesI{Laetitia}{Patrick}{Marie}{Michel}{Dieter}{Sammy}{Barbara}{Donna}{Ivan}
\DefinitionVariablesII{Pierre}{Rene}{Frederic}{Ousmam}{Paul}{Virginie}{Gerard}
La variable 1 est : \variableI\\
La variable 2 est : \variableII\\
La variable 3 est : \variableIII\\
La variable 4 est : \variableIV\\
La variable 5 est : \variableV\\
La variable 10 est : \variableX\\
La variable 11 est : \variableXI\\
La variable 12 est : \variableXII\\
La variable 13 est : \variableXIII\\
La variable 14 est : \variableXIV\\
FIN
\fi
\end{document}
========================================================================= 感谢@egreg 的回答，确实取得了进展。
答案1
您可以使用一些更高级的expl3工具：
\documentclass{article}
\usepackage{xparse}
\ExplSyntaxOn
\NewDocumentCommand{\DefinitionVariables}{m}
{
\int_zero:N \l_tmpa_int
\clist_map_inline:nn { #1 }
{
\int_incr:N \l_tmpa_int
\tl_clear_new:c { variable \int_to_Roman:n { \l_tmpa_int } }
\tl_set:cn { variable \int_to_Roman:n { \l_tmpa_int } } { ##1 }
}
}
\ExplSyntaxOff
\begin{document}
\DefinitionVariables{
Laetitia,Patrick,Marie,Michel,Dieter,Sammy,Barbara,Donna,Ivan,
Pierre,Rene,Frederic,Ousmam,Paul,Virginie,Gerard
}
\noindent
La variable 1 est : \variableI\\
La variable 2 est : \variableII\\
La variable 3 est : \variableIII\\
La variable 4 est : \variableIV\\
La variable 5 est : \variableV\\
La variable 10 est : \variableX\\
La variable 11 est : \variableXI\\
La variable 12 est : \variableXII\\
La variable 13 est : \variableXIII\\
La variable 14 est : \variableXIV\\
FIN
\end{document}
这是一个“经典”版本：
\documentclass{article}
\makeatletter
\newcommand{\DefinitionVariables}[1]{%
\count@=\z@
\@for\next:={#1}\do{%
\advance\count@\@ne
\expandafter\newcommand\csname variable\@Roman\count@\expandafter\endcsname\expandafter{\next}% !!
}%
}
\makeatother
\begin{document}
\DefinitionVariables{%
Laetitia,Patrick,Marie,Michel,Dieter,Sammy,Barbara,Donna,Ivan,%
Pierre,Rene,Frederic,Ousmam,Paul,Virginie,Gerard%
}
\noindent
La variable 1 est : \variableI\\
La variable 2 est : \variableII\\
La variable 3 est : \variableIII\\
La variable 4 est : \variableIV\\
La variable 5 est : \variableV\\
La variable 10 est : \variableX\\
La variable 11 est : \variableXI\\
La variable 12 est : \variableXII\\
La variable 13 est : \variableXIII\\
La variable 14 est : \variableXIV\\
FIN
\end{document}
为了安全起见，最好使用
\uppercase\expandafter{%
\expandafter\def\expandafter\df@temp\expandafter{%
\romannumeral\count@
}%
}%
\expandafter\newcommand\csname variable\df@temp\expandafter\endcsname
\expandafter{\next}%
而不是标记为 的行!!，因为某些babel模块\@Roman以不可扩展的方式重新定义。
但请注意，在 的参数中，行尾需要受到保护\DefineVariables。这在版本中不是必需的expl3，因为\clist_map_inline:nn会忽略逗号分隔符周围的空格。
答案2
您可以使用一些高级的 TeX 原始工具：
\newcount\varnum
\def\DefinitionVariables#1{\varnum=0 \defvarA#1,\end,}
\def\defvarA#1#2,{%
\ifx\end#1\else
\advance\varnum by1
\uppercase\expandafter
{\expandafter\def\expandafter\tmp\expandafter{\romannumeral\varnum}}%
\expandafter\def\csname variable\tmp\endcsname{#1#2}%
\expandafter\defvarA\fi
}
\DefinitionVariables{
Laetitia,Patrick,Marie,Michel,Dieter,Sammy,Barbara,Donna,Ivan,
Pierre,Rene,Frederic,Ousmam,Paul,Virginie,Gerard
}
La variable 1 est : \variableI\\
La variable 2 est : \variableII\\
La variable 3 est : \variableIII\\
La variable 4 est : \variableIV\\
La variable 5 est : \variableV\\
La variable 10 est : \variableX\\
La variable 11 est : \variableXI\\
La variable 12 est : \variableXII\\
La variable 13 est : \variableXIII\\
La variable 14 est : \variableXIV\\