summaryrefslogtreecommitdiff
path: root/macros/xetex
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2021-09-24 03:01:47 +0000
committerNorbert Preining <norbert@preining.info>2021-09-24 03:01:47 +0000
commit5d714d9476cbb90b125ff14a9d764ad90bb7c2ed (patch)
treeb426e6a4c96fc80fefa171542b39fd4725b7aea2 /macros/xetex
parenta26e6aee249adb0efff5d0eecaa2dfb8794585a5 (diff)
CTAN sync 202109240301
Diffstat (limited to 'macros/xetex')
-rw-r--r--macros/xetex/latex/hanzibox/README.md6
-rw-r--r--macros/xetex/latex/hanzibox/hanzibox.dtx590
-rw-r--r--macros/xetex/latex/hanzibox/hanzibox.pdfbin250802 -> 292228 bytes
-rw-r--r--macros/xetex/latex/zitie/README.md75
-rw-r--r--macros/xetex/latex/zitie/doc/zitie-cn.pdfbin0 -> 288061 bytes
-rw-r--r--macros/xetex/latex/zitie/doc/zitie-cn.tex608
-rw-r--r--macros/xetex/latex/zitie/tex/zitie.sty1016
7 files changed, 2157 insertions, 138 deletions
diff --git a/macros/xetex/latex/hanzibox/README.md b/macros/xetex/latex/hanzibox/README.md
index 58818c5ab5..68fd73ec82 100644
--- a/macros/xetex/latex/hanzibox/README.md
+++ b/macros/xetex/latex/hanzibox/README.md
@@ -1,5 +1,5 @@
hanzibox
-LaTeX3 Chinese Character package, v1.01
+LaTeX3 Chinese Character package, v1.1.0
=======
`hanzibox` is a LaTeX package written to simplify the input of Chinese
@@ -17,11 +17,11 @@ At present, hanzibox.sty only supports XeTeX engines and only allows UTF-8 encod
You can read the package manual (in Chinese) for more detailed explanations.
-Gitee repository: https://gitee.com/nwafu_nan/hanzibox-l3.
-
Contributing
------------
+Gitee repository: https://gitee.com/nwafu_nan/hanzibox-l3.
+
Issues and pull requests are welcome.
Copyright and Licence
diff --git a/macros/xetex/latex/hanzibox/hanzibox.dtx b/macros/xetex/latex/hanzibox/hanzibox.dtx
index f42af799ff..ae34ed29bb 100644
--- a/macros/xetex/latex/hanzibox/hanzibox.dtx
+++ b/macros/xetex/latex/hanzibox/hanzibox.dtx
@@ -5,7 +5,7 @@
%</internal>
%<*readme>
hanzibox
-LaTeX3 Chinese Character package, v1.01
+LaTeX3 Chinese Character package, v1.1.0
=======
`hanzibox` is a LaTeX package written to simplify the input of Chinese
@@ -23,11 +23,11 @@ At present, hanzibox.sty only supports XeTeX engines and only allows UTF-8 encod
You can read the package manual (in Chinese) for more detailed explanations.
-Gitee repository: https://gitee.com/nwafu_nan/hanzibox-l3.
-
Contributing
------------
+Gitee repository: https://gitee.com/nwafu_nan/hanzibox-l3.
+
Issues and pull requests are welcome.
Copyright and Licence
@@ -87,7 +87,7 @@ Copyright and Licence
This work has the LPPL maintenance status "maintained".
- The Current Maintainer of this work is Nan Geng Nan Geng.
+ The Current Maintainer of this work is Nan Geng.
--------------------------------------------------------------------------
@@ -114,14 +114,14 @@ Copyright and Licence
{
%</install>
%<*internal>
- \usedir{source/latex/hanzibox}
+ \usedir{source/xelatex/hanzibox}
\file{hanzibox.ins} {\from{\jobname.dtx}{install}}
%</internal>
%<*install>
- \usedir{tex/latex/hanzibox}
+ \usedir{xetex/xelatex/hanzibox}
\file{hanzibox.sty} {\from{\jobname.dtx}{package}}
\nopreamble\nopostamble
- \usedir{doc/latex/hanzibox}
+ \usedir{doc/xelatex/hanzibox}
\file{README.md} {\from{\jobname.dtx}{readme}}
}
@@ -132,7 +132,7 @@ Copyright and Licence
%</internal>
%<package>\NeedsTeXFormat{LaTeX2e}[2020/10/01]
%<package>\RequirePackage{expl3}
-%<+package>\GetIdInfo$Id: hanzibox.dtx 1.0.0 2021-09-18 20:00:00Z +0800 Nan Geng <nangeng@nwafu.edu.cn> $
+%<+package>\GetIdInfo$Id: hanzibox.dtx 1.1.0 2021-09-23 08:00:00 +0800 Nan Geng <nangeng@nwafu.edu.cn> $
%<package> {Boxed Chinese characters with Pinyin above and translation below.}
%<package>\ProvidesExplPackage{\ExplFileName}
%<package> {\ExplFileDate}{\ExplFileVersion}{\ExplFileDescription}
@@ -141,7 +141,6 @@ Copyright and Licence
\usepackage{listings}
\usepackage{xcolor}
\usepackage{xcolor-material}
-\usepackage{xpinyin}
\usepackage{hanzibox}
\renewcommand*\marg[1]{\{\meta{#1}\}}
\renewcommand*\oarg[1]{[\meta{#1}]}
@@ -161,7 +160,8 @@ Copyright and Licence
%
% \changes{v1.0.0}{2021/09/18}{开始编写模板。}
%
-% \CheckSum{0}
+% \CheckSum{420}
+% \GetFileId{hanzibox.sty}
%
% \CharacterTable
% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
@@ -179,7 +179,6 @@ Copyright and Licence
% Grave accent \` Left brace \{ Vertical bar \|
% Right brace \} Tilde \~}
%
-% \GetFileId{hanzibox.sty}
%
% \title{\bfseries\pkg{hanzibox}:田字格-米字格汉字练习宏包}
% \author{耿楠\\ \path{nangeng@nwafu.edu.cn}}
@@ -190,16 +189,23 @@ Copyright and Licence
%
% \begin{abstract}
%
-% \pkg{hanzibox} 是一个用\LaTeX3开发的 \LaTeX 宏包,提供了汉字学习中的田字格
-% 或米字格功能,并可以根据需要在汉字正上方显示拼音,在正下方显示需要的译文。
+% \pkg{hanzibox} 是一个用\LaTeX3开发的 \LaTeX 宏包,它提供了\tn{hanzidialog}和\tn{hanzibox}
+% 两个命令。这两个命令用于输出汉字学习中的田字格或米字格,并可以根据需要在汉字正上方显示拼音,
+% 在正下方显示需要的译文。其中,\tn{hanzidialog}命令的注音功能通过手动插入\pkg{xpinyin}宏包的
+% \tn{pinyin}命令实现。\tn{hanzibox}命令的注音功能自动调用\pkg{xpinyin}宏包的\tn{pinyin}命令实现,
+% 并且\tn{hanzibox}命令提供了\tn{hanzibox*}星号版本,该星号版本能够根据汉字自动调用
+% \pkg{xpinyin}宏包的\tn{xpinyin*}命令实现汉字注音。
%
% \end{abstract}
%
% \section{简要说明}
%
-% 建议使用\pkg{hanzibox}宏包的\LaTeX 源文件总是采用 \texttt{UTF-8}。
+% \pkg{hanzibox} 是一个用于输出汉字学习中的田字格或米字格,并在汉字正上方显示拼音,
+% 在正下方显示需要的译文。同时,也可以根据需要隐藏拼音、汉字或译文。
+%
+% 使用\pkg{hanzibox}宏包的\LaTeX 源文件需采用 \texttt{UTF-8}编码,并且需使用\XeLaTeX 进行编译。
%
-% \pkg{hanzibox} 还依赖 \package{l3kernel} 和 \package{l3packages}。
+% \pkg{hanzibox} 依赖 \package{l3kernel} 和 \package{l3packages}。
%
% \section{用户接口}
%
@@ -234,7 +240,7 @@ Copyright and Licence
% 星号命令用于根据汉字自动在顶部排版拼音,在底部排版译文。\\
% 此时,\oarg{拼音选项}中的拼音无效,可以留空,但若有译文则该选项不可省略;
% \oarg{译文选项}可以是任意文本。\\
-% 注意:此时的注意由\pkg{xpinyin}宏包实现,如需要设置多音字的拼音,请参阅其宏包说明。
+% 注意:此时的注音由\pkg{xpinyin}宏包实现,如需要设置多音字的拼音,请参阅其宏包说明。
% \begin{SideBySideExample}[frame=single,numbers=left,xrightmargin=.43\linewidth,gobble=5]
% \hanzibox*[inner=none,border=false]{我}[][me]
% \hanzibox*[inner=cross,border=true]{我}[][吾]
@@ -266,18 +272,36 @@ Copyright and Licence
%
% 布尔型的参数 \kvopt{\meta{选项}}{true} 中的“|= true|”可以省略。
%
+% \changes{v1.1.0}{2021/09/22}{添加外观选项设置命令示例代码。}
+%
+% \begin{frameverb}
+% \hanziboxset{
+% scale = 0.8, % 整体缩放比例
+% inner = star, % 盒子内部图案
+% border = true, % 是否有边框
+% borderwidth = 1.5 pt, % 边框宽度
+% bordercolor = red, % 边框颜色
+% fgcolor = red, % 盒子前景色(文字颜色)
+% bgcolor = yellow!50, % 盒子背景色
+% withpinyin = false, % 是否显示拼音
+% withhanzi = true, % 是否显示汉字
+% withtran = true % 是否显示译文
+% }
+% \end{frameverb}
+%
% 注:各选项也可以以相同的键值列表在汉字盒子命令的外观选项中进行设置。
%
% \subsection{缩放比例}
%
-% \begin{function}[added=2021-09-20]{ratio}
+% \changes{v1.1.0}{2021/09/22}{将缩放比例键ratio改为scale。}
+%
+% \begin{function}[added=2021-09-20,updated=2021-09-22]{scale}
% \begin{syntax}
-% ratio = \Arg{number}
+% scale = \Arg{number}
% \end{syntax}
% 设置\tn{hanzibox}命令绘制汉字盒子及其拼音和译文的整体缩放比例,默认值为\textbf{1.0}。
% \end{function}
%
-%
% \subsection{汉字边框}
%
% \begin{function}[added=2021-09-20]{border}
@@ -301,6 +325,26 @@ Copyright and Licence
% 为\tn{hanzibox}命令设置汉字的边框颜色,默认值为\textbf{black}。该选项对\tn{hanzidialog}命令无效。
% \end{function}
%
+% \changes{v1.1.0}{2021/09/21}{添加前景颜色设置选项。}
+%
+% \begin{function}[added=2021-09-21]{fgcolor}
+% \begin{syntax}
+% fgcolor = \Arg{color}
+% \end{syntax}
+% 为\tn{hanzibox}命令设置汉字盒子前景颜色(文字颜色),
+% 默认值为\textbf{black}。该选项对\tn{hanzidialog}命令无效。
+% \end{function}
+%
+% \changes{v1.1.0}{2021/09/21}{添加背景颜色设置选项。}
+%
+% \begin{function}[added=2021-09-21]{bgcolor}
+% \begin{syntax}
+% bgcolor = \Arg{color}
+% \end{syntax}
+% 为\tn{hanzibox}命令设置汉字盒子背景颜色(填充颜色),
+% 默认值为\textbf{white}。该选项对\tn{hanzidialog}命令无效。
+% \end{function}
+%
% \subsection{格子样式}
%
% \begin{function}[added=2021-09-20]{inner}
@@ -311,6 +355,65 @@ Copyright and Licence
% 默认值为\textbf{none}。该选项对\tn{hanzidialog}命令无效。
% \end{function}
%
+% \changes{v1.1.0}{2021/09/21}{添加隐藏拼音选项。}
+%
+% \subsection{内容隐藏}
+%
+% \begin{function}[added=2021-09-21]{withpinyin}
+% \begin{syntax}
+% withpinyin = <\TTF>
+% \end{syntax}
+% 为\tn{hanzibox}命令选择是否输出拼音,默认值为\textbf{true}。该选项对\tn{hanzidialog}命令无效。
+% \begin{SideBySideExample}[frame=single,numbers=left,xrightmargin=.35\linewidth,gobble=5]
+% \hanzibox[inner=cross]{我}[wo3][吾]
+% \hanzibox[withpinyin=false,inner=star]{我}[wo3][不才]
+% \hanzibox[bordercolor=red]{我们}[wo3men5][吾辈]
+% \end{SideBySideExample}
+% \begin{SideBySideExample}[frame=single,numbers=left,xrightmargin=.35\linewidth,gobble=5]
+% \hanzibox*[inner=cross]{我}[][吾]
+% \hanzibox*[withpinyin=false,inner=star]{我}[wo3][不才]
+% \hanzibox*[bordercolor=red]{我们}[wo3][吾辈]
+% \end{SideBySideExample}
+% \end{function}
+%
+% \changes{v1.1.0}{2021/09/21}{添加隐藏汉字选项。}
+%
+% \begin{function}[added=2021-09-21]{withhanzi}
+% \begin{syntax}
+% withhanzi = <\TTF>
+% \end{syntax}
+% 为\tn{hanzibox}命令选择是否输出汉字,默认值为\textbf{true}。该选项对\tn{hanzidialog}命令无效。
+% \begin{SideBySideExample}[frame=single,numbers=left,xrightmargin=.35\linewidth,gobble=5]
+% \hanzibox[inner=cross]{我}[wo3][吾]
+% \hanzibox[withhanzi=false,inner=star]{我}[wo3][不才]
+% \hanzibox[bordercolor=red]{我们}[wo3men5][吾辈]
+% \end{SideBySideExample}
+% \begin{SideBySideExample}[frame=single,numbers=left,xrightmargin=.35\linewidth,gobble=5]
+% \hanzibox*[inner=cross]{我}[][吾]
+% \hanzibox*[withhanzi=false,inner=star]{我}[wo3][不才]
+% \hanzibox*[bordercolor=red]{我们}[wo3][吾辈]
+% \end{SideBySideExample}
+% \end{function}
+%
+% \changes{v1.1.0}{2021/09/21}{添加隐藏译文选项。}
+%
+% \begin{function}[added=2021-09-21]{withtran}
+% \begin{syntax}
+% withtran = <\TTF>
+% \end{syntax}
+% 为\tn{hanzibox}命令选择是否输出译文,默认值为\textbf{true}。该选项对\tn{hanzidialog}命令无效。
+% \begin{SideBySideExample}[frame=single,numbers=left,xrightmargin=.35\linewidth,gobble=5]
+% \hanzibox[inner=cross]{我}[wo3][吾]
+% \hanzibox[withtran=false,inner=star]{我}[wo3][不才]
+% \hanzibox[bordercolor=red]{我们}[wo3men5][吾辈]
+% \end{SideBySideExample}
+% \begin{SideBySideExample}[frame=single,numbers=left,xrightmargin=.35\linewidth,gobble=5]
+% \hanzibox*[inner=cross]{我}[][吾]
+% \hanzibox*[withtran=false,inner=star]{我}[wo3][不才]
+% \hanzibox*[bordercolor=red]{我们}[wo3][吾辈]
+% \end{SideBySideExample}
+% \end{function}
+%
% \end{documentation}
%
% \StopEventually{}
@@ -374,15 +477,12 @@ Copyright and Licence
% \begin{macrocode}
\sys_if_engine_xetex:F
{
- \sys_if_engine_luatex:F
- {
- \msg_fatal:nnx { hanzibox } { unsupported-engine }
- { \c_sys_engine_str }
- }
+ \msg_fatal:nnx { hanzibox } { unsupported-engine }
+ { \c_sys_engine_str }
}
\msg_new:nnn { hanzibox } { unsupported-engine }
{
- The~ hanzibox~ packages~ requires~ either~ XeTeX~ or~ LuaTeX. \\\\
+ The~ hanzibox~ packages~ requires~ either~ XeTeX. \\\\
"#1"~ is~ not~ supported~ at~ present.~ You~ must~ change \\
your~ typesetting~ engine~ to~ "xelatex"~ or~ "lualatex".
}
@@ -440,12 +540,16 @@ Copyright and Licence
%
% \subsection{用户接口}
%
+% \changes{v1.1.0}{2021/09/22}{为用户命令添加组限制。}
+%
% \begin{macro}{\hanzidialog}
% 手动汉字盒子命令。
% \begin{macrocode}
\NewDocumentCommand{\hanzidialog}{ m O{} O{} }
{
- \@@_dialog:nnnn { #1 } { #2 } { #3 }
+ \group_begin:
+ \@@_dialog:nnnn { #1 } { #2 } { #3 }
+ \group_end:
}
% \end{macrocode}
@@ -458,9 +562,13 @@ Copyright and Licence
{
\IfBooleanTF{#1}
{
- \@@_star_draw:nnnn { #2 } { #3 } { #4 } { #5 }
+ \group_begin:
+ \@@_asterisk_draw:nnnn { #2 } { #3 } { #4 } { #5 }
+ \group_end:
}{
- \@@_draw:nnnn { #2 } { #3 } { #4 } { #5 }
+ \group_begin:
+ \@@_draw:nnnn { #2 } { #3 } { #4 } { #5 }
+ \group_end:
}
}
@@ -469,10 +577,18 @@ Copyright and Licence
%
% \subsection{内部变量声明}
%
-% \begin{variable}{\l_@@_inner_int,
+% \changes{v1.1.0}{2021/09/21}{添加缩放比例,前景/背景色,隐藏控制变量。}
+%
+% \begin{variable}{\fp_new:N \l_@@_scale_fp,
+% \l_@@_inner_int,
% \l_@@_border_bool,
% \l_@@_borderwidth_dim,
% \l_@@_bordercolor_tl,
+% \l_@@_fgcolor_tl,
+% \l_@@_bgcolor_tl,
+% \l_@@_pinyin_bool,
+% \l_@@_hanzi_bool,
+% \l_@@_tran_bool,
% \l_@@_pinyin_tl,
% \l_@@_character_tl,
% \l_@@_translation_tl,
@@ -481,12 +597,18 @@ Copyright and Licence
% \l_@@_translation_int
% }
% 临时变量。
+%
% \begin{macrocode}
-\fp_new:N \l_@@_ratio_fp
+\fp_new:N \l_@@_scale_fp
\int_new:N \l_@@_inner_int
\bool_new:N \l_@@_border_bool
\dim_new:N \l_@@_borderwidth_dim
\tl_new:N \l_@@_bordercolor_tl
+\tl_new:N \l_@@_fgcolor_tl
+\tl_new:N \l_@@_bgcolor_tl
+\bool_new:N \l_@@_pinyin_bool
+\bool_new:N \l_@@_hanzi_bool
+\bool_new:N \l_@@_tran_bool
\tl_new:N \l_@@_pinyin_tl
\tl_new:N \l_@@_character_tl
\tl_new:N \l_@@_translation_tl
@@ -506,11 +628,13 @@ Copyright and Licence
{
% \end{macrocode}
%
-% \begin{macro}{ratio}
+% \changes{v1.1.0}{2021/09/21}{添加缩放比例键。}
+%
+% \begin{macro}{scale}
% 设置汉字及其拼音和译文的整体缩放比例。
% \begin{macrocode}
- ratio .fp_set:N = \l_@@_ratio_fp,
- ratio .initial:n = 1.0,
+ scale .fp_set:N = \l_@@_scale_fp,
+ scale .initial:n = 1.0,
% \end{macrocode}
% \end{macro}
@@ -556,6 +680,65 @@ Copyright and Licence
% \end{macrocode}
% \end{macro}
%
+% \changes{v1.1.0}{2021/09/21}{添加前景颜色键。}
+%
+% \begin{macro}{fgcolor}
+% 汉字盒子前景颜色(文字颜色),默认为black。
+% \begin{macrocode}
+ fgcolor .tl_set:N = \l_@@_fgcolor_tl,
+ fgcolor .initial:n = black,
+
+% \end{macrocode}
+% \end{macro}
+%
+% \changes{v1.1.0}{2021/09/21}{添加背景颜色键。}
+%
+% \begin{macro}{bgcolor}
+% 汉字盒子背景颜色,默认为black。
+% \begin{macrocode}
+ bgcolor .tl_set:N = \l_@@_bgcolor_tl,
+ bgcolor .initial:n = white,
+
+% \end{macrocode}
+% \end{macro}
+%
+% \changes{v1.1.0}{2021/09/21}{添加隐藏拼音键。}
+%
+% \begin{macro}{withpinyin}
+% 是否显示汉语拼音,默认为true。
+% \begin{macrocode}
+ withpinyin .bool_set:N = \l_@@_pinyin_bool,
+ withpinyin .default:n = true,
+ withpinyin .initial:n = true,
+
+% \end{macrocode}
+% \end{macro}
+%
+% \changes{v1.1.0}{2021/09/21}{添加隐藏汉字键。}
+%
+% \begin{macro}{withhanzi}
+% 是否显示汉语拼音,默认为true。
+% \begin{macrocode}
+ withhanzi .bool_set:N = \l_@@_hanzi_bool,
+ withhanzi .default:n = true,
+ withhanzi .initial:n = true,
+
+% \end{macrocode}
+% \end{macro}
+%
+% \changes{v1.1.0}{2021/09/21}{添加隐藏译文键。}
+%
+% \begin{macro}{withtran}
+% 是否显示汉语拼音,默认为true。
+% \begin{macrocode}
+ withtran .bool_set:N = \l_@@_tran_bool,
+ withtran .default:n = true,
+ withtran .initial:n = true,
+
+% \end{macrocode}
+% \end{macro}
+%
+%
% 处理未知选项。
% \begin{macrocode}
unknown .code:n = { \@@_error:n { unknown-option } }
@@ -585,13 +768,13 @@ Copyright and Licence
\tl_set:Nx \l_@@_character_tl {#1}
\tl_set:Nx \l_@@_pinyin_tl {#2}
\tl_set:Nx \l_@@_translation_tl {#3}
- \scalebox{\fp_use:N \l_@@_ratio_fp}{
+ \scalebox{\fp_use:N \l_@@_scale_fp}{
\tikz[scale=0.5, every~node/.style={inner~sep=0,outer~sep=0}]{%
- {\node[] at (1,1){\huge{\tl_use:N \l_@@_character_tl}}};
- {\node[label={\strut\small\textbf{\tl_use:N \l_@@_pinyin_tl}},
+ {\node[] at (1,1){\huge{\l_@@_character_tl}}};
+ {\node[label={\strut\small\textbf{\l_@@_pinyin_tl}},
text~height=1cm] (charr) at (1,1){};}%
{\node[align=center] at (1,-0.5)
- {\strut\small\textit{\tl_use:N \l_@@_translation_tl}};}%
+ {\strut\small\textit{\l_@@_translation_tl}};}%
}%
}%
}
@@ -610,6 +793,11 @@ Copyright and Licence
% \end{macro}
% \end{macro}
%
+% \changes{v1.1.0}{2021/09/21}{添加整体缩放代码。}
+% \changes{v1.1.0}{2021/09/21}{添加按需要隐藏拼音、汉字或译文代码。}
+% \changes{v1.1.0}{2021/09/21}{将隐藏功能修正为用前景/背景色实现。}
+% \changes{v1.1.0}{2021/09/22}{将各部分绘制分解为函数实现。}
+%
% \begin{macro}{\@@_draw:nnnn}
% 自动汉字盒子排版内部命令,根据选项用TikZ实现绘制。
% \begin{macrocode}
@@ -647,74 +835,73 @@ Copyright and Licence
\tl_count:V \l_@@_translation_tl
}
- \scalebox{\fp_use:N \l_@@_ratio_fp}{
+ \scalebox{\fp_use:N \l_@@_scale_fp}{
\tikz[scale=0.5, every~node/.style={inner~sep=0,outer~sep=0}]{%
- \int_compare:nNnT { \l_@@_character_int } < {2}
+% \end{macrocode}
+%
+% 根据汉字长度绘制汉字盒子背景,必须提前绘制
+%
+% \begin{macrocode}
+ \@@_border_draw:n {0.0cm}
+% \end{macrocode}
+%
+% 如果显示汉字,则内部格线应该提前绘制
+%
+% \begin{macrocode}
+ \bool_if:NT \l_@@_hanzi_bool
{
- \int_case:nn {\l_@@_inner_int}
- {
- {1}{
- }
- {2}{
- \draw[stretch~dash=on~2pt~off~2pt,thin,
- \tl_use:N \l_@@_bordercolor_tl!50](0,0)--(2,2);%
- \draw[stretch~dash=on~2pt~off~2pt,thin,
- \tl_use:N \l_@@_bordercolor_tl!50](0,2)--(2,0);%
-
- \draw[stretch~dash=on~2pt~off~2pt,thin,
- \tl_use:N \l_@@_bordercolor_tl!50](0,1)--(2,1);%
- \draw[stretch~dash=on~2pt~off~2pt,thin,
- \tl_use:N \l_@@_bordercolor_tl!50](1,0)--(1,2);%
- }
- {3}{
- \draw[stretch~dash=on~2pt~off~2pt,thin,
- \tl_use:N \l_@@_bordercolor_tl!50](0,1)--(2,1);%
- \draw[stretch~dash=on~2pt~off~2pt,thin,
- \tl_use:N \l_@@_bordercolor_tl!50](1,0)--(1,2);%
- }
- }
+ \@@_frame_background:n {0.0cm}
}
\int_compare:nNnTF { \l_@@_character_int } = {0}
{
- \draw[line~width=\dim_use:N \l_@@_borderwidth_dim,
- \tl_use:N \l_@@_bordercolor_tl] (0,0) rectangle(2,2);
- \node[] at (1,1){\huge{\tl_use:N \l_@@_character_tl}};
- \int_compare:nNnTF { \l_@@_pinyin_int } = {0}
- { }
+ \bool_if:NTF \l_@@_hanzi_bool
{
- \node[label={\strut\small\@@_pinyinaux:x {\l_@@_pinyin_tl}},
- text~height=1cm] (charr) at (1,1){};
+ \node[\l_@@_fgcolor_tl] at (1,1){\huge{\l_@@_character_tl}};
+ }{
+ \node[\l_@@_bgcolor_tl] at (1,1){\huge{\l_@@_character_tl}};
}
- \int_compare:nNnTF { \l_@@_translation_int } = {0}
- { }
+ \bool_if:NTF \l_@@_pinyin_bool
{
- \node[align=center] at (1,-0.5)
- {\strut\small\textit{\tl_use:N \l_@@_translation_tl}};
+ \node[label={[font=\small,text=\l_@@_fgcolor_tl]
+ \strut\@@_pinyinaux:x {\l_@@_pinyin_tl}},
+ text~height=1cm] (charr) at (1,1){};
+ }{
+ \node[label={[font=\small,text=\l_@@_bgcolor_tl]
+ \strut\@@_pinyinaux:x {\l_@@_pinyin_tl}},
+ text~height=1cm] (charr) at (1,1){};
}
+ \@@_tran_draw:nn {1}{-0.5}
}
{
- \bool_if:NTF \l_@@_border_bool
- {
- \draw[line~width=\dim_use:N \l_@@_borderwidth_dim,
- \tl_use:N \l_@@_bordercolor_tl] (0,0) rectangle(2*\l_@@_character_int,2);
- }{}
-
- \node[] at (1*\l_@@_character_int,1)
- {\huge\tl_use:N \l_@@_character_tl};
-
- \int_compare:nNnTF { \l_@@_pinyin_int } = {0}
- { }
+ \bool_if:NTF \l_@@_hanzi_bool
{
- \node[label={\strut\small\@@_pinyinaux:x {\l_@@_pinyin_tl}},
- text~height=1cm] (charr) at (1*\l_@@_character_int,1){};
+ \node[\l_@@_fgcolor_tl] at (1*\l_@@_character_int,1)
+ {\huge\tl_use:N \l_@@_character_tl};
+ }{
+ \node[\l_@@_bgcolor_tl] at (1*\l_@@_character_int,1)
+ {\huge\tl_use:N \l_@@_character_tl};
}
- \int_compare:nNnTF { \l_@@_translation_int } = {0}
- { }
+ \bool_if:NTF \l_@@_pinyin_bool
{
- \node[align=center] at (1*\l_@@_character_int,-0.5)
- {\strut\small\textit{\tl_use:N \l_@@_translation_tl}};
+ \node[label={[font=\small,text=\l_@@_fgcolor_tl]
+ \strut\@@_pinyinaux:x {\l_@@_pinyin_tl}},
+ text~height=1cm] (charr) at (1*\l_@@_character_int,1){};
+ }{
+ \node[label={[font=\small,text=\l_@@_bgcolor_tl]
+ \strut\@@_pinyinaux:x {\l_@@_pinyin_tl}},
+ text~height=1cm] (charr) at (1*\l_@@_character_int,1){};
}
+ \@@_tran_draw:nn {\l_@@_character_int}{-0.5}
+ }
+% \end{macrocode}
+%
+% 如果不显示汉字,则内部格线应该最后绘制
+%
+% \begin{macrocode}
+ \bool_if:NF \l_@@_hanzi_bool
+ {
+ \@@_frame_background:n {0.0cm}
}
}%
}%
@@ -722,10 +909,15 @@ Copyright and Licence
% \end{macrocode}
% \end{macro}
%
-% \begin{macro}{\@@_star_draw:nnnn}
+% \changes{v1.1.0}{2021/09/21}{添加\tn{hanzibox*}星号命令的内部实现代码。}
+% \changes{v1.1.0}{2021/09/21}{添加按需要隐藏拼音、汉字或译文代码。}
+% \changes{v1.1.0}{2021/09/21}{将隐藏功能修正为用前景/背景色实现。}
+% \changes{v1.1.0}{2021/09/22}{将各部分绘制分解为函数实现。}
+%
+% \begin{macro}{\@@_asterisk_draw:nnnn}
% 自动汉字拼音盒子排版内部命令,根据选项用TikZ实现绘制。
% \begin{macrocode}
-\cs_new_protected:Npn \@@_star_draw:nnnn #1#2#3#4
+\cs_new_protected:Npn \@@_asterisk_draw:nnnn #1#2#3#4
{
% \end{macrocode}
%
@@ -759,61 +951,86 @@ Copyright and Licence
\tl_count:V \l_@@_translation_tl
}
- \scalebox{\fp_use:N \l_@@_ratio_fp}{
+ \scalebox{\fp_use:N \l_@@_scale_fp}{
\tikz[scale=0.5, every~node/.style={inner~sep=0,outer~sep=0}]{%
- \int_compare:nNnT { \l_@@_character_int } < {2}
+% \end{macrocode}
+%
+% 根据汉字长度绘制汉字盒子背景,必须提前绘制
+%
+% \begin{macrocode}
+ \@@_border_draw:n {-0.5cm}
+% \end{macrocode}
+%
+% 如果显示汉字,则内部格线应该提前绘制
+%
+% \begin{macrocode}
+ \bool_if:NT \l_@@_hanzi_bool
{
- \int_case:nn {\l_@@_inner_int}
- {
- {1}{
- }
- {2}{
- \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=-0.5cm,
- \tl_use:N \l_@@_bordercolor_tl!50](0,0)--(2,2);%
- \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=-0.5cm,
- \tl_use:N \l_@@_bordercolor_tl!50](0,2)--(2,0);%
-
- \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=-0.5cm,
- \tl_use:N \l_@@_bordercolor_tl!50](0,1)--(2,1);%
- \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=-0.5cm,
- \tl_use:N \l_@@_bordercolor_tl!50](1,0)--(1,2);%
- }
- {3}{
- \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=-0.5cm,
- \tl_use:N \l_@@_bordercolor_tl!50](0,1)--(2,1);%
- \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=-0.5cm,
- \tl_use:N \l_@@_bordercolor_tl!50](1,0)--(1,2);%
- }
- }
+ \@@_frame_background:n {-0.5cm}
}
\int_compare:nNnTF { \l_@@_character_int } = {0}
{
- \draw[line~width=\dim_use:N \l_@@_borderwidth_dim, yshift=-0.5cm,
- \tl_use:N \l_@@_bordercolor_tl] (0,0) rectangle(2,2);
- \node[] at (1,1){\huge{\xpinyin*[vsep=0.85 cm]{\tl_use:N \l_@@_character_tl}}};
- \int_compare:nNnTF { \l_@@_translation_int } = {0}
- { }
+ \bool_if:NTF \l_@@_pinyin_bool
{
- \node[align=center] at (1,-1.0)
- {\strut\small\textit{\tl_use:N \l_@@_translation_tl}};
+ \bool_if:NTF \l_@@_hanzi_bool
+ {
+ \node[\l_@@_fgcolor_tl] at (1,1)
+ {\huge{\xpinyin*[format={\small\color{\l_@@_fgcolor_tl}},
+ vsep=0.90 cm]{\l_@@_character_tl}}};
+ }{
+ \node[\l_@@_bgcolor_tl] at (1,1)
+ {\huge{\xpinyin*[format={\small\color{\l_@@_fgcolor_tl}},
+ vsep=0.90 cm]{\l_@@_character_tl}}};
+ }
+ }{
+ \bool_if:NTF \l_@@_hanzi_bool
+ {
+ \node[\l_@@_fgcolor_tl] at (1,1)
+ {\huge{\xpinyin*[format={\small\color{\l_@@_bgcolor_tl}},
+ vsep=0.90 cm]{\l_@@_character_tl}}};
+ }{
+ \node[\l_@@_fgcolor_tl] at (1,1)
+ {\huge{\xpinyin*[format={\small\color{\l_@@_bgcolor_tl}},
+ vsep=0.90 cm]{\l_@@_character_tl}}};
+ }
}
+ \@@_tran_draw:nn {1}{-1.0}
}
{
- \bool_if:NTF \l_@@_border_bool
+ \bool_if:NTF \l_@@_pinyin_bool
{
- \draw[line~width=\dim_use:N \l_@@_borderwidth_dim, yshift=-0.5cm,
- \tl_use:N \l_@@_bordercolor_tl] (0,0) rectangle(2*\l_@@_character_int,2);
- }{}
-
- \node[] at (1*\l_@@_character_int,1)
- {\huge{\xpinyin*[vsep=0.90 cm]{\tl_use:N \l_@@_character_tl}}};
-
- \int_compare:nNnTF { \l_@@_translation_int } = {0}
- { }
- {
- \node[align=center] at (1*\l_@@_character_int,-1.0)
- {\strut\small\textit{\tl_use:N \l_@@_translation_tl}};
+ \bool_if:NTF \l_@@_hanzi_bool
+ {
+ \node[\l_@@_fgcolor_tl] at (1*\l_@@_character_int,1)
+ {\huge{\xpinyin*[format={\small\color{\l_@@_fgcolor_tl}},
+ vsep=0.90 cm]{\l_@@_character_tl}}};
+ }{
+ \node[\l_@@_bgcolor_tl] at (1*\l_@@_character_int,1)
+ {\huge{\xpinyin*[format={\small\color{\l_@@_fgcolor_tl}},
+ vsep=0.90 cm]{\l_@@_character_tl}}};
+ }
+ }{
+ \bool_if:NTF \l_@@_hanzi_bool
+ {
+ \node[\l_@@_fgcolor_tl] at (1*\l_@@_character_int,1)
+ {\huge{\xpinyin*[format={\small\color{\l_@@_bgcolor_tl}},
+ vsep=0.90 cm]{\l_@@_character_tl}}};
+ }{
+ \node[\l_@@_fgcolor_tl] at (1*\l_@@_character_int,1)
+ {\huge{\xpinyin*[format={\small\color{\l_@@_bgcolor_tl}},
+ vsep=0.90 cm]{\l_@@_character_tl}}};
+ }
}
+ \@@_tran_draw:nn {\l_@@_character_int}{-1.0}
+ }
+% \end{macrocode}
+%
+% 如果不显示汉字,则内部格线应该最后绘制
+%
+% \begin{macrocode}
+ \bool_if:NF \l_@@_hanzi_bool
+ {
+ \@@_frame_background:n {-0.5cm}
}
}%
}%
@@ -821,6 +1038,109 @@ Copyright and Licence
% \end{macrocode}
% \end{macro}
%
+% \changes{v1.1.0}{2021/09/22}{添加方格背景绘制内部函数。}
+%
+% \begin{macro}{\@@_frame_background:n}
+% TikZ米字格绘制代码。
+% \begin{macrocode}
+\cs_new_protected:Npn \@@_frame_background:n #1
+ {
+ \int_compare:nNnT { \l_@@_character_int } < {2}
+ {
+ \int_case:nn {\l_@@_inner_int}
+ {
+ {1}{
+ }
+ {2}{
+ \@@_star_background:n {#1}
+ }
+ {3}{
+ \@@_cross_background:n {#1}
+ }
+ }
+ }
+ }
+% \end{macrocode}
+% \end{macro}
+%
+% \changes{v1.1.0}{2021/09/22}{添加米字格内部函数。}
+%
+% \begin{macro}{\@@_star_background:n}
+% TikZ米字格绘制代码。
+% \begin{macrocode}
+\cs_new_protected:Npn \@@_star_background:n #1
+ {
+ \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=#1,
+ \l_@@_bordercolor_tl!50](0,0)--(2,2);%
+ \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=#1,
+ \l_@@_bordercolor_tl!50](0,2)--(2,0);%
+
+ \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=#1,
+ \l_@@_bordercolor_tl!50](0,1)--(2,1);%
+ \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=#1,
+ \l_@@_bordercolor_tl!50](1,0)--(1,2);%
+ }
+% \end{macrocode}
+% \end{macro}
+%
+% \changes{v1.1.0}{2021/09/22}{添加田字格背景内部函数。}
+%
+% \begin{macro}{\@@_cross_background:n}
+% TikZ田字格绘制代码。
+% \begin{macrocode}
+\cs_new_protected:Npn \@@_cross_background:n #1
+ {
+ \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=#1,
+ \l_@@_bordercolor_tl!50](0,1)--(2,1);%
+ \draw[stretch~dash=on~2pt~off~2pt,thin, yshift=#1,
+ \l_@@_bordercolor_tl!50](1,0)--(1,2);%
+ }
+% \end{macrocode}
+% \end{macro}
+%
+% \changes{v1.1.0}{2021/09/22}{添加背景方格内部函数。}
+%
+% \begin{macro}{\@@_border_draw:n}
+% 绘制边框代码。
+% \begin{macrocode}
+\cs_new_protected:Npn \@@_border_draw:n #1
+ {
+ \int_compare:nNnTF { \l_@@_character_int } = {0}
+ {
+ \draw[fill=\l_@@_bgcolor_tl,line~width=\l_@@_borderwidth_dim,
+ yshift=#1, draw=\l_@@_bordercolor_tl] (0,0) rectangle(2,2);
+ }
+ {
+ \bool_if:NTF \l_@@_border_bool
+ {
+ \draw[fill=\l_@@_bgcolor_tl,line~width=\l_@@_borderwidth_dim,
+ yshift=#1, draw=\l_@@_bordercolor_tl] (0,0)
+ rectangle(2*\l_@@_character_int,2);
+ }{}
+ }
+ }
+% \end{macrocode}
+% \end{macro}
+%
+% \changes{v1.1.0}{2021/09/22}{添加译文文本绘制内部函数。}
+%
+% \begin{macro}{\@@_tran_draw:nn}
+% 绘制译文文本。
+% \begin{macrocode}
+\cs_new_protected:Npn \@@_tran_draw:nn #1#2
+ {
+ \bool_if:NTF \l_@@_tran_bool
+ {
+ \node[align=center,\l_@@_fgcolor_tl] at (1*#1,#2)
+ {\strut\small\textit{\l_@@_translation_tl}};
+ }{
+ \node[align=center,\l_@@_bgcolor_tl] at (1*#1,#2)
+ {\strut\small\textit{\l_@@_translation_tl}};
+ }
+ }
+% \end{macrocode}
+% \end{macro}
+%
% \begin{macrocode}
%</package>
% \end{macrocode}
diff --git a/macros/xetex/latex/hanzibox/hanzibox.pdf b/macros/xetex/latex/hanzibox/hanzibox.pdf
index 23e93b20dc..57f81b9296 100644
--- a/macros/xetex/latex/hanzibox/hanzibox.pdf
+++ b/macros/xetex/latex/hanzibox/hanzibox.pdf
Binary files differ
diff --git a/macros/xetex/latex/zitie/README.md b/macros/xetex/latex/zitie/README.md
new file mode 100644
index 0000000000..f70e1fc844
--- /dev/null
+++ b/macros/xetex/latex/zitie/README.md
@@ -0,0 +1,75 @@
+# zitie
+
+zitie is a LaTeX package for making CJK character calligraphy practicing
+sheet (copybook).
+
+zitie distinguishes `CJK` Classes and `Punctutation` Classes (`FullLeft`,
+`FullRight`, `HalfLeft`, `HalfRight`) and other Classes.
+
+## Main Interfaces
+
+`\framezi*[<options>]{<CJK chars>}`, makes frame for every single <CJK chars>
+
+`\framezifile*[<options>]{<filename>}`, makes frame from <filename>
+containning <CJK chars>
+
+`\framerange[<options>]{<char Hex range>}`, makes frame from Hex range,
+such as: "4E00 -> "4E27, "4E30. etc
+
+`\zitienewfont*{...}`, declares new font(s) for making frame
+
+`\framezhlipsum[<options>]{<paragraphs>}[<name>]`, frames Lorem ipsum given
+<name> and <paragraphs> made by package `zhlipsum`. Use
+`\usepackage[enable-zhlipsum]{zitie}` to enable this function
+
+`\zitiebackground[<background options>]`, make frames in background,
+much faster than `\frame...` family. Use
+`\usepackage[enable-background]{zitie}` to enable this function
+
+`\begin{zitieframe}{<initials>}[<options>] ... \end{zitieframe}`,
+environment version for `\framezi`, can cantain `\par`
+
+`\zitieCJKfamily`, use CJK font family declared before
+
+`\zitiecolorlet`, zitie version of `\colorlet` in `xcolor` package
+
+`...`
+
+See PDF documentation (in chinese) for more details.
+
+Please note the frame functions of this package currently do need many TeX
+computation, so the compiling maybe very slow.
+
+Currently, only support XeTeX.
+
+## Dependence:
+
+`LaTeX2e 2020-10-01` and after, `l3draw`, `xeCJK`, `ctexsize`, please note that `l3draw`
+is very experimental, some interfaces maybe cannot use later.
+
+Need not `pgf` or `pstricks`.
+
+## TODO:
+- faster and less resource
+- optimize `background` module
+- support LuaTeX
+- support pinyin
+- more grid
+- more transformation
+- support more character Classes
+- support opacity (require l3opacity)
+- ...
+
+## IMPORTANT!!!
+
+Please note the attached PDF documentation contains NON-COMMERCIAL font.
+The copyright of those fonts belong to font designer(s), mainly, FounderType.
+CANNOT be used for commercial purposes without authorization.
+
+Source file (zitie.tex, zitie.sty) under LPPL 1.3c license.
+
+## Contact
+
+GitHub: https://github.com/Sophanatprime/zitie
+
+Email: longaster@163.com \ No newline at end of file
diff --git a/macros/xetex/latex/zitie/doc/zitie-cn.pdf b/macros/xetex/latex/zitie/doc/zitie-cn.pdf
new file mode 100644
index 0000000000..fef8c4afec
--- /dev/null
+++ b/macros/xetex/latex/zitie/doc/zitie-cn.pdf
Binary files differ
diff --git a/macros/xetex/latex/zitie/doc/zitie-cn.tex b/macros/xetex/latex/zitie/doc/zitie-cn.tex
new file mode 100644
index 0000000000..e310b6f930
--- /dev/null
+++ b/macros/xetex/latex/zitie/doc/zitie-cn.tex
@@ -0,0 +1,608 @@
+\PassOptionsToPackage{AutoFallBack}{xeCJK}
+\documentclass{ctxdoc}
+\usepackage[enable-zhlipsum,enable-background]{zitie}
+\usepackage{geometry}
+
+\NewDocumentCommand{\init}{+v}{\hspace{\fill}初始值~=~\textcolor{blue}{\bfseries#1}}
+
+\IfFontExistsTF{KaiTi}{\zitienewfont{{楷体}{KaiTi}}}{}
+\IfFontExistsTF{FZSunGuoTingCaoShuFU}{\zitienewfont{{孙过庭草繁}{FZSunGuoTingCaoShuFU}{FallBack=SimSun}}}{}
+\IfFontExistsTF{FZWenZhengMingXingCaoJF}{\zitienewfont{{文征明行草简繁}{FZWenZhengMingXingCaoJF}{FallBack=KaiTi}}}{}
+
+\zitiesetup{
+ framecolor=green!60!black,charcolor=red!65!black,
+ resize=square,frametype=咪,font,savefontname,
+}
+\def\zitieversion{1.1}
+\title{\texorpdfstring{\framezi[width=3\ccwd,fillcolor=black,charcolor=red!75!black,font=文征明行草简繁]{字帖}\framezi[width=2\ccwd,font=楷体]{宏包}}{zitie宏包}}
+\date{\texorpdfstring{\framezi[width=2\ccwd,font=文征明行草简繁]{农历二〇二一年八月十五}}{农历二〇二一年八月十五} v\zitieversion}
+\author{陈文建(Longaster)}
+
+\begin{document}
+
+\newgeometry{textheight=27cm,textwidth=17cm,bottom=1.7cm}
+\maketitle
+\thispagestyle{empty}
+
+\parskip=0pt \parindent=0pt \lineskip=0pt \raggedright
+\framezi[
+ width=1.8cm,punctuation=onlast,
+ fillcolor=black,charcolor=red!75!black,font=文征明行草简繁,
+]{
+ 我欲乘風向北行,
+ 雪落軒轅大如席。
+ 我欲借船向東游,
+ 綽約仙子迎風立。
+ 我欲踏云千萬裏,
+ 廟堂龍吟奈我何。}%
+\framezi[
+ width=1.8cm,punctuation=onlast,charstroke=whitesolid,
+ fillcolor=black,charcolor=red!75!black,font=文征明行草简繁,
+]{
+ 昆侖之巔沐日光,
+ 滄海絕境見青山。
+ 長風萬裏燕歸來,
+ 不見天涯人不回。}
+
+\bigskip
+
+\zitienewrule{punctuation}{package1}{\makebox[\zitiewidth][l]{ \zitieCJKfamily{\zitiefontname} #1}}
+\framezi[
+ width=2.5\ccwd,linewidth=.2pt,
+ dashpattern={1mm,.5mm},punctuation=package1,
+ fillcolor={},framecolor=red,charcolor=black,
+ font=孙过庭草繁,
+]{
+ 我欲乘風向北行,
+ 雪落軒轅大如席。
+ 我欲借船向東游,
+ 綽約仙子迎風立。
+ 我欲踏云千萬裏,
+ 廟堂龍吟奈我何。
+ 昆侖之巔沐日光,
+ 滄海絕境見青山。
+ 長風萬裏燕歸來,
+ 不見天涯人不回。
+}\hfill ——《少年歌行》
+
+{\heiti\small 注:本文档中的非商业的字体版权为原字体公司(北京方正有限公司及其它相关公司),此处使用该字体仅为显示该宏包的排版效果,不作商业用途。本文档\pkg{zitie.tex}和相应的\pkg{zitie.sty}源文件使用 \href{https://www.latex-project.org/lppl/lppl-1-3c/}{LPPL 1.3c 协议。}}
+
+\clearpage
+\restoregeometry
+\setlength{\parindent}{2\ccwd}
+\lineskip=2bp
+\zitiebackground[
+ on,linewidth=.2pt,dashpattern={1mm,.5mm,2mm,1mm},
+ frametype=田,framecolor=green!80!black,
+ colboxes=20,rowboxes=30,
+]
+
+\pkg{zitie} 宏包是用纯 \LaTeX3 模块编写的(即,不加载 \pkg{pgf}、\pkg{pstricks} 等绘图宏包),来生成网格化的字、生成网格化的背景的宏包。绘图功能完全依赖 \pkg{l3draw},但应注意 \pkg{l3draw} 目前仍然是实验性的,其接口在后续版本可能无法使用。
+
+\LaTeXe 版本应在 2020-10-01 及以后。
+
+目前仅支持 \XeTeX,待后续版本支持 \LuaTeX,不支持 \pdfTeX。
+
+\tableofcontents
+
+\section{\pkg{zitie} 宏包的加载和基本命令}\label{sec:basics}
+
+加载宏包:\tn{usepackage}\oarg{key-val}\verb|{zitie}|。\meta{key-val} 选项见以下几节。
+
+若要加载 \pkg{ctex} 宏包,请先加载 \pkg{ctex} 然后再加载 \pkg{zitie} 宏包。若加载本宏包时未加载 \pkg{ctex} 宏包,
+则会加载 \pkg{xeCJK} 宏包和 \pkg{ctexsize} 宏包。如果是Windows平台,还将设置宋体为主字体。
+
+\begin{function}{\zitienewfont,\zitieCJKfamily}
+ \begin{syntax}
+ \cs{zitienewfont} \{ \marg{font family} \marg{font name} , ... \}
+ \cs{zitienewfont} \{ \marg{font family} \marg{font name} \marg{features} , ... \}
+ \cs{zitienewfont} * \marg{font family} \marg{font name} \marg{font feature}
+ \cs{zitieCJKfamily} \marg{font family}
+ \cs{zitieCJKfamily}+ \marg{font family}
+ \cs{zitieCJKfamily}- \marg{font family}
+ \end{syntax}
+ 这个命令用来加载和设置需要的字体,\meta{font family} 为在 \cs{framezi} 等命令的 \opt{font} 选项中使用的名字,也可通过 \cs{zitieCJKfamily} 来在文档中使用该字体。\meta{font name} 为字体的名字,\meta{features},为 \pkg{fontspec} 宏包和 \pkg{xeCJK} 宏包支持的字体特性。
+
+ \cs{zitieCJKfamily} 和 \pkg{xeCJK} 宏包的 \cs{CJKfamily} 作用完全相同,只不过首先判断该 \meta{font family} 是否被 \cs{zitienewfont} 声明,若没有,则再使用 \cs{CJKfamily} 进行处理。
+\end{function}
+
+\begin{function}{\framezi,\framerange,\framezifile}
+ \begin{syntax}
+ \cs{framezi} * \oarg{key-val} \marg{字或词句}
+ \cs{framerange} \oarg{key-val} \marg{逗号分隔的16进制序列}
+ \cs{framezifile} * \oarg{key-val} \marg{文件名}
+ \end{syntax}
+ 以上命令用来生成网格化的字。
+
+ \meta{字或词句} 应仅包含类代码为 11 或 12 的字符,即正常情况下输入的字符,不应包含 \TeX 控制序列即其它特殊字符。\cs{framezi} 带星号的版本接收一个控制序列,这个序列包含想要网格化的字。
+
+ \meta{逗号分隔的16进制序列} 应使用如下的形式:\verb|"4E00 -> "4E27, "4E30| 或 \verb|`一 -> `丢, `丰|,与其它设置字符序列的宏包相似(如 \pkg{xeCJK} 宏包的 \cs{xeCJKDeclareSubCJKBlock})。注意,由于网格化操作需要大量的计算,因此单个 \meta{range} 不应太大,依据编译环境而定,一般不应超过 1000 个,否则可能无法成功编译。其它命令中也是如此。
+
+ \meta{文件名} 为想要网格化的文字的文件名。\cs{framezifile} 带 \verb|*| 的版本,可在 \meta{key-val} 中使用 \opt{filepath} 设置文件搜索路径,详见后节的说明。带星号和不带星号的版本实现略有差异,速度也可能不一样。
+
+ 当连续多次使用 \cs{framezi} 等命令时,为去掉后面的空白,可使用 \opt{\%}。
+\end{function}
+
+\begin{function}{
+ zitie/framezi/before, zitie/framezi/after,
+ zitie/framerange/before, zitie/framerange/after,
+ zitie/framerange/range,
+ zitie/framezifile/before, zitie/framezifile/after
+}
+ 这三个命令还各自定义了钩子(hook),其中带有 \verb|after| 为 \verb|reversed|,即先添加的后执行。\verb|before| 为选项设置完成后执行,\verb|after| 为整个命令执行完之后执行。其中 \verb|zitie/framerange/range| 为每一个列表均执行一次,包括无效的和最后一次。
+
+ 可以通过 \cs{AddToHook}、\cs{AddToHookNext}、\cs{RemoveFromHook} 来添加和执行,详细请参考 \pkg{source2e.pdf} 或 \pkg{lthooks} 的说明文档。
+\end{function}
+
+\begin{function}{zitieframe,
+ zitie/zitieframe/before, zitie/zitieframe/after,
+ zitie/zitieframe/par
+}
+ \begin{syntax}
+ \verb|\begin{zitieframe}| \oarg{key-val}
+ ~~...
+ \verb|\end{zitieframe}|
+ \verb|\begin{zitieframe}| \marg{initial material} \oarg{key-val}
+ ~~...
+ \verb|\end{zitieframe}|
+ \end{syntax}
+ 可以在 \env{zitieframe} 环境中使用分段(显式的或隐式的,特殊命令仍然不可使用)。
+
+ \meta{initial material} 为在选项和钩子执行完毕之后要执行的内容。这里的内容不会被网格化。
+
+ \verb|zitie/zitieframe/par| 钩子为环境中的每个段落分段后要执行的命令。
+\end{function}
+
+\section{选项}\label{sec:options}
+
+以下选项在方框化命令的宏中是局部设置的。
+
+\begin{function}{basechar,zihao}
+ \begin{syntax}
+ basechar = \meta{CJK char} \init{好}
+ zihao = \meta{字号} \init{4}
+ \end{syntax}
+ \opt{basechar} 设置当 \opt{resize} 为 \opt{base} 类时的基字符,这个用来计算缩放比例,基字符不同时,即使给定相同的缩放比例,其实际缩放比例也可能不同。
+
+ \opt{zihao} 设置计算缩放比例时的字号大小。
+\end{function}
+
+\begin{function}{punctuation, punctuation*}
+ \begin{syntax}
+ punctuation = <ignore|leave|onlast|scale|...> \init{ignore}
+ punctuation*= \marg{replace}
+ \end{syntax}
+ \pkg{zitie} 宏包对字符类型进行区分,对CJK字符和标点符号采用不同的处理方式。
+ 该选项设置标点符号采用何种处理方式。初始情况下为 \opt{ignore},即忽略该字符。
+
+ \opt{leave} 选项把该标点符号原样输出,不对其进行任何处理,字体和其它属性和正文相同。
+
+ \opt{onlast} 选项把标点符号放到0宽度的盒子中,并且忽略它的深度和高度,看起来就像是在最后一个字的方框中。
+
+ \opt{scale} 选项把标点符号按最后一个字的缩放倍数进行缩放,再将其进行输出。
+
+ 选项 \opt{punctuation*} 定义处理标点符号的方式为其值,可接收一个参数。如设置 \verb|punctuation*=\fbox{#1}|,则将标点符号放入 \tn{fbox} 内。
+
+ 若 \opt{punctuation} 并不存在,则将其值视为已定义的宏。如,假设 \verb|@gobble| 值并不存在,若使用 \verb|punctuation=@gobble|,则标点符号处理命令为 \tn{@gobble},这是 \LaTeXe 定义的命令,其作用与 \verb|punctuation=ignore| 相同。
+
+ 还可使用 \cs{zitienewrule} 定义新的标点符号处理方式。详见 \cs{zitienewrule} 命令的说明。
+
+ 实际上,\opt{onlast} 和 \opt{scale} 就是由 \cs{zitienewrule} 定义的,这个键的处理器接收一个标点符号作为其参数。
+ 具体的定义见 \cs{zitienewrule} 命令的说明。
+\end{function}
+\begin{texnote}
+ 按照 \pkg{xeCJK} 宏包的字符分类,\pkg{zitie} 宏包将字符类别为 \verb|FullLeft|、\verb|FullRight|、\verb|HalfLeft|、\verb|HalfRight| 视为标点符号。将 \verb|CJK|视为CJK字符。
+\end{texnote}
+
+\begin{function}{frametype,resize}
+ \begin{syntax}
+ frametype = <none|口|十|田|米|咪|...> \init{none}
+ resize = <none|real|base|square|...> \init{none}
+ \end{syntax}
+ \opt{frametype} 设置方框样式。可用值的效果正如选项值:\verb|口|--仅方框,\verb|十|--仅中间的横线和竖线,\verb|田|--常见的田字格,\verb|米|--十字格再加上斜的两条线,\verb|咪|--常见的米字格。还可自定义方框,详见第 \ref{sec:interface} 节。
+
+ {\zitiesetup{font=楷体,width=1cm,resize=square,framecolor=black,linewidth=.7pt}
+ \framezi[frametype=none]{无}
+ \framezi[frametype=口]{口}
+ \framezi[frametype=十]{十}
+ \framezi[frametype=田]{田}
+ \framezi[frametype=米]{米}
+ \framezi[frametype=咪]{咪}}
+
+ \opt{resize} 设置缩放方式。\opt{real},使用字符实际宽高缩放,\opt{base},使用 \opt{basechar} 设置的字符的宽高缩放,\opt{square},使得字符的宽高相等再进行缩放。还可自定义缩放方式,详见第 \ref{sec:interface} 节。
+
+ 以下为宽度设置为 1cm 时的缩放情况。
+ {\zitiesetup{font=楷体,width=1cm,frametype=咪,framecolor=black}
+ \framezi[resize=none]{无}
+ \framezi[resize=real]{实}
+ \framezi[resize=base]{基}
+ \framezi[resize=square]{方}}
+\end{function}
+
+\begin{function}{
+ xscale,yscale,scale,
+ width,height
+}
+ \begin{syntax}
+ xscale = \meta{scale ratio} \init{1}
+ yscale = \meta{scale ratio} \init{1}
+ scale = \meta{scale ratio}
+ width = \meta{dim}
+ height = \meta{dim}
+ \end{syntax}
+ 设置缩放比例和盒子宽高。
+
+ 宽高具有更高的优先级,即若比例和宽高都设置了,则使用宽高来计算。宽高为二者都为0cm视为未设置,二者有一大于0cm,视为设置了宽高。
+
+ 此处的宽高和最终的宽高可能略有差异,最终的宽高保存在 \tn{zitiewidth} 和 \tn{zitieheight} dim寄存器中。
+\end{function}
+
+\begin{function}{
+ linewidth,
+ dashpattern,
+ framearc,
+ framearc*
+}
+ \begin{syntax}
+ linewidth = \meta{dim} \init{0.4pt}
+ dashpattern = \{ \meta{ dim1, dim2, ... } \}
+ framearc = \meta{dim}
+ framearc* = \{ \marg{dim1} \marg{dim2} \}
+ \end{syntax}
+\end{function}
+
+{\zitiesetup{width=2cm,framecolor=black,font=楷体}
+\verb|linewidth=1pt|:\framezi[linewidth=1pt]{好} \\
+\verb|dashpattern={1mm,2mm,3mm,4mm}|:\framezi[dashpattern={1.5mm,1mm,2mm,1.5mm}]{好} \\
+\verb|framearc=3mm,frametype=口|:\framezi[framearc=3mm,frametype=口]{好} \\
+\verb|framearc=3mm,frametype=咪|:\framezi[framearc=3mm,frametype=咪]{好} \\
+\verb|framearc*={3mm}{6mm},frametype=口|:\framezi[framearc*={3mm}{6mm},frametype=口]{好} \\
+\verb|framearc*={3mm}{6mm},frametype=咪|:\framezi[framearc*={3mm}{6mm},frametype=咪]{好}
+}
+
+\begin{function}{
+ framecolor,
+ framecolor*,
+ charcolor,
+ charcolor*,
+ fillcolor,
+ fillcolor*
+}
+ \begin{syntax}
+ framecolor = \meta{color expr} \init{black}
+ framecolor* = \marg{model(s)} \marg{value(s)}
+ charcolor = \meta{color expr} \init{black}
+ charcolor* = \marg{model(s)} \marg{value(s)}
+ fillcolor = \meta{color expr}
+ fillcolor* = \marg{model(s)} \marg{value(s)}
+ \end{syntax}
+ 命名的颜色仅支持 \LaTeX3 定义的 black, white, red, green, blue, cyan, magenta 和 yellow。颜色模型和表达式也应使用 \LaTeX3 支持的模型和表达式,详见 \pkg{interface3.pdf} 文档。
+
+ 若要去掉 \opt{fillcolor},应将其设置为空,即 \verb|fillcolor={}|,而不是将其设置为白色。
+\end{function}
+
+\begin{function}{
+ charstroke,
+ charstrokespecial,
+ \zitiestrokechars
+}
+ \begin{syntax}
+ charstroke = <none|solid|dashed|whitesolid|whitedashed|...> \init{none}
+ charstrokespecial = \meta{pdf literal}
+ \cs{zitiestrokechars} \marg{pdf literal} \marg{typeset material}
+ \end{syntax}
+ 设置字符的外框,类似微软Word中字符的轮廓特效:\framezi[width=2\ccwd,charcolor=blue,charstroke=solid,fillcolor={}]{好}
+ \framezi[width=2\ccwd,charcolor=blue,charstroke=dashed,fillcolor={}]{好}
+
+ 初始值 \opt{none} 什么也不做。\opt{solid} 设置外轮廓为 0.25bp 的实线,\opt{dashed} 设置外轮廓为 0.25bp 的虚线。这两个
+ 不会进行填充操作,即背景色是什么颜色,则字显示的就是背景,字轮廓的颜色为 \opt{charcolor} 的颜色。\opt{whitesolid} 和
+ \opt{whitedashed} 在 \opt{solid} 和 \opt{dashed} 的基础上将字填充为白色。
+
+ \opt{charstrokespecial} 将 \meta{pdf literal} 为用在 \tn{special}\verb|{pdf:code ...}| 中 pdf 的指令,
+ 其中,\verb|charstroke=solid| 相当于 \verb|charstrokespecial={1 Tr 0.25 w [] 0 d 1 J}|,
+ \verb|charstroke=dashed| 相当于 \verb|charstrokespecial={1 Tr 0.25 w [0.8] 0 d 1 J}|,
+ \verb|charstroke=whitesolid| 相当于 \verb|charstrokespecial={2 Tr 0.25 w [] 0 d 1 J 1 1 1 rg}|,
+ \verb|charstroke=whitedashed| 相当于 \verb|charstrokespecial={2 Tr 0.25 w [0.8] 0 d 1 J 1 1 1 rg}|。
+
+ 还可使用 \cs{zitienewrule} 来定义新的 \opt{charstroke} 处理规则。这个键的处理器接收当前的 \meta{CJK char} 作为其参数。
+ 具体的定义见 \cs{zitienewrule} 的说明。
+
+ \cs{zitiestrokechars} 使用 \meta{pdf literal} 处理 \meta{typeset material}。
+\end{function}
+
+\begin{function}{
+ font,savefontname,
+ fallback,
+ fontbackfont,
+ fontbackfont*
+}
+ \begin{syntax}
+ font = \meta{font family} \init{宋体}
+ savefontname = \TTF \init{false}
+ fallback = \TTF \init{false}
+ fallbackfont = \marg{fallback font list}
+ fallbackfont+= \marg{fallback font list}
+ \end{syntax}
+ \opt{font} 设置盒子中使用的字体,若将其设置为空,即 \verb|font={}| 或 \verb|font|,则将使用正文字体。
+
+ \opt{savefontname} 设置是否保存字体名字,以便在后文使用,如在标点符号的处理中。
+
+ \opt{fallbackfont} 设置当当前字体中不存在此字形时,要使用哪些字体,字体必须被 \cs{zitienewfont} 或 \cs{newCJKfontfamily} 声明。
+ \opt{fallbackfont+} 将 \marg{fallback font list} 添加的之前的 \meta{fallback font list} 中。
+
+ 注意,\opt{fallbackfont} 特性和 \pkg{xeCJK} 的 \verb|FallBack| 并不冲突,当 \opt{fallback font list} 中的所有字体没有对应的字形时,才会使用 \verb|FallBack| 定义的字体。这一特性可通过 \verb|fallback=false| 来关闭。
+\end{function}
+
+如在 \verb|FZSunGuoTingCaoShuFU|(方正孙过庭草书)字体中没有“丂丄”,
+虽然在在导言区使用 \verb|\zitienewfont{ {孙过庭草繁}{FZSunGuoTingCaoShuFU}{FallBack=SimSun} }| 设置其 \verb|FallBack| 字体为 \verb|SimSun|(宋体),但若设置 \verb|fallbackfont={楷体},fallback=true| 则会在楷体中查找是否有该字形,然后再在宋体中查找:
+
+\begin{verbatim}
+ \framezi[fallbackfont={楷体},width=1cm,font=孙过庭草繁,fallback]{一丁丂七丄}
+\end{verbatim}
+\framezi[fallbackfont={楷体},width=1cm,font=孙过庭草繁,fallback,framecolor=black]{一丁丂七丄}
+
+\begin{verbatim}
+ \framezi[width=1cm,font=孙过庭草繁,fallback]{一丁丂七丄}
+\end{verbatim}
+\framezi[width=1cm,font=孙过庭草繁,fallback,framecolor=black]{一丁丂七丄}
+
+\begin{function}{
+ filepath,
+ filepath+
+}
+ \begin{syntax}
+ filepath = <filepath1, filepath2, ...>
+ \end{syntax}
+ \opt{filepath} 为 \cs{framefile}\verb|*| 添加文件搜索路径。其值为逗号分隔的列表。
+ \opt{filepath+} 将新的搜索路径添加到原有的路径上。
+\end{function}
+
+\begin{function}{
+ \zitiesetup,
+ \zitiecolorlet,
+}
+ \begin{syntax}
+ \cs{zitiesetup} \marg{key-val}
+ \cs{zitiecolorlet} \marg{name} \oarg{model} \marg{value}
+ \end{syntax}
+ 用于设置选项,定义新的颜色。注意,若加载 \pkg{xcolor} 不能使用 \tn{colorlet}命令,必须使用 \cs{zitiecolorlet} 来设置颜色。
+\end{function}
+
+\begin{function}{\zitienewrule}
+ \begin{syntax}
+ \cs{zitienewrule} \oarg{arg nums} \marg{option key} \marg{rule} \marg{replace}
+ \end{syntax}
+ 为 \pkg{zitie} 宏包的键 \meta{option key} 定义新的处理规则。将忽略 \meta{option key} 和 \meta{rule} 两端的空格。
+
+ \meta{arg nums} 为键预先定义的参数数目。若未设置 \meta{arg nums},则将其设置为1。
+\end{function}
+
+\pkg{zitie} 宏包使用了
+\begin{verbatim}
+ \zitienewrule{punctuation}{onlast}
+ {\penalty10000 \smash{\makebox[0pt]{%
+ \color{zitiecharcolor}\zitieCJKfamily{\zitiefontname}#1}}}
+\end{verbatim}
+和
+\begin{verbatim}
+ \zitienewrule{punctuation}{scale}{
+ \hbox_set:Nn \l_tmpa_box
+ { \color_select:n { zitiecharcolor } \zitieCJKfamily{\zitiefontname} #1 }
+ \box_scale:Nnn \l_tmpa_box \zitiexscaleratio \zitieyscaleratio
+ \box_use_drop:N \l_tmpa_box
+ }
+\end{verbatim}
+定义了两个 \opt{punctuation} 处理规则:\opt{onlast} 和 \opt{scale},这样就可以使用 \verb|punctuation=onlast| 和 \verb|punctuation=scale| 来对标点符号进行处理。
+
+使用
+\begin{verbatim}
+ \zitienewrule {charstroke} {solid}
+ { \zitiestrokechars { 1 Tr 0.25 w [] 0 d 1 J } {#1} }
+ \zitienewrule {charstroke} {dashed}
+ { \zitiestrokechars { 1 Tr 0.25 w [0.8] 0 d 1 J } {#1} }
+ \zitienewrule {charstroke} {whitesolid}
+ { \zitiestrokechars { 2 Tr 0.25 w [] 0 d 1 J 1 1 1 rg } {#1} }
+ \zitienewrule {charstroke} {whitedashed}
+ { \zitiestrokechars { 2 Tr 0.25 w [0.8] 0 d 1 J 1 1 1 rg } {#1} }
+\end{verbatim}
+定义了四个 \opt{charstroke} 处理规则,这样就可以使用 \verb|charstroke=solid, ...| 来处理字符。
+
+\begin{function}{
+ \zitiewidth,
+ \zitieheight,
+ \zitieboxwd,
+ \zitieboxht,
+ \zitieboxdp,
+ \zitiefontname,
+ \zitiexscaleratio,
+ \zitieyscaleratio,
+}
+ 这些命令为全局设置的接口。
+\end{function}
+
+\begin{function}{
+ zitieframecolor,
+ zitiecharcolor,
+ zitiefillcolor,
+}
+ 这些是全局保存的颜色名,可在 \pkg{xcolor} 宏包的 \tn{color} 命令 和 \LaTeX3 命令 \cs{color_select:n} 中使用。
+\end{function}
+
+
+\section{background}\label{sec:background}
+
+在宏包加载时使用 \opt{enable-background} 以启用该特性。
+
+\begin{function}{\zitiebackground}
+ \begin{syntax}
+ \cs{zitiebackground} \oarg{background key-val}
+ \end{syntax}
+ 使用背景。
+\end{function}
+
+\pkg{background} 可用的键值:(设置是全局的)
+
+\begin{function}{true, on, false, off, next}
+ \opt{true} 和 \opt{on} 作用相同,表示设置网格背景。
+ \opt{false} 和 \opt{off} 作用相同,表示取消网格背景。
+ \opt{next} 表示下一次设置背景,即当前页设置背景。这个选项也将取消之前设置的背景。
+\end{function}
+
+\begin{function}{
+ colboxes,rowboxes,
+ framewidth,frameheight,
+ boxwidth,boxheight,
+ onpaper,ontext
+}
+ \begin{syntax}
+ colboxes = \meta{integer} \init{1}
+ rowboxes = \meta{integer} \init{1}
+ framewidth = \meta{dim}
+ frameheight = \meta{dim}
+ boxwidth = \meta{dim}
+ boxheight = \meta{dim}
+ onpaper
+ ontext
+ \end{syntax}
+ 设置背景格子的大小。
+
+ \opt{boxwidth} 和 \opt{boxheight} 具有更高的优先级,若设置了,则背景每个格子的宽高为所设置的值,否则,使用 \meta{framewidth}、\meta{frameheight} 及 \meta{colboxes}、\meta{rowboxes} 来计算大小。
+
+ \opt{onpaper} 设置 \verb|frameheight=\paperheight, framewidth=\paperwidth|,
+ \opt{ontext} 设置 \verb|frameheigh=\textheight, framewidth=\textwidth|。
+\end{function}
+
+\begin{function}{
+ frametype,
+ linewidth,
+ framecolor,
+ framecolor*,
+ fillcolor,
+ fillcolor*,
+ dashpattern
+}
+ 和 \cs{framezi} 等命令的选项相同,但二者互不影响。
+
+ 颜色分别保存在 \verb|zitiebackgroundframecolor|,\verb|zitiebackgroundfillcolor| 颜色名中。可在 \tn{color} 中直接使用,也可在 \cs{color_select:n} 中使用。
+\end{function}
+
+\begin{function}{xrange,yrange}
+ \begin{syntax}
+ xrange = \{ \meta{left} , \meta{right} \}
+ yrange = \{ \meta{top} , \meta{bottom} \}
+ \end{syntax}
+ 设置网格显示的范围。注意这是实验性的,效果可能并不好。
+\end{function}
+
+本文档的设置为:
+\begin{verbatim}
+ \zitiebackground[
+ on, linewidth=0.2pt, dashpattern={1mm,.5mm,2mm,1mm},
+ frametype=田, framecolor=green!80!black,
+ colboxes=20, rowboxes=30,
+ ]
+\end{verbatim}
+
+\section{zhlipsum, 中文乱数假文}
+
+\pkg{zitie} 宏包完全兼容 \pkg{zhlipsum} 宏包。使用 \cs{newzhlipsum} 命令定义的假文也可使用。
+
+在加载宏包时使用 \opt{enable-zhlipsum} 以启用该特性。
+
+\begin{function}{
+ \framezhlipsum,
+ zitie/framezhlipsum/before,
+ zitie/framezhlipsum/after,
+ zitie/framezhlipsum/paragraph
+}
+ \begin{syntax}
+ \cs{framezhlipsum} \oarg{key-val} \marg{paragraph list} \oarg{name}
+ \end{syntax}
+ \meta{key-val} 为 \cs{framezi} 第 \ref{sec:options} 节定义的选项,\meta{paragraph list} 为段落列表,支持如下形式:\verb|6-8,-3,9|。\meta{name} 为假文的名字。可用值为 \opt{simp}、\opt{trad}、\opt{nanshanjing}、\opt{xiangyu}、\opt{zhufu}、\opt{aspirin},详细说明参考 \pkg{zhlipsum} 宏包的说明文档。
+
+ 定义了 \verb|zitie/framezhlipsum/before|、\verb|zitie/framezhlipsum/after|、\verb|zitie/framezhlipsum/paragraph| 三个钩子。其中 \verb|zitie/framezhlipsum/paragraph| 为假文间要执行的代码,如有5段,则在这5个段落中间格执行一次,即执行4次。其它两个钩子的用法和前述相似。
+\end{function}
+
+
+\section{编程接口}\label{sec:interface}
+
+\begin{function}{
+ \zitie_new_frame_construct:nn,
+ \zitie_frame_type:n,
+ \zitie_frame_type_c:n,
+ \zitie_new_resize_method:nn,
+ \zitie_new_font:n,
+ \zitie_new_font:nnn,
+}
+ 创建新的构造器、resize方法和字体。
+\end{function}
+
+\begin{function}{
+ \zitie_new_process_rule:nnn,
+ \zitie_new_process_rule:nnnn,
+ \zitie_processor:n,
+ \zitie_processor_c:n,
+ \zitie_processor:nnn,
+ \zitie_processor_c:nnn,
+}
+ 创建和使用处理器。
+\end{function}
+
+\begin{function}{
+ \zitie_color_select:nn,
+ \zitie_color_select:nnn,
+}
+ 颜色选择。
+\end{function}
+
+\begin{function}{
+ \zitie_cjk_glyph_use:nN,
+ \zitie_token_class_dispatch:Nnnnn,
+ \zitie_token_class_dispatch_o:Nnnnn,
+ \zitie_token_class_dispatch_f:Nnnnn,
+}
+ 字形选择和字符类别判断。
+\end{function}
+
+\begin{function}[TF]{
+ \zitie_token_if_punctuation:N,
+ \zitie_token_if_punctuation_o:N,
+ \zitie_token_if_punctuation_f:N,
+}
+ 是否为标点符号。
+\end{function}
+
+\begin{function}{
+ \zitie_single_construct:N,
+ \zitie_single_construct:nN,
+}
+ 构造单个字的方框。
+\end{function}
+
+\begin{function}{
+ \zitie_background_new_frame_construct:nn,
+ \zitie_background_frame_type:n,
+ \zitie_background_frame_type_c:n,
+}
+ 创建和使用新的 background frame 类型。
+\end{function}
+
+\section{TODO}
+
+\begin{itemize}
+ \item 实现更快的、消耗资源更少的版本。
+ \item 支持 \LuaTeX。
+ \item 优化背景模块。
+ \item 增加间距功能。
+ \item 更多网格效果。
+ \item 更多缩放和变换效果。
+ \item 对字符类别进行更多的分类处理。
+ \item 支持透明度,(需要 \pkg{l3opacity})。
+ \item 等。
+\end{itemize}
+
+\IndexLayout
+\zitiebackground[off]
+\PrintChanges
+\PrintIndex
+\end{document} \ No newline at end of file
diff --git a/macros/xetex/latex/zitie/tex/zitie.sty b/macros/xetex/latex/zitie/tex/zitie.sty
new file mode 100644
index 0000000000..0dfe9d137c
--- /dev/null
+++ b/macros/xetex/latex/zitie/tex/zitie.sty
@@ -0,0 +1,1016 @@
+%% license LPPL 1.3c, https://www.latex-project.org/lppl/lppl-1-3c/
+\NeedsTeXFormat{LaTeX2e}[2020/10/01]
+\RequirePackage{ xparse , l3keys2e }
+\RequirePackage{ l3draw }
+\ProvidesExplPackage {zitie} {2021/09/23} {v1.1} {CJK character calligraphy sheet}
+\RequirePackage { xeCJK }
+\@ifpackageloaded { ctex } { }
+ { \RequirePackage { ctexsize } \sys_if_platform_windows:T { \setCJKmainfont {SimSun} } }
+\@ifpackageloaded { xcolor }
+ {
+ \cs_set_nopar:Npn \zitie_color_select:nn #1#2 { \colorlet{#1}{#2} \color_set:nn {#1} {#2} }
+ \cs_set_nopar:Npn \zitie_color_select:nnn #1#2#3 { \colorlet{#1}[#2]{#3} \color_set:nnn {#1} {#2} {#3} }
+ }
+ {
+ \hook_gput_code:nnn { package/after/xcolor } { package }
+ {
+ \cs_set_nopar:Npn \zitie_color_select:nn #1#2 { \colorlet{#1}{#2} \color_set:nn {#1} {#2} }
+ \cs_set_nopar:Npn \zitie_color_select:nnn #1#2#3 { \colorlet{#1}[#2]{#3} \color_set:nnn {#1} {#2} {#3} }
+ }
+ \cs_set_nopar:Npn \zitie_color_select:nn #1#2 { \color_set:nn {#1} {#2} }
+ \cs_set_nopar:Npn \zitie_color_select:nnn #1#2#3 { \color_set:nnn {#1} {#2} {#3} }
+ }
+\NewDocumentCommand \zitiecolorlet { m o m }
+ { \IfNoValueTF {#2} { \zitie_color_select:nn {#1} {#3} } { \zitie_color_select:nnn {#1} {#2} {#3} } }
+
+\box_new:N \l_zitie_basebox_box
+\tl_new:N \l_zitie_frame_type_tl
+\tl_new:N \l_zitie_resize_method_tl
+\clist_new:N \g__zitie_frame_list_clist
+\clist_new:N \g__zitie_resize_method_clist
+\dim_new:N \l__zitie_char_width_dim
+\dim_new:N \l__zitie_char_height_dim
+\dim_new:N \l__zitie_box_width_dim
+\dim_new:N \l__zitie_box_height_dim
+\coffin_new:N \l__zitie_box_coffin
+\dim_new:N \l__zitie_linewidth_dim
+\cs_new_nopar:Nn \__zitie_aux_color_fill: { }
+\ior_new:N \g__zitie_file_read_ior
+\clist_new:N \g__zitie_fallback_font_clist
+
+\dim_new:N \zitiewidth
+\dim_new:N \zitieheight
+\dim_new:N \zitieboxwd
+\dim_new:N \zitieboxht
+\dim_new:N \zitieboxdp
+\tl_new:N \zitiefontname
+\tl_new:N \zitiexscaleratio
+\tl_new:N \zitieyscaleratio
+
+\int_new:N \l__zitie_begin_int
+\int_new:N \l__zitie_end_int
+\clist_new:N \l__zitie_tmpa_clist
+\tl_new:N \l__zitie_tmpa_tl
+\seq_new:N \l__zitie_tmpa_seq
+\coffin_new:N \l__zitie_tmpa_coffin
+\coffin_new:N \l__zitie_tmpb_coffin
+\tl_new:N \l__zitie_file_chars_tl
+
+\tl_const:Nn \c_zitie_font_name_prefix_tl { 字帖@ }
+
+%%% fontspec, xeCJK, xetex
+\cs_new:Npn \zitie_stroke_chars:nn #1#2 % operator, chars
+ { \special { pdf:code ~ q ~ #1 } #2 \special { pdf:code ~ Q } }
+\cs_new:Npn \zitiestrokechars { \zitie_stroke_chars:nn }
+\prg_set_eq_conditional:NNn \zitie_font_if_exist:n \fontspec_font_if_exist:n { T, F, TF }
+\cs_new_nopar:Npn \__zitie_zihao:n #1 { \zihao {#1} }
+\cs_set_eq:NN \__zitie_check_num_range:nnNN \__xeCJK_check_num_range:nnNN
+\cs_set_eq:NN \__zitie_int_until_do:nn \xeCJK_int_until_do:nn
+\cs_new_nopar:Npn \__zitie_font_select:nN #1
+ {
+ \xeCJK_family_if_exist:nTF { \c_zitie_font_name_prefix_tl #1 }
+ { \CJKfamily+ { \c_zitie_font_name_prefix_tl #1 } }
+ { \CJKfamily+ {#1} }
+ }
+\NewDocumentCommand \zitieCJKfamily { t+ t- m }
+ {
+ \xeCJK_family_if_exist:nTF { \c_zitie_font_name_prefix_tl #3 }
+ { \xeCJK_family:NNx #1 #2 { \c_zitie_font_name_prefix_tl #3 } }
+ { \xeCJK_family:NNx #1 #2 {#3} }
+ \tex_ignorespaces:D
+ }
+\msg_new:nnn { zitie } { font-exist } { Font~ `#1'~ not~ exist, has~ been~ ignored. }
+\cs_new:Npn \__zitie_new_font_family:nnn #1#2#3 % family name, font name, feature
+ { \__xeCJK_pass_args:nnnn { \xeCJK_set_family:nnn { \c_zitie_font_name_prefix_tl #1 } } {#3} {#2} { } }
+\cs_new:Npn \__zitie_new_font_family_validate:nnn #1#2#3
+ {
+ \zitie_font_if_exist:nTF {#2} { \__zitie_new_font_family:nnn {#1} {#2} {#3} }
+ { \msg_warning:nnn { zitie } { font-exist } {#2} }
+ }
+\cs_new:Npn \zitie_token_class_dispatch:Nnnnn #1
+ {
+ \if_case:w \xeCJK_token_value_class:N #1 \exp_stop_f:
+ \exp_after:wN \use_none:nnn % other
+ \or: \exp_after:wN \use_i:nnnn % CJK
+ \or: \exp_after:wN \use_ii:nnnn % FullLeft
+ \or: \exp_after:wN \use_iii:nnnn % FullRight
+ \else: \exp_after:wN \use_none:nnn % other
+ \fi:
+ }
+\cs_new:Npn \zitie_token_class_dispatch_o:Nnnnn #1
+ { \exp_after:wN \zitie_token_class_dispatch:Nnnnn #1 }
+\cs_new:Npn \zitie_token_class_dispatch_f:Nnnnn #1
+ { \exp_args:Nf \zitie_token_class_dispatch:Nnnnn #1 }
+\prg_new_conditional:Npnn \zitie_token_if_punctuation:N #1 { p, T, F, TF }
+ {
+ \int_compare:nNnTF { \xeCJK_token_value_class:N #1 } > 1
+ {
+ \int_compare:nNnTF { \xeCJK_token_value_class:N #1 } < 6
+ { \prg_return_true: } { \prg_return_false: }
+ }
+ { \prg_return_false: }
+ }
+\cs_set:Npn \zitie_token_if_punctuation_o:NTF
+ { \exp_after:wN \zitie_token_if_punctuation:NTF }
+\cs_set:Npn \zitie_token_if_punctuation_o:NT
+ { \exp_after:wN \zitie_token_if_punctuation:NT }
+\cs_set:Npn \zitie_token_if_punctuation_o:NF
+ { \exp_after:wN \zitie_token_if_punctuation:NF }
+\cs_set:Npn \zitie_token_if_punctuation_f:NTF
+ { \exp_args:Nf \zitie_token_if_punctuation:NTF }
+\cs_set:Npn \zitie_token_if_punctuation_f:NT
+ { \exp_args:Nf \zitie_token_if_punctuation:NT }
+\cs_set:Npn \zitie_token_if_punctuation_f:NF
+ { \exp_args:Nf \zitie_token_if_punctuation:NF }
+%%%
+
+\prg_new_conditional:Npnn \zitie_if_preamble: { p, T, F, TF }
+ {
+ \if_meaning:w \@onlypreamble \@notprerr
+ \prg_return_false:
+ \else:
+ \prg_return_true:
+ \fi:
+ }
+\cs_new:Npn \__zitie_calc_basechar_w_h:
+ {
+ \dim_set:Nn \l__zitie_char_width_dim { \box_wd:N \l_zitie_basebox_box }
+ \dim_set:Nn \l__zitie_char_height_dim { \box_ht_plus_dp:N \l_zitie_basebox_box }
+ }
+\cs_new_nopar:Npn \zitie_frame_type:n #1 { __zitie_frame_construct_type_ #1 :nnnnnn } % x1, y1, x2, y2, x times, y times
+\cs_new_nopar:Npn \zitie_frame_type_c:n #1 { \use:c { __zitie_frame_construct_type_ #1 :nnnnnn } }
+\cs_new_nopar:Npn \__zitie_resize:n #1 { __zitie_processor_resize_ #1 :n }
+\cs_new_nopar:Npn \__zitie_resize_c:n #1 { \use:c { __zitie_processor_resize_ #1 :n } }
+\cs_new_nopar:Npn \zitie_processor:n #1 { __zitie_processor_ #1 :n }
+\cs_new_nopar:Npn \zitie_processor_c:n #1 { \use:c { __zitie_processor_ #1 :n } }
+\cs_new_nopar:Npn \zitie_processor:nnn #1#2#3
+ {
+ __zitie_processor_ #1 @ #2 :
+ \if_case:w 0#3 \prg_do_nothing:
+ \or: n \or: nn \or: nnn \or: nnnn \or: nnnnn \or: nnnnnn
+ \or: nnnnnnn \or: nnnnnnnn \else: nnnnnnnnn \fi:
+ }
+\cs_new_nopar:Npn \zitie_processor_c:nnn #1#2#3 { \use:c { \zitie_processor:nnn {#1} {#2} {#3} } }
+\cs_new_nopar:Npn \__zitie_coffin_ht_plus_dp:N #1 { \coffin_ht:N #1 + \coffin_dp:N #1 }
+\cs_new:Npn \zitie_debug:n { \bool_if:NTF \l__zitie_debug_bool { \use:n } { \use_none:n } }
+\cs_new_nopar:Npn \zitie_cjk_glyph_use:nN #1#2
+ {
+ \group_begin:
+ \bool_if:NTF \l__zitie_font_fallback_bool
+ {
+ \__zitie_font_select:nN {#1} \prg_do_nothing:
+ \__zitie_cjk_glyph_use_aux:N #2
+ }
+ { \__zitie_font_select:nN {#1} #2 }
+ \group_end:
+ }
+\cs_new_nopar:Npn \__zitie_cjk_glyph_use_aux:N #1
+ {
+ \exp_args:Nf \xeCJK_glyph_if_exist:NTF #1 {#1}
+ {
+ \clist_pop:NNTF \g__zitie_fallback_font_clist \l__zitie_tmpa_tl
+ {
+ \xeCJK_family_if_exist:nTF { \c_zitie_font_name_prefix_tl \l__zitie_tmpa_tl }
+ {
+ \CJKfamily+ { \c_zitie_font_name_prefix_tl \l__zitie_tmpa_tl }
+ \__zitie_cjk_glyph_use_aux:N #1
+ }
+ {
+ \CJKfamily+ { \l__zitie_tmpa_tl }
+ \__zitie_cjk_glyph_use_aux:N #1
+ }
+ }
+ {#1}
+ }
+ }
+
+
+\msg_new:nnn { zitie } { frame-exists } { The~ frame~ type~ `#1~ not~ exists. }
+\msg_new:nnn { zitie } { font-args } { The~ font~ arguments~ number~ must~ be~ 2~ or~ 3, while~ you~ get~ `#1' }
+
+\keys_define:nn { zitie }
+ {
+ enable-background .bool_set:N = \g__zitie_enable_background_bool ,
+ enable-background .initial:n = false ,
+ enable-background .default:n = true ,
+ enable-zhlipsum .bool_set:N = \g__zitie_enable_zhlipsum_bool ,
+ enable-zhlipsum .initial:n = false ,
+ enable-zhlipsum .default:n = true ,
+ }
+
+\keys_define:nn { zitie }
+ {
+ basechar .code:n = { \tl_gset:Nx \c_zitie_basechar_tl {#1} \__zitie_calc_basechar_w_h: } ,
+ zihao .code:n =
+ {
+ \hbox_gset:Nn \l_zitie_basebox_box { \__zitie_zihao:n {#1} \c_zitie_basechar_tl }
+ \__zitie_calc_basechar_w_h:
+ } ,
+ punctuation .choice: ,
+ punctuation / ignore .code:n = { \cs_set_eq:cN { \zitie_processor:n { punctuation } } \use_none:n } ,
+ punctuation / leave .code:n = { \cs_set_eq:cN { \zitie_processor:n { punctuation } } \use:n } ,
+ punctuation / unknown .code:n = { \cs_set_eq:cc { \zitie_processor:n { punctuation } } {#1} } ,
+ punctuation .initial:n = ignore ,
+ punctuation* .cs_set:cp = { \zitie_processor:n { punctuation } } #1 ,
+
+ frametype .code:n =
+ {
+ \exp_args:NNx \clist_if_in:NnTF \g__zitie_frame_list_clist {#1}
+ { \tl_set:Nx \l_zitie_frame_type_tl {#1} }
+ { \msg_error:nnx { zitie } { frame-exists } {#1} }
+ } ,
+ resize .code:n =
+ {
+ \exp_args:NNx \clist_if_in:NnTF \g__zitie_resize_method_clist {#1}
+ { \tl_set:Nx \l_zitie_resize_method_tl {#1} }
+ { \msg_error:nnx { zitie } { resize-method } {#1} }
+ } ,
+ font .tl_set:N = \l__zitie_font_tl ,
+ font .initial:n = 宋体 ,
+ font .default:n = { } , % { \l_xeCJK_family_tl } ,
+ xscale .tl_set:N = \l__zitie_x_scale_tl ,
+ xscale .initial:n = 1 ,
+ yscale .tl_set:N = \l__zitie_y_scale_tl ,
+ yscale .initial:n = 1 ,
+ scale .meta:n = { xscale = #1 , yscale = #1 } ,
+ width .dim_set:N = \l__zitie_box_width_dim ,
+ height .dim_set:N = \l__zitie_box_height_dim ,
+ linewidth .dim_set:N = \l__zitie_linewidth_dim ,
+ linewidth .initial:n = 0.4pt ,
+ framecolor .code:n = { \zitie_color_select:nn { zitieframecolor } {#1} } ,
+ framecolor .initial:n = black ,
+ framecolor* .code:n = { \zitie_color_select:nnn { zitieframecolor } #1 } ,
+ charcolor .code:n = { \zitie_color_select:nn { zitiecharcolor } {#1} } ,
+ charcolor .initial:n = black ,
+ charcolor* .code:n = { \zitie_color_select:nnn { zitieframecolor } {#1} } ,
+ color .meta:n = { framecolor = #1, charcolor = #1 } ,
+ color* .meta:n = { framecolor* = #1, charcolor* = #1 } ,
+ fillcolor .code:n =
+ {
+ \exp_args:Nx \tl_if_empty:nTF {#1}
+ { \zitie_color_select:nn { zitiefillcolor } { white } \cs_set_nopar:Npn \__zitie_aux_color_fill: { } }
+ {
+ \zitie_color_select:nn { zitiefillcolor } {#1}
+ \cs_set_nopar:Npn \__zitie_aux_color_fill: { \color_fill:n {#1} }
+ }
+ } ,
+ fillcolor* .code:n =
+ {
+ \zitie_color_select:nnn { zitiefillcolor } #1
+ \cs_set_nopar:Npn \__zitie_aux_color_fill: { \color_fill:nn #1 }
+ } ,
+ dashpattern .tl_set:N = \l__zitie_dash_pattern_tl ,
+ dashpattern .initial:n = { } ,
+ framearc .code:n = { \tl_set:Nn \l__zitie_frame_arc_tl { {#1}{#1} } } ,
+ framearc* .tl_set:N = \l__zitie_frame_arc_tl ,
+ framearc* .initial:n = { { 0cm }{ 0cm } } ,
+ filepath .code:n =
+ {
+ \seq_clear:N \l_file_search_path_seq
+ \keys_set:nn { zitie } { filepath+ = {#1} }
+ } ,
+ filepath+ .code:n = { \tl_map_inline:nn {#1} { \seq_put_right:Nn \l_file_search_path_seq {##1} } } ,
+ charstroke .multichoice: ,
+ charstroke / none .code:n = { \cs_set_eq:cN { \zitie_processor:n { charstroke } } \use:n } ,
+ charstroke / unknown .code:n = { \cs_set_eq:cc { \zitie_processor:n { charstroke } } {#1} } ,
+ charstrokespecial .code:n =
+ {
+ \cs_set:cn { \zitie_processor:n { charstroke } }
+ { \zitie_stroke_chars:nn {#1} {##1} }
+ } ,
+ charstroke .initial:n = { none } ,
+
+ debug .bool_set:N = \l__zitie_debug_bool ,
+ debug .initial:n = false ,
+ debug .default:n = true ,
+ savefontname .bool_set:N = \l__zitie_savefontname_bool ,
+ savefontname .initial:n = false ,
+ savefontname .default:n = true ,
+ fallback .bool_set:N = \l__zitie_font_fallback_bool ,
+ fallback .initial:n = false ,
+ fallback .default:n = true ,
+ fallbackfont .clist_set:N = \g__zitie_fallback_font_clist ,
+ fallbackfont .initial:n = { 宋体 } ,
+ fallbackfont+ .code:n = { \clist_put_right:Nn \g__zitie_fallback_font_clist {#1} } ,
+ }
+
+\hook_new_pair:nn { zitie/processor/before } { zitie/processor/after }
+\cs_new:Npn \zitie_new_process_rule:nnn #1#2#3 % processor, id, code
+ {
+ \cs_set:cpn { __zitie_processor_ #1 @ #2 :n } ##1
+ { \hook_use:n { zitie/processor/before } #3 \hook_use:n { zitie/processor/after } }
+ \keys_define:nn { zitie }
+ { #1/#2 .code:n = { \cs_set_eq:cc { \zitie_processor:n {#1} } { __zitie_processor_ #1 @ #2 :n } } }
+ }
+\cs_new:Npn \zitie_new_process_rule:nnnn #1#2#3#4 % processor, id, arg num, code
+ {
+ \cs_set:cn { \zitie_processor:nnn {#1} {#2} {#3} }
+ { \hook_use:n { zitie/processor/before } #4 \hook_use:n { zitie/processor/after } }
+ \keys_define:nn { zitie }
+ { #1/#2 .code:n = { \cs_set_eq:cc { \zitie_processor:n {#1} } { \zitie_processor:nnn {#1} {#2} {#3} } } }
+ }
+\NewDocumentCommand \zitienewrule { O{1} >{\TrimSpaces} m > {\TrimSpaces} m m }
+ { \zitie_new_process_rule:nnnn {#2} {#3} {#1} {#4} }
+\zitie_new_process_rule:nnn { punctuation } { onlast }
+ { \tex_penalty:D 10000\smash{ \makebox[0pt]{ \color_select:n { zitiecharcolor } \zitieCJKfamily{\zitiefontname} #1 } } }
+\zitie_new_process_rule:nnn { punctuation } { scale }
+ {
+ \hbox_set:Nn \l_tmpa_box { \color_select:n { zitiecharcolor } \zitieCJKfamily{\zitiefontname} #1 }
+ \box_scale:Nnn \l_tmpa_box \zitiexscaleratio \zitieyscaleratio \box_use_drop:N \l_tmpa_box
+ }
+\zitie_new_process_rule:nnn { charstroke } { solid }
+ { \zitie_stroke_chars:nn { 1 ~ Tr ~ 0.25 ~ w ~ [] ~ 0 ~ d ~ 1 ~ J } {#1} }
+\zitie_new_process_rule:nnn { charstroke } { dashed }
+ { \zitie_stroke_chars:nn { 1 ~ Tr ~ 0.25 ~ w ~ [.8] ~ 0 ~ d ~ 1 ~ J } {#1} }
+\zitie_new_process_rule:nnn { charstroke } { whitesolid }
+ { \zitie_stroke_chars:nn { 2 ~ Tr ~ 0.25 ~ w ~ [] ~ 0 ~ d ~ 1 ~ J ~ 1 ~ 1 ~ 1 ~ rg } {#1} }
+\zitie_new_process_rule:nnn { charstroke } { whitedashed }
+ { \zitie_stroke_chars:nn { 2 ~ Tr ~ 0.25 ~ w ~ [.8] ~ 0 ~ d ~ 1 ~ J ~ 1 ~ 1 ~ 1 ~ rg } {#1} }
+
+
+\cs_new:Npn \__zitie_new_font_family:nn #1#2 { \__zitie_new_font_family:nnn {#1} {#2} { } }
+\cs_new:Npn \__zitie_new_font_family_validate:nn #1#2 { \__zitie_new_font_family_validate:nnn {#1} {#2} { } }
+\cs_new:Npn \zitie_new_font:n #1
+ {
+ \clist_map_inline:nn {#1}
+ {
+ \int_case:nnF { \tl_count:n {##1} }
+ {
+ { 2 } { \__zitie_new_font_family_validate:nn ##1 }
+ { 3 } { \__zitie_new_font_family_validate:nnn ##1 }
+ }
+ { \msg_error:nnn { zitie } { font-args } {##1} }
+ }
+ }
+\cs_new:Npn \zitie_new_font:nnn #1#2#3 % fontfamily, fontname, font feature
+ {
+ \seq_set_from_clist:Nn \l__zitie_tmpa_seq {#1}
+ \clist_set:Nn \l__zitie_tmpa_clist {#2}
+ \seq_map_indexed_inline:Nn \l__zitie_tmpa_seq
+ {
+ \__zitie_new_font_family_validate:nnn
+ { ##2 } { \clist_item:Nn \l__zitie_tmpa_clist {##1} } {#3}
+ }
+ }
+
+\cs_new:Npn \zitiesetup #1
+ {
+ \keys_set:nn { zitie } {#1}
+ \bool_if:NTF \l__zitie_savefontname_bool
+ { \tl_gset_eq:NN \zitiefontname \l__zitie_font_tl }
+ { \tl_gset_eq:NN \zitiefontname \c_empty_tl }
+ }
+
+
+\cs_new:Npn \zitie_new_resize_method:nn #1
+ {
+ \clist_put_right:Nn \g__zitie_resize_method_clist {#1}
+ \cs_new:cpn { \__zitie_resize:n {#1} }
+ }
+\zitie_new_resize_method:nn { none } { }
+\cs_new:Npn \zitie_new_frame_construct:nn #1
+ {
+ \clist_put_right:Nn \g__zitie_frame_list_clist {#1}
+ \cs_new:cn { \zitie_frame_type:n {#1} }
+ }
+\zitie_new_frame_construct:nn { none } { }
+
+\zitie_font_if_exist:nT { SimSun } { \zitie_new_font:n { {宋体}{SimSun} } }
+\keys_set:nn { zitie }
+ {
+ basechar = 好 ,
+ zihao = 4 ,
+ frametype = none ,
+ resize = none ,
+ }
+
+\ProcessKeysPackageOptions { zitie }
+\cs_new:Npn \zitie_single_construct:nN #1#2
+ {
+ \group_begin:
+ \tl_if_empty:nF {#1} { \keys_set:nn { zitie } {#1} }
+ \tl_set:Nf \l__zitie_curr_char_tl {#2}
+ \__zitie_single_construct_o:N \l__zitie_curr_char_tl
+ \group_end:
+ }
+\cs_new:Npn \zitie_single_construct:N #1
+ {
+ \group_begin:
+ \tl_set:Nf \l__zitie_curr_char_tl {#1}
+ \__zitie_single_construct_o:N \l__zitie_curr_char_tl
+ \group_end:
+ }
+\cs_new:Npn \__zitie_single_construct:N #1
+ {
+ \zitie_token_if_punctuation_f:NTF #1
+ { \zitie_processor_c:n { punctuation } {#1} }
+ {
+ \hcoffin_set:Nn \l__zitie_box_coffin
+ {
+ \color_select:n { zitiecharcolor }
+ \zitie_processor_c:n { charstroke }
+ { \zitie_cjk_glyph_use:nN { \l__zitie_font_tl } \l__zitie_curr_char_tl }
+ }
+ \tl_set:Nx \zitiexscaleratio { \dim_to_decimal:n { \coffin_wd:N \l__zitie_box_coffin} }
+ \tl_set:Nx \zitieyscaleratio { \dim_to_decimal:n { \__zitie_coffin_ht_plus_dp:N \l__zitie_box_coffin } }
+ \__zitie_resize_c:n { \l_zitie_resize_method_tl }
+ \dim_gset:Nn \zitiewidth { \coffin_wd:N \l__zitie_box_coffin }
+ \dim_gset_eq:NN \zitieboxwd \zitiewidth
+ \dim_gset:Nn \zitieboxht { \coffin_ht:N \l__zitie_box_coffin }
+ \dim_gset:Nn \zitieboxdp { \coffin_dp:N \l__zitie_box_coffin }
+ \dim_gset:Nn \zitieheight { \zitieboxht + \zitieboxdp }
+ \tl_gset:Nx \zitiexscaleratio { \fp_eval:n { \dim_to_fp:n { \zitiewidth } / \zitiexscaleratio } }
+ \tl_gset:Nx \zitieyscaleratio { \fp_eval:n { \dim_to_fp:n { \zitieheight } / \zitieyscaleratio } }
+ \__zitie_single_frame_construct:
+ }
+ }
+\cs_set:Npn \__zitie_single_construct_o:N
+ { \exp_after:wN \__zitie_single_construct:N }
+\cs_set:Npn \__zitie_single_construct_f:N
+ { \exp_args:Nf \__zitie_single_construct:N }
+
+\cs_new:Npn \zitie_dim_gezero_dispatch:NNnnn #1#2 #3#4#5
+ {
+ \dim_compare:nNnTF #1 > \c_zero_dim
+ { #3 }
+ {
+ \dim_compare:nNnTF #2 > \c_zero_dim
+ { #4 } { #5 }
+ }
+ }
+\cs_new:Npn \zitie_dim_gezero_dispatch:NNnnnn #1#2 #3#4#5#6
+ {
+ \dim_compare:nNnTF #1 > \c_zero_dim
+ {
+ \dim_compare:nNnTF #2 > \c_zero_dim
+ { #3 } { #4 }
+ }
+ {
+ \dim_compare:nNnTF #2 > \c_zero_dim
+ { #5 } { #6 }
+ }
+ }
+\cs_new:Npn \__zitie_force_size_dispatch:nnn % height, width, none
+ { \zitie_dim_gezero_dispatch:NNnnn \l__zitie_box_height_dim \l__zitie_box_width_dim }
+\cs_new:Npn \__zitie_force_size_dispatch:nnnn % both, height, width, none
+ { \zitie_dim_gezero_dispatch:NNnnnn \l__zitie_box_height_dim \l__zitie_box_width_dim }
+\zitie_new_resize_method:nn { real }
+ {
+ \__zitie_force_size_dispatch:nnnn
+ { \coffin_resize:Nnn \l__zitie_box_coffin \l__zitie_box_width_dim \l__zitie_box_height_dim }
+ {
+ \coffin_scale:Nnn \l__zitie_box_coffin
+ { \dim_ratio:nn { \l__zitie_box_height_dim } { \__zitie_coffin_ht_plus_dp:N \l__zitie_box_coffin } }
+ { \dim_ratio:nn { \l__zitie_box_height_dim } { \__zitie_coffin_ht_plus_dp:N \l__zitie_box_coffin } }
+ }
+ {
+ \coffin_scale:Nnn \l__zitie_box_coffin
+ { \dim_ratio:nn { \l__zitie_box_width_dim } { \coffin_wd:N \l__zitie_box_coffin } }
+ { \dim_ratio:nn { \l__zitie_box_width_dim } { \coffin_wd:N \l__zitie_box_coffin } }
+ }
+ { \coffin_scale:Nnn \l__zitie_box_coffin { \l__zitie_x_scale_tl } { \l__zitie_y_scale_tl } }
+ }
+
+\zitie_new_resize_method:nn { base }
+ {
+ \__zitie_force_size_dispatch:nnnn
+ { \coffin_resize:Nnn \l__zitie_box_coffin \l__zitie_box_width_dim \l__zitie_box_height_dim }
+ {
+ \coffin_resize:Nnn \l__zitie_box_coffin
+ { \l__zitie_char_width_dim * \dim_ratio:nn { \l__zitie_box_height_dim } { \__zitie_coffin_ht_plus_dp:N \l__zitie_box_coffin } }
+ { \l__zitie_box_height_dim }
+ }
+ {
+ \coffin_resize:Nnn \l__zitie_box_coffin
+ { \l__zitie_box_width_dim }
+ { \l__zitie_char_height_dim * \dim_ratio:nn { \l__zitie_box_width_dim } { \coffin_wd:N \l__zitie_box_coffin } }
+ }
+ {
+ \coffin_resize:Nnn \l__zitie_box_coffin
+ { \l__zitie_x_scale_tl \l__zitie_char_width_dim }
+ { \l__zitie_y_scale_tl \l__zitie_char_height_dim }
+ }
+ }
+
+\zitie_new_resize_method:nn { square }
+ {
+ \hcoffin_set:Nn \l__zitie_tmpa_coffin { \phantom { \c_zitie_basechar_tl } }
+ \dim_set:Nn \zitiewidth { \coffin_wd:N \l__zitie_box_coffin }
+ \dim_set:Nn \zitieheight { \__zitie_coffin_ht_plus_dp:N \l__zitie_box_coffin }
+ \__zitie_resize_method_square_aux:
+ \tl_set:Nx \zitiexscaleratio { \dim_to_decimal:n \zitiewidth }
+ \tl_set_eq:NN \zitieyscaleratio \zitiexscaleratio
+ \__zitie_force_size_dispatch:nnnn
+ { \coffin_resize:Nnn \l__zitie_box_coffin \l__zitie_box_width_dim \l__zitie_box_height_dim }
+ { \coffin_resize:Nnn \l__zitie_box_coffin \l__zitie_box_height_dim \l__zitie_box_height_dim }
+ { \coffin_resize:Nnn \l__zitie_box_coffin \l__zitie_box_width_dim \l__zitie_box_width_dim }
+ { \coffin_scale:Nnn \l__zitie_box_coffin \l__zitie_x_scale_tl \l__zitie_y_scale_tl }
+ }
+\cs_new:Npn \__zitie_resize_method_square_aux:
+ {
+ \if_dim:w \zitieheight > \zitiewidth
+ \coffin_resize:Nnn \l__zitie_tmpa_coffin
+ { ( \zitieheight - \zitiewidth ) / 2 }
+ { \zitieheight }
+ \coffin_join:NnnNnnnn \l__zitie_box_coffin { r } { vc } \l__zitie_tmpa_coffin { l } { vc } { 0pt } { 0pt }
+ \coffin_join:NnnNnnnn \l__zitie_box_coffin { l } { vc } \l__zitie_tmpa_coffin { r } { vc } { 0pt } { 0pt }
+ \dim_set_eq:NN \zitiewidth \zitieheight
+ \else: \if_dim:w \zitiewidth > \zitieheight
+ \coffin_resize:Nnn \l__zitie_tmpa_coffin
+ { \zitiewidth }
+ { ( \zitiewidth - \zitieheight ) / 2 }
+ \coffin_join:NnnNnnnn \l__zitie_box_coffin { hc } { t } \l__zitie_tmpa_coffin { hc } { b } { 0pt } { 0pt }
+ \coffin_join:NnnNnnnn \l__zitie_box_coffin { hc } { b } \l__zitie_tmpa_coffin { hc } { t } { 0pt } { 0pt }
+ \dim_set_eq:NN \zitieheight \zitiewidth
+ \fi: \fi:
+ }
+
+\msg_new:nnn { zitie } { frame-type } { using~ `#1'~ frame. }
+\cs_new:Npn \__zitie_single_frame_construct:
+ {
+ \draw_begin:
+ \draw_linewidth:n { \l__zitie_linewidth_dim }
+ \__zitie_aux_color_fill:
+ \color_stroke:n { zitieframecolor }
+ \tl_if_empty:NF \l__zitie_dash_pattern_tl { \exp_args:No \draw_dash_pattern:nn { \l__zitie_dash_pattern_tl } { 0pt } }
+ \exp_after:wN \draw_path_corner_arc:nn \l__zitie_frame_arc_tl
+ \zitie_frame_type_c:n { \l_zitie_frame_type_tl } { 0 } { 0 } { \zitiewidth } { \zitieheight } { 1 } { 1 }
+ \draw_coffin_use:Nnn \l__zitie_box_coffin { l } { b }
+ \draw_end:
+ }
+\zitie_new_frame_construct:nn { 口 }
+ {
+ \draw_path_rectangle_corners:nn { #1 , #2 } { #3 , #4 }
+ \cs_if_eq:NNTF \__zitie_aux_color_fill: \c_empty_tl
+ { \draw_path_use_clear:n { stroke } }
+ { \draw_path_use_clear:n { stroke , fill } }
+ }
+\zitie_new_frame_construct:nn { 十 }
+ {
+ \draw_path_moveto:n { (#3)/2 , #2 }
+ \draw_path_lineto:n { #3/2 , #4 }
+ \draw_path_moveto:n { #1 , (#4)/2 }
+ \draw_path_lineto:n { #3 , (#4)/2 }
+ \draw_path_use_clear:n { stroke }
+ }
+\zitie_new_frame_construct:nn { 田 }
+ {
+ \zitie_frame_type_c:n { 口 } {#1} {#2} {#3} {#4} {#5} {#6}
+ \zitie_frame_type_c:n { 十 } {#1} {#2} {#3} {#4} {#5} {#6}
+ }
+\zitie_new_frame_construct:nn { × }
+ {
+ \draw_path_moveto:n { #1 , #2 }
+ \draw_path_lineto:n { #3 , #4 }
+ \draw_path_moveto:n { #1 , #4 }
+ \draw_path_lineto:n { #3 , #2 }
+ \draw_path_use_clear:n { stroke }
+ }
+\zitie_new_frame_construct:nn { 咪 }
+ {
+ \zitie_frame_type_c:n { 口 } {#1} {#2} {#3} {#4} {#5} {#6}
+ \zitie_frame_type_c:n { × } {#1} {#2} {#3} {#4} {#5} {#6}
+ \zitie_frame_type_c:n { 十 } {#1} {#2} {#3} {#4} {#5} {#6}
+ }
+\zitie_new_frame_construct:nn { 米 }
+ {
+ \zitie_frame_type_c:n { × } {#1} {#2} {#3} {#4} {#5} {#6}
+ \zitie_frame_type_c:n { 十 } {#1} {#2} {#3} {#4} {#5} {#6}
+ }
+
+\NewDocumentCommand \zitienewfont { s } { \IfBooleanTF {#1} { \zitie_new_font:nnn } { \zitie_new_font:n } }
+\hook_new_pair:nn { zitie/framezi/before } { zitie/framezi/after }
+\NewDocumentCommand \framezi { s O{} m }
+ {
+ \group_begin:
+ \tl_if_empty:nF {#2} { \keys_set_filter:nnn { zitie } { geometry } {#2} }
+ \hook_use:n { zitie/framezi/before }
+ \bool_if:NTF \l__zitie_savefontname_bool
+ { \tl_gset_eq:NN \zitiefontname \l__zitie_font_tl }
+ { \tl_gset_eq:NN \zitiefontname \c_empty_tl }
+ \IfBooleanTF {#1}
+ { \tl_map_inline:Nn #3 { \zitie_single_construct:N ##1 \allowbreak } }
+ { \tl_map_inline:nn {#3} { \zitie_single_construct:N ##1 \allowbreak } }
+ \hook_use:n { zitie/framezi/after }
+ \group_end:
+ }
+\hook_new_pair:nn { zitie/framerange/before } { zitie/framerange/after }
+\hook_new:n { zitie/framerange/range }
+\NewDocumentCommand \framerange { O{} m }
+ {
+ \group_begin:
+ \tl_if_empty:nF {#1} { \keys_set_filter:nnn { zitie } { geometry } {#1} }
+ \hook_use:n { zitie/framerange/before }
+ \bool_if:NTF \l__zitie_savefontname_bool
+ { \tl_gset_eq:NN \zitiefontname \l__zitie_font_tl }
+ { \tl_gset_eq:NN \zitiefontname \c_empty_tl }
+ \clist_map_inline:nn {#2}
+ {
+ \str_if_eq:nnF {##1} { -> }
+ {
+ \__zitie_frame_range_aux:Nnw \__zitie_check_num_range:nnNN {##1}
+ \l__zitie_begin_int \l__zitie_end_int
+ \__zitie_int_until_do:nn { \l__zitie_begin_int > \l__zitie_end_int }
+ {
+ \group_begin:
+ \tl_set:Nf \l__zitie_curr_char_tl { \tex_Uchar:D \l__zitie_begin_int }
+ \__zitie_single_construct_o:N \l__zitie_curr_char_tl
+ \group_end: \allowbreak
+ \int_incr:N \l__zitie_begin_int
+ }
+ }
+ \hook_use:n { zitie/framerange/range }
+ }
+ \hook_use:n { zitie/framerange/after }
+ \group_end:
+ }
+\NewDocumentCommand \__zitie_frame_range_aux:Nnw { m >{ \SplitArgument { 1 } { -> } } m } { #1 #2 }
+
+\cs_new:Npn \__zitie_construct_loop:N #1
+ {
+ \tl_if_eq:nnTF #1 \par { \par \hook_use:n { zitie/zitieframe/par } \__zitie_construct_loop:N }
+ { \quark_if_nil:nF {#1} { \zitie_single_construct:N #1 \allowbreak \__zitie_construct_loop:N } }
+ }
+\hook_new_pair:nn { zitie/zitieframe/before } { zitie/zitieframe/after }
+\hook_new:n { zitie/zitieframe/par }
+\NewDocumentEnvironment { zitieframe } { G{} O{} +b }
+ {
+ \group_begin:
+ \lineskip=0pt \parindent=0pt \parskip=0pt \raggedright
+ \tl_if_empty:nF {#2} { \keys_set:nn { zitie } {#2} }
+ \hook_use:n { zitie/zitieframe/before }
+ #1
+ \bool_if:NTF \l__zitie_savefontname_bool
+ { \tl_gset_eq:NN \zitiefontname \l__zitie_font_tl }
+ { \tl_gset_eq:NN \zitiefontname \c_empty_tl }
+ \__zitie_construct_loop:N #3 \q_nil
+ } { \hook_use:n { zitie/zitieframe/after } \group_end: }
+
+\hook_new_pair:nn { zitie/framezifile/before } { zitie/framezifile/after }
+\NewDocumentCommand \framezifile { s O{} m }
+ {
+ \group_begin:
+ \tl_if_empty:nF {#2} { \keys_set_filter:nnn { zitie } { geometry } {#2} }
+ \hook_use:n { zitie/framezifile/before }
+ \bool_if:NTF \l__zitie_savefontname_bool
+ { \tl_gset_eq:NN \zitiefontname \l__zitie_font_tl }
+ { \tl_gset_eq:NN \zitiefontname \c_empty_tl }
+ \IfBooleanTF {#1}
+ {
+ \file_get:nnN {#3} { } \l__zitie_file_chars_tl
+ \tl_map_inline:Nn \l__zitie_file_chars_tl { \zitie_single_construct:N ##1 \allowbreak }
+ }
+ {
+ \ior_open:Nn \g__zitie_file_read_ior {#3}
+ \ior_map_inline:Nn \g__zitie_file_read_ior
+ { \tl_map_inline:nn {##1} { \zitie_single_construct:N ####1 \allowbreak } }
+ \ior_close:N \g__zitie_file_read_ior
+ }
+ \hook_use:n { zitie/framezifile/after }
+ \group_end:
+ }
+
+
+\if_bool:N \g__zitie_enable_background_bool
+%%% module background
+\dim_new:N \g__zitie_background_lmargin_dim
+\dim_new:N \g__zitie_background_tmargin_dim
+\dim_new:N \g__zitie_background_rmargin_dim
+\dim_new:N \g__zitie_background_bmargin_dim
+\dim_new:N \g__zitie_background_boxwidth_dim
+\dim_new:N \g__zitie_background_boxheight_dim
+\skip_new:N \g__zitie_background_boxcol_skip
+\skip_new:N \g__zitie_background_boxrow_skip
+\dim_new:N \g__zitie_background_framewidth_dim
+\dim_new:N \g__zitie_background_frameheight_dim
+\dim_new:N \g__zitie_background_x_left_dim
+\dim_new:N \g__zitie_background_x_right_dim
+\dim_new:N \g__zitie_background_y_top_dim
+\dim_new:N \g__zitie_background_y_bottom_dim
+\bool_new:N \g__zitie_background_colnum_bool
+\bool_new:N \g__zitie_background_rownum_bool
+\int_new:N \g__zitie_background_colboxes_int
+\int_new:N \g__zitie_background_rowboxes_int
+\dim_new:N \g__zitie_background_linewidth_dim
+\cs_new_nopar:Npn \__zitie_background_aux_color_fill: { }
+\keys_define:nn { zitie } { background .meta:nn = { zitie/background } {#1} }
+\NewDocumentCommand \zitiebackground { O{} }
+ {
+ \keys_set:nn { zitie/background } {#1}
+ \__zitie_background_typeset:
+ }
+\keys_define:nn { zitie/background }
+ {
+ typeset .choice: ,
+ typeset / true .code:n = { \cs_gset:Npn \__zitie_background_typeset: { \zitie_set_background_frame: } } ,
+ typeset / false .code:n = { \cs_gset:Npn \__zitie_background_typeset: { \zitie_unset_background_frame: } } ,
+ typeset / next .code:n =
+ {
+ \cs_gset:Npn \__zitie_background_typeset:
+ { \zitie_unset_background_frame: \zitie_set_next_background_frame: }
+ } ,
+ typeset / none .code:n = { \cs_gset:Npn \__zitie_background_typeset: { } } ,
+ true .meta:n = { typeset = true } ,
+ on .meta:n = { typeset = true } ,
+ false .meta:n = { typeset = false } ,
+ off .meta:n = { typeset = false } ,
+ next .meta:n = { typeset = next } ,
+ none .meta:n = { typeset = none } ,
+ lmargin .dim_gset:N = \g__zitie_background_lmargin_dim ,
+ tmargin .dim_gset:N = \g__zitie_background_tmargin_dim ,
+ rmargin .dim_gset:N = \g__zitie_background_rmargin_dim ,
+ bmargin .dim_gset:N = \g__zitie_background_bmargin_dim ,
+ margin .code:n =
+ {
+ \if_case:w \clist_count:n {#1} \exp_stop_f:
+ \dim_gset:Nn \g__zitie_background_lmargin_dim { 0pt }
+ \dim_gset:Nn \g__zitie_background_tmargin_dim { 0pt }
+ \dim_gset:Nn \g__zitie_background_rmargin_dim { 0pt }
+ \dim_gset:Nn \g__zitie_background_bmargin_dim { 0pt }
+ \or:
+ \dim_gset:Nn \g__zitie_background_lmargin_dim {#1}
+ \dim_gset:Nn \g__zitie_background_tmargin_dim {#1}
+ \dim_gset:Nn \g__zitie_background_rmargin_dim {#1}
+ \dim_gset:Nn \g__zitie_background_bmargin_dim {#1}
+ \or:
+ \dim_gset:Nn \g__zitie_background_lmargin_dim { \clist_item:nn {#1} { 1 } }
+ \dim_gset:Nn \g__zitie_background_tmargin_dim { \clist_item:nn {#1} { 2 } }
+ \dim_gset:Nn \g__zitie_background_rmargin_dim { \clist_item:nn {#1} { 1 } }
+ \dim_gset:Nn \g__zitie_background_bmargin_dim { \clist_item:nn {#1} { 2 } }
+ \or:
+ \dim_gset:Nn \g__zitie_background_lmargin_dim { \clist_item:nn {#1} { 1 } }
+ \dim_gset:Nn \g__zitie_background_tmargin_dim { \clist_item:nn {#1} { 2 } }
+ \dim_gset:Nn \g__zitie_background_rmargin_dim { \clist_item:nn {#1} { 1 } }
+ \dim_gset:Nn \g__zitie_background_bmargin_dim { \clist_item:nn {#1} { 2 } }
+ \else:
+ \dim_gset:Nn \g__zitie_background_lmargin_dim { \clist_item:nn {#1} { 1 } }
+ \dim_gset:Nn \g__zitie_background_tmargin_dim { \clist_item:nn {#1} { 2 } }
+ \dim_gset:Nn \g__zitie_background_rmargin_dim { \clist_item:nn {#1} { 3 } }
+ \dim_gset:Nn \g__zitie_background_bmargin_dim { \clist_item:nn {#1} { 4 } }
+ \fi:
+ } ,
+ colnum .bool_gset:N = \g__zitie_background_colnum_bool ,
+ rownum .bool_gset:N = \g__zitie_background_rownum_bool ,
+ colboxes .int_gset:N = \g__zitie_background_colboxes_int ,
+ rowboxes .int_gset:N = \g__zitie_background_rowboxes_int ,
+ framewidth .dim_gset:N = \g__zitie_background_framewidth_dim ,
+ frameheight .dim_gset:N = \g__zitie_background_frameheight_dim ,
+ boxwidth .dim_gset:N = \g__zitie_background_boxwidth_dim ,
+ boxheight .dim_gset:N = \g__zitie_background_boxheight_dim ,
+ onpaper .meta:n = { frameheight = \paperheight , framewidth = \paperwidth } ,
+ onpaper .value_forbidden:n = true ,
+ ontext .meta:n = { frameheight = \textheight , framewidth = \textwidth } ,
+ ontext .value_forbidden:n = true ,
+
+ xrange .code:n =
+ {
+ \dim_gset:Nn \g__zitie_background_x_left_dim { \clist_item:nn {#1} {1} }
+ \dim_gset:Nn \g__zitie_background_x_right_dim { \clist_item:nn {#1} {2} }
+ } ,
+ yrange .code:n =
+ {
+ \dim_gset:Nn \g__zitie_background_y_top_dim { \clist_item:nn {#1} {1} }
+ \dim_gset:Nn \g__zitie_background_y_bottom_dim { \clist_item:nn {#1} {2} }
+ } ,
+ frametype .tl_gset:N = \g__zitie_background_frametype_tl ,
+ linewidth .dim_gset:N = \g__zitie_background_linewidth_dim ,
+ framecolor .code:n = { \zitie_color_select:nn { zitiebackgroundframecolor } {#1} } ,
+ framecolor* .code:n = { \zitie_color_select:nnn { zitiebackgroundframecolor } #1 } ,
+ fillcolor .code:n =
+ {
+ \exp_args:Nx \tl_if_empty:nTF {#1}
+ {
+ \zitie_color_select:nn { zitiebackgroundfillcolor } { white }
+ \cs_gset_nopar:Npn \__zitie_background_aux_color_fill: { }
+ }
+ {
+ \zitie_color_select:nn { zitiebackgroundfillcolor } {#1}
+ \cs_gset_nopar:Npn \__zitie_background_aux_color_fill: { \color_fill:n {#1} }
+ }
+ } ,
+ fillcolor* .code:n =
+ {
+ \zitie_color_select:nnn { zitiebackgroundfillcolor } #1
+ \cs_gset_nopar:Npn \__zitie_background_aux_color_fill: { \color_fill:nn #1 }
+ } ,
+ dashpattern .tl_gset:N = \g__zitie_background_dash_pattern_tl ,
+ }
+
+\keys_set:nn { zitie/background }
+ {
+ typeset = none,
+ margin = { 0pt, 0pt, 0pt, 0pt },
+ colnum = false,
+ rownum = false,
+ colboxes = 1,
+ rowboxes = 1,
+ onpaper,
+ xrange = { 0cm, \paperwidth } ,
+ yrange = { 0cm, \paperheight } ,
+ frametype = none,
+ linewidth = 0.4pt,
+ framecolor = black,
+ dashpattern = { },
+ }
+
+\cs_new:Npn \zitie_set_background_frame:
+ {
+ \__zitie_background_calc:
+ \__zitie_background_construct:nnn { background }
+ { \g__zitie_background_x_left_dim-.5\g__zitie_background_linewidth_dim }
+ { -\g__zitie_background_y_bottom_dim-.5\g__zitie_background_linewidth_dim }
+ }
+\cs_new:Npn \zitie_set_next_background_frame:
+ {
+ \__zitie_background_calc:
+ \__zitie_background_next_construct:nnn { background }
+ { \g__zitie_background_x_left_dim-.5\g__zitie_background_linewidth_dim }
+ { -\g__zitie_background_y_bottom_dim-.5\g__zitie_background_linewidth_dim }
+ }
+\cs_new:Npn \zitie_unset_background_frame:
+ { \__zitie_unset_background_frame:n { background } }
+\cs_new:Npn \__zitie_background_calc:
+ {
+ \zitie_dim_gezero_dispatch:NNnnnn
+ \g__zitie_background_boxheight_dim
+ \g__zitie_background_boxwidth_dim
+ { \use_none:nn } { \use_ii:nn } { \use_i:nn } { \use:nn }
+ {
+ \dim_set:Nn \g__zitie_background_boxheight_dim
+ { \g__zitie_background_frameheight_dim/\g__zitie_background_rowboxes_int }
+ }
+ {
+ \dim_set:Nn \g__zitie_background_boxwidth_dim
+ { \g__zitie_background_framewidth_dim/\g__zitie_background_colboxes_int }
+ }
+ }
+\cs_new_protected:Npn \__zitie_background_construct:nnn #1#2#3
+ {
+ \hook_gput_code:nnn { shipout/#1 } { zitie/background }
+ { \put ( \dim_eval:n {#2} , \dim_eval:n {#3} ) { \__zitie_background_construct_draw: } }
+ }
+\cs_new_protected:Npn \__zitie_background_construct:nnnn #1#2#3#4
+ {
+ \hook_gput_code:nnn { shipout/#1 } { zitie/background/#2 }
+ { \put ( \dim_eval:n {#3} , \dim_eval:n {#4} ) { \__zitie_background_construct_draw: } }
+ }
+\cs_new_protected:Npn \__zitie_background_next_construct:nnn #1#2#3
+ {
+ \hook_gput_next_code:nn { shipout/#1 }
+ { \put ( \dim_eval:n {#2} , \dim_eval:n {#3} ) { \__zitie_background_construct_draw: } }
+ }
+\cs_new:Npn \__zitie_unset_background_frame:n #1
+ { \hook_gremove_code:nn { shipout/#1 } { zitie/background } }
+\cs_new:Npn \__zitie_unset_background_frame:nn #1#2
+ { \hook_gremove_code:nn { shipout/#1 } { zitie/background/#2 } }
+\cs_new:Npn \zitie_background_frame_type:n #1 { __zitie_background_frame_ #1 :nnnnnn }
+\cs_new:Npn \zitie_background_frame_type_c:n #1 { \use:c { __zitie_background_frame_ #1 :nnnnnn } }
+\cs_new:Npn \__zitie_background_construct_draw:
+ {
+ \draw_begin:
+ \tl_if_empty:NF \g__zitie_background_dash_pattern_tl
+ { \exp_args:No \draw_dash_pattern:nn { \g__zitie_background_dash_pattern_tl } { 0pt } }
+ \draw_linewidth:n { \g__zitie_background_linewidth_dim }
+ \__zitie_background_aux_color_fill:
+ \color_stroke:n { zitiebackgroundframecolor }
+ \zitie_background_frame_type_c:n { \g__zitie_background_frametype_tl }
+ { 0cm } { 0cm }
+ { \g__zitie_background_x_right_dim - \g__zitie_background_x_left_dim }
+ { \g__zitie_background_y_bottom_dim - \g__zitie_background_y_top_dim }
+ { \g__zitie_background_boxwidth_dim }
+ { \g__zitie_background_boxheight_dim }
+ \draw_end:
+ }
+\cs_new:Npn \zitie_background_new_frame_construct:nn #1
+ { \cs_set:cn { \zitie_background_frame_type:n {#1} } }
+\int_new:N \l__zitie_background_tmpa_int
+\int_new:N \l__zitie_background_tmpb_int
+\fp_new:N \l__zitie_background_tmpa_fp
+\fp_new:N \l__zitie_background_tmpb_fp
+\zitie_background_new_frame_construct:nn { none } { }
+\zitie_background_new_frame_construct:nn { 口 }
+ {
+ \cs_if_eq:NNF \__zitie_background_aux_color_fill: \c_empty_tl
+ {
+ \draw_path_rectangle_corners:nn { #1 , #2 } { #3 , #4 }
+ \draw_path_use_clear:n { stroke , fill }
+ }
+ \draw_path_grid:nnnn { #5 } { #6 } { #1 , #2 }
+ { #3+\g__zitie_background_linewidth_dim, #4+\g__zitie_background_linewidth_dim }
+ \draw_path_use_clear:n { stroke }
+ }
+\zitie_background_new_frame_construct:nn { 十 }
+ {
+ \dim_step_inline:nnnn {#1+.5#5} {#5} {#3}
+ {
+ \draw_path_moveto:n { ##1 , #2 }
+ \draw_path_lineto:n { ##1 , #4 }
+ }
+ \dim_step_inline:nnnn {#2+.5#6} {#6} {#4}
+ {
+ \draw_path_moveto:n { #1 , ##1 }
+ \draw_path_lineto:n { #3 , ##1 }
+ }
+ \draw_path_use_clear:n { stroke }
+ }
+\zitie_background_new_frame_construct:nn { 田 }
+ {
+ \zitie_background_frame_type_c:n { 口 } {#1} {#2} {#3} {#4} {#5} {#6}
+ \zitie_background_frame_type_c:n { 十 } {#1} {#2} {#3} {#4} {#5} {#6}
+ }
+\zitie_background_new_frame_construct:nn { × }
+ {
+ \int_set:Nn \l__zitie_background_tmpa_int { \fp_to_int:n { ceil( \dim_ratio:nn {(#3)-(#1)} {#5} ) } }
+ \int_set:Nn \l__zitie_background_tmpb_int { \fp_to_int:n { ceil( \dim_ratio:nn {(#4)-(#2)} {#6} ) } }
+ \if_int_compare:w \l__zitie_background_tmpa_int < \l__zitie_background_tmpb_int
+ \__zitie_background_frame_construct_aux_cross:nnnnnnnn
+ {#1} {#2} {#3} {#4} {#5} {#6} { \l__zitie_background_tmpb_int } { }
+ \else:
+ \__zitie_background_frame_construct_aux_cross:nnnnnnnn
+ {#1} {#2} {#3} {#4} {#5} {#6} { \l__zitie_background_tmpa_int } { }
+ \fi:
+ \draw_path_use_clear:n { stroke }
+ }
+\cs_new:Npn \__zitie_background_frame_construct_aux_cross:nnnnnnnn #1#2#3#4#5#6#7#8
+ {
+ \int_step_inline:nn {#7}
+ {
+ \draw_path_moveto:n { #1 , #2 + ##1*(#6) }
+ \draw_path_lineto:n { #1 + ##1*#5 , #2 }
+ }
+ \int_step_inline:nn {#7}
+ {
+ \draw_path_moveto:n { #1+#7*(#5) , #2+#7*(#6)-##1*(#6) }
+ \draw_path_lineto:n { #1+#7*(#5)-##1*(#5) , #2+#7*(#6) }
+ }
+ \int_step_inline:nn {#7}
+ {
+ \draw_path_moveto:n { #1+#7*(#5)-##1 #5 , #2 }
+ \draw_path_lineto:n { #1+#7*(#5) , #2+(##1)*#6 }
+ }
+ \int_step_inline:nn {#7}
+ {
+ \draw_path_moveto:n { #1 , #2+#7*#6-##1*(#6) }
+ \draw_path_lineto:n { #1+##1*(#5) , #2+#7*(#6) }
+ }
+ }
+\zitie_background_new_frame_construct:nn { 米 }
+ {
+ \zitie_background_frame_type_c:n { 十 } {#1} {#2} {#3} {#4} {#5} {#6}
+ \zitie_background_frame_type_c:n { × } {#1} {#2} {#3} {#4} {#5} {#6}
+ }
+\zitie_background_new_frame_construct:nn { 咪 }
+ {
+ \zitie_background_frame_type_c:n { 口 } {#1} {#2} {#3} {#4} {#5} {#6}
+ \zitie_background_frame_type_c:n { 十 } {#1} {#2} {#3} {#4} {#5} {#6}
+ \zitie_background_frame_type_c:n { × } {#1} {#2} {#3} {#4} {#5} {#6}
+ }
+%%% end of background
+\else:
+\msg_new:nnn { zitie } { background }
+ { `background'~ unenable.~ You~ must~ use~ `enable-background'~ when~ loading~ this~ package. }
+\keys_define:nn { zitie } { background .code:n = \msg_error:nn { zitie } { background } }
+\fi:
+
+
+\if_bool:N \g__zitie_enable_zhlipsum_bool
+\RequirePackage { zhlipsum }
+%%% module zhlipsum
+\cs_new:Npn \__zitie_zhlipsum_paras:nn #1#2 { c__zhlipsum_ #1 @ #2 _tl }
+\hook_new_pair:nn { zitie/framezhlipsum/before } { zitie/framezhlipsum/after }
+\hook_new:n { zitie/framezhlipsum/paragraph }
+\NewDocumentCommand \framezhlipsum { O{} m >{ \TrimSpaces } O{simp} }
+ {
+ \group_begin:
+ \zhlipsum_if_exist:nTF {#3}
+ {
+ \tl_if_empty:nF {#1} { \keys_set_filter:nnn { zitie } { geometry } {#1} }
+ \hook_use:n { zitie/framezhlipsum/before }
+ \bool_if:NTF \l__zitie_savefontname_bool
+ { \tl_gset_eq:NN \zitiefontname \l__zitie_font_tl }
+ { \tl_gset_eq:NN \zitiefontname \c_empty_tl }
+ \__zhlipsum_parse_par:nn {#3} {#2}
+ \seq_if_empty:NF \l__zhlipsum_par_num_seq
+ {
+ \seq_pop_right:NN \l__zhlipsum_par_num_seq \l__zhlipsum_tmpa_tl
+ \seq_map_inline:Nn \l__zhlipsum_par_num_seq
+ {
+ \tl_map_inline:cn { \__zitie_zhlipsum_paras:nn {#3} {##1} }
+ { \zitie_single_construct:N ####1 \allowbreak }
+ \hook_use:n { zitie/framezhlipsum/paragraph }
+ }
+ \tl_map_inline:cn { \__zitie_zhlipsum_paras:nn {#3} { \l__zhlipsum_tmpa_tl } }
+ { \zitie_single_construct:N ##1 \allowbreak }
+ }
+ \hook_use:n { zitie/framezhlipsum/after }
+ }
+ { \__zhlipsum_error:nn { invalid-name } {#3} }
+ \group_end:
+ }
+%%%
+\else:
+\msg_new:nnn { zitie } { zhlipsum }
+ { `zhlipsum'~ unenable.~ You~ must~ use~ `enable-zhlipsum'~ option~ when~ loading~ this~ package. }
+\keys_define:nn { zitie }
+ { zhlipsum .code:n = \msg_error:nn { zitie } { zhlipsum } }
+\fi: