%#!luatex
\input luatexja.sty

\hoffset=-0.5in
\hsize=\dimexpr 210mm-1in
\def\gbox#1{\noindent\setbox0=\hbox{\d#1}
  \vrule height 0.2pt depth 0.2pt width \dimexpr \wd0+10pt\relax
  \kern\dimexpr -\wd0-5pt\relax\vrule height\ht0 depth \dp0\hbox{\copy0}%
  \vrule height\ht0 depth \dp0\relax}
\font\d=cmr17 at 20pt
\baselineskip=40pt

\jfont\sixgt={psft:GothicBBB-Medium:jfm=ujis} at 6pt
\font\sixtt=cmtt10 at 6pt
\def\dumplist#1{\par\noindent\leavevmode
\hbox to 0.2\hsize{\copy#1\hss}%
\vbox{\hsize=0.6\hsize\sixtt\baselineskip=7.2pt\sixgt\let\\=\relax
\directlua{luatexja.ext_show_node_list(tex.getbox(#1).head, '\\par ', tex.print)}\hrule}}

\ltjsetparameter{yalbaselineshift=0pt,yjabaselineshift=0pt}
\setbox0=\hbox{\d Hy}\dumplist0

\ltjsetparameter{yalbaselineshift=-10pt}\gbox{Hy}
\ltjsetparameter{yalbaselineshift=-0pt}\gbox{Hy}
\ltjsetparameter{yalbaselineshift=10pt}\gbox{Hy}
\ltjsetparameter{yalbaselineshift=20pt}\gbox{Hy}

\jfont\f=psft:Ryumin-Light:jfm=ujis at 20pt\f
\ltjsetparameter{yalbaselineshift=0pt,yjabaselineshift=0pt}
\setbox0=\hbox{\f あ}\dumplist0

\ltjsetparameter{yjabaselineshift=-10pt}\gbox{あ}
\ltjsetparameter{yjabaselineshift=0pt}\gbox{あ}
\ltjsetparameter{yjabaselineshift=10pt}\gbox{あ}
\ltjsetparameter{yjabaselineshift=20pt}\gbox{あ}

\jfont\f=name:IPAMincho:jfm=ujis at 20pt\f
\ltjsetparameter{yalbaselineshift=0pt,yjabaselineshift=0pt}
\setbox0=\hbox{\f あ}\dumplist0

\ltjsetparameter{yjabaselineshift=-10pt}\gbox{あ}
\ltjsetparameter{yjabaselineshift=0pt}\gbox{あ}
\ltjsetparameter{yjabaselineshift=10pt}\gbox{あ}
\ltjsetparameter{yjabaselineshift=20pt}\gbox{あ}


\tenmin
\ltjsetparameter{jatextfont={0,\tenmin}}\jfam=0
\def\R#1#2{\ltjsetparameter{yjabaselineshift=#1,yalbaselineshift=#2}%
  {\tt\frenchspacing
    yja: \ltjgetparameter{yjabaselineshift},
    yal: \ltjgetparameter{yalbaselineshift}}. }

\def\frac#1#2{{#1\over#2}}
\def\D{%
  \vrule width 20pt height 0.4pt depth 0pt%
  \everymath{\displaystyle}
  積分abc%
  $\int_0^x t\,dt = \frac{x^2}2$,\ 
  $\left(\int_D d\omega=\int_{\partial D}\omega\right)$,\ 
  $Aあ\kern2pt\vrule width 0.4pt height 10pt depth 10pt
    \kern-2pt\vrule width 4pt height 0.4pt depth 0pt
    \hbox{\vrule width 20pt height 0.4pt depth 0pt\kern-20pt Bい}$
  \vrule width 20pt height 0.4pt depth 0pt\par
}
\baselineskip=40pt

\R{ 0pt}{ 0pt}\D
\R{ 0pt}{10pt}\D
\R{10pt}{ 0pt}\D
\R{10pt}{ 5pt}\D

\end
