summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/fonts/japanese-otf-uptex/test/uplatex/era.tex
blob: 65be6c52452c2ee8a46689a7d7b7baf62d1c1c03 (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
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
% -*- coding: utf-8 -*-

%%%%%%%%
% ①,②,③,④,⑤,⑥ のどれかを実行すればよい。
%   ① platex, 新元号なし
%   $ platex era.tex
%   ② uplatex, 新元号なし
%   $ uplatex era.tex
%   ③ platex, 新元号あり
%   $ platex "\def\era{true}\input" era.tex
%   ④ uplatex, 新元号あり
%   $ uplatex "\def\era{true}\input" era.tex
%   ⑤ platex, 新元号あり、\ajLig{令和}も含む
%   $ platex "\def\era{full}\input" era.tex
%   ⑥ uplatex, 新元号あり、\ajLig{令和}も含む
%   $ uplatex "\def\era{full}\input" era.tex
%%%%%%

\newif\ifuptexmode\uptexmodefalse
\ifnum\jis"2121="3000 \uptexmodetrue\fi

\makeatletter

\def\@opt@{multi}
\def\@default{default}
\def\@full{full}

\ifx\option\@undefined
 \def\option{default}
\fi
\ifx\option\@default
\else
 \edef\@opt@{\option,\@opt@}
\fi

\ifx\class\@undefined
 \ifuptexmode
  \def\engine{upLaTeX}
 \else
  \def\engine{pLaTeX}
 \fi
\fi

\newif\ifnewera\newerafalse
\ifx\era\@undefined
 \edef\era{なし}
\else
 \neweratrue
 \ifx\era\@full
  \def\ligNewEra{\ajLig{令和}}
  \edef\era{あり (ajLigも含む)}
 \else
  \def\ligNewEra{\relax}
  \edef\era{あり}
 \fi
\fi
\typeout{## 新元号:\era ##}

\documentclass[a4paper,draft,autodetect-engine]{jsarticle}

\usepackage{plext}
\usepackage[\@opt@]{otf}

\makeatother
\edef\bs{$\backslash$\kern0em}

\begin{document}
\parindent0pt

エンジン:\texttt{\engine}\\
オプション:\texttt{\option}\\
新元号:\era

\vskip1zh

\bs{}ajLig: \ajLig{明治}\ajLig{大正}\ajLig{昭和}\ajLig{平成}\ifnewera\ligNewEra\fi

\bs{}UTF: \UTF{337E}\UTF{337D}\UTF{337C}\UTF{337B}\ifnewera\UTF{32FF}\fi

\bs{}CID: \CID{7621}\CID{7622}\CID{7623}\CID{8323}\ifnewera\CID{23058}\fi

\ifuptexmode

UTF-8: ㍾㍽㍼㍻\ifnewera ㋿\fi

\bs{}kchar: \kchar"337E\kchar"337D\kchar"337C\kchar"337B\ifnewera\kchar"32FF\fi

\fi

\vskip1zh

\parbox<t>{25.0zw}{

\bs{}ajLig: \ajLig{明治}\ajLig{大正}\ajLig{昭和}\ajLig{平成}\ifnewera\ligNewEra\fi

\bs{}UTF: \UTF{337E}\UTF{337D}\UTF{337C}\UTF{337B}\ifnewera\UTF{32FF}\fi

\bs{}CID: \CID{12041}\CID{12042}\CID{12043}\CID{12044}\ifnewera\CID{23059}\fi

\ifuptexmode

UTF-8: ㍾㍽㍼㍻\ifnewera ㋿\fi

\bs{}kchar: \kchar"337E\kchar"337D\kchar"337C\kchar"337B\ifnewera\kchar"32FF\fi

\fi

}

\end{document}