在 TikZ 中创建可以分解和解释字符串的函数

Question

我发现自己需要用几种颜色画一堆简单的图案，如下例所示。

\begin{tikzpicture}[scale=1.5]
\draw[style=help lines,step=1cm] (-2.3,-2.3) grid (2.3,2.3);
\draw[fill=green] (-2,1) rectangle (-1,2);
\draw[fill=red] (-1,1) rectangle (0,2);
\draw[fill=blue] (0,1) rectangle (1,2);
\draw[fill=yellow] (1,1) rectangle (2,2);

\draw[fill=red] (-2,0) rectangle (-1,1);
\draw[fill=green] (-1,0) rectangle (0,1);
\draw[fill=yellow] (0,0) rectangle (1,1);
\draw[fill=blue] (1,0) rectangle (2,1);    

\draw[fill=yellow] (-2,-1) rectangle (-1,0);
\draw[fill=blue] (-1,-1) rectangle (0,0);
\draw[fill=red] (0,-1) rectangle (1,0);
\draw[fill=green] (1,-1) rectangle (2,0);    

\draw[fill=blue] (-2,-2) rectangle (-1,-1);
\draw[fill=red] (-1,-2) rectangle (0,-1);
\draw[fill=green] (0,-2) rectangle (1,-1);
\draw[fill=yellow] (1,-2) rectangle (2,-1);
\end{tikzpicture}

但这显然是一种低效的创建图片的方式，理想情况下，最好有一个函数rowpatternmaker coords string，以便 rowpatternmaker (-2,0) rgyb从 (-2,0) 开始创建一排彩色方块，从左到右依次为红色、绿色、黄色、蓝色。这样，我就可以用

rowpatternmaker (-2,1) grby
rowpatternmaker (-2,0) rgyb
rowpatternmaker (-2,-1) ybrg
rowpatternmaker (-2,-2) brgy

当然，我真正想要的是创建一个函数square pattern maker，

squarepatternmaker (-2,1) grby rgyb ybrg brgy

将创建上述图案。

虽然我已经使用 TikZ 创建了一些图形，但我不确定如何创建这样的函数，更不用说可以读取字符串“grby”并将其解释为颜色列表的函数了。

假设这是可能的，我该如何去创建rowpatternmaker（或squarepatternmaker）？

Answer 1

在 LaTeX 中，使用简单的单词作为命令是不必要的困难。这就是为什么我引入

\rowpatternmaker (-2,1) grby;
\rowpatternmaker (-2,0) rgyb;
\rowpatternmaker (-2,-1) ybrg;
\rowpatternmaker (-2,-2) brgy;

我希望没问题。第一个参数是起始坐标，第二个参数是颜色序列。如果将颜色序列留空，它将默认为rgby。线长由颜色序列的长度决定，即rgbrgb长度为六。

方形图案制作器也是可能的

\squarepatternmaker (-2,1) grby rgyb ybrg brgy;

它是根据行模式生成器实现的。

\documentclass{article}
\pagestyle{empty}
\usepackage{tikz,xparse}

\ExplSyntaxOn

\seq_new:N \l_cookie_rows_seq
\int_new:N \l_cookie_rowcount_int
\seq_new:N \l_cookie_colors_seq
\int_new:N \l_cookie_count_int

\cs_new_protected:Npn \cookie_map_colors:Nn #1#2
 {
  \seq_clear:N #1
  \seq_set_split:Nnn \l_tmpa_seq { } { #2 }
  \seq_map_inline:Nn \l_tmpa_seq
   {
    \str_case:nn { ##1 }
     {
      { r } { \seq_put_right:Nn #1 { red } }
      { g } { \seq_put_right:Nn #1 { green } }
      { b } { \seq_put_right:Nn #1 { blue } }
      { y } { \seq_put_right:Nn #1 { yellow } }
     }
   }
 }

\cs_new_protected:Npn \cookie_row_pattern_maker:nnn #1#2#3
 {
  \cookie_map_colors:Nn \l_cookie_colors_seq { #3 }
  \int_zero:N \l_cookie_count_int
  \seq_map_inline:Nn \l_cookie_colors_seq
   {
    \draw[fill=##1] (#1+\int_use:N \l_cookie_count_int,#2) rectangle +(1,1);
    \int_incr:N \l_cookie_count_int
   }
 }

\cs_new_protected:Npn \rowpatternmaker (#1,#2) #3;
 {
  \tl_if_empty:nTF { #3 }
   { \cookie_row_pattern_maker:nnn { #1 } { #2 } { rgby } }
   { \cookie_row_pattern_maker:nnn { #1 } { #2 } { #3 } }
 }

\cs_generate_variant:Nn \seq_set_split:Nnn { Nnx }

\cs_new_protected:Npn \cookie_square_pattern_maker:nnn #1#2#3
 {
  \seq_set_split:Nnx \l_cookie_rows_seq { ~ } { \tl_trim_spaces:n { #3 } }
  \int_zero:N \l_cookie_rowcount_int
  \seq_map_inline:Nn \l_cookie_rows_seq
   {
    \cookie_row_pattern_maker:nnn { #1 } { #2 - \int_use:N \l_cookie_rowcount_int } { ##1 }
    \int_incr:N \l_cookie_rowcount_int
   }
 }

\cs_new_protected:Npn \squarepatternmaker (#1,#2) #3;
 {
  \cookie_square_pattern_maker:nnn { #1 } { #2 } { #3 }
 }

\ExplSyntaxOff

\begin{document}
\begin{tikzpicture}
  \draw[style=help lines,step=1cm] (-2.3,-2.3) grid (2.3,2.3);
  \rowpatternmaker (-2,1) grby;
  \rowpatternmaker (-2,0) rgyb;
  \rowpatternmaker (-2,-1) ybrg;
  \rowpatternmaker (-2,-2) brgy;
\end{tikzpicture}

\begin{tikzpicture}
  \draw[style=help lines,step=1cm] (-2.3,-2.3) grid (2.3,2.3);
  \squarepatternmaker (-2,1) grby rgyb ybrg brgy;
\end{tikzpicture}
\end{document}