%
\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{lltjext}[2017/03/28 v1.2f-ltj-5 Macros for vertical writing]
+\ProvidesPackage{lltjext}[2017/04/06 v1.2f-ltj-5 Macros for vertical writing]
\RequirePackage{luatexja}
{\catcode`\*=11
% \end{itemize}
% \item 周囲の組方向が横組かつ組方向が|<t>|指定の場合
% \begin{itemize}
-% \item |[t]|指定のとき、\\表組の上端が周囲の和文ベースラインと一致
+% \item |[t]|指定のとき\\箱の上端が周囲の和文文字の高さと一致
% \item |[c]|指定のとき、\\表組の中心が周囲の数式軸を通る(欧文ベースラインシフトの影響下)
-% \item |[b]|指定のとき、\\表組の下端が周囲の和文ベースラインと一致
+% \item |[b]|指定のとき\\箱の下端が周囲の和文文字の深さと一致
% \end{itemize}
% \item 周囲の組方向が縦組かつ組方向が|<y>|指定の場合
% \begin{itemize}
-% \item |[t]|指定のとき、\\表組の上端が周囲の和文ベースラインと一致
+% \item |[t]|指定のとき\\箱の上端が周囲の和文文字の高さと一致
% \item |[c]|指定のとき、\\表組の中心が周囲の数式軸を通る(欧文ベースラインシフトの影響下)
-% \item |[b]|指定のとき、\\表組の下端が周囲の和文ベースラインと一致
+% \item |[b]|指定のとき\\箱の下端が周囲の和文文字の深さと一致
% \end{itemize}
% \item 周囲の組方向が縦組かつ組方向が|<t>|指定の場合
% \begin{itemize}
\fi\fi
\else
\if #2t\relax
- \def\@begin@alignbox{\vtop\bgroup\kern\z@\vbox}%
- \let\@end@alignbox\egroup%
+ \def\@begin@alignbox{\raise\cht\vtop\bgroup\kern\z@\vbox}%
+ \let\@end@alignbox\egroup
\else\if #2b\relax
- \let\@begin@alignbox\vbox
- \let\@end@alignbox\relax
+ \def\@begin@alignbox{\lower\cdp\vbox\bgroup\vbox}%
+ \def\@end@alignbox{\kern\z@\egroup}%
\else
\let\@begin@alignbox\vcenter
\let\@end@alignbox\relax
\else\ifnum\ltjgetparameter{direction}=1 % dtou
\ifx\box@dir\yoko
\if #2t\relax
- \def\@begin@alignbox{\vtop\bgroup\kern\z@\vbox}%
- \def\@end@alignbox{\egroup}%
+ \def\@begin@alignbox{\raise\cht\vtop\bgroup\kern\z@\vbox}%
+ \let\@end@alignbox\egroup
\else\if #2b\relax
- \let\@begin@alignbox\vbox
- \let\@end@alignbox\relax
+ \def\@begin@alignbox{\lower\cdp\vbox\bgroup\vbox}%
+ \def\@end@alignbox{\kern\z@\egroup}%
\else
\let\@begin@alignbox\vcenter
\let\@end@alignbox\relax
\else % tate, utod
\ifx\box@dir\yoko
\if #2t\relax
- \def\@begin@alignbox{\vtop\bgroup\kern\z@\vbox}%
- \def\@end@alignbox{\egroup}%
+ \def\@begin@alignbox{\raise\cht\vtop\bgroup\kern\z@\vbox}%
+ \let\@end@alignbox\egroup
\else\if #2b\relax
- \def\@begin@alignbox{\vbox\bgroup\vbox}%
+ \def\@begin@alignbox{\lower\cdp\vbox\bgroup\vbox}%
\def\@end@alignbox{\kern\z@\egroup}%
\else
\let\@begin@alignbox\vcenter
\fi\fi
\else
\if #2t\relax
- \def\@begin@parbox{\vtop\bgroup\kern\z@\vbox}%
- \def\@end@parbox{\egroup}%
+ \def\@begin@parbox{\raise\cht\vtop\bgroup\kern\z@\vbox}%
+ \let\@end@parbox\egroup
\else\if #2b\relax
- \let\@begin@parbox\vbox
- \let\@end@parbox\relax
+ \def\@begin@parbox{\lower\cdp\vbox\bgroup\vbox}%
+ \def\@end@parbox{\kern\z@\egroup}%
\else
\ifmmode
\let\@begin@parbox\vcenter\let\@end@parbox\relax
\else\ifnum\ltjgetparameter{direction}=1 % dtou
\ifx\box@dir\yoko
\if #2t\relax
- \def\@begin@parbox{\vtop\bgroup\kern\z@\vbox}
- \def\@end@parbox{\egroup}
+ \def\@begin@parbox{\raise\cht\vtop\bgroup\kern\z@\vbox}%
+ \let\@end@parbox\egroup
\else\if #2b\relax
- \let\@begin@parbox\vbox
- \let\@end@parbox\relax
+ \def\@begin@parbox{\lower\cdp\vbox\bgroup\vbox}%
+ \def\@end@parbox{\kern\z@\egroup}%
\else
\ifmmode
\let\@begin@parbox\vcenter\let\@end@parbox\relax
\else % tate, utod
\ifx\box@dir\yoko
\if #2t\relax
- \def\@begin@parbox{\vtop\bgroup\kern\z@\vbox}%
- \def\@end@parbox{\egroup}%
+ \def\@begin@parbox{\raise\cht\vtop\bgroup\kern\z@\vbox}%
+ \let\@end@parbox\egroup
\else\if #2b\relax
- \def\@begin@parbox{\vbox\bgroup\vbox}%
+ \def\@begin@parbox{\lower\cdp\vbox\bgroup\vbox}%
\def\@end@parbox{\kern\z@\egroup}%
\else
\ifmmode