test/test04-jfm.tex

   1 %#!luatex
   2 \input luatexja-core.sty
   3
   4 \def\head#1{\medskip\penalty-100\noindent{\bf\tengt ■ #1}\par\penalty10000}
   5 \jfont\rml={psft:Ryumin-Light:jfm=ujis} at 10pt
   6 \rml あ\inhibitglue\char"201Cあ・い←Ryumin-Light
   7
   8 \jfont\rml={file:ipam.ttf:jfm=ujis} at 10pt
   9 \rml あ\inhibitglue\char"201Cあ・い←IPA\hbox{}明朝 (ipam)
  10
  11 \jfont\rml={file:KozMinPr6N-Regular.otf:jfm=ujis} at 10pt
  12 \rml あ\inhibitglue\char"201Cあ・い←KozMinPr6N-Regular
  13
  14 \jfont\rml={file:ipamp.ttf:jfm=ujis} at 10pt
  15 \rml あ\inhibitglue\char"201Cあ・い←IPA P\hbox{}明朝 (ipamp)
  16
  17 {\scrollmode
  18 \globaljfont\rml={psft:GothicBBB-Medium:jfm=bad} at 10pt % must be error
  19 }
  20 \rml あ123 % \rml は未定義となる
  21 {\tt\meaning\rml}
  22
  23 \bigskip
  24 \font\rml={file:ipaexg.ttf} at 10pt\rml
  25
  26 ここからは，欧文文字フォントはIPA EXゴシック
  27
  28
  29 \head{文字範囲の代入/取得テスト}
  30
  31 \ltjdefcharrange{2}{`あ,"E0-"FF}
  32 「\char"F4」は2番の文字範囲なので，和文扱いのはず
  33
  34 {iso8859-1 和文扱い:\ltjsetparameter{jacharrange={1}}%
  35 \ltjgetparameter{jacharrange}{1}%
  36 § ¶ ° £ ¥ \char"F4}
  37
  38 {iso8859-1 欧文扱い:\ltjsetparameter{jacharrange={-1}}%
  39 \ltjgetparameter{jacharrange}{1}%
  40 § ¶ ° £ ¥ \char"F4}
  41
  42
  43 \head{文字範囲の状況取得}
  44 \ltjgetparameter{jacharrange}{0}
  45 \ltjgetparameter{jacharrange}{1}
  46 \ltjgetparameter{jacharrange}{2}
  47
  48 \head{文字コード→文字範囲}
  49 \ltjgetparameter{chartorange}{`い} % must be 217
  50 \ltjgetparameter{chartorange}{`§} % must be 1
  51 \ltjgetparameter{chartorange}{"F7} % must be 2
  52 \ltjgetparameter{chartorange}{-1}  % must be error "
  53
  54 \medskip
  55 \ltjsetparameter{jacharrange={-217}}
  56 ほとんど欧文扱い．2番は別（「あ」）
  57 \ltjsetparameter{jacharrange={218}}
  58 和文扱いにもどる
  59
  60 \head{Ticket \#25121}
  61 \setbox0=\hbox{\ltjsetparameter{kanjiskip=-5pt}
  62 あいうえお\hbox{\ltjsetparameter{kanjiskip=12pt}かきくけこ}さしすせそ\par a}\copy0
  63 \tracingonline=0\showboxdepth=10000\showboxbreadth=10000\tracingonline=1\showbox0
  64
  65 {\ltjsetparameter{kanjiskip=3pt}
  66 あいうえお{\ltjsetparameter{kanjiskip=-5pt}% this setting is ignored
  67 かきくけこ}さしすせそ\par}
  68
  69 {\ltjsetparameter{kanjiskip=3pt}
  70 あいうえおさしすせそ}\par
  71
  72
  73 \vfill\eject
  74 \noindent{\bf\gt  以下はJFMグルー挿入検証}
  75 \jfont\rmlh={psft:Ryumin-Light:jfm=test} at 10pt
  76 \jfont\sixgt={psft:GothicBBB-Medium:jfm=ujis} at 6pt
  77 \font\sixtt=cmtt10 at 6pt
  78
  79 \def\dumplist#1{\par\noindent\leavevmode
  80 \hbox to 0.2\hsize{\copy#1\hss}%
  81 \vbox{\hsize=0.6\hsize\sixtt\baselineskip=7.2pt\sixgt\let\\=\relax
  82 \directlua{ltj.ext_show_node_list(tex.getbox(#1).head, '\\par', tex.print)}\hrule}}
  83
  84 \head{JA--JA (penなし)}
  85
  86 \setbox0=\hbox{\rmlh あア}\dumplist0
  87
  88 \setbox0=\hbox{\rmlh あイ}\dumplist0
  89
  90 \setbox0=\hbox{\rmlh あウ}\dumplist0
  91
  92 \setbox0=\hbox{\rmlh いア}\dumplist0
  93
  94 \setbox0=\hbox{\rmlh いイ}\dumplist0
  95
  96 \setbox0=\hbox{\rmlh いウ}\dumplist0
  97
  98 \head{JA--EN (penなし)}
  99
 100 \setbox0=\hbox{\rmlh あa}\dumplist0
 101
 102 \setbox0=\hbox{\rmlh いa}\dumplist0
 103
 104 \setbox0=\hbox{\rmlh うa}\dumplist0
 105
 106 \setbox0=\hbox{\rmlh えa}\dumplist0
 107
 108 \setbox0=\hbox{\rmlh おa}\dumplist0
 109
 110 \head{EN--JA (penなし)}
 111
 112 \setbox0=\hbox{\rmlh aあ}\dumplist0
 113
 114 \setbox0=\hbox{\rmlh aい}\dumplist0
 115
 116 \setbox0=\hbox{\rmlh aう}\dumplist0
 117
 118 \head{JA--明kern (penなし)}
 119
 120 \setbox0=\hbox{\rmlh あ\kern3pt}\dumplist0
 121
 122 \setbox0=\hbox{\rmlh い\kern3pt}\dumplist0
 123
 124 \setbox0=\hbox{\rmlh う\kern3pt}\dumplist0
 125
 126 \head{明kern--JA (penなし)}
 127
 128 \setbox0=\hbox{\rmlh \kern3ptあ}\dumplist0
 129
 130 \setbox0=\hbox{\rmlh \kern3ptい}\dumplist0
 131
 132 \setbox0=\hbox{\rmlh \kern3ptう}\dumplist0
 133
 134 \head{JA--hbox (penなし)}
 135
 136 \setbox0=\hbox{\rmlh あ\hbox{}}\dumplist0
 137
 138 \setbox0=\hbox{\rmlh い\hbox{}}\dumplist0
 139
 140 \setbox0=\hbox{\rmlh う\hbox{}}\dumplist0
 141
 142 \setbox0=\hbox{\rmlh え\hbox{}}\dumplist0
 143
 144 \head{hbox--JA (penなし)}
 145
 146 \setbox0=\hbox{\rmlh \hbox{}あ}\dumplist0
 147
 148 \setbox0=\hbox{\rmlh \hbox{}い}\dumplist0
 149
 150 \setbox0=\hbox{\rmlh \hbox{}う}\dumplist0
 151
 152 \head{JA--penalty (penなし)} TODO: この場合の挙動はこれで良いか？
 153
 154 \setbox0=\hbox{\rmlh あ\penalty567}\dumplist0
 155
 156 \setbox0=\hbox{\rmlh い\penalty567}\dumplist0
 157
 158 \setbox0=\hbox{\rmlh う\penalty567}\dumplist0
 159
 160 \setbox0=\hbox{\rmlh え\penalty567}\dumplist0
 161
 162 \head{penalty--JA (penなし)} TODO: この場合の挙動はこれで良いか？
 163
 164 \setbox0=\hbox{\rmlh \penalty567あ}\dumplist0
 165
 166 \setbox0=\hbox{\rmlh \penalty567い}\dumplist0
 167
 168 \setbox0=\hbox{\rmlh \penalty567う}\dumplist0
 169
 170 {\vfill\eject%
 171
 172 \ltjsetparameter{prebreakpenalty={`（,123}}
 173 \ltjsetparameter{postbreakpenalty={`あ,123}}
 174 \ltjsetparameter{postbreakpenalty={`い,123}}
 175 \ltjsetparameter{postbreakpenalty={`う,123}}
 176 \ltjsetparameter{postbreakpenalty={`え,123}}
 177 \ltjsetparameter{postbreakpenalty={`お,123}}
 178 \ltjsetparameter{postbreakpenalty={`a,321}}
 179 \head{JA--JA (penあり)}
 180
 181 \setbox0=\hbox{\rmlh あア}\dumplist0
 182
 183 \setbox0=\hbox{\rmlh あイ}\dumplist0
 184
 185 \setbox0=\hbox{\rmlh あウ}\dumplist0
 186
 187 \setbox0=\hbox{\rmlh いア}\dumplist0
 188
 189 \setbox0=\hbox{\rmlh いイ}\dumplist0
 190
 191 \setbox0=\hbox{\rmlh いウ}\dumplist0
 192
 193 \head{JA--EN (penあり)}
 194
 195 \setbox0=\hbox{\rmlh あa}\dumplist0
 196
 197 \setbox0=\hbox{\rmlh いa}\dumplist0
 198
 199 \setbox0=\hbox{\rmlh うa}\dumplist0
 200
 201 \setbox0=\hbox{\rmlh えa}\dumplist0
 202
 203 \setbox0=\hbox{\rmlh おa}\dumplist0
 204
 205 \head{EN--JA (penあり)}
 206
 207 \setbox0=\hbox{\rmlh aあ}\dumplist0
 208
 209 \setbox0=\hbox{\rmlh aい}\dumplist0
 210
 211 \setbox0=\hbox{\rmlh aう}\dumplist0
 212
 213 \head{italic correction}
 214
 215 \setbox0=\hbox{\it f\/（\/あ}\dumplist0
 216
 217 }
 218
 219 \vfill\eject
 220 \noindent{\gt\bf [x]kanjiskipの挿入}
 221
 222 \head{kanjiskip from JFM, autospacing (JA--JA)}
 223 \setbox0=\hbox{あ\rmlh あ}\dumplist0
 224
 225 {\ltjsetparameter{kanjiskip=\maxdimen}
 226 \setbox0=\hbox{あ\rmlh あ}\dumplist0
 227 \jfont\rmlk={psft:Ryumin-Light:jfm=test} at 12pt
 228 \setbox0=\hbox{\rmlk は\rmlh あ}\dumplist0}
 229
 230 \def\naspc{\ltjsetparameter{autospacing=false}\relax}
 231 \def\naxspc{\ltjsetparameter{autoxspacing=false}\relax}
 232 \setbox0=\hbox{あ\naspc ああ}\dumplist0
 233
 234 \head{kanjiskip from JFM/autoxspacing (JA--EN)}
 235 \setbox0=\hbox{\rmlh まx}\dumplist0
 236
 237 \setbox0=\hbox{\rmlh ま\naxspc x}\dumplist0
 238
 239 \setbox0=\hbox{\naxspc\rmlh まx}\dumplist0
 240
 241 {\ltjsetparameter{xkanjiskip=\maxdimen}\setbox0=\hbox{\rmlh まx}\dumplist0}
 242
 243 {\ltjsetparameter{jaxspmode={`ま,preonly}}
 244 \setbox0=\hbox{\rmlh まx}\dumplist0}
 245 {\ltjsetparameter{alxspmode={`x,postonly}}
 246 \setbox0=\hbox{\rmlh まx}\dumplist0}
 247
 248
 249 \head{kanjiskip from JFM/autoxspacing (EN--JA)}
 250 \setbox0=\hbox{\rmlh xま}\dumplist0
 251
 252 \setbox0=\hbox{\rmlh x\naxspc ま}\dumplist0
 253
 254 \setbox0=\hbox{\naxspc\rmlh xま}\dumplist0
 255
 256 {\ltjsetparameter{xkanjiskip=\maxdimen}\setbox0=\hbox{\rmlh xま}\dumplist0}
 257
 258 {\ltjsetparameter{jaxspmode={`ま,postonly}}
 259 \setbox0=\hbox{\rmlh xま}\dumplist0}
 260 {\ltjsetparameter{alxspmode={`x,inhibit}}
 261 \setbox0=\hbox{\rmlh xまおx}\dumplist0}
 262
 263 \end