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
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
|
% luatexja-preset.sty
\ProvidesPackage{luatexja-preset}[2019/01/28 Japanese font presets]
\RequirePackage{expl3,l3keys2e}
\RequirePackage{luatexja}
\ExplSyntaxOn
%% messages
\msg_new:nnn { luatexja-preset }{ ltj-fontspec }{
The~ luatexja-fontspec~ package~ is~ loaded~ already.~
Hence~ we~ ignore~ `nfssonly'~option.
}
\msg_new:nnn { luatexja-preset }{ no-font }{
Font~ #1~ (#2)~ is~ not~found.~ Hence~ I~ substitute~ #3~ (#4)~ for~ it.
}
\msg_new:nnn { luatexja-preset }{ scale }{
Japanese~fonts~will~be~scaled~by~#1.
}
\msg_new:nnn { luatexja-preset }{ exist-preset-nooverwrite }{
The~ preset~ `#1'~ is~ already~ defined.~
To~ redefine~ this~ preset,~ use~ \str_use:N \c_backslash_str ltjnewpreset*~ instead.
}
\msg_new:nnn { luatexja-preset }{ exist-preset-overwrite }{
The~ preset~ `#1'~ is~ redefined.
}
\msg_new:nnn { luatexja-preset }{ illegal-preset-name }{
The~ preset~ `#1'~ cannot~ be~ defined,~
since~ the~ luatexja-preset~ package~ an~ option~ with~ the~ same~ name.
}
\seq_new:N \g__ltjpreset_presets_seq
\keys_define:nn { luatexja-preset }{
unknown .code:n =
\keys_set_known:noN { ltjpreset-presets } { \tl_use:N \l_keys_tl } \l_tmpa_tl
\tl_if_empty:NT \l_tmpa_tl {
\PassOptionsToPackage { \l_tmpa_tl } { luatexja-fontspec }
},
scale .code:n = \gdef\Cjascale{#1},
match .code: n =
\renewcommand\jttdefault{\gtdefault}\@ltj@match@familytrue
\PassOptionsToPackage { match } { luatexja-fontspec },
match .value_forbidden:n = true,
__custom .bool_set:N = \g__ltjpreset_custom_bool, __custom .groups:n = { preset },
__office .bool_set:N = \g__ltjpreset_office_bool, __office .groups:n = { preset },
__noembed .bool_set:N = \g__ltjpreset_noembed_bool, __noembed .groups:n = { preset },
}
\cs_new:Nn \__ltjpreset_declare_option:nn {
\keys_define:nn { luatexja-preset }{
#1 .code:n = { #2 },
#1 .value_forbidden:n = true
}
}
\cs_new:Nn \ltjpreset_declare_preset:nn {
\keys_define:nn { luatexja-preset }{
#1 .meta:n = { #2 },
#1 .value_forbidden:n = true, #1 .groups:n = { preset },
}
\seq_put_right:Nn \g__ltjpreset_presets_seq { #1 }
}
\cs_generate_variant:Nn \ltjpreset_declare_preset:nn {nx}
\cs_new:Nn \__ltjpreset_declare_bool_option:nn {
\bool_new:c { g__ltjpreset_#1_bool }
\bool_set_false:c { g__ltjpreset_#1_bool }
\keys_define:nn { luatexja-preset }{
#1 .bool_set:c = { g__ltjpreset_#1_bool },
#2 .bool_set_inverse:c = { g__ltjpreset_#1_bool },
#1 .default:n = true, #2 .default:n = true,
}
}
%%%%%%%% bool options
\__ltjpreset_declare_bool_option:nn { nfssonly }{ fontspec }
\__ltjpreset_declare_bool_option:nn { bold }{ nobold }
\__ltjpreset_declare_bool_option:nn { expert }{ noexpert }
\__ltjpreset_declare_bool_option:nn { deluxe }{ nodeluxe }
% JFM
\tl_new:N \__ltjpreset_use_jfm_yoko_tl % 使用する JFM(横)
\tl_set:Nn \__ltjpreset_use_jfm_yoko_tl {\ltj@stdyokojfm}
\tl_new:N \__ltjpreset_use_jfm_tate_tl % 使用する JFM(縦)
\tl_set:Nn \__ltjpreset_use_jfm_tate_tl {\ltj@stdtatejfm}
\__ltjpreset_declare_option:nn{jis}{\tl_set:Nn \__ltjpreset_use_jfm_yoko_tl {jis}} % jis
\__ltjpreset_declare_option:nn{ujis}{\tl_set:Nn \__ltjpreset_use_jfm_yoko_tl {ujis}} % ujis
% 漢字字形
\tl_new:N \l__ltjpreset_kanji_shape_tl
\__ltjpreset_declare_option:nn{90jis}{ \tl_set:Nn \l__ltjpreset_kanji_shape_tl { , CJKShape=JIS1990 }} % 90jis
\__ltjpreset_declare_option:nn{jis90}{ \tl_set:Nn \l__ltjpreset_kanji_shape_tl { , CJKShape=JIS1990 }} % 90jis
\__ltjpreset_declare_option:nn{jis2004}{\tl_set:Nn \l__ltjpreset_kanji_shape_tl { , CJKShape=JIS2004 }} % jis2004
\__ltjpreset_declare_option:nn{2004jis}{\tl_set:Nn \l__ltjpreset_kanji_shape_tl { , CJKShape=JIS2004 }} % jis2004
% font preset
\prop_new:N \g__ltjpreset_font_prop
\keys_define:nn { luatexja-preset } {
mc .code:n =
\prop_put:Nnn \g__ltjpreset_font_prop { mc-l } {#1}
\prop_put:Nnn \g__ltjpreset_font_prop { mc-m } {#1}
\prop_put:Nnn \g__ltjpreset_font_prop { mc-bx } {#1},
mc .groups:n = { preset }, mc .value_required:n = true,
gt .code:n =
\prop_put:Nnn \g__ltjpreset_font_prop { gt-u } {#1}
\prop_put:Nnn \g__ltjpreset_font_prop { gt-d } {#1}
\prop_put:Nnn \g__ltjpreset_font_prop { gt-bx } {#1}
\prop_put:Nnn \g__ltjpreset_font_prop { gt-eb } {#1},
gt-m .code:n = % gtfamily , medium series
\prop_put:Nnn \g__ltjpreset_font_prop { gt-u } {#1}
\prop_put:Nnn \g__ltjpreset_font_prop { gt-d } {#1},
% gt-d, gt-u は隠し
gt .groups:n = { preset }, gt .value_required:n = true,
gt-m .groups:n = { preset }, gt-m .value_required:n = true,
}
\cs_set:Nn \g__ltjpreset_tmp_cs:n {
\keys_define:nn { luatexja-preset } {
#1 .code:n = \prop_put:Non \g__ltjpreset_font_prop { #1 } { ##1 },
#1 .groups:n = { preset }, #1 .value_required:n = true,
}
}
\g__ltjpreset_tmp_cs:n { mc-l }
\g__ltjpreset_tmp_cs:n { mc-m }
\g__ltjpreset_tmp_cs:n { mc-bx }
\g__ltjpreset_tmp_cs:n { gt-u }
\g__ltjpreset_tmp_cs:n { gt-d }
\g__ltjpreset_tmp_cs:n { gt-bx }
\g__ltjpreset_tmp_cs:n { gt-eb}
\g__ltjpreset_tmp_cs:n { mg-m }
\cs_undefine:N \g__ltjpreset_tmp_cs:n
\cs_new:Nn \__ltjpreset_set_uni:nn {
mc = #1, gt = #2, mc-bx = #2, mg-m = #2,
__custom = false, __office = false, __noembed = false,
}
\cs_new:Npn \__ltjpreset_set_office:nn #1 #2{
mc = #1, mc-bx = HGMinchoE ,
gt-d = HGGothicM , gt-bx = HGGothicE ,
gt-u = #2 , gt-eb = HGSoeiKakugothicUB ,
mg-m = HGMaruGothicMPRO,
__custom = false, __office = true, __noembed = false,
}
%%%%%%%% プリセット達
% カスタム指定
\keys_define:nn { luatexja-preset }{
custom .meta:n = { #1, __custom = true, },
custom .value_required:n = true,
jfm_yoko .tl_set:N = \__ltjpreset_use_jfm_yoko_tl,
jfm_tate .tl_set:N = \__ltjpreset_use_jfm_tate_tl,
}
% 小塚 (Adobe)
%% Pro
\ltjpreset_declare_preset:nx{kozuka-pro}{
mc-m = KozMinPro-Regular, mc-bx = KozMinPro-Bold,
gt-d = KozGoPro-Regular, gt-bx = KozGoPro-Bold,
gt-u = KozGoPro-Medium, gt-eb = KozGoPro-Heavy,
mg-m = KozGoPro-Heavy, mc-l = KozMinPro-Light,
__custom = false, __office = false, __noembed = false,
}
%% Pr6
\ltjpreset_declare_preset:nx{kozuka-pr6}{
mc-m = KozMinProVI-Regular, mc-bx = KozMinProVI-Bold,
gt-d = KozGoProVI-Regular, gt-bx = KozGoProVI-Bold,
gt-u = KozGoProVI-Medium, gt-eb = KozGoProVI-Heavy,
mg-m = KozGoProVI-Heavy, mc-l = KozMinProVI-Light,
__custom = false, __office = false, __noembed = false,
}
%% Pr6N
\ltjpreset_declare_preset:nx{kozuka-pr6n}{
mc-m = KozMinPr6N-Regular, mc-bx = KozMinPr6N-Bold,
gt-d = KozGoPr6N-Regular, gt-bx = KozGoPr6N-Bold,
gt-u = KozGoPr6N-Medium, gt-eb = KozGoPr6N-Heavy,
mg-m = KozGoPr6N-Heavy, mc-l = KozMinPr6N-Light,
__custom = false, __office = false, __noembed = false,
}
% ヒラギノ (OSX)
\ltjpreset_declare_preset:nx{hiragino-pro}{
mc-m = HiraMinPro-W3, mc-bx = HiraMinPro-W6,
gt-d = HiraKakuPro-W3, gt-bx = HiraKakuPro-W6,
gt-u = HiraKakuPro-W6, gt-eb = HiraKakuStd-W8,
mg-m = HiraMaruPro-W4, mc-l = HiraMinPro-W2,
__custom = false, __office = false, __noembed = false,
}
\ltjpreset_declare_preset:nx{hiragino-pron}{
mc-m = HiraMinProN-W3, mc-bx = HiraMinProN-W6,
gt-d = HiraKakuProN-W3, gt-bx = HiraKakuProN-W6,
gt-u = HiraKakuProN-W6, gt-eb = HiraKakuStdN-W8,
mg-m = HiraMaruProN-W4, mc-l = HiraMinProN-W2,
__custom = false, __office = false, __noembed = false,
}
% モリサワ
\ltjpreset_declare_preset:nx{morisawa-pro}{
mc = A-OTF-RyuminPro-Light.otf, mc-bx = A-OTF-FutoMinA101Pro-Bold.otf,
gt-d = A-OTF-GothicBBBPro-Medium.otf , gt-bx = A-OTF-FutoGoB101Pro-Bold.otf,
gt-u = A-OTF-GothicBBBPro-Medium.otf , gt-eb = A-OTF-MidashiGoPro-MB31.otf,
mg-m = A-OTF-Jun101Pro-Light.otf,
__custom = false, __office = false, __noembed = false,
}
\ltjpreset_declare_preset:nx{morisawa-pr6n}{
mc = A-OTF-RyuminPr6N-Light.otf, mc-bx = A-OTF-FutoMinA101Pr6N-Bold.otf,
gt-d = A-OTF-GothicBBBPr6N-Medium.otf , gt-bx = A-OTF-FutoGoB101Pr6N-Bold.otf,
gt-u = A-OTF-GothicBBBPr6N-Medium.otf , gt-eb = A-OTF-MidashiGoPr6N-MB31.otf,
mg-m = A-OTF-Jun101Pr6N-Light.otf,
__custom = false, __office = false, __noembed = false,
}
% 游明朝/游ゴシック (Win8.1)
\ltjpreset_declare_preset:nx{yu-win}{
mc-m = YuMincho-Regular, mc-bx = YuMincho-Demibold,
gt-d = YuGothic-Regular, gt-bx = YuGothic-Bold,
gt-u = YuGothic-Regular, gt-eb = YuGothic-Bold,
mg-m = YuGothic-Bold, mc-l = YuMincho-Light,
__custom = false, __office = false, __noembed = false,
}
% Win10
\ltjpreset_declare_preset:nx{yu-win10}{
mc-m = YuMincho-Regular, mc-bx = YuMincho-Demibold,
gt-d = YuGothic-Regular, gt-bx = YuGothic-Bold,
gt-u = YuGothic-Medium, gt-eb = YuGothic-Bold,
mg-m = YuGothic-Bold, mc-l = YuMincho-Light,
__custom = false, __office = false, __noembed = false,
}
% Yu fonts in OSX
% according to http://support.apple.com/kb/HT5944
\ltjpreset_declare_preset:nx{yu-osx}{
mc = YuMincho~Medium, mc-bx = YuMincho~Demibold,
gt-d = YuGothic~Medium, gt-u = YuGothic~Medium,
gt-bx = YuGothic~Bold, gt-eb = YuGothic~Bold,
mg-m = YuGothic~Bold,
__custom = false, __office = false, __noembed = false,
}
% moga-mobo
\ltjpreset_declare_preset:nx{moga-mobo}{
mc = Moga90Mincho, mc-bx = Moga90Mincho~Bold,
gt-d = Moga90Gothic, gt-bx = Moga90Gothic~Bold,
gt-u = Moga90Gothic, gt-eb = Moga90Gothic~Bold,
mg-m = Mobo90Gothic,
__custom = false, __office = false, __noembed = false,
}
\ltjpreset_declare_preset:nx{moga-mobo-ex}{
mc = MogaEx90Mincho, mc-bx = MogaEx90Mincho~Bold,
gt-d = MogaEx90Gothic, gt-bx = MogaEx90Gothic~Bold,
gt-u = MogaEx90Gothic, gt-eb = MogaEx90Gothic~Bold,
mg-m = MoboEx90Gothic,
__custom = false, __office = false, __noembed = false,
}
% Ume fones
\ltjpreset_declare_preset:nx{ume}{
mc = Ume~Mincho,
gt-d = Ume~Gothic, gt-bx = Ume~Gothic~O5,
gt-u = Ume~Gothic~O5, gt-eb = Ume~Gothic~O5,
mg-m = Ume~Gothic~O4,
__custom = false, __office = false, __noembed = false,
}
% Source Han {Serif,Sans}
\ltjpreset_declare_preset:nx{sourcehan}{
mc-m = Source~Han~Serif~Regular,
mc-bx = Source~Han~Serif~Bold,
gt-d = Source~Han~Sans~Regular,
gt-bx = Source~Han~Sans~Bold,
gt-u = Source~Han~Sans~Medium,
gt-eb = Source~Han~Sans~Heavy,
mg-m = Source~Han~Sans~Heavy,
mc-l = Source~Han~Serif~Light,
__custom = false, __office = false, __noembed = false,
}
\ltjpreset_declare_preset:nx{sourcehan-jp}{
mc-m = Source~Han~Serif~JP~Regular,
mc-bx = Source~Han~Serif~JP~Bold,
gt-d = Source~Han~Sans~JP~Regular,
gt-bx = Source~Han~Sans~JP~Bold,
gt-u = Source~Han~Sans~JP~Medium,
gt-eb = Source~Han~Sans~JP~Heavy,
mg-m = Source~Han~Sans~JP~Heavy,
mc-l = Source~Han~Serif~JP~Light,
__custom = false, __office = false, __noembed = false,
}
\ltjpreset_declare_preset:nx{noto-otc}{
mc-m = Noto~Serif~CJK~Regular,
mc-bx = Noto~Serif~CJK~Bold,
gt-d = Noto~Sans~CJK~Regular,
gt-bx = Noto~Sans~CJK~Bold,
gt-u = Noto~Sans~CJK~Medium,
gt-eb = Noto~Sans~CJK~Black,
mg-m = Noto~Sans~CJK~Black,
mc-l = Noto~Serif~CJK~Light,
__custom = false, __office = false, __noembed = false,
}
\ltjpreset_declare_preset:nx{noto-otf}{
mc-m = Noto~Serif~CJK~JP~Regular,
mc-bx = Noto~Serif~CJK~JP~Bold,
gt-d = Noto~Sans~CJK~JP~Regular,
gt-bx = Noto~Sans~CJK~JP~Bold,
gt-u = Noto~Sans~CJK~JP~Medium,
gt-eb = Noto~Sans~CJK~JP~Black,
mg-m = Noto~Sans~CJK~JP~Black,
mc-l = Noto~Serif~CJK~JP~Light,
__custom = false, __office = false, __noembed = false,
}
% ipa, ipaex, ms
\ltjpreset_declare_preset:nx{ipa}{
\__ltjpreset_set_uni:nn { IPAMincho } { IPAGothic }
}
\ltjpreset_declare_preset:nx{ipaex}{
\__ltjpreset_set_uni:nn { IPAExMincho } { IPAExGothic }
}
\ltjpreset_declare_preset:nx{ms}{
\__ltjpreset_set_uni:nn { MS-Mincho } { MS-Gothic }
}
% {ipa,ipaex,ms}-dx % Office 付属フォントを利用
\ltjpreset_declare_preset:nx{ipaex-hg}{
\__ltjpreset_set_office:nn { IPAExMincho } { IPAExGothic }
}
\ltjpreset_declare_preset:nx{ipa-hg}{
\__ltjpreset_set_office:nn { IPAMincho } { IPAGothic }
}
\ltjpreset_declare_preset:nx{ms-hg}{
\__ltjpreset_set_office:nn { MS-Mincho } { MS-Gothic }
}
% 非埋込
\ltjpreset_declare_preset:nx{noembed}{
\__ltjpreset_set_uni:nn { Ryumin-Light } { GothicBBB-Medium },
__custom = false, __office = false, __noembed = true,
}
\keys_set:nn {luatexja-preset} { ipaex }
\ProcessKeysOptions { luatexja-preset }
\@ifpackageloaded{luatexja-fontspec}{
\bool_if:NT \g__ltjpreset_nfssonly_bool
{ \msg_warning:nn { luatexja-preset }{ ltj-fontspec } }
\bool_set_false:N \g__ltjpreset_nfssonly_bool
}{}
%%%%%%%% main routine
\cs_new:Nn \__ltjpreset_extract_fonts: {
%% MogaMincho の場合は 90 をつける/はずす
\bool_if:NF \g__ltjpreset_custom_bool {
\tl_set:Nn \l_tmpa_tl {, CJKShape=JIS2004 }
\tl_if_eq:NNT \l__ltjpreset_kanji_shape_tl \l_tmpa_tl {
\tl_set:Nx \l_tmpb_tl { \prop_item:Nn \g__ltjpreset_font_prop { mc-m } }
\tl_if_in:NnT \l_tmpb_tl { Moga90Mincho } {
\prop_clear:N \l_tmpa_prop
\prop_map_inline:Nn \g__ltjpreset_font_prop {
\tl_set:Nn \l_tmpb_tl { ##2 } \tl_remove_all:Nn \l_tmpb_tl {90}
\prop_put:Nnx \l_tmpa_prop { ##1 } { \tl_use:N \l_tmpb_tl }
}
\prop_set_eq:NN \g__ltjpreset_font_prop \l_tmpa_prop
}
\tl_if_in:NnT \l_tmpb_tl { MogaEx90Mincho } {
\prop_clear:N \l_tmpa_prop
\prop_map_inline:Nn \g__ltjpreset_font_prop {
\tl_set:Nn \l_tmpb_tl { ##2 } \tl_remove_all:Nn \l_tmpb_tl {90}
\prop_put:Nnx \l_tmpa_prop { ##1 } { \tl_use:N \l_tmpb_tl }
}
\prop_set_eq:NN \g__ltjpreset_font_prop \l_tmpa_prop
}
}
}
%%%% リストからの展開
\cs_set:Nx \__ltjpreset_font_mc_l: { \prop_item:Nn \g__ltjpreset_font_prop { mc-l } }
\cs_set:Nx \__ltjpreset_font_mc_m: { \prop_item:Nn \g__ltjpreset_font_prop { mc-m } }
\cs_set:Nx \__ltjpreset_font_mc_bx: { \prop_item:Nn \g__ltjpreset_font_prop { mc-bx } }
\cs_set:Nx \__ltjpreset_font_gt_m: { \prop_item:Nn \g__ltjpreset_font_prop { gt-d } }
\cs_set:Nx \__ltjpreset_font_gt_u: { \prop_item:Nn \g__ltjpreset_font_prop { gt-u } }
\cs_set:Nx \__ltjpreset_font_gt_bx: { \prop_item:Nn \g__ltjpreset_font_prop { gt-bx } }
\cs_set:Nx \__ltjpreset_font_gt_eb: { \prop_item:Nn \g__ltjpreset_font_prop { gt-eb } }
\cs_set:Nx \__ltjpreset_font_mg_m: { \prop_item:Nn \g__ltjpreset_font_prop { mg-m } }
%% HG 系フォント + JIS2004/90JIS のときはフォント名を置換
\bool_if:nT { !\g__ltjpreset_custom_bool && \g__ltjpreset_office_bool } {
\tl_set:Nn \l_tmpa_tl {, CJKShape=JIS2004 }
\tl_if_eq:NNT \l__ltjpreset_kanji_shape_tl \l_tmpa_tl {
\cs_set:Nx \__ltjpreset_font_mc_bx: { hgrme04.ttc }
\cs_set:Nx \__ltjpreset_font_gt_bx: { hgrge04.ttc }
\cs_set:Nx \__ltjpreset_font_gt_eb: { hgrsgu04.ttc }
\cs_set:Nx \__ltjpreset_font_mg_m: { hgrsmp04.ttf }
\cs_set_eq:NN \__ltjpreset_font_gt_m: \__ltjpreset_font_gt_u:
% HG ゴシックM のときはそうはいかないので 1 ウェイト時のゴシック体を使う
}
\tl_set:Nn \l_tmpa_tl {, CJKShape=JIS1990 }
\tl_if_eq:NNT \l__ltjpreset_kanji_shape_tl \l_tmpa_tl {
\cs_set:Nx \__ltjpreset_font_mc_bx: { hgrme.ttc }
\cs_set:Nx \__ltjpreset_font_gt_bx: { hgrge.ttc }
\cs_set:Nx \__ltjpreset_font_gt_eb: { hgrsgu.ttc }
\cs_set:Nx \__ltjpreset_font_mg_m: { hgrsmp.ttf }
}
}
% mc/l
\tl_set:Nx \l_tmpa_tl { \__ltjpreset_font_mc_l: }
\tl_if_empty:NT \l_tmpa_tl {\tl_set:Nn \l_tmpa_tl {~}}
\cs_set:Nx \__ltjpreset_font_mc_l: {
\tl_if_blank:nTF \l_tmpa_tl { \__ltjpreset_font_mc_m: } {\tl_use:N \l_tmpa_tl }
}
%% bold オプションの処理
\bool_if:NTF \g__ltjpreset_deluxe_bool {
\bool_if:NT \g__ltjpreset_bold_bool {
\cs_set_eq:NN \__ltjpreset_font_mc_bx: \__ltjpreset_font_gt_bx:
}
}{
\bool_if:NTF \g__ltjpreset_bold_bool
{ \cs_set_eq:NN \__ltjpreset_font_gt_m: \__ltjpreset_font_gt_bx: }
{ \cs_set_eq:NN \__ltjpreset_font_gt_m: \__ltjpreset_font_gt_u: }
\cs_set_eq:NN \__ltjpreset_font_gt_bx: \__ltjpreset_font_gt_m:
\cs_set_eq:NN \__ltjpreset_font_mc_bx: \__ltjpreset_font_gt_m:
}
}
%%%%%%%% 存在判定
\cs_new:Nn \__ltjpreset_substitute:nnnn {
\group_begin:
\suppressfontnotfounderror=1
\cs_if_exist:cT {ltjpreset_font_#1_#2:} {
\font \g__ltjpreset_font_test: = "\cs:w ltjpreset_font_#1_#2: \cs_end:"\relax
\ifx \g__ltjpreset_font_test: \nullfont
\msg_warning:nnxxxx { luatexja-preset }{ no-font }
{ \cs:w ltjpreset_font_#1_#2: \cs_end: }{ #1/#2 }
{ \cs:w ltjpreset_font_#3_#4: \cs_end: }{ #3/#4 }
\cs_gset_eq:cc { ltjpreset_font_#1_#2: } { ltjpreset_font_#3_#4: }
\fi
} { \cs_gset_eq:cc { ltjpreset_font_#1_#2: } { ltjpreset_font_#3_#4: } }
\group_end:
}
%%%%%%%% deluxe (\mgfamily はあとで定義)
\bool_if:NTF \g__ltjpreset_deluxe_bool {
\cs_new:Nn \__ltjpreset_check_deluxe_existence: {
\__ltjpreset_substitute:nnnn { gt } { eb } { gt } { bx }
\__ltjpreset_substitute:nnnn { mg } { m } { gt } { bx }
\__ltjpreset_substitute:nnnn { mc } { l } { mc } { m }
}
\def\ltdefault{l}
\DeclareRobustCommand\ltseries { \not@math@alphabet\ltseries\relax\fontseries\ltdefault\selectfont }
\def\ebdefault{eb}
\DeclareRobustCommand\ebseries { \not@math@alphabet\ebseries\relax\fontseries\ebdefault\selectfont }
\DeclareRobustCommand\gtebfamily { \gtfamily\fontseries{\ebdefault}\selectfont }
} {
\cs_set_eq:NN \__ltjpreset_check_deluxe_existence: \prg_do_nothing:
}
\int_new:N \g__ltjpreset_applycount_int
\bool_if:NTF \g__ltjpreset_nfssonly_bool {
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%% nfss only
\cs_if_exist:NF \Cjascale {
\group_begin:
\fontsize{16}{16}\selectfont
\cs_gset:Npx \Cjascale { \fp_to_decimal:n {\zw / 16} }
\group_end:
}
\msg_warning:nnx { luatexja-preset }{ scale }{ \Cjascale }
\cs_new:Nn \ltj_preset_declare_font_shape:nnnnnn {
\DeclareFontShape{#1}{#2}{#3}{#4}{ <-> s*[\Cjascale]
{ \bool_if:NT \g__ltjpreset_noembed_bool {psft:} #5
;-kern \tl_use:N \l__ltjpreset_kanji_shape_tl; #6 } } {}
}
\cs_new:Nn \ltj_preset_define_family:nnn {
\ltj_preset_declare_font_shape:nnnnnn { JY3 }
{ #1 \int_to_arabic:n { \g__ltjpreset_applycount_int }} { #2 } { n }
{ "#3" : jfm=\tl_use:N \__ltjpreset_use_jfm_yoko_tl }
{ script=hani \bool_if:NT \g__ltjpreset_expert_bool { ;+hkna } }
\ltj_preset_declare_font_shape:nnnnnn { JT3 }
{ #1 \int_to_arabic:n { \g__ltjpreset_applycount_int }} { #2 } { n }
{ "#3" : jfm=\tl_use:N \__ltjpreset_use_jfm_tate_tl }
{ script=hani \bool_if:NT \g__ltjpreset_expert_bool { ;+vkna } }
\bool_if:NT \g__ltjpreset_expert_bool {
\ltj_preset_declare_font_shape:nnnnnn { JY3 }
{ #1 \int_to_arabic:n { \g__ltjpreset_applycount_int }} { #2 } { rb }
{ "#3" : jfm=\tl_use:N \__ltjpreset_use_jfm_yoko_tl } { script=kana; +ruby }
\ltj_preset_declare_font_shape:nnnnnn { JT3 }
{ #1 \int_to_arabic:n { \g__ltjpreset_applycount_int }} { #2 } { rb }
{ "#3" : jfm=\tl_use:N \__ltjpreset_use_jfm_tate_tl } { script=kana; +ruby }
}
}
\bool_if:NT \g__ltjpreset_deluxe_bool {
\let\mgfamily\undefined
\DeclareRobustCommand\mgfamily {
\not@math@alphabet\mgfamily\relax
\kanjifamily{ltjpmg \int_to_arabic:n { \g__ltjpreset_applycount_int }}\selectfont
}
\DeclareTextFontCommand{\textmg}{\mgfamily}
}
\bool_if:NT \g__ltjpreset_expert_bool {
\DeclareRobustCommand\rubyfamily { \kanjishape{rb}\selectfont }
}
%
\cs_new:Nn \__ltjpreset_do_fontset: { \group_begin:
% ======
\xdef\mcdefault{ltjpm \int_to_arabic:n { \g__ltjpreset_applycount_int }}
\xdef\gtdefault{ltjpg \int_to_arabic:n { \g__ltjpreset_applycount_int }}
\DeclareKanjiFamily{JY3}{\mcdefault}{}
\DeclareKanjiFamily{JT3}{\mcdefault}{}
\DeclareKanjiFamily{JY3}{\gtdefault}{}
\DeclareKanjiFamily{JT3}{\gtdefault}{}
\unless\ifltj@disablejfam
\SetSymbolFont{mincho}{normal}{JY3}{\mcdefault}{m}{n}
\SetSymbolFont{mincho}{bold}{JY3}{\mcdefault}{bx}{n}
\DeclareMathAlphabet{\mathgt}{JY3}{\gtdefault}{m}{n}
\fi
\bool_if:NT \g__ltjpreset_deluxe_bool {
\DeclareKanjiFamily{JY3}{ltjpmg \int_to_arabic:n { \g__ltjpreset_applycount_int }}{}
\DeclareKanjiFamily{JT3}{ltjpmg \int_to_arabic:n { \g__ltjpreset_applycount_int }}{}
}
% ======
\tl_set:Nn \l_tmpa_tl {, CJKShape=JIS1990 }
\tl_if_eq:NNT \l__ltjpreset_kanji_shape_tl \l_tmpa_tl {
\tl_set:Nn \l__ltjpreset_kanji_shape_tl { ;+jp90 }
}
\tl_set:Nn \l_tmpa_tl {, CJKShape=JIS2004 }
\tl_if_eq:NNT \l__ltjpreset_kanji_shape_tl \l_tmpa_tl {
\tl_set:Nx \l__ltjpreset_kanji_shape_tl { ;+jp04 }
}
\ltj_preset_define_family:nnn {ltjpm} {m} {\__ltjpreset_font_mc_m:}
\ltj_preset_define_family:nnn {ltjpm} {bx} {\__ltjpreset_font_mc_bx:}
\ltj_preset_define_family:nnn {ltjpm} {b} {\__ltjpreset_font_mc_bx:}
\ltj_preset_define_family:nnn {ltjpg} {m} {\__ltjpreset_font_gt_m:}
\ltj_preset_define_family:nnn {ltjpg} {bx} {\__ltjpreset_font_gt_bx:}
\ltj_preset_define_family:nnn {ltjpg} {b} {\__ltjpreset_font_gt_bx:}
\normalfont
\bool_if:NT \g__ltjpreset_deluxe_bool {
\ltj_preset_define_family:nnn {ltjpm} {l} {\__ltjpreset_font_mc_l:}
\ltj_preset_define_family:nnn {ltjpg} {eb} {\__ltjpreset_font_gt_eb:}
\ltj_preset_define_family:nnn {ltjpmg} {m} {\__ltjpreset_font_mg_m:}
}
\group_end:
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%% fontspec
} {
\RequirePackage{luatexja-fontspec}
% scale
\msg_warning:nnx { luatexja-preset }{ scale }{ \Cjascale }
\tl_new:N \l__ltjpreset_add_features_tl
\bool_if:NT \g__ltjpreset_expert_bool {
\cs_set:Npn \rubyfamily { \addjfontfeatures {
Style=Ruby , YokoFeatures={RawFeature=-hkna} , TateFeatures={RawFeature=-vkna}
} }
}
\addjfontfeature{ Kerning=Off }
% 実際の fontspec の呼びだし
\cs_new:Nn \__ltjpreset_do_fontset: { \group_begin:
\tl_gset:Nx \l__ltjpreset_add_features_tl {
\tl_use:N \l__ltjpreset_kanji_shape_tl,
YokoFeatures = { JFM = \tl_use:N \__ltjpreset_use_jfm_yoko_tl },
TateFeatures = { JFM = \tl_use:N \__ltjpreset_use_jfm_tate_tl },
Script=CJK, \bool_if:NT \g__ltjpreset_noembed_bool { , NoEmbed }
}
\group_end:
\bool_if:NT \g__ltjpreset_expert_bool {
\tl_put_left:Nn \l__ltjpreset_add_features_tl {
, YokoFeatures = {Style = HorizontalKana}, TateFeatures = {Style = VerticalKana}
}
}
\setmainjfont [
\bool_if:NT \g__ltjpreset_deluxe_bool { FontFace={l}{n}{\__ltjpreset_font_mc_l:}, }
BoldFont = \__ltjpreset_font_mc_bx: \tl_use:N \l__ltjpreset_add_features_tl
] { \__ltjpreset_font_mc_m: }
\setsansjfont [
\bool_if:NT \g__ltjpreset_deluxe_bool { FontFace={eb}{n}{\__ltjpreset_font_gt_eb:}, }
BoldFont = \__ltjpreset_font_gt_bx: \tl_use:N \l__ltjpreset_add_features_tl
] { \__ltjpreset_font_gt_m: }
\bool_if:NT \g__ltjpreset_deluxe_bool {
%% mg
\bool_if_exist:NTF \setfontfamily {
\setjfontfamily \mgfamily [
BoldFont = \__ltjpreset_font_mg_m: \tl_use:N \l__ltjpreset_add_features_tl
] { \__ltjpreset_font_mg_m: }
} {
\newjfontfamily \mgfamily [
BoldFont = \__ltjpreset_font_mg_m: \tl_use:N \l__ltjpreset_add_features_tl
] { \__ltjpreset_font_mg_m: }
}
\DeclareTextFontCommand{\textmg}{\mgfamily}
}
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
}
\def\ltjnewpreset{
\@ifstar{\__ltjpreset_new_preset:nnn{ true }}{\__ltjpreset_new_preset:nnn{ false }}}
\cs_set:Nn \__ltjpreset_new_preset:nnn {
\keys_if_exist:nnTF { luatexja-preset } { #2 } {
\seq_if_in:NnTF \g__ltjpreset_presets_seq { #2 } {
\bool_if:cTF { c_ #1 _bool } {
\msg_warning:nnn { luatexja-preset }{ exist-preset-overwrite } { #2 }
\keys_define:nn { luatexja-preset } {
#2 .meta:n = { #3, __custom = true, __noembed = false, __office = false, },
#2 .value_forbidden:n = true, #2 .groups:n = { preset },
}
} {
\msg_error:nnn { luatexja-preset }{ exist-preset-nooverwrite } { #2 }
}
} {
\msg_error:nnn { luatexja-preset }{ illegal-preset-name } { #2 }
}
} {
\keys_define:nn { luatexja-preset } {
#2 .meta:n = { #3, __custom = true, __noembed = false, __office = false, },
#2 .value_forbidden:n = true, #2 .groups:n = { preset },
}
\seq_put_right:Nn \g__ltjpreset_presets_seq { #2 }
}
}
\cs_set:Npn \ltjapplypreset #1 {
\int_gincr:N \g__ltjpreset_applycount_int
\keys_set_groups:nnn { luatexja-preset } { preset } { #1 }
% \prop_map_inline:Nn \g__ltjpreset_font_prop {\typeout{ [##1] = "##2" } }
\__ltjpreset_extract_fonts:
\__ltjpreset_check_deluxe_existence:
\__ltjpreset_do_fontset:
\normalfont
}
\ltjapplypreset {}
\@onlypreamble\ltjnewpreset
\@onlypreamble\ltjapplypreset
\ExplSyntaxOff
\endinput
|