☰

Макрофабрика и аргумент, переданный при вызове

tag-icon • tag-icon macros
Макрофабрика и аргумент, переданный при вызове

Я создаю заводской макрос (A), который производит другой макрос (B). Макрос B заключается в воздействии на то, что он получает в качестве параметров для переменных при вызове. В настоящее время я могу делать все это без A, но это не масштабируется, потому что требует много переписывания.

Полагаю, что здесь мне не хватает ссылки на аргумент, который должен быть раскрыт во время вызова B. Я пытался использовать несколько аргументов, #поскольку это выглядит как вложенные аргументы, но мне кажется, что это не то, что мне нужно.

Проблема, с которой я борюсь, заключается в следующем: « #1(чтобы указать на первый аргумент внутри функции, вызывающей собственную функцию (т.е. \variable1))» следует заменить на «Laetitia», поскольку это первый аргумент макроса B.

В MWE вы найдете:

  • автоматизация, проба 1: я пробовал безxparse
  • автоматизация испытание 2: сxparse
  • самодельный код того, чего я хочу достичь.

Все три команды можно выполнить по одной, поменяв местами инструкцию \iffalse/ \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.

ПродолжениеМакрофабрика и аргумент, передаваемый при вызове (часть 2)

решение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нерасширяемыми способами.

Однако следует отметить, что концы строк должны быть защищены в аргументе to \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\\

Связанный контент