summaryrefslogtreecommitdiff
path: root/fonts/morisawa/morisawa.dtx
blob: 458d0736ceb00ce2cbf3a3507c2388e1bd10f1b2 (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
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
% ^^A -*- japanese-latex -*-
%
% \ifx\epTeXinputencoding\undefined\else
%   \epTeXinputencoding utf8 % ^^A added (2017-10-04)
% \fi
%
% \iffalse
%
%<*driver>
\ifx\epTeXinputencoding\undefined\else
  \epTeXinputencoding utf8
\fi
%</driver>
%
%  モリサワ基本5書体を使うためのパッケージ
%  奥村晴彦 <okumura@okumuralab.org>
%
%<morisawa>\NeedsTeXFormat{pLaTeX2e}
%<morisawa>\ProvidesPackage{morisawa}[2018/03/06 okumura, texjporg]
%<*driver>
\documentclass{jsarticle}
\usepackage{doc}
\xspcode"5C=1 %% \
\xspcode"22=1 %% "
\usepackage[fake]{morisawa}
\addtolength{\textwidth}{-1in}
\addtolength{\evensidemargin}{1in}
\addtolength{\oddsidemargin}{1in}
\addtolength{\marginparwidth}{1in}
\setlength\marginparsep{5pt}
\setlength\marginparpush{0pt}
% \OnlyDescription
\CodelineNumbered
\DisableCrossrefs
\setcounter{StandardModuleDepth}{1}
\GetFileInfo{morisawa.sty}
\begin{document}
  \DocInput{morisawa.dtx}
\end{document}
%</driver>
%
% \fi
%
% \title{モリサワ基本5書体パッケージ}
% \author{奥村晴彦}
% \date{\filedate}
% \maketitle
%
% \MakeShortVerb{\|}
%
% \section{はじめに}
%
% これはモリサワ基本5書体を使うためのパッケージです。
% ご自由に修正してお使いください。
%
% [2002-12-19] いろいろなものに収録していただく際にライセンスを明確にする
% 必要が生じてきました。アスキーのものが最近はmodified BSDライセンスになっ
% ていますので,私のものもそれに準じてmodified BSDとすることにします。
%
% モリサワ基本5書体とは
% \begin{itemize}
% \item リュウミンL(Ryumin-Light)
% \item 中ゴシックBBB(GothicBBB-Medium)
% \item 太ミン(FutoMinA101-Bold)
% \item 太ゴ(FutoGoB101-Bold)
% \item じゅん(Jun101-Light)
% \end{itemize}
% のことです。
%
% これらを使うには,アスキーが配布している |morisawa.tar.gz|
% が必要です。また,dvips(k)のmapファイルに次のように書いておきます。
%
%\begin{verbatim}
% rml             Ryumin-Light-H
% rmlv            Ryumin-Light-V
% gbm             GothicBBB-Medium-H
% gbmv            GothicBBB-Medium-V
% ryumin-l        Ryumin-Light-H
% ryumin-l-v      Ryumin-Light-V
% gtbbb-m         GothicBBB-Medium-H
% gtbbb-m-v       GothicBBB-Medium-V
% futomin-b       FutoMinA101-Bold-H
% futomin-b-v     FutoMinA101-Bold-V
% futogo-b        FutoGoB101-Bold-H
% futogo-b-v      FutoGoB101-Bold-V
% jun101-l        Jun101-Light-H
% jun101-l-v      Jun101-Light-V
%\end{verbatim}
%
% もともとPSプリンタに実装されている場合以外は,
% モリサワ5書体を買い揃えてもしかたがありませんが,
% これらの名前は標準的なので,
% 実際の出力時には他のフォントで置き換える場合でも,
% これらの名前を仮に使っておくと便利です。
%
% たとえば『[改訂版]\LaTeXe 美文書作成入門』(2000年)
% ではヒラギノに置き換えるために dvips(k)のmapファイルに
% 次のように書いておきました。
%
%\begin{verbatim}
% rml             Ryumin-Light-H
% rmlv            Ryumin-Light-V
% gbm             GothicBBB-Medium-H
% gbmv            GothicBBB-Medium-V
% ryumin-l        HiraginoMin-W3-H
% ryumin-l-v      HiraginoMin-W3-V
% gtbbb-m         HiraginoKaku-W5-H
% gtbbb-m-v       HiraginoKaku-W5-V
% futomin-b       HiraginoMin-W3-H
% futomin-b-v     HiraginoMin-W3-H
% futogo-b        HiraginoKaku-W5-H
% futogo-b-v      HiraginoKaku-W5-V
% jun101-l        HiraginoKaku-W2-H
% jun101-l-v      HiraginoKaku-W2-V
%\end{verbatim}
%
% \section{簡単な使い方}
%
% |{\kanjifamily{rml}\selectfont リュウミン}| → {\kanjifamily{rml}\selectfont リュウミン}
%
% |{\kanjifamily{gbm}\selectfont 中ゴシック}| → {\kanjifamily{gbm}\selectfont 中ゴシック}
%
% |{\kanjifamily{fma}\selectfont 太ミン}| → {\kanjifamily{fma}\selectfont 太ミン}
%
% |{\kanjifamily{gbm}\fontseries{bx}\selectfont 太ゴ}| → {\kanjifamily{gbm}\fontseries{bx}\selectfont 太ゴ}
%
% |{\kanjifamily{jun}\selectfont じゅん}| → {\kanjifamily{jun}\selectfont じゅん}
%
% |\textgt{\bfseries 太ゴ}| と書くと\textgt{\bfseries 太ゴ}になります。
%
% |\textbf{\gtfamily 太ゴ}| と書いても\textbf{\gtfamily 太ゴ}になります。
%
% |\textmg{じゅん}| または |{\mgfamily じゅん}| と書くと\textmg{じゅん}になります。
%
% |\texttt{じゅん}| や |{\ttfamily じゅん}| でも\texttt{じゅん}になります。
%
% 本文を{\kanjifamily{fma}\selectfont 太ミン}にするには |\renewcommand{\mcdefault}{fma}| とします。
%
% \StopEventually{}
% 
% \section{オプションの定義}
% 
%    \begin{macrocode}
%<*morisawa>
\newif\if@fake \@fakefalse
\DeclareOption{fake}{\@faketrue}
\ProcessOptions\relax
%    \end{macrocode}
% 
% \section{各フォントの定義}
%
% \texttt{fd} ファイルを使用するのはやめました。
%
% 明朝体です。ボールドを太ミンにするには
%\begin{verbatim}
% \DeclareFontShape{JY1}{rml}{bx}{n}{<-> s * [0.961] FutoMinA101-Bold-J}{}
%\end{verbatim}
% とすればいいのですが,ここでは互換性のため明朝のボールドを中ゴシックにします。
%
%    \begin{macrocode}
\DeclareKanjiFamily{JY1}{rml}{}
\DeclareKanjiFamily{JT1}{rml}{}
\if@fake
  \DeclareFontShape{JY1}{rml}{m}{n}{<-> s * [0.961] jis}{}
  \DeclareFontShape{JY1}{rml}{bx}{n}{<-> s * [0.961] jisg}{}
  \DeclareFontShape{JT1}{rml}{m}{n}{<-> s * [0.961] tmin10}{}
  \DeclareFontShape{JT1}{rml}{bx}{n}{<-> s * [0.961] tgoth10}{}
\else
  \DeclareFontShape{JY1}{rml}{m}{n}{<-> s * [0.961] Ryumin-Light-J}{}
  \DeclareFontShape{JY1}{rml}{bx}{n}{<-> s * [0.961] GothicBBB-Medium-J}{}
  \DeclareFontShape{JT1}{rml}{m}{n}{<-> s * [0.961] Ryumin-Light-V}{}
  \DeclareFontShape{JT1}{rml}{bx}{n}{<-> s * [0.961] GothicBBB-Medium-V}{}
\fi
%    \end{macrocode}
%
% 太明朝体です。
%
%    \begin{macrocode}
\DeclareKanjiFamily{JY1}{fma}{}
\DeclareKanjiFamily{JT1}{fma}{}
\if@fake
  \DeclareFontShape{JY1}{fma}{m}{n}{<-> s * [0.961] jis}{}
  \DeclareFontShape{JY1}{fma}{bx}{n}{<-> s * [0.961] jisg}{}
  \DeclareFontShape{JT1}{fma}{m}{n}{<-> s * [0.961] tmin10}{}
  \DeclareFontShape{JT1}{fma}{bx}{n}{<-> s * [0.961] tgoth10}{}
\else
  \DeclareFontShape{JY1}{fma}{m}{n}{<-> s * [0.961] FutoMinA101-Bold-J}{}
  \DeclareFontShape{JY1}{fma}{bx}{n}{<-> s * [0.961] GothicBBB-Medium-J}{}
  \DeclareFontShape{JT1}{fma}{m}{n}{<-> s * [0.961] FutoMinA101-Bold-V}{}
  \DeclareFontShape{JT1}{fma}{bx}{n}{<-> s * [0.961] FutoGoB101-Bold-V}{}
\fi
%    \end{macrocode}
%
% ゴシック体です。ボールド体にすると太ゴになります。
%
%    \begin{macrocode}
\DeclareKanjiFamily{JY1}{gbm}{}
\DeclareKanjiFamily{JT1}{gbm}{}
\if@fake
  \DeclareFontShape{JY1}{gbm}{m}{n}{<-> s * [0.961] jisg}{}
  \DeclareFontShape{JY1}{gbm}{bx}{n}{<-> s * [0.961] jisg}{}
  \DeclareFontShape{JT1}{gbm}{m}{n}{<-> s * [0.961] tgoth10}{}
  \DeclareFontShape{JT1}{gbm}{bx}{n}{<-> s * [0.961] tgoth10}{}
\else
  \DeclareFontShape{JY1}{gbm}{m}{n}{<-> s * [0.961] GothicBBB-Medium-J}{}
  \DeclareFontShape{JY1}{gbm}{bx}{n}{<-> s * [0.961] FutoGoB101-Bold-J}{}
  \DeclareFontShape{JT1}{gbm}{m}{n}{<-> s * [0.961] GothicBBB-Medium-V}{}
  \DeclareFontShape{JT1}{gbm}{bx}{n}{<-> s * [0.961] FutoGoB101-Bold-V}{}
\fi
%    \end{macrocode}
%
% 丸ゴシックの「じゅん101」です。
%
%    \begin{macrocode}
\DeclareKanjiFamily{JY1}{jun}{}
\DeclareKanjiFamily{JT1}{jun}{}
\if@fake
  \DeclareFontShape{JY1}{jun}{m}{n}{<-> s * [0.961] jisg}{}
  \DeclareFontShape{JY1}{jun}{bx}{n}{<->ssub*jun/m/n}{}
  \DeclareFontShape{JT1}{jun}{m}{n}{<-> s * [0.961] tgoth10}{}
  \DeclareFontShape{JT1}{jun}{bx}{n}{<->ssub*jun/m/n}{}
\else
  \DeclareFontShape{JY1}{jun}{m}{n}{<-> s * [0.961] Jun101-Light-J}{}
  \DeclareFontShape{JY1}{jun}{bx}{n}{<->ssub*jun/m/n}{}
  \DeclareFontShape{JT1}{jun}{m}{n}{<-> s * [0.961] Jun101-Light-V}{}
  \DeclareFontShape{JT1}{jun}{bx}{n}{<->ssub*jun/m/n}{}
\fi
%    \end{macrocode}
%
% \section{フォント関連コマンド}
%
% 標準の明朝を \texttt{rml},標準のゴシックを \texttt{gbm} とします。
% 欧文にサンセリフ体を選ぶと和文はゴシック体になるようにします。
%
%    \begin{macrocode}
\renewcommand{\mcdefault}{rml}
\renewcommand{\gtdefault}{gbm}
% \DeclareRobustCommand\gtfamily{%
%   \not@math@alphabet\gtfamily\textgt
%   \romanfamily\sfdefault
%   \kanjifamily\gtdefault
%   \selectfont}
\DeclareRobustCommand\sffamily{%
  \not@math@alphabet\sffamily\mathsf
  \romanfamily\sfdefault
  \kanjifamily\gtdefault
  \selectfont}
%    \end{macrocode}
%
% \begin{macro}{\mgfamily}
% \begin{macro}{\mgdefault}
% \begin{macro}{\textmg}
%
% 丸ゴシック関連のコマンド |\mgfamily|,|\mgdefault|,|\textmg|
% を新設します。標準の丸ゴシックを \texttt{jun} とします。
%
% 欧文にタイプライタ体を選ぶと和文は丸ゴシック体になるようにしていましたが,
% 中ゴシック体のほうがいいというご意見で,元に戻しました。
% いや,それは単にmapファイルの問題だ,というのでまた丸ゴシック体に戻りました。|^^;|
%
% [2018-03-06] |\textmg| をrobustにしました。
%    \begin{macrocode}
\newcommand{\mgdefault}{jun}
\DeclareRobustCommand\mgfamily{%
  \not@math@alphabet\mgfamily\textmg
% \romanfamily\ttdefault
  \kanjifamily\mgdefault
  \selectfont}
\DeclareRobustCommand\ttfamily{%
  \not@math@alphabet\ttfamily\mathtt
  \romanfamily\ttdefault
  \kanjifamily\mgdefault
% \kanjifamily\gtdefault
  \selectfont}
% \DeclareTextFontCommand{\textmg}{\mgfamily}
% \def\textmg#1{\relax\ifmmode\hbox\fi{\mgfamily #1}}
\DeclareRobustCommand\textmg[1]{%
    \relax\ifmmode \expandafter\nfss@text \fi{\mgfamily #1}}
%    \end{macrocode}
%
% \end{macro}
% \end{macro}
% \end{macro}
%
% 基準となる長さを再設定をします。
% これをしておかないと,標準ドキュメントクラスと組み合わせると
% 段落の字下げが揃わなくなります。
%
% [2018-02-28] 基準とする文字を「全角空白」(EUCコード\texttt{0xA1A1})から
% 「漢」(JISコード\texttt{0x3441})へ変更しました。
%    \begin{macrocode}
\normalfont\normalsize
\setbox0\hbox{\char\jis"3441}%
\setlength\Cht{\ht0}
\setlength\Cdp{\dp0}
\setlength\Cwd{\wd0}
\setlength\Cvs{\baselineskip}
\setlength\Chs{\wd0}
\setlength\parindent{1\Cwd}
%    \end{macrocode}
%
% 以上です。
%
%    \begin{macrocode}
%</morisawa>
\endinput
%    \end{macrocode}
%
% ^^A \endinput の後に \CharacterTable を書いておけば,子ファイルには
% ^^A 出力されません。チェックは *.dtx を処理したときにしてくれます。
%
% \Finale