summaryrefslogtreecommitdiff
path: root/language/japanese/japanese-otf-uptex/sty/mlutf.sty
blob: cf6a7e7b03eec4457840fe4d330eac1c380af154 (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
\NeedsTeXFormat{pLaTeX2e}
\ProvidesPackage{mlutf}[2004/04/17 v1.1.2 psitau, u0.25 ttk]
%force catcode of \" be 12
\count@\catcode`\"
\catcode`\"=12
\DeclareRobustCommand{\UTFK}[1]{\begingroup%
	\edef\reserved@a{\gtdefault}\ifx\k@family\reserved@a \kanjiseries{bx}\fi%
	\kanjifamily{utfk}\uppercase{\set@character="#1}%
	\endgroup%
}
\DeclareRobustCommand{\UTFC}[1]{\begingroup%
	\edef\reserved@a{\gtdefault}\ifx\k@family\reserved@a \kanjiseries{bx}\fi%
	\kanjifamily{utfc}\uppercase{\set@character="#1}%
	\endgroup%
}
\DeclareRobustCommand{\UTFT}[1]{\begingroup%
	\edef\reserved@a{\gtdefault}\ifx\k@family\reserved@a \kanjiseries{bx}\fi%
	\kanjifamily{utft}\uppercase{\set@character="#1}%
	\endgroup%
}
\DeclareRobustCommand{\UTFM}[1]{\begingroup%
	\edef\reserved@a{\gtdefault}\ifx\k@family\reserved@a \kanjiseries{bx}\fi%
	\kanjifamily{utf}\uppercase{\set@character="#1}%
	\endgroup%
}
\catcode`\"=\count@
%end of changing catcode of \"
\gdef\Redefine@MLUTF{%
	\@ifpackageloaded{hyperref}{%
		\def\hyper@UTFC##1{\ifHy@pdfstring\hyper@UTF@{##1}\else\csname UTFC \endcsname{##1}\fi}
		\def\hyper@UTFK##1{\ifHy@pdfstring\hyper@UTF@{##1}\else\csname UTFK \endcsname{##1}\fi}
		\def\hyper@UTFT##1{\ifHy@pdfstring\hyper@UTF@{##1}\else\csname UTFT \endcsname{##1}\fi}
		\def\hyper@UTFM##1{\ifHy@pdfstring\hyper@UTF@{##1}\else\csname UTFM \endcsname{##1}\fi}
		\def\UTFC{\protect\hyper@UTFC}
		\def\UTFK{\protect\hyper@UTFK}
		\def\UTFT{\protect\hyper@UTFT}
		\def\UTFM{\protect\hyper@UTFM}
	}{}
}
\AtBeginDocument{\Redefine@MLUTF}

\DeclareKanjiFamily{\otf@JYn}{utfk}{}
\DeclareKanjiFamily{\otf@JTn}{utfk}{}
\Declare@FontShape{utfk}{m}{0123456789abcdef}{utfkmr}
\Declare@FontShape{utfk}{bx}{0123456789abcdef}{utfkgr}
\DeclareKanjiFamily{\otf@JYn}{utfc}{}
\DeclareKanjiFamily{\otf@JTn}{utfc}{}
\Declare@FontShape{utfc}{m}{0123456789abcdefklmo}{utfcmr}
\Declare@FontShape{utfc}{bx}{0123456789abcdefklmo}{utfcgr}
\DeclareKanjiFamily{\otf@JYn}{utft}{}
\DeclareKanjiFamily{\otf@JTn}{utft}{}
\Declare@FontShape{utft}{m}{0123456789abcdefklmnopqrstuvwxz}{utftmr}
\Declare@FontShape{utft}{bx}{0123456789abcdefklmnopqrstuvwxz}{utftgr}
\DeclareKanjiFamily{\otf@JYn}{utf}{}
\DeclareKanjiFamily{\otf@JTn}{utf}{}
\Declare@FontShape{utf}{m}{0123456789abcdefjklmnopqrstuvwxyz}{utfmr}
\Declare@FontShape{utf}{bx}{0123456789abcdefjklmnopqrstuvwxyz}{utfgr}
\endinput