blob: 475fa8238c89b412a5d659192dbd6d8d2c739bb3 (
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
112
113
114
115
|
%% File `memucs-gremph.sty`
%%
%% Copyright (c) 2006-2014 Kangsoo Kim <karnes at ktug org>
%%
%% This work may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.3c
%% of this license or (at your option) any later version.
%% The latest version of this license is in
%% http://www.latex-project.org/lppl.txt
%% and version 1.3c or later is part of all distributions of LaTeX
%% version 2006/05/20 or later.
%%
\ProvidesPackage{memucs-gremph}
\RequirePackage{xkeyval}
\newif\if@bfemph\@bfemphfalse
%\DeclareOption{bfemph}{\@bfemphtrue}
%\ProcessOptions
\DeclareOptionX{bfemph}[]{\@bfemphtrue}
%\newif\if@gremph\@gremphtrue
\newif\if@vargremphhangulfont\@vargremphhangulfontfalse
\newif\if@vargremphhanjafont\@vargremphhanjafontfalse
\DeclareOptionX{gremphhangul}[nanumgt]{\@vargremphhangulfonttrue\def\GrEmphFont{#1}}
\DeclareOptionX{gremphhanja}[nanumgt]{\@vargremphhanjafonttrue\def\GrEmphHanjaFont{#1}}
%\define@key{dhucs-gremph.sty}{gremphhangulfont}[utgr]{\@vargremphhangulfonttrue\def\GremphFont{#1}}
%\define@key{dhucs-gremph.sty}{gremphhanjafont}[utgt]{\@vargremphhanjafonttrue\def\GrEmphHanjaFont{#1}}
\ProcessOptionsX
%\if@bfemph
% \def\GrEmphFont{utbt}
% \def\GrEmphHanjaFont{utbt}
%\else
\if@unfont
\if@vargremphhangulfont\else
\def\GrEmphFont{outgr}\fi
\if@vargremphhanjafont\else
\def\GrEmphHanjaFont{outgt}\fi
\else
\if@vargremphhangulfont\else
\def\GrEmphFont{nanumgt}\fi
\if@vargremphhanjafont\else
\def\GrEmphHanjaFont{nanumgt}\fi
\fi
%\fi
%\def\SetGremphFonts#1#2{%
% \def\GrEmphFont{#1}%
% \def\GrEmphHanjaFont{#2}%
%}
\if@bfem
\DeclareFontFamily{LUC}{grem}{\hyphenchar \font\m@ne}
\DeclareFontShape{LUC}{grem}{m}{n}{<-> LUC * \GrEmphFont b}{}
\DeclareFontShape{LUC}{grem}{m}{it}{<-> LUC * \GrEmphFont b}{}
\DeclareFontShape{LUC}{grem}{m}{sl}{<-> LUC * \GrEmphFont b}{}
\DeclareFontFamily{LUC}{gremhj}{\hyphenchar \font\m@ne}
\DeclareFontShape{LUC}{gremhj}{m}{n}{<-> LUC * \GrEmphHanjaFont b}{}
\DeclareFontShape{LUC}{gremhj}{m}{it}{<-> LUC * \GrEmphHanjaFont b}{}
\DeclareFontShape{LUC}{gremhj}{m}{sl}{<-> LUC * \GrEmphHanjaFont b}{}
\else
\DeclareFontFamily{LUC}{grem}{\hyphenchar \font\m@ne}
\DeclareFontShape{LUC}{grem}{m}{n}{<-> LUC * \GrEmphFont m}{}
\DeclareFontShape{LUC}{grem}{m}{it}{<-> LUC * \GrEmphFont m}{}
\DeclareFontShape{LUC}{grem}{m}{sl}{<-> LUC * \GrEmphFont m}{}
\DeclareFontFamily{LUC}{gremhj}{\hyphenchar \font\m@ne}
\DeclareFontShape{LUC}{gremhj}{m}{n}{<-> LUC * \GrEmphHanjaFont m}{}
\DeclareFontShape{LUC}{gremhj}{m}{it}{<-> LUC * \GrEmphHanjaFont m}{}
\DeclareFontShape{LUC}{gremhj}{m}{sl}{<-> LUC * \GrEmphHanjaFont m}{}
\fi
\if@gremph
\DeclareRobustCommand\itshape
{\not@math@alphabet\itshape\mathit
\fontshape\itdefault\selectfont\SetAdhocFonts{grem}{gremhj}}
%\DeclareRobustCommand\slshape\itshape
\DeclareRobustCommand\slshape
{\not@math@alphabet\slshape\relax
\fontshape\sldefault\selectfont\SetAdhocFonts{grem}{gremhj}}
\else\fi
\def\regremph{%
\@gremphtrue
\DeclareRobustCommand*{\itshape}%
{\not@math@alphabet\itshape\mathit
\fontshape\itdefault\selectfont\SetAdhocFonts{grem}{gremhj}}%
% \DeclareRobustCommand\slshape\itshape
\DeclareRobustCommand\slshape
{\not@math@alphabet\slshape\relax
\fontshape\sldefault\selectfont\SetAdhocFonts{grem}{gremhj}}%
}
\def\ungremph{%
\@gremphfalse
\DeclareRobustCommand*{\itshape}%
{\not@math@alphabet\itshape\mathit
\fontshape\itdefault\selectfont}%
\DeclareRobustCommand\slshape
{\not@math@alphabet\slshape\relax
\fontshape\sldefault\selectfont}%
}
% \slhangul
\def\slhangul#1{%
\bgroup
\fontshape{sl}\selectfont #1\egroup
}
\endinput
% end of style.
%
% CHANGE LOG.
% * 2014/06/12. \if@unfonts => \if@unfont
% * 2007/08/02. redundant space bug fix
% * 2007/06/08. \slshape independent from \itshape
% * 2005/08/17. \slhangul added.
|
