다이소 같이 돈 버는 기술은 아니고, 대수학 해법이라네요.
\documentclass{article}
\usepackage{xparse}
\usepackage{fontspec}
\ExplSyntaxOn
\NewDocumentCommand \Tys { >{\SplitList{~}} m }
{
\ProcessList{#1}{ \SplitTys }
}
\NewDocumentCommand \SplitTys { m }
{
\group_begin:
\bool_set_true:N \l_tmpa_bool
\tl_map_inline:nn {#1}
{
\bool_if:NTF \l_tmpa_bool
{
\PrintTys*{##1}
\bool_set_false:N \l_tmpa_bool
}
{
\PrintTys{##1}
\bool_set_true:N \l_tmpa_bool
}
}
\group_end:
\space
}
%% 1D360 = 119648
%% 1D369 = 119657
\NewDocumentCommand \PrintTys { s m }
{
\group_begin:
\fontspec{Apple Symbols}
\IfBooleanTF {#1}
{ \int_set:Nn \l_tmpa_int { #2 + 119647 } }
{ \int_set:Nn \l_tmpa_int { #2 + 119656 } }
\char"\int_to_Hex:n{\l_tmpa_int}
\group_end:
}
\ExplSyntaxOff
\begin{document}
\Tys{123 456} %% 여러 수 (number)
\SplitTys{8279} %% 한 수 (number)
\PrintTys*{5} \PrintTys{5} %% 한 숫자 (digit)
\end{document}
문제는, 0을 어떻게 표현해야 할지 모르겠습니다.
KTUG 한국 텍 사용자 그룹