test/test02-latex.tex

   1 %#! lualatex
   2 \documentclass{article}
   3 \usepackage{fontspec,pdftexcmds}
   4
   5 \input luatexja-core.sty
   6 \loadjfontmetric{mt}{ujis}
   7
   8 \ExplSyntaxOn
   9 \xetex_or_luatex:nnn { \tl_set:Nn \l_fontspec_pre_feat_sclist }
  10   {
  11     \bool_if:NT \l_fontspec_icu_bool {
  12       \tl_if_empty:NF \l_fontspec_script_tl
  13       {
  14         script   = \l_fontspec_script_tl ;
  15         language = \l_fontspec_lang_tl   ;jfm=mt;
  16       }
  17     }
  18   }
  19   {
  20     mode     = \l_fontspec_mode_tl   ;
  21     \tl_if_empty:NF \l_fontspec_script_tl
  22     {
  23       script   = \l_fontspec_script_tl ;
  24       language = \l_fontspec_lang_tl   ;jfm=mt;
  25     }
  26   }
  27 \ExplSyntaxOff
  28
  29 \newopentypefeature{Style}{OLDJIS}{+jp90}
  30 \newfontfamily\goth[BoldFont={ipaexg.ttf},Style=OLDJIS]{ipaexm.ttf}
  31
  32 \begin{document}
  33 \makeatletter
  34 \def\extract@font{%
  35     \get@external@font
  36     \ifnum\pdf@strcmp{\f@encoding}{EU2}=0
  37       \expandafter\jfont\font@name\external@font\relax
  38       \global\expandafter\font@name{\font@name}%
  39       \font@name\global\zw=\zw\global\zh=\zh
  40     \else
  41       \global\expandafter\font\font@name\external@font\relax
  42       \font@name
  43     \fi
  44     \ifnum\pdf@strcmp{\f@encoding}{EU2}=0%
  45       \global\kanjiskip=0pt plus 0.4pt minus 0.4pt%
  46       \global\xkanjiskip=0.25\zw plus 0.083333\zw minus 0.083333\zw%
  47     \fi
  48     \csname \f@encoding+\f@family\endcsname
  49     \csname\curr@fontshape\endcsname
  50        }
  51 % ! The font "ipaexg.ttf/I" cannot be found. というエラーが出る
  52
  53
  54 \goth abcdfghjfgあいう辻）\textbf{\unkern（辻あ{\Large あ}いう}
  55
  56 \goth abcdfghjfgあいう辻）\textbf{（辻あ{\Large あ}いう}
  57 % \unkern がないとうなくいかない
  58
  59 \tracingonline=1\scrollmode\showboxdepth=10000\showboxbreadth=10000\showlists
  60 \end{document}