Wow
修訂 | d19b8e6f99673f6b49c2323c439340acbddb5880 (tree) |
---|---|
時間 | 2017-03-30 10:31:25 |
作者 | Hironori Kitagawa <h_kitagawa2001@yaho...> |
Commiter | Hironori Kitagawa |
Merge branch 'kitagawa_test' into kitagawa_lltx103
@@ -3,7 +3,7 @@ | ||
3 | 3 | % |
4 | 4 | |
5 | 5 | \NeedsTeXFormat{LaTeX2e} |
6 | -\ProvidesPackage{lltjext}[2016/12/16 v1.2c-ltj-5 Macros for vertical writing] | |
6 | +\ProvidesPackage{lltjext}[2017/03/28 v1.2f-ltj-5 Macros for vertical writing] | |
7 | 7 | \RequirePackage{luatexja} |
8 | 8 | |
9 | 9 | {\catcode`\*=11 |
@@ -73,6 +73,41 @@ | ||
73 | 73 | \def\endarray{\crcr\egroup\egroup\@end@alignbox} |
74 | 74 | \def\endtabular{\endarray$\egroup} |
75 | 75 | \expandafter \let \csname endtabular*\endcsname = \endtabular |
76 | +% コミュニティ版では、アスキー版で不自然だった表組(array環境およびtabular環境)と | |
77 | +% 周囲の本文との揃え位置を修正し、以下のように設計しました。 | |
78 | +% \begin{itemize} | |
79 | +% \item 周囲の組方向が横組かつ組方向が|<y>|, |<z>|指定の場合 | |
80 | +% \begin{itemize} | |
81 | +% \item |[t]|指定のとき、\\一行目のベースラインが周囲のそれと一致(罫線の場合は和文ベースラインの位置) | |
82 | +% \item |[c]|指定のとき、\\表組の中心が周囲の数式軸を通る(欧文ベースラインシフトの影響下) | |
83 | +% \item |[b]|指定のとき、\\最終行のベースラインが周囲のそれと一致(罫線の場合は和文ベースラインの位置) | |
84 | +% \end{itemize} | |
85 | +% \item 周囲の組方向が横組かつ組方向が|<t>|指定の場合 | |
86 | +% \begin{itemize} | |
87 | +% \item |[t]|指定のとき、\\表組の上端が周囲の和文ベースラインと一致 | |
88 | +% \item |[c]|指定のとき、\\表組の中心が周囲の数式軸を通る(欧文ベースラインシフトの影響下) | |
89 | +% \item |[b]|指定のとき、\\表組の下端が周囲の和文ベースラインと一致 | |
90 | +% \end{itemize} | |
91 | +% \item 周囲の組方向が縦組かつ組方向が|<y>|指定の場合 | |
92 | +% \begin{itemize} | |
93 | +% \item |[t]|指定のとき、\\表組の上端が周囲の和文ベースラインと一致 | |
94 | +% \item |[c]|指定のとき、\\表組の中心が周囲の数式軸を通る(欧文ベースラインシフトの影響下) | |
95 | +% \item |[b]|指定のとき、\\表組の下端が周囲の和文ベースラインと一致 | |
96 | +% \end{itemize} | |
97 | +% \item 周囲の組方向が縦組かつ組方向が|<t>|指定の場合 | |
98 | +% \begin{itemize} | |
99 | +% \item |[t]|指定のとき、\\一行目のベースラインが周囲のそれと一致(罫線の場合は和文ベースラインの位置) | |
100 | +% \item |[c]|指定のとき、\\表組の中心が周囲の数式軸を通る(欧文ベースラインシフトの影響下) | |
101 | +% \item |[b]|指定のとき、\\最終行のベースラインが周囲のそれと一致(罫線の場合は和文ベースラインの位置) | |
102 | +% \end{itemize} | |
103 | +% \item 周囲の組方向が縦組かつ組方向が|<z>|指定の場合 | |
104 | +% [TODO] 未定! | |
105 | +%^^A \begin{itemize} | |
106 | +%^^A \item |[t]|指定のとき、\\表組の上端が周囲の和文ベースラインと一致 | |
107 | +%^^A \item |[c]|指定のとき、\\表組の中心が周囲の数式軸を通る(欧文ベースラインシフトの影響下) | |
108 | +%^^A \item |[b]|指定のとき、\\表組の下端が周囲の和文ベースラインと一致 | |
109 | +%^^A \end{itemize} | |
110 | +% \end{itemize} | |
76 | 111 | \def\fork@array@option<#1>[#2]{% |
77 | 112 | \ifnum\ltjgetparameter{direction}=4 % yoko |
78 | 113 | \ifx\box@dir\yoko |
@@ -89,7 +124,7 @@ | ||
89 | 124 | \else |
90 | 125 | \if #2t\relax |
91 | 126 | \def\@begin@alignbox{\vtop\bgroup\kern\z@\vbox}% |
92 | - \def\@end@alignbox{\egroup}% | |
127 | + \let\@end@alignbox\egroup% | |
93 | 128 | \else\if #2b\relax |
94 | 129 | \let\@begin@alignbox\vbox |
95 | 130 | \let\@end@alignbox\relax |
@@ -262,7 +297,7 @@ | ||
262 | 297 | \csname \@captype @layoutcaption\endcsname |
263 | 298 | \fi |
264 | 299 | \@tempswafalse |
265 | - % tempswa\hline 基本組の組方向とキャプションの組方向が直交するか? | |
300 | + % \@tempswa: 基本組の組方向とキャプションの組方向が直交するか? | |
266 | 301 | \if y\caption@dir \let\captiondir\yoko |
267 | 302 | \ifodd\ltjgetparameter{direction}\relax\@tempswatrue\fi |
268 | 303 | \else\if z\caption@dir \let\captiondir\relax |
@@ -757,7 +792,7 @@ | ||
757 | 792 | \fi |
758 | 793 | \ifx\box@dir\relax |
759 | 794 | \ifcase\count@ |
760 | - \or \let\box@dir\dtou\@tempcnta=\tabskip \z@\tabskip \z@\dstrutbox% dtou | |
795 | + \or \let\box@dir\dtou\@tempcnta=\dstrutbox% dtou | |
761 | 796 | \or\or\let\box@dir\tate\@tempcnta=\tstrutbox% tate |
762 | 797 | \or \let\box@dir\yoko\@tempcnta=\ystrutbox% yoko |
763 | 798 | \else \let\box@dir\utod\@tempcnta=\zstrutbox% utod |
@@ -62,7 +62,7 @@ | ||
62 | 62 | \def\strutbox{% |
63 | 63 | \ifnum\ltjgetparameter{direction}=1 \dstrutbox % dtou |
64 | 64 | \else\ifnum\ltjgetparameter{direction}=3 \tstrutbox % tate |
65 | - \else\ifnum\ltjgetparameter{direction}=11 \tstrutbox % utod (tstrutbox) | |
65 | + \else\ifnum\ltjgetparameter{direction}=11 \zstrutbox % utod | |
66 | 66 | \else\ystrutbox % yoko |
67 | 67 | \fi\fi\fi |
68 | 68 | } |
@@ -71,9 +71,11 @@ | ||
71 | 71 | \ifmmode\copy\dstrutbox\else\unhcopy\dstrutbox\fi |
72 | 72 | \else\ifnum\ltjgetparameter{direction}=4 % yoko |
73 | 73 | \ifmmode\copy\ystrutbox\else\unhcopy\ystrutbox\fi |
74 | - \else % tate and utod | |
74 | + \else\ifnum\ltjgetparameter{direction}=3 % tate | |
75 | 75 | \ifmmode\copy\tstrutbox\else\unhcopy\tstrutbox\fi |
76 | - \fi\fi | |
76 | + \else % utod | |
77 | + \ifmmode\copy\zstrutbox\else\unhcopy\zstrutbox\fi | |
78 | + \fi\fi\fi | |
77 | 79 | } |
78 | 80 | |
79 | 81 | \def\ystrut{\relax\hbox{\yoko |
@@ -401,7 +403,7 @@ | ||
401 | 403 | \setbox\tstrutbox\hbox{\tate |
402 | 404 | \vrule\@width\z@ |
403 | 405 | \@height.5\baselineskip \@depth.5\baselineskip}% |
404 | - \setbox\zstrutbox\hbox{\tate | |
406 | + \setbox\zstrutbox\hbox{\utod | |
405 | 407 | \vrule\@width\z@ |
406 | 408 | \@height.7\baselineskip \@depth.3\baselineskip}% |
407 | 409 | \let\size@update\relax}} |
@@ -498,7 +500,7 @@ | ||
498 | 500 | \csname D@\k@encoding\endcsname |
499 | 501 | \let\kenc@update\relax |
500 | 502 | \let\ck@encoding\k@encoding |
501 | - \edef\tmp@enc{'\luatexluaescapestring{\k@encoding}'} | |
503 | + \edef\tmp@enc{'\luatexluaescapestring{\k@encoding}'}% | |
502 | 504 | \directlua{luatexja.jfont.is_kyenc(\tmp@enc)}\ifin@% |
503 | 505 | \let\cy@encoding\k@encoding |
504 | 506 | \else |