如何创建宏
\split{ABC}
输出
其中字符的格式是用另一个宏进行的，即
\formatchar{A}
在哪里
\def\formatchar#1{{\color{red}#1}}
对于任意长度的字符串？
我尝试修改代码 将字符串拆分为 n x n
\documentclass{article}
\usepackage{xstring}
\def\split#1#2{%
\StrSplit{#2}{1}\tempa\tempb
x%
\tempa\let\tempa\empty
\unless\ifx\tempb\empty\def\tempa{|\split{1}\tempb}\fi
y%
\tempa
}
\begin{document}
\split{1}{ABCD}
\end{document}
我得到了 x 和 y 之前和之后（因为我没有使用命令和 } 进行限制），但我无法正确格式化。此外，我想避免在调用中使用 {1}，并使用
\split{ABCD}
仅限。它始终是 1 个字符的拆分。
任何帮助深表感谢！
答案1
如果您的输入不能保证是“仅 ASCII”，则该方法\seq_set_split:Nnn可能不起作用。
我把名字改为，\splitchars因为\split已被占用amsmath。
\documentclass{article}
\usepackage[T1]{fontenc}
\usepackage{xcolor}
\NewDocumentCommand{\formatchar}{m}{%
\textcolor{red!90!yellow}{#1}% <--- or whatever you like
}
\ExplSyntaxOn
\NewDocumentCommand{\splitchars}{O{|}m}
{% #1 = optional separator, default |
% #2 = text to split
\mflxvii_split:nn { #1 } { #2 }
}
\seq_new:N \l__mflxvii_split_items_seq
\cs_new_protected:Nn \mflxvii_split:nn
{
\seq_clear:N \l__mflxvii_split_items_seq
\text_map_inline:nn { #2 }
{
\seq_put_right:Nn \l__mflxvii_split_items_seq { \formatchar{##1} }
}
\seq_use:Nn \l__mflxvii_split_items_seq { #1 }
}
\ExplSyntaxOff
\begin{document}
\splitchars{ABC}
\splitchars[--]{ABC}
\splitchars{ábç}
\splitchars{ÅÄÖ}
\end{document}
为了获得类似列表的输出，这里有一个扩展，允许最后两个项目之间使用不同的分隔符。
\documentclass{article}
\usepackage[T1]{fontenc}
\usepackage{xcolor}
\NewDocumentCommand{\formatchar}{m}{%
\textcolor{red!90!yellow}{#1}% <--- or whatever you like
}
\ExplSyntaxOn
\NewDocumentCommand{\splitchars}{O{|}O{#1}m}
{% #1 = optional separator, default |
% #2 = optional separator between last two
% #3 = text to split
\mflxvii_split:nnn { #1 } { #2 } { #3 }
}
\seq_new:N \l__mflxvii_split_items_seq
\cs_new_protected:Nn \mflxvii_split:nnn
{
\seq_clear:N \l__mflxvii_split_items_seq
\text_map_inline:nn { #3 }
{
\seq_put_right:Nn \l__mflxvii_split_items_seq { \formatchar{##1} }
}
\seq_use:Nnnn \l__mflxvii_split_items_seq { #2 } { #1 } { #2 }
}
\ExplSyntaxOff
\begin{document}
\splitchars{ABC}
\splitchars[--]{ABC}
\splitchars{ábç}
\splitchars{ÅÄÖ}
\splitchars[, ][ and ]{ÅÄÖ}
\splitchars[, ][ and ]{ÅÄ}
\end{document}
答案2
这是一个基于 LuaLaTeX 的解决方案，它利用了 Lua 的gsub和sub内置函数。实际上，代码使用了可以直接处理 utf8 编码字符的gsub和函数版本。sub
调用主用户级宏\splitstring而不是\split，因为数学包定义了一个名为的环境split以及名为\split和的宏\endsplit。
注意到 (a) 的参数\splitstring可以包含空格并且 (b)formatchar是作为 Lua 函数而不是 LaTeX 宏实现的。
% !TEX TS-program = lualatex
\documentclass{article}
\usepackage{xcolor} % for '\textcolor' macro
% Lua-side code
\directlua{
function formatchar ( c )
return ( '\\textcolor{red}{\\textbf{' .. c .. '}}|' )
end
function split ( s )
s = unicode.utf8.gsub ( s , '.' , formatchar )
return ( unicode.utf8.sub ( s , 1 , -2 ) ) % delete final '|'
end
}
% LaTeX-side code
\newcommand\splitstring[1]{\directlua{tex.sprint(split('#1'))}}
\begin{document}
\obeylines % just for this example
\splitstring{ABC}
\splitstring{123abc}
\splitstring{Hello World}
\end{document}
答案3
以下是我使用 ExplSyntax 的解决方案尝试：
\documentclass{article}
\usepackage{xcolor}
\ExplSyntaxOn
\seq_new:N \l__my_split_seq
\NewDocumentCommand { \split } { m } { \__my_split:n { #1 } }
\cs_new_protected:Npn \__my_split:n #1
{
\seq_set_split:Nnn \l__my_split_seq {} { #1 }
\seq_set_map:NNn \l__my_split_seq \l__my_split_seq
{ \__my_split_fn:n { ##1 } }
% \seq_log:N \l__my_split_seq
\seq_use:Nn \l__my_split_seq { | }
}
\cs_new_protected:Npn \__my_split_fn:n #1 { { \color { red } #1 } }
\ExplSyntaxOff
\begin{document}
\split{ABCD}
\split{1234}
\end{document}
答案4
由于没有提供 LaTeX2e 解决方案，我在这里给出一个。我使用标记循环从参数中逐个抓取字符。此解决方案假设参数没有宏和组。我省略了这些，因为没有给出如何处理它们的指导，尽管可以根据需要处理它们。
如果需要处理unicode字符，则必须在xelatex或lualatex下进行编译。
\documentclass{article}
\usepackage{tokcycle,xcolor}
\newcommand\formatchar[1]{\textcolor{red}{#1}}
\def\split#1{%
\tokencycle{\formatchar{##1}\splitchar}
{}{}{##1\splitchar}#1\endtokencycle}
\newcommand\splitchar{\tcpeek\z\ifx\empty\z\else$\mid$\fi}
\begin{document}
\split{ABCD}
\split{Å ÄÖ}
\end{document}
