src/ltj-plain.sty

   1 %
   2 % ltj-plain.sty
   3 %
   4
   5 %! これは外から読まれない
   6 %% Avoid multiple loading.
   7 \csname luatexjaplainLoaded\endcsname
   8 \edef\ltj@plain@AtEnd{%
   9 \endlinechar=\the\endlinechar
  10 \relax}
  11 \endlinechar=-1 %
  12 \def\luatexjaplainLoaded{\endinput}
  13
  14 \ifltj@in@latex                 %<*LaTeX>
  15   \NeedsTeXFormat{LaTeX2e}
  16   \PackageWarning{ltj-plain}{Don't load this package directly; load luatexja.sty instead.}
  17   \ProvidesPackage{ltj-plain}[]
  18 \fi                             %</LaTeX>
  19
  20 %%------------------
  21
  22 \endlinechar=13
  23 %! ↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓
  24 % LuaTeX-ja macros against plain TeX
  25
  26 \ifdefined\ltj@stdmcfont\else\def\ltj@stdmcfont{file:HaranoAjiMincho-Regular.otf}\fi
  27 \ifdefined\ltj@stdgtfont\else\def\ltj@stdgtfont{file:HaranoAjiGothic-Medium.otf}\fi
  28 %\ifdefined\ltj@stdmcfont\else\def\ltj@stdmcfont{IPAExMincho}\fi
  29 %\ifdefined\ltj@stdgtfont\else\def\ltj@stdgtfont{IPAExGothic}\fi
  30 \ifdefined\ltj@stdyokojfm\else\def\ltj@stdyokojfm{ujis}\fi
  31 \ifdefined\ltj@stdtatejfm\else\def\ltj@stdtatejfm{ujisv}\fi
  32 \newread\ltj@@cfgread
  33 \openin\ltj@@cfgread{luatexja.cfg}%
  34 \ifeof\ltj@@cfgread
  35   \@PackageInfoNoLine{ltj-plain}{Cannot find file `luatexja.cfg'}%
  36 \else
  37   \closein\ltj@@cfgread
  38   \input luatexja.cfg
  39 \fi
  40 \let\ltj@@cfgread\relax\advance\count16\m@ne\relax
  41
  42 \jfont\tenmin=\ltj@stdmcfont:jfm=\ltj@stdyokojfm\space at 9.62216pt
  43 \jfont\sevenmin=\ltj@stdmcfont:jfm=\ltj@stdyokojfm\space at 6.73551pt
  44 \jfont\fivemin=\ltj@stdmcfont:jfm=\ltj@stdyokojfm\space at 4.81108pt
  45 \jfont\tengt=\ltj@stdgtfont:jfm=\ltj@stdyokojfm\space at 9.62216pt
  46 \jfont\sevengt=\ltj@stdgtfont:jfm=\ltj@stdyokojfm\space at 6.73551pt
  47 \jfont\fivegt=\ltj@stdgtfont:jfm=\ltj@stdyokojfm\space at 4.81108pt
  48
  49 \tfont\tentmin=\ltj@stdmcfont:jfm=\ltj@stdtatejfm\space at 9.62216pt
  50 \tfont\seventmin=\ltj@stdmcfont:jfm=\ltj@stdtatejfm\space at 6.73551pt
  51 \tfont\fivetmin=\ltj@stdmcfont:jfm=\ltj@stdtatejfm\space at 4.81108pt
  52 \tfont\tentgt=\ltj@stdgtfont:jfm=\ltj@stdtatejfm\space at 9.62216pt
  53 \tfont\seventgt=\ltj@stdgtfont:jfm=\ltj@stdtatejfm\space at 6.73551pt
  54 \tfont\fivetgt=\ltj@stdgtfont:jfm=\ltj@stdtatejfm\space at 4.81108pt
  55
  56 \def\mc{\tenmin\tentmin}
  57 \def\gt{\tengt\tentgt}
  58 \mc
  59
  60 \ltjsetparameter{%
  61   autospacing, autoxspacing, differentjfm=paverage,
  62   jatextfont={0, \tenmin}, jascriptfont={0, \sevenmin},
  63   jascriptscriptfont={0, \fivemin},
  64 }
  65 \setbox\z@=\hbox{M}
  66 \jfam\z@
  67 \ltjsetparameter{talbaselineshift=.5\ht0, tjabaselineshift=\z@}
  68
  69 \ltjdefcharrange{1}{"80-"36F, "1E00-"1EFF}
  70 \ltjdefcharrange{2}{"370-"4FF, "1F00-"1FFF}
  71 \ltjdefcharrange{3}{%
  72   "2070-"243F, "2500-"27BF, "2900-"29FF, "2B00-"2BFF}
  73 \ltjdefcharrange{4}{%
  74    "500-"10FF, "1200-"1DFF, "2440-"245F, "27C0-"28FF, "2A00-"2AFF,
  75   "2C00-"2E7F, "4DC0-"4DFF, "A4D0-"A95F, "A980-"ABFF, "E000-"F8FF,
  76   "FB00-"FE0F, "FE20-"FE2F, "FE70-"FEFF, "10000-"1AFFF, "1B170-"1F0FF,
  77   "1F300-"1FFFF, "2000-"206F
  78 } % non-Japanese
  79 \ltjdefcharrange{5}{"D800-"DFFF, "E0000-"E00FF, "E01F0-"10FFFF}
  80 \ltjdefcharrange{6}{%
  81   "2460-"24FF, "2E80-"2EFF, "3000-"30FF, "3190-"319F, "31F0-"4DBF,
  82   "4E00-"9FFF, "F900-"FAFF, "FE10-"FE1F, "FE30-"FE6F, "FF00-"FFEF,
  83   "1B000-"1B16F, "1F100-"1F2FF, "20000-"3FFFF, "E0100-"E01EF
  84 }
  85 \ltjdefcharrange{7}{%
  86   "1100-"11FF, "2F00-"2FFF, "3100-"318F, "31A0-"31EF, "A000-"A4CF,
  87   "A960-"A97F, "AC00-"D7FF
  88 }
  89 \ltjdefcharrange{8}{"A7, "A8, "B0, "B1, "B4, "B6, "D7, "F7}
  90 \ltjdefcharrange{9}{
  91   "2002, "2010, "2011, "2013, "2014, "2015, "2016, "2018, "2019,
  92   "201A, "201C, "201D, "201E, "2020, "2021, "2022, "2025, "2026,
  93   "2030, "2032, "2033, "2039, "203A, "203B, "203C, "203E, "203F,
  94   "2042, "2044, "2047, "2048, "2049, "2051
  95 }
  96 \ltjsetparameter{jacharrange={-1, +2, +3, -4, -5, +6, +7, -8, +9}}
  97
  98 \directlua{for x=128,255 do luatexja.math.is_math_letters[x] = true end}
  99 \let\ltj@@orig@end=\@@end
 100 \protected\def\@@end{%
 101   \directlua{luatexja.ext_cleanup()}\ltj@@orig@end}
 102
 103 \directlua{luatexja.jfont.register_vert_replace{
 104   ['，']='、', ['．']='。', ['“']=0x301D, ['”']=0x301F,
 105 }}
 106
 107 %%------------------ all done
 108 \ltj@plain@AtEnd
 109 \endinput
 110 %% EOF