summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/luatex/luatexja/ltj-plain.sty
blob: 27f860c4128a05012f023e9750cbbf092ff99c55 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
%
% ltj-plain.sty
%

%! これは外から読まれない
%% Avoid multiple loading.
\csname luatexjaplainLoaded\endcsname
\edef\ltj@plain@AtEnd{%
\endlinechar=\the\endlinechar
\relax}
\endlinechar=-1 %
\def\luatexjaplainLoaded{\endinput}

\ifltj@in@latex                 %<*LaTeX>
  \NeedsTeXFormat{LaTeX2e}
  \ProvidesPackage{ltj-plain}[2013/05/14]
\fi                             %</LaTeX>

%%------------------

\endlinechar=13
%! ↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓
% LuaTeX-ja macros against plain TeX

\jfont\tenmin=psft:Ryumin-Light:jfm=ujis at 9.62216pt
\jfont\sevenmin=psft:Ryumin-Light:jfm=ujis at 6.73551pt
\jfont\fivemin=psft:Ryumin-Light:jfm=ujis at 4.81108pt
\jfont\tengt=psft:GothicBBB-Medium:jfm=ujis at 9.62216pt
\jfont\sevengt=psft:GothicBBB-Medium:jfm=ujis at 6.73551pt
\jfont\fivegt=psft:GothicBBB-Medium:jfm=ujis at 4.81108pt

\let\mc=\tenmin
\let\gt=\tengt
\mc

\directlua{
  luatexja.stack.charprop_stack_table[0] 
    = dofile(assert(kpse.find_file('ltj-kinsoku.lua', 'tex'),
      "File `ltj-kinsoku.lua' not found"))
}

\ltjsetparameter{kanjiskip=0pt plus 0.4pt minus 0.4pt, 
  xkanjiskip=.25\zw plus 1pt minus 1pt,
  autospacing, autoxspacing, jacharrange={-1}, 
  yalbaselineshift=0pt, yjabaselineshift=0pt,
  jcharwidowpenalty=500, differentjfm=paverage
}

\ltjdefcharrange{1}{"80-"36F, "1E00-"1EFF} 
\ltjdefcharrange{2}{"370-"4FF, "1F00-"1FFF} 
\ltjdefcharrange{3}{%
  "2000-"243F, "2500-"27BF, "2900-"29FF, "2B00-"2BFF}
\ltjdefcharrange{4}{%
   "500-"10FF, "1200-"1DFF, "2440-"245F, "27C0-"28FF, "2A00-"2AFF, 
  "2C00-"2E7F, "4DC0-"4DFF, "A4D0-"A82F, "A840-"ABFF, "FB50-"FE0F, 
  "FE20-"FE2F, "FE70-"FEFF, "FB00-"FB4F, "10000-"1FFFF, "E000-"F8FF} % non-Japanese
\ltjdefcharrange{5}{"D800-"DFFF, "E0000-"10FFFF} 
\ltjdefcharrange{6}{%
  "2460-"24FF, "2E80-"2EFF, "3000-"30FF, "3190-"319F, "31F0-"4DBF, 
  "4E00-"9FFF, "F900-"FAFF, "FE10-"FE6F, "20000-"2FFFF}
\ltjdefcharrange{7}{
  "1100-"11FF, "2F00-"2FFF, "3100-"31EF, "A000-"A4CF, "A830-"A83F, 
  "AC00-"D7FF}
\ltjdefcharrange{8}{"B4, "A8, "B1, "D7, "F7, "B0, "A7, "B6}
\ltjsetparameter{jacharrange={-1, +2, +3, -4, -5, +6, +7, +8}}

\directlua{for x=128,255 do luatexja.math.is_math_letters[x] = true end}

%%------------------ all done
\ltj@plain@AtEnd
\endinput
%% EOF