blob: 497ec378f3b8ba05f376da50aa1ed532928e254e (
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.24 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
|
