6 %% Avoid multiple loading.
7 \csname luatexjaplainLoaded\endcsname
8 \edef\ltj@plain@AtEnd{%
9 \endlinechar=\the\endlinechar
12 \def\luatexjaplainLoaded{\endinput}
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}[2013/06/12]
24 % LuaTeX-ja macros against plain TeX
26 \def\ltj@stdmcfont{psft:Ryumin-Light}
27 \def\ltj@stdgtfont{psft:GothicBBB-Medium}
29 \openin\ltj@@cfgread{luatexja.cfg}%
31 \message{Cannot find file `luatexja.cfg'.}%
36 \let\ltj@@cfgread\relax\advance\count16by-1\relax
38 \jfont\tenmin=\ltj@stdmcfont:jfm=ujis at 9.62216pt
39 \jfont\sevenmin=\ltj@stdmcfont:jfm=ujis at 6.73551pt
40 \jfont\fivemin=\ltj@stdmcfont:jfm=ujis at 4.81108pt
41 \jfont\tengt=\ltj@stdgtfont:jfm=ujis at 9.62216pt
42 \jfont\sevengt=\ltj@stdgtfont:jfm=ujis at 6.73551pt
43 \jfont\fivegt=\ltj@stdgtfont:jfm=ujis at 4.81108pt
45 \tfont\tentmin=\ltj@stdmcfont:jfm=ujisv at 9.62216pt
46 \tfont\seventmin=\ltj@stdmcfont:jfm=ujisv at 6.73551pt
47 \tfont\fivetmin=\ltj@stdmcfont:jfm=ujisv at 4.81108pt
48 \tfont\tentgt=\ltj@stdgtfont:jfm=ujisv at 9.62216pt
49 \tfont\seventgt=\ltj@stdgtfont:jfm=ujisv at 6.73551pt
50 \tfont\fivetgt=\ltj@stdgtfont:jfm=ujisv at 4.81108pt
52 \def\mc{\tenmin\tentmin}
53 \def\gt{\tengt\tentgt}
57 local s = kpse.find_file('ltj-kinsoku.lua', 'tex')
58 luatexja.stack.charprop_stack_table[0] = s and dofile(s) or {}
61 \ltjsetparameter{kanjiskip=0pt plus 0.4pt minus 0.4pt,
62 xkanjiskip=.25\zw plus 1pt minus 1pt,
63 autospacing, autoxspacing, jacharrange={-1},
64 yalbaselineshift=0pt, yjabaselineshift=0pt,
65 jcharwidowpenalty=500, differentjfm=paverage,
66 jatextfont={0, \tenmin}, jascriptfont={0, \sevenmin},
67 jascriptscriptfont={0, \fivemin},
72 talbaselineshift=0.5\ht0, tjabaselineshift=0pt,
76 \ltjdefcharrange{1}{"80-"36F, "1E00-"1EFF}
77 \ltjdefcharrange{2}{"370-"4FF, "1F00-"1FFF}
79 "2000-"243F, "2500-"27BF, "2900-"29FF, "2B00-"2BFF}
81 "500-"10FF, "1200-"1DFF, "2440-"245F, "27C0-"28FF, "2A00-"2AFF,
82 "2C00-"2E7F, "4DC0-"4DFF, "A4D0-"A82F, "A840-"ABFF, "FB00-"FE0F,
83 "FE20-"FE2F, "FE70-"FEFF, "10000-"1FFFF, "E000-"F8FF} % non-Japanese
84 \ltjdefcharrange{5}{"D800-"DFFF, "E0000-"E00FF, "E01F0-"10FFFF}
86 "2460-"24FF, "2E80-"2EFF, "3000-"30FF, "3190-"319F, "31F0-"4DBF,
87 "4E00-"9FFF, "F900-"FAFF, "FE10-"FE6F, "20000-"2FFFF,"E0100-"E01EF}
89 "1100-"11FF, "2F00-"2FFF, "3100-"31EF, "A000-"A4CF, "A830-"A83F,
91 \ltjdefcharrange{8}{"B4, "A8, "B1, "D7, "F7, "B0, "A7, "B6}
92 \ltjsetparameter{jacharrange={-1, +2, +3, -4, -5, +6, +7, +8}}
94 \directlua{for x=128,255 do luatexja.math.is_math_letters[x] = true end}
96 \let\ltj@@orig@end=\end
97 \outer\protected\def\end{%
98 \directlua{luatexja.direction.remove_end_whatsit()}\ltj@@orig@end}
100 %%------------------ all done