下列的@JasperHabicht 的回答在我的代码中，我想为该宏添加一个选项，这样，根据标志，我可以执行 或\drawMoveFromSgfCoords。\drawStoneFromSgfCoords我仍然不太了解 expl3，所以这是我的伪代码：
% Parameters
%
% 1: array of {<black | white>, <coordinates}
%
% Example usage: `drawStonesOrMovesFromSgfCoords{{black, ab}, {white, cd}}{true}`
\ExplSyntaxOn
\NewExpandableDocumentCommand{\drawStonesOrMovesFromSgfCoords}{ m }{ m }{
\clist_set:Nn \l_tmpa_clist { #1 }
\clist_map_inline:Nn \l_tmpa_clist {
\clist_set:Nn \l_tmpb_clist { ##1 }
\clist_pop:NN \l_tmpb_clist \l_tmpa_tl
\clist_pop:NN \l_tmpb_clist \l_tmpb_tl
% I'm trying to fix what's in-between parentheses below:
\exp_args:Noo (\bool_if:NN ##2 \drawStoneFromSgfCoords \drawMoveFromSgfCoords) { \l_tmpa_tl } { \l_tmpb_tl }
}
}
\ExplSyntaxOff
这是一个或多或少完整的例子（如果你知道语法，这可能是不必要的）：
\documentclass{article}
\usepackage{tikz}
% From [this answer by @DavidCarlisle](https://tex.stackexchange.com/a/708876/64441).
\newcommand\notwhite{black}
\newcommand\notblack{white}
% From [this answer by @DavidCarlisle](https://tex.stackexchange.com/a/708893/64441).
\ExplSyntaxOn
\cs_generate_variant:Nn \int_from_alph:n {e}
\NewExpandableDocumentCommand{\stringToCoordX}{ m }{
\int_from_alph:e { \use_i:nn #1 }
}
\NewExpandableDocumentCommand{\stringToCoordY}{ m }{
\int_from_alph:e { \use_ii:nn #1 }
}
\ExplSyntaxOff
\newcommand{\drawStoneFromSgfCoords}[2]{
\pgfmathsetmacro{\x}{\stringToCoordX{#2} - 1}
\pgfmathsetmacro{\y}{\stringToCoordY{#2} - 1}
\draw[draw = \UseName{not#1}, fill = #1, line width = 0.1mm]
(\x * 10cm / 18, \y * 10cm / 18)
circle [radius = 0.2575cm];
}
\newcounter{moveCounter}
\setcounter{moveCounter}{1}
\newcommand{\drawMoveFromSgfCoords}[2]{
\pgfmathsetmacro{\x}{\stringToCoordX{#2} - 1}
\pgfmathsetmacro{\y}{\stringToCoordY{#2} - 1}
\draw[draw = \UseName{not#1}, fill = #1, line width = 0.1mm]
(\x * 10cm / 18, \y * 10cm / 18)
circle [radius = 0.2575cm]
node[color = \UseName{not#1}]
{\themoveCounter};
\stepcounter{moveCounter}
}
\ExplSyntaxOn
% Example usage: `drawMovesOrStonesFromSgfCoords{{black, ab}, {white, cd}}`
\NewExpandableDocumentCommand{\drawMovesOrStonesFromSgfCoords}{ m }{
\clist_set:Nn \l_tmpa_clist { #1 }
\clist_map_inline:Nn \l_tmpa_clist {
\clist_set:Nn \l_tmpb_clist { ##1 }
\clist_pop:NN \l_tmpb_clist \l_tmpa_tl
\clist_pop:NN \l_tmpb_clist \l_tmpb_tl
\exp_args:Noo \drawStoneFromSgfCoords { \l_tmpa_tl } { \l_tmpb_tl }
}
}
\ExplSyntaxOff
\begin{document}
\begin{tikzpicture}
\pgfmathsetmacro{\step}{10 / 18}
\draw[step=\step] (0, 0) grid (10, 10);
%\drawStoneFromSgfCoords{black}{ab}
%\drawStoneFromSgfCoords{white}{cd}
\drawMovesOrStonesFromSgfCoords{{black, ab}, {white, cd}}
\end{tikzpicture}
\end{document}
答案1
你可以做：
\ExplSyntaxOn
% There is no point in doing \NewExpandableDocument as \clist_set:Nn and
% \clist_pop:NN and \clist_map_inline:Nn are not fully expandable.
\NewDocumentCommand{\drawMovesOrStonesFromSgfCoords}{ s m }{
% The s argument, denoted by #1, is "true" in case a star was provided.
% The s argument, denoted by #1, is "false" in case no star was provided.
\clist_set:Nn \l_tmpa_clist { #2 }
\clist_map_inline:Nn \l_tmpa_clist {
\clist_set:Nn \l_tmpb_clist { ##1 }
\clist_pop:NN \l_tmpb_clist \l_tmpa_tl
\clist_pop:NN \l_tmpb_clist \l_tmpb_tl
\IfBooleanTF {#1} { \exp_args:NVV \drawStoneFromSgfCoords }
{ \exp_args:NVV \drawMoveFromSgfCoords }
\l_tmpa_tl \l_tmpb_tl
}
}
\ExplSyntaxOff
或者：
\ExplSyntaxOn
% There is no point in doing \NewExpandableDocument as \clist_set:Nn and
% \clist_pop:NN and \clist_map_inline:Nn are not fully expandable.
\NewDocumentCommand{\drawMovesOrStonesFromSgfCoords}{ s m }{
% The s argument, denoted by #1, is "true" in case a star was provided.
% The s argument, denoted by #1, is "false" in case no star was provided.
\clist_set:Nn \l_tmpa_clist { #2 }
\clist_map_inline:Nn \l_tmpa_clist {
\clist_set:Nn \l_tmpb_clist { ##1 }
\clist_pop:NN \l_tmpb_clist \l_tmpa_tl
\clist_pop:NN \l_tmpb_clist \l_tmpb_tl
\exp_args:Nc
\exp_args:NVV
{draw\IfBooleanTF {#1}{Stone}{Move}FromSgfCoords}
\l_tmpa_tl \l_tmpb_tl
}
}
\ExplSyntaxOff
如果你喜欢复杂的，你可以\exp_args:NnV \use:n {...} \Variable在n-argument中嵌套\exp_args:NnV：
\ExplSyntaxOn
% There is no point in doing \NewExpandableDocument as \clist_set:Nn and
% \clist_pop:NN and \clist_map_inline:Nn are not fully expandable.
\NewDocumentCommand{\drawMovesOrStonesFromSgfCoords}{ s m }{
% The s argument, denoted by #1, is "true" in case a star was provided.
% The s argument, denoted by #1, is "false" in case no star was provided.
\clist_set:Nn \l_tmpa_clist { #2 }
\clist_map_inline:Nn \l_tmpa_clist {
\clist_set:Nn \l_tmpb_clist { ##1 }
\clist_pop:NN \l_tmpb_clist \l_tmpa_tl
\clist_pop:NN \l_tmpb_clist \l_tmpb_tl
\exp_args:NnV
\use:n
{
\exp_args:NnV
\use:n
{ \IfBooleanTF {#1} {\drawStoneFromSgfCoords} {\drawMoveFromSgfCoords} }
\l_tmpa_tl
}
\l_tmpb_tl
}
}
\ExplSyntaxOff
这是一个完整的例子：
\documentclass{article}
\usepackage{tikz}
% From [this answer by @DavidCarlisle](https://tex.stackexchange.com/a/708876/64441).
\newcommand\notwhite{black}
\newcommand\notblack{white}
% From [this answer by @DavidCarlisle](https://tex.stackexchange.com/a/708893/64441).
\ExplSyntaxOn
\cs_generate_variant:Nn \int_from_alph:n {e}
\NewExpandableDocumentCommand{\stringToCoordX}{ m }{
\int_from_alph:e { \use_i:nn #1 }
}
\NewExpandableDocumentCommand{\stringToCoordY}{ m }{
\int_from_alph:e { \use_ii:nn #1 }
}
\ExplSyntaxOff
\newcommand{\drawStoneFromSgfCoords}[2]{
\pgfmathsetmacro{\x}{\stringToCoordX{#2} - 1}
\pgfmathsetmacro{\y}{\stringToCoordY{#2} - 1}
\draw[draw = \UseName{not#1}, fill = #1, line width = 0.1mm]
(\x * 10cm / 18, \y * 10cm / 18)
circle [radius = 0.2575cm];
}
\newcounter{moveCounter}
\setcounter{moveCounter}{1}
\newcommand{\drawMoveFromSgfCoords}[2]{
\pgfmathsetmacro{\x}{\stringToCoordX{#2} - 1}
\pgfmathsetmacro{\y}{\stringToCoordY{#2} - 1}
\draw[draw = \UseName{not#1}, fill = #1, line width = 0.1mm]
(\x * 10cm / 18, \y * 10cm / 18)
circle [radius = 0.2575cm]
node[color = \UseName{not#1}]
{\themoveCounter};
\stepcounter{moveCounter}
}
\ExplSyntaxOn
% There is no point in doing \NewExpandableDocument as \clist_set:Nn and
% \clist_pop:NN and \clist_map_inline:Nn are not fully expandable.
\NewDocumentCommand{\drawMovesOrStonesFromSgfCoords}{ s m }{
% The s argument, denoted by #1, is "true" in case a star was provided.
% The s argument, denoted by #1, is "false" in case no star was provided.
\clist_set:Nn \l_tmpa_clist { #2 }
\clist_map_inline:Nn \l_tmpa_clist {
\clist_set:Nn \l_tmpb_clist { ##1 }
\clist_pop:NN \l_tmpb_clist \l_tmpa_tl
\clist_pop:NN \l_tmpb_clist \l_tmpb_tl
\IfBooleanTF {#1} { \exp_args:NVV \drawStoneFromSgfCoords }
{ \exp_args:NVV \drawMoveFromSgfCoords }
\l_tmpa_tl \l_tmpb_tl
}
}
\ExplSyntaxOff
\begin{document}
\begin{tikzpicture}
\pgfmathsetmacro{\step}{10 / 18}
\draw[step=\step] (0, 0) grid (10, 10);
%\drawStoneFromSgfCoords{black}{ab}
%\drawStoneFromSgfCoords{white}{cd}
% The unstarred variant does \drawMoveFromSgfCoords:
\drawMovesOrStonesFromSgfCoords{{black, ab}, {white, cd}}
\end{tikzpicture}
\begin{tikzpicture}
\pgfmathsetmacro{\step}{10 / 18}
\draw[step=\step] (0, 0) grid (10, 10);
%\drawStoneFromSgfCoords{black}{ab}
%\drawStoneFromSgfCoords{white}{cd}
% The starred variant does \drawStoneFromSgfCoords:
\drawMovesOrStonesFromSgfCoords*{{black, ab}, {white, cd}}
\end{tikzpicture}
\end{document}
答案2
我自己不会这样做，但以下代码只需对原始代码进行相对保守的更改即可。
\documentclass{standalone}
\usepackage{tikz}
% From [this answer by @DavidCarlisle](https://tex.stackexchange.com/a/708876/64441).
\newcommand\notwhite{black}
\newcommand\notblack{white}
% From [this answer by @DavidCarlisle](https://tex.stackexchange.com/a/708893/64441).
\ExplSyntaxOn
\NewExpandableDocumentCommand{\stringToCoordX}{ mm }{
\int_from_alph:n { #1 }
}
\NewExpandableDocumentCommand{\stringToCoordY}{ mm }{
\int_from_alph:n { #2 }
}
\ExplSyntaxOff
\newcommand{\drawStoneFromSgfCoords}[2]{
\pgfmathsetmacro{\x}{\stringToCoordX#2 - 1}
\pgfmathsetmacro{\y}{\stringToCoordY#2 - 1}
\draw[draw = \UseName{not#1}, fill = #1, line width = 0.1mm]
({\x * 1.8cm},{\y * 1.8cm})
circle [radius = 0.2575cm];
}
\newcounter{moveCounter}
\setcounter{moveCounter}{1}
\newcommand{\drawMoveFromSgfCoords}[2]{
\pgfmathsetmacro{\x}{\stringToCoordX#2 - 1}
\pgfmathsetmacro{\y}{\stringToCoordY#2 - 1}
\draw[draw = \UseName{not#1}, fill = #1, line width = 0.1mm]
({\x * 1.8cm},{\y * 1.8cm})
circle [radius = 0.2575cm]
node[color = \UseName{not#1}]
{\themoveCounter};
\stepcounter{moveCounter}
}
\ExplSyntaxOn
% Example usage: `drawMovesOrStonesFromSgfCoords{{black, ab}, {white, cd}}`
\NewExpandableDocumentCommand{\drawMovesOrStonesFromSgfCoords}{ sm }{
\clist_set:Nn \l_tmpa_clist { #2 }
\clist_map_inline:Nn \l_tmpa_clist {
\clist_set:Nn \l_tmpb_clist { ##1 }
\clist_pop:NN \l_tmpb_clist \l_tmpa_tl
\clist_pop:NN \l_tmpb_clist \l_tmpb_tl
\IfBooleanTF { #1 }
{
\ExpandArgs { VV } \drawStoneFromSgfCoords \l_tmpa_tl \l_tmpb_tl
}{
\ExpandArgs { VV } \drawMoveFromSgfCoords \l_tmpa_tl \l_tmpb_tl
}
}
}
\ExplSyntaxOff
\begin{document}
\begin{tikzpicture}
\pgfmathsetmacro{\step}{10 / 18}
\draw[step=\step] (0, 0) grid (10, 10);
\drawMovesOrStonesFromSgfCoords{{black,ab}, {white, cd}}
\end{tikzpicture}
\begin{tikzpicture}
\pgfmathsetmacro{\step}{10 / 18}
\draw[step=\step] (0, 0) grid (10, 10);
\drawMovesOrStonesFromSgfCoords*{{black, ab}, {white, cd}}
\end{tikzpicture}
\end{document}
