test/test51-vtest.tex

   1 %#!luatex
   2
   3 \directlua{luatexja_debug = 1}
   4 \input luatexja.sty
   5 %\input lua-visual-debug.sty
   6
   7 \catcode`\@=11
   8 \newdimen\@tempdima
   9 \newbox\@tempboxa
  10 \newdimen\fboxrule
  11 \newdimen\fboxsep
  12 \fboxrule=0.4pt\fboxsep=0pt
  13 \long\def\fbox#1{%
  14   \leavevmode
  15   \setbox\@tempboxa\hbox{\kern\fboxsep{#1}\kern\fboxsep}%
  16   \@frameb@x\relax}
  17 \def\@frameb@x#1{%
  18   \@tempdima\fboxrule
  19   \advance\@tempdima\fboxsep
  20   \advance\@tempdima\dp\@tempboxa
  21   \hbox{%
  22     \lower\@tempdima\hbox{%
  23       \vbox{%
  24         \hrule height\fboxrule
  25         \hbox{%
  26           \vrule width\fboxrule
  27           #1%
  28           \vbox{%
  29             \vskip\fboxsep
  30             \box\@tempboxa
  31             \vskip\fboxsep}%
  32           #1%
  33           \vrule width\fboxrule}%
  34         \hrule height\fboxrule}%
  35                           }%
  36         }%
  37 }
  38 \protected\def\LaTeX{L\kern-.36em%
  39         {\setbox\z@\hbox{T}
  40          \vbox to\ht\z@{\hbox{\sevenrm A}%
  41                         \vss}%
  42         }%
  43         \kern-.15em%
  44         \TeX}
  45
  46 \tentgt
  47
  48 \hbox{\yoko
  49 横水平Hxy\hbox{\yoko 横水平Hxy}かき◆
  50 \hbox{\tate 縦水平Hxy}◆おおおお
  51 \vbox{\yoko\hsize=30mm 横垂直Hxyああああああああああ}かき◆
  52 \vbox{\tate\hsize=30mm  縦垂直Hxy\hfill ああ\break ああああああああ}◆ああああ
  53 }
  54 \vfill\eject
  55 \hbox{\tate
  56 縦水平Hxy\hbox{\yoko 横水平Hxy}かき◆
  57 \hbox{\tate 縦水平Hxy}◆おおおお
  58 \vbox{\yoko\hsize=30mm 横垂直Hxyああああああああああ}かき◆
  59 \vbox{\tate\hsize=30mm  縦垂直Hxy\hfill ああ\break ああああああああ}◆ああああ}
  60
  61
  62 \vfill\eject
  63
  64
  65 \setbox0=\vbox{\yoko\hsize=100mm
  66 横垂直Hxy\hbox{\yoko 横水平Hxy}かき◆
  67 これは，意味のないサンプルテキストです．
  68 \hbox{\tate 縦水平Hxy}◆おおおお
  69 これは，意味のないサンプルテキストです．
  70 \vbox{\yoko\hsize=50mm 横垂直Hxyあああああああああああああああああああ}かき◆
  71 これは，意味のないサンプルテキストです．
  72 \vbox{\tate\hsize=50mm 縦垂直Hxyあああああああああああああああああああ}◆ああああ
  73 これは，意味のないサンプルテキスト\hbox{\tate 縦水平Hxy}◆おおおおです．
  74 }
  75 \copy0
  76 %{\showboxbreadth10000\showboxdepth10000
  77 %\showbox0}
  78
  79 \vfill\eject
  80 \vbox{\tate\hsize=100mm
  81 ◆◆◆Hxy\hbox{\yoko 横水平Hxy}かき◆
  82 これは，意味のないサンプルテキストです．
  83 \hbox{\tate 縦水平Hxy}◆おおおお
  84 これは，意味のないサンプルテキストです．
  85 \vbox{\yoko\hsize=50mm 横垂直Hxyあああああああああああああああああああ}かき◆
  86 これは，意味のないサンプルテキストです．
  87 \vbox{\tate\hsize=50mm  縦垂直Hxyあああああああああああああああああああ}◆ああああ
  88 これは，意味のないサンプルテキスト\hbox{\tate 縦水平Hxy}◆おおおお
  89 です．
  90 }
  91
  92
  93 \vbox{\tate\hsize100mm
  94 \tfont\f=KozMinPr6N-Regular.otf:+vert;jfm=ujisv \f
  95
  96 \ltjsetparameter{yalbaselineshift=.25em}\baselineskip15pt
  97 \LaTeX の特徴として、テキストファイルであるソースコードを入力として処理することでDVIや
  98 PDFなどの表示形式を出力として得ることが挙げられる。
  99
 100 \LaTeX の最大の長所は、\TeX に由来する高品質で自由度の高い組版処理能力である。組版処理能力
 101 は一般向けの出版物の作成にも充分に耐えられるものであり、実際の出版例もある。
 102 中でも数式組版の品質が高い。さらに、数式専用の命令文（コマンド）が用意されているので、
 103 単純なソースコードで高品質な数式表示を得られる。そのため、数式を多く含む自然科学系や工学系
 104 の出版物などでは、\LaTeX 形式での投稿が標準的なフォーマットとされていることも多い。
 105
 106 くわえて、ソースコードに詳細な設定を記述することで、文書のスタイル（表示形式、見栄え、たと
 107 えばレイアウトやフォントなど）を自在に調節できる。また、ソースコード上で文書内容・文書構造
 108 （章・節・段落や強調箇所など）と文書スタイルの設定との分離が可能である。そのため、同一文書
 109 内で終始一貫したスタイをル保つことができる。また、同じ文書内容でレイアウトやフォントだけを
 110 変えることができるなど、文書内容データの再利用性が高い。一度スタイル設定を決めてしまえば、
 111 あとは文書内容の記述に専念することができるという利点もある。論文などの投稿では、学術雑
 112 誌のスタイルを記述したファイル（パッケージファイル）を Web からダウンロードして利用するこ
 113 とで、統一されたスタイルで論文xを投稿することができ、論文の投稿者と雑誌の編集者とのやり取り
 114 を簡略化できる。Kile、TeXShop、TeXworks、EasyTeX、WinShell などの \TeX 用エ
 115 ディタや、野鳥（やてふ、YaTeX）、TeXlipse、KaTeX（花鳥、かてふ）、祝鳥
 116 （のりてふ）、M's TeX Helper 2など の\TeX 用テキストエディタマクロを兼用することに
 117 よって、より効率的な文章作成が可能ともなる。またMapleやMathematicaなどでドキュメントを
 118 作成し、\TeX 形式で出力することも可能である。
 119
 120 }
 121
 122 \message{^^Jget/set box dimension^^J}
 123
 124 \def\\{\hfill\break}
 125 \setbox12288=\hbox{%
 126   \tate\ltjsetparameter{talbaselineshift=0pt}Htp}
 127 縦ボックス\hbox{\vrule\copy12288\vrule}寸法\quad
 128 \vbox{\hsize=80pt\yoko\noindent
 129   WD: \the\ltjgetwd{12288}, \\HT: \the\ltjgetht{12288}, \\DP: \the\ltjgetdp{12288}%
 130 }
 131 \vbox{\hsize=80pt\tate\noindent
 132   WD: \the\ltjgetwd{12288}, \\HT: \the\ltjgetht{12288}, \\DP: \the\ltjgetdp{12288}%
 133 }
 134 \ltjsetwd12288=100pt
 135 \setbox0=\hbox{\tate\ltjsetht12288=10pt}
 136 \vbox{\hsize=80pt\yoko\noindent
 137   WD: \the\ltjgetwd{12288}, \\HT: \the\ltjgetht{12288}, \\DP: \the\ltjgetdp{12288}%
 138 }
 139 \vbox{\hsize=80pt\tate\noindent
 140   WD: \the\ltjgetwd{12288}, \\HT: \the\ltjgetht{12288}, \\DP: \the\ltjgetdp{12288}%
 141 }
 142
 143
 144
 145 \setbox12288=\hbox{%
 146   \yoko\ltjsetparameter{yalbaselineshift=0pt}Htp}
 147 横ボックス\hbox{\vrule\copy12288\vrule}寸法\quad
 148 \vbox{\hsize=80pt\yoko\noindent
 149   WD: \the\ltjgetwd{12288}, \\HT: \the\ltjgetht{12288}, \\DP: \the\ltjgetdp{12288}%
 150 }
 151 \vbox{\hsize=80pt\tate\noindent
 152   WD: \the\ltjgetwd{12288}, \\HT: \the\ltjgetht{12288}, \\DP: \the\ltjgetdp{12288}%
 153 }
 154 \ltjsetwd12288=100pt
 155 \setbox0=\hbox{\tate\ltjsetht12288=10pt}
 156 \vbox{\hsize=80pt\yoko\noindent
 157   WD: \the\ltjgetwd{12288}, \\HT: \the\ltjgetht{12288}, \\DP: \the\ltjgetdp{12288}%
 158 }
 159 \vbox{\hsize=80pt\tate\noindent
 160   WD: \the\ltjgetwd{12288}, \\HT: \the\ltjgetht{12288}, \\DP: \the\ltjgetdp{12288}%
 161 }
 162
 163 dimexpr でも使えるかな？\the \dimexpr2\ltjgetwd{`　}+\ltjgetwd{200}+1pt\relax
 164
 165 \vfill\eject
 166
 167 \message{^^Jalign^^J}
 168
 169 \parindent0pt
 170 \hrule width 40mm
 171
 172 \hbox{\yoko\hsize40mm\baselineskip20pt 横水平
 173 \valign{A#\hfil&B#\hfil&C#\hfill\vrule\cr
 174 あいうえお&ABC&XYZ\cr
 175 abc&かきくけこ&xyz\cr}横水平}
 176 \moveright40mm\hbox{\vrule width 40mm height.4pt}
 177
 178 \hbox{\tate\hsize40mm\baselineskip20pt 縦水平
 179 \valign{甲#\hfil&乙#\hfil&丙#\hfill\vrule\cr
 180 あいうえお&ABC&XYZ\cr
 181 abc&かきくけこ&xyz\cr}}%
 182 %\tracingonline\showboxdepth2\showboxbreadth1000\showlists}
 183 \moveright40mm\hbox{\vrule width 40mm height.4pt}
 184
 185 \vfill\eject
 186
 187 \vbox{\yoko\hsize40mm\baselineskip20pt  横垂直
 188 \halign{A#\hfil&B#\hfil&C#\hfill\vrule\cr
 189 あいうえお&ABC&XYZ\cr
 190 abc&かきくけこ&xyz\cr}}%
 191 \moveright40mm\hbox{\vrule width 40mm height.4pt}
 192
 193 \vbox{\tate\baselineskip20pt  縦垂直
 194 \halign{甲#\hfil&乙#\hfil&丙#\hfill\vrule\cr
 195 あいうえお&ABC&XYZ\cr
 196 abc&かきくけこ&xyz\cr}}%
 197 \moveright40mm\hbox{\vrule width 40mm height.4pt}
 198
 199 \vfill\eject
 200
 201 \message{^^Jdir node^^J}
 202
 203 \setbox0=\hbox{\tate ABCD}
 204 \setbox1=\hbox{\yoko\box0}
 205 \unhcopy1
 206 \setbox1=\lastbox %% box1: dir_node
 207 \dp1=100pt
 208 \setbox2=\hbox{\tate \copy1}%% unwrap
 209
 210 {\obeylines\tentt
 211 \directlua{luatexja.ext_show_node_list(tex.box[2], 'A> ', tex.print)}}
 212
 213 \setbox2=\hbox{\tate \unhbox2\global\setbox1=\lastbox}%% unwrap
 214 {\obeylines\tentt
 215 \directlua{luatexja.ext_show_node_list(tex.box[1], 'B> ', tex.print)}}
 216
 217 \the\ltjgetdp{1}
 218
 219 \end
 220