summaryrefslogtreecommitdiff
path: root/info/asymptote-by-example-zh-cn/src/figure-src/CJKmove.sty
blob: 2885b2077c155921338b496b3272d85b0acf8844 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
%# -*- coding:GBK -*-
% CJKmove.sty
%
% 移动 CJK 字符,但使用固定位置和大小(1em)的 bounding box
% 可用于中文直行排版时字符偏移的校正
% 此宏包对 CJK 和 xeCJK 包均有效
%
% 作者:milksea

\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{CJKmove}[2008/08/10 ver 0.1]

% frame 选项:给每个 CJK 字符加线框,帮助查看字符 bounding box 位置
\newif\if@CJK@framed
\@CJK@framedfalse
\DeclareOption{frame}{\@CJK@framedtrue}
\DeclareOption{noframe}{\@CJK@framedfalse}
\DeclareOption*{%
  \PackageWarning{CJKmove}{Unknown option ‘\CurrentOption’}%
}
\ProcessOptions

\ifx\XeTeXinputencoding\undefined
  \RequirePackage{CJK}
\else
  \RequirePackage{xeCJK}
\fi

% \CJK@symbol:保存原来的定义
\let\CJK@symbol\CJKsymbol

% 移动的 CJK 字符
\def\CJK@moved@symbol#1{%
  \leavevmode
  \vbox to 1em{%
    \vss
    \hbox to 1em{%
      \raise\CJK@movey em\hbox{\kern\CJK@movex em\CJK@symbol{#1}}\hss
    }%
  }%
}

% 加框的 CJK 字符
\def\CJK@framed@symbol#1{%
  \bgroup
    \fboxsep=0pt
    \fbox{\CJK@symbol{#1}}%
  \egroup
}

% 加框又移动的 CJK 字符
\def\CJK@moveframed@symbol#1{%
  \bgroup
    \fboxsep=0pt
    \fbox{\CJK@moved@symbol{#1}}%
  \egroup
}

% 根据加框与否的选项重定义 CJK 字符
\if@CJK@framed
  \def\CJKmove{\let\CJKsymbol\CJK@moveframed@symbol}
  \def\CJKnomove{\let\CJKsymbol\CJK@framed@symbol}
\else
  \def\CJKmove{\let\CJKsymbol\CJK@moved@symbol}
  \def\CJKnomove{\let\CJKsymbol\CJK@symbol}
\fi

% 标点与字符定义相同
\def\CJKpunctsymbol{\expandafter\CJKsymbol}

% 设定水平向右和竖直身上的移动距离,参数为纯数字,单位 em
\def\setCJKmove#1#2{
  \def\CJK@movex{#1}%
  \def\CJK@movey{#2}%
}
% 默认移动距离:SimSun 的 vertical 模式适用
\def\resetCJKmove{%
  \def\CJK@movex{0}%
  \def\CJK@movey{0.4}%
}

% 初始化
\resetCJKmove
\CJKnomove

\endinput


宏包选项:

  frame       给所有 CJK 字符加框

  noframe     不加框


用法:

  \CJKmove                      进入 CJK 字符移动模式

  \CJKnomove                    进入 CJK 字符不移动模式

  \setCJKmove <数字x> <数字y>   设置右移 x em,上移 y em

  \resetCJKmove                 重设移动距离,默认为上移 0.4em 适于 SimSun


注意事项:

  不同的字体可能需要设置不同的移动距离


BUG:

  bounding box 似乎定的还是不准


TODO:

  支持不等宽的、可规定深度和可平移的 bounding box