aozora4reader 1.1.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
data/memo.txt ADDED
@@ -0,0 +1,7 @@
1
+ おかしいデータ
2
+
3
+ * 舞姫
4
+
5
+ ※[#「金+※[#「插」でつくりの縦棒が下に突き抜けている、第4水準2-13-28]のつくり」、161-下-29]
6
+
7
+
data/sty/aozora.sty ADDED
@@ -0,0 +1,661 @@
1
+ \NeedsTeXFormat{pLaTeX2e}
2
+ \ProvidesPackage{aozora}[2004/05/05 v1.0b3 psitau]
3
+ \RequirePackage{verbatim}
4
+ \RequirePackage{keyval}
5
+ %
6
+ %$B%9%?%$%k%*%W%7%g%s(B
7
+ %
8
+ \newif\if@aaaaland \@aaaalandfalse
9
+ \newif\if@bbbbb \@bbbbbfalse
10
+ \newif\if@twoup \@twoupfalse
11
+ \newif\if@nakatoji \@nakatojifalse
12
+ \def\aozora@title@style{plain}
13
+ \def\aozora@dviware{dvipdfm}
14
+ \define@key{aozora}{title}[plain]{\def\aozora@title@style{#1}}
15
+ \define@key{aozora}{dviware}[dvipdfm]{\def\aozora@dviware{#1}}
16
+ \define@key{aozora}{final}[true]{\let\footnote\@gobble}
17
+ \define@key{aozora}{draft}[false]{\relax}
18
+ \define@key{aozora}{a4land}[false]{\@aaaalandtrue\@bbbbbfalse}
19
+ \define@key{aozora}{b5}[false]{\@aaaalandfalse\@bbbbbtrue}
20
+ \define@key{aozora}{2up}[false]{\@twouptrue\@nakatojifalse}
21
+ \define@key{aozora}{nakatoji}[false]{\@twoupfalse\@nakatojitrue}
22
+ \def\ProcessOptionsWithKV#1{%
23
+ \let\@tempc\relax%
24
+ \let\aozora@tempa\@empty
25
+ \@for\CurrentOption:=\@classoptionslist\do{%
26
+ \@ifundefined{KV@#1@\CurrentOption}%
27
+ {}%
28
+ {\edef\aozora@tempa{\aozora@tempa,\CurrentOption,}}%
29
+ }%
30
+ \edef\aozora@tempa{%
31
+ \noexpand\setkeys{#1}{%
32
+ \aozora@tempa\@ptionlist{\@currname.\@currext}%
33
+ }%
34
+ }%
35
+ \aozora@tempa
36
+ }
37
+ \ProcessOptionsWithKV{aozora}
38
+ \AtEndOfPackage{%
39
+ \let\@unprocessedoptions\relax
40
+ }
41
+ %graphic package$B$NFI$_9~$_(B
42
+ \RequirePackage[\aozora@dviware]{graphicx}
43
+ %
44
+ %$BJ8;z%5%$%:$N@_Dj(B
45
+ %
46
+ \newlength{\JQ}
47
+ \setlength{\JQ}{0.259817mm}
48
+ \renewcommand{\normalsize}{%
49
+ \@setfontsize\normalsize{13\JQ}{23H}%$BK\J8(B13$B5i(B $B9TAw$j(B23$B;u(B
50
+ \abovedisplayskip\z@ \belowdisplayskip\z@
51
+ \abovedisplayshortskip\z@ \belowdisplayshortskip\z@
52
+ \let\@listi\@listI}
53
+ %\normalsize
54
+ \setlength\Cht{6.5Q}
55
+ \setlength\Cdp{6.5Q}
56
+ \setlength\Cwd{13Q}
57
+ \setlength\Cvs{\baselineskip}
58
+ \setlength\Chs{13Q}
59
+ \renewcommand{\small}{%
60
+ \@setfontsize\small{12\JQ}{21H}%
61
+ \abovedisplayskip\z@ \belowdisplayskip\z@
62
+ \abovedisplayshortskip\z@ \belowdisplayshortskip\z@
63
+ \let\@listi\@listI}
64
+ \renewcommand{\footnotesize}{%
65
+ \@setfontsize\footnotesize{11\JQ}{16H}%
66
+ \abovedisplayskip\z@ \belowdisplayskip\z@
67
+ \abovedisplayshortskip\z@ \belowdisplayshortskip\z@
68
+ \let\@listi\@listI}
69
+ \renewcommand{\scriptsize}{\@setfontsize\scriptsize{9\JQ}{12H}}
70
+ \renewcommand{\tiny}{\@setfontsize\tiny{6.5\JQ}{9H}}
71
+ \renewcommand{\large}{\@setfontsize\large{14\JQ}{23H}}
72
+ \renewcommand{\Large}{\@setfontsize\Large{18\JQ}{31H}}
73
+ \renewcommand{\LARGE}{\@setfontsize\LARGE{20\JQ}{36H}}
74
+ \renewcommand{\huge}{\@setfontsize\huge{24\JQ}{40H}}
75
+ \renewcommand{\Huge}{\@setfontsize\Huge{36\JQ}{47H}}
76
+ \newcommand{\HUGE}{\@setfontsize\HUGE{60}{72}}
77
+ \newcommand{\TINY}{\@setfontsize\TINY{3.25\JQ}{4.5H}}
78
+ %
79
+ %$BHGLL$N@_Dj(B
80
+ %
81
+ \setlength\columnseprule{0pt}
82
+ \setlength\marginparsep{0pt}
83
+ \setlength\marginparwidth{0pt}
84
+ \setlength\columnsep{39H}%$BCJ4V(B3$BJ8;zJ,(B
85
+ \if@bbbbb
86
+ \addtolength\topmargin{0.5cm}
87
+ \if@twocolumn
88
+ \setlength\textwidth{819H}%$B#19T(B63$B;z5M!"(B1$BCJ(B30$B;z5M$a(B
89
+ \else
90
+ \PackageError{aozora}{You can't use a onecolumn option in b5.}{Use an twocolumn option.}
91
+ \fi
92
+ \setlength\textheight{552H}
93
+ \@twoupfalse
94
+ \else
95
+ \if@aaaaland
96
+ \if@twocolumn
97
+ \PackageError{aozora}{You can't use a twocolumn option in a4land.}{Use an onecolumn option.}
98
+ \else
99
+ \setlength\textwidth{650H}%50$B;z5M(B
100
+ \fi
101
+ \setlength\textheight{943H}
102
+ \@twoupfalse
103
+ \else
104
+ \if@twocolumn
105
+ \setlength\textwidth{689H}%$B#19T(B53$B;z5M!"(B1$BCJ(B25$B;z5M$a(B
106
+ \else
107
+ \setlength\textwidth{650H}%50$B;z5M(B
108
+ \fi
109
+ \setlength\textheight{414H}
110
+ \fi
111
+ \fi
112
+ \addtolength\textheight{13H}
113
+ \setlength\topmargin{-1in}
114
+ \addtolength\topmargin{1cm}
115
+ \setlength\headheight{20H}
116
+ \setlength\topskip{\Cht}
117
+ \setlength\headsep{20H}
118
+ \setlength{\footskip}{23H}
119
+ %$B:81&$N6u$-(B($BHGLL$,:81&Cf1{$KMh$k$h$&$K@_Dj(B)
120
+ \dimen0=\paperwidth
121
+ \advance\dimen0 by -\textheight
122
+ \oddsidemargin=.5\dimen0
123
+ \advance\oddsidemargin by -1in
124
+ \evensidemargin=\oddsidemargin
125
+ %$B6&DL$N@_Dj(B
126
+ \kanjiskip=0pt plus .0625zw minus .0625zw%$BOB;z4V$O:GBg(B16$BJ,$^$G1d$S!":GBg(B16$BJ,=L$`(B
127
+ \xkanjiskip=.25zw plus .083zw minus .125zw%$BOB2$J84V$O:GBg(B3$BJ,$^$G1d$S!":GBg(B8$BJ,$^$G=L$`(B
128
+ \maxdepth=\topskip
129
+ %$BCJMn$N@_Dj(B
130
+ \setlength\parskip{0pt}
131
+ \setlength\parsep{0pt}
132
+ \setlength\partopsep{0pt}
133
+ \setlength\parindent{0pt}
134
+ \raggedbottom
135
+ \AtBeginDocument{\obeylines}
136
+ %
137
+ %$B9T@07AMQ%Q%i%a!<%?(B
138
+ %
139
+ \clubpenalty=0
140
+ \widowpenalty=0
141
+ \jcharwidowpenalty=0
142
+ \displaywidowpenalty=0
143
+ \prebreakpenalty\jis"2147=10000 % 5000 $B!G(B
144
+ \postbreakpenalty\jis"2148=10000 % 5000 $B!H(B
145
+ \prebreakpenalty\jis"2149=10000 % 5000 $B!I(B
146
+ \inhibitxspcode`$B")(B=2
147
+ \prebreakpenalty\jis"2133=10000
148
+ \prebreakpenalty\jis"2134=10000
149
+ \prebreakpenalty\jis"2135=10000
150
+ \prebreakpenalty\jis"2136=10000
151
+ %
152
+ %font$B$N@_Dj(B
153
+ %
154
+ \def\chapterfont{\mcfamily\bfseries}%\chapter$B$N8+=P$7(B
155
+ \def\headfont{\gtfamily\sffamily}%\section, \subsetion$B$N8+=P$7(B
156
+ \def\titlefont{\gtfamily\bfseries}%$BBjL>$N%U%)%s%H(B
157
+ \def\subtitlefont{\gtfamily}%$BI{Bj$N%U%)%s%H(B
158
+ \def\authorfont{\gtfamily}%$BCx<T$N%U%)%s%H(B
159
+ %
160
+ % chapter$B$N:FDj5A(B
161
+ %
162
+ \def\chapter#1{%
163
+ \cleardoublepage
164
+ \if@twocolumn
165
+ \@restonecoltrue\onecolumn
166
+ \else
167
+ \@restonecolfalse\newpage
168
+ \fi
169
+ \thispagestyle{empty}%
170
+ \let\footnotesize\small
171
+ \let\footnoterule\relax
172
+ \begingroup
173
+ \def\rubykatuji{\rubyfamily\small}
174
+ \vbox to\textheight\bgroup\tate\hsize\textwidth
175
+ \vfil
176
+ {\centering\Huge\chapterfont #1\par}%
177
+ \vfil
178
+ \egroup
179
+ \endgroup
180
+ \markboth{}{#1}
181
+ \addcontentsline{toc}{chapter}{#1}
182
+ \if@restonecol\twocolumn \else \newpage \fi
183
+ }
184
+ \def\@chapter[#1]#2{%$BCx<TL>IU$-(B
185
+ \cleardoublepage
186
+ \if@twocolumn
187
+ \@restonecoltrue\onecolumn
188
+ \else
189
+ \@restonecolfalse\newpage
190
+ \fi
191
+ \thispagestyle{empty}%
192
+ \let\footnotesize\small
193
+ \let\footnoterule\relax
194
+ \begingroup
195
+ \def\rubykatuji{\rubyfamily\small}
196
+ \vbox to\textheight\bgroup\tate\hsize\textwidth
197
+ \vfil
198
+ {\centering\Huge\chapterfont #2\par}%
199
+ {\centering\huge\chapterfont #1\par}%
200
+ \vfil
201
+ \egroup
202
+ \endgroup
203
+ \markboth{}{#2}
204
+ \addcontentsline{toc}{chapter}{#2$B!!(B#1}
205
+ \if@restonecol\twocolumn \else \newpage \fi
206
+ }
207
+ %
208
+ %$B%;%/%7%g%s$N:FDj5A(B
209
+ %
210
+ \def\@startsection#1#2#3#4#5#6{%
211
+ \if@noskipsec \leavevmode \fi
212
+ \par
213
+ \@tempskipa #4\relax
214
+ \@afterindenttrue
215
+ \ifdim \@tempskipa <\z@
216
+ \@tempskipa -\@tempskipa \@afterindentfalse
217
+ \fi
218
+ \if@nobreak
219
+ \ifnum#2=2\vspace{\sectosubsec}\fi
220
+ \everypar{}%
221
+ \else
222
+ \addpenalty\@secpenalty
223
+ \ifdim \@tempskipa >\z@
224
+ \null
225
+ \vspace*{-\baselineskip}\vskip\@tempskipa
226
+ \fi
227
+ \fi
228
+ \noindent
229
+ \@ifstar
230
+ {\@ssect{#3}{#4}{#5}{#6}}%
231
+ {\@dblarg{\@sect{#1}{#2}{#3}{#4}{#5}{#6}}}}
232
+
233
+ \def\@sect#1#2#3#4#5#6[#7]#8{%
234
+ \ifnum #2>\c@secnumdepth
235
+ \let\@svsec\@empty
236
+ \else
237
+ \refstepcounter{#1}%
238
+ \protected@edef\@svsec{\@seccntformat{#1}\relax}%
239
+ \fi
240
+ \@tempskipa #5\relax
241
+ \ifdim \@tempskipa<\z@
242
+ \def\@svsechd{%
243
+ #6{\hskip #3\relax
244
+ \@svsec #8}%
245
+ \csname #1mark\endcsname{#7}%
246
+ \addcontentsline{toc}{#1}{%
247
+ \ifnum #2>\c@secnumdepth \else
248
+ \protect\numberline{\csname the#1\endcsname}%
249
+ \fi
250
+ #7}}
251
+ \else
252
+ \begingroup
253
+ \interlinepenalty \@M
254
+ #6{%
255
+ \@hangfrom{\hskip #3\relax\@svsec}%
256
+ #8\@@par}%
257
+ \endgroup
258
+ \csname #1mark\endcsname{#7}%
259
+ \addcontentsline{toc}{#1}{%
260
+ \ifnum #2>\c@secnumdepth \else
261
+ \protect\numberline{\csname the#1\endcsname}%
262
+ \fi
263
+ #7}% $BL\<!$K%U%k%M!<%`$r:\$;$k$J$i(B #8
264
+ \fi
265
+ \@xsect{#5}}
266
+ %
267
+ %***************from ipsj style file*******************
268
+ %
269
+ %% Modify \@xsect to avoid (buggy) \clubpenalty=10000. (H.N.)
270
+ %
271
+ \def\@xsect#1{\@tempskipa #1\relax
272
+ \ifdim \@tempskipa<\z@
273
+ \glboal\@nobreakfalse \global\@noskipsectrue
274
+ \everypar{\global\@noskipsecfalse \hskip-\parindent
275
+ \begingroup \@svsechd \endgroup \unskip
276
+ \hskip -#1\everypar{}}%
277
+ \else
278
+ \par \nobreak
279
+ \vskip \@tempskipa \global\@nobreaktrue
280
+ \everypar{\global\@nobreakfalse
281
+ \if@afterindent\else {\setbox0\lastbox}\fi%
282
+ \everypar{}}%
283
+ \fi\ignorespaces}
284
+
285
+ \def\@ssect#1#2#3#4#5{%
286
+ \@tempskipa #3\relax
287
+ \ifdim \@tempskipa<\z@
288
+ \def\@svsechd{#4{\hskip #1\relax #5}}
289
+ \else
290
+ \begingroup
291
+ #4{%
292
+ \@hangfrom{\hskip #1}%
293
+ \interlinepenalty \@M #5\@@par}%
294
+ \endgroup
295
+ \fi
296
+ \@xsect{#3}}
297
+ %
298
+ %$B%;%/%7%g%s(B
299
+ %
300
+ \def\metadata#1{\relax}
301
+ \def\subtitle#1{\gdef\@subtitle{#1}}
302
+ \def\subauthor#1{\gdef\@subauthor{#1}}
303
+ \renewcommand{\section}{\@startsection{section}{1}{\z@}{23H}{23H}{\@sectionfont}}%3$B9T<h$j(B
304
+ \renewcommand{\subsection}{\@startsection{subsection}{2}{\z@}%
305
+ {11.5H}{11.5H}{\@subsectionfont}}%2$B9T<h$j!"(Bsection$B$ND>8e$@$H9g$o$;$F(B4$B9T<h$j(B
306
+ \def\@sectionfont{\reset@font\seclarge\headfont}
307
+ \def\@subsectionfont{\reset@font\subseclarge\headfont}
308
+ \newcommand{\seclarge}{\@setfontsize\seclarge{18\JQ}{23H}}
309
+ \newcommand{\subseclarge}{\@setfontsize\subseclarge{14\JQ}{23H}}
310
+ \newlength{\sectosubsec}
311
+ \setlength{\sectosubsec}{-11.5H}
312
+ %
313
+ %$B%?%$%H%kItJ,(B
314
+ %
315
+ \def\biblioname{$B@D6uJ88K(B}
316
+ \def\azbanner{\hbox{\yoko\includegraphics[height= 1.5cm]{azlogo.eps}}\hspace*{50Q}}
317
+ \renewcommand{\maketitle}{
318
+ \cleardoublepage
319
+ \if@twoup
320
+ \c@page=0
321
+ \null\thispagestyle{empty}\clearpage
322
+ \fi
323
+ \if@twocolumn
324
+ \@restonecoltrue\onecolumn
325
+ \else
326
+ \@restonecolfalse\newpage
327
+ \fi
328
+ \thispagestyle{empty}
329
+ \setcounter{page}\@ne
330
+ \begingroup
331
+ \let\footnotesize\small
332
+ \let\footnoterule\relax
333
+ \let\thanks\p@thanks
334
+ \let\footnote\thanks
335
+ \if@bbbbb
336
+ \@ifundefined{\aozora@title@style @b5}
337
+ {\plain@a5}%
338
+ {\expandafter\csname\aozora@title@style @b5\endcsname}
339
+ \else
340
+ \if@aaaaland
341
+ \@ifundefined{\aozora@title@style @a4land}
342
+ {\plain@a4land}%
343
+ {\expandafter\csname\aozora@title@style @a4land\endcsname}
344
+ \else
345
+ \@ifundefined{\aozora@title@style @a5}
346
+ {\plain@a5}%
347
+ {\expandafter\csname\aozora@title@style @a5\endcsname}
348
+ \fi
349
+ \fi
350
+ \endgroup
351
+ \clearpage
352
+ \thispagestyle{empty}
353
+ \az@title@back
354
+ \if@restonecol\twocolumn \else \newpage \fi
355
+ \clearpage
356
+ \setcounter{footnote}{0}%
357
+ \global\let\thanks\relax
358
+ \global\let\p@thanks\relax
359
+ \global\let\@thanks\@empty
360
+ \global\let\@author\@empty
361
+ \global\let\@date\@empty
362
+ \global\let\@title\@empty
363
+ \global\let\date\relax
364
+ \global\let\and\relax
365
+ }%
366
+ \def\az@title@back{%$B%?%$%H%k$NN"(B
367
+ \vbox to\textheight{\vss%
368
+ \hbox to\textwidth{\tate\hfill\azbanner}
369
+ \vss
370
+ }%
371
+ }
372
+ %
373
+ %$B%G%U%)%k%H$N%?%$%H%k%Z!<%8(B
374
+ %
375
+ \@namedef{plain@a5}{\begingroup
376
+ \def\rubykatuji{\rubyfamily\small}
377
+ \vbox to\textheight\bgroup\tate\hsize\textwidth
378
+ \null\vfil
379
+ \begin{center}%
380
+ {\Huge\titlefont \@title \par}%
381
+ \@ifundefined{@subtitle}{\relax}{{\vskip 0.5em\huge\subtitlefont \@subtitle \par}}
382
+ \vskip 3em%
383
+ {\huge
384
+ \lineskip .75em%
385
+ \begin{tabular}[t]{c}%
386
+ \authorfont\@author
387
+ \@ifundefined{@subauthor}{\relax}{\\\authorfont\@subauthor}
388
+ \end{tabular}\par}%
389
+ \end{center}\par
390
+ \vfil\null
391
+ \egroup
392
+ \endgroup
393
+ }
394
+ \@namedef{plain@a4land}{\begingroup
395
+ \def\rubykatuji{\rubyfamily\small}
396
+ \vbox to \textwidth\bgroup\yoko\hsize\textheight
397
+ \null\vfil
398
+ \begin{center}%
399
+ {\HUGE\titlefont\kanjiskip 0pt plus 0pt minus 0pt \@title \par}%
400
+ \vskip 3em%
401
+ {\Huge
402
+ \lineskip .75em%
403
+ \begin{tabular}[t]{c}%
404
+ \authorfont\@author
405
+ \@ifundefined{@subauthor}{\relax}{\\\authorfont\@subauthor}
406
+ \end{tabular}\par}%
407
+ \end{center}\par
408
+ \vfil\null
409
+ \egroup
410
+ \endgroup
411
+ }
412
+ \def\cleardoublepage{\clearpage
413
+ \ifodd\c@page
414
+ \else
415
+ \hbox{}\thispagestyle{empty}\newpage
416
+ \if@twocolumn\hbox{}\newpage\fi
417
+ \fi
418
+ }
419
+ % $B%^%/%m$J$I(B
420
+ \def\ruby{\kana}
421
+ \def\Ruby#1#2{\kana[2]{#1}{#2}}
422
+ \def\RUBY#1#2{\kana[3]{#1}{#2}}
423
+ \let\KANA=\KANAtop
424
+ \def\$B!=!=(B{$B!=(B\kern-.5zw$B!=(B\kern-.5zw$B!=(B}
425
+ \newenvironment{jisage}[1]{\advance\leftskip#1zw}{}
426
+ \def\sirogomabou#1{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny\ajWhiteSesame}}\bou{#1}\egroup}
427
+ \def\marubou#1{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B!|(B}}\bou{#1}\egroup}
428
+ \def\siromarubou#1{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B!{(B}}\bou{#1}\egroup}
429
+ \def\kurosankakubou#1{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B"%(B}}\bou{#1}\egroup}
430
+ \def\sirosankakubou#1{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B"$(B}}\bou{#1}\egroup}
431
+ \def\nijyuumarubou#1{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B!}(B}}\bou{#1}\egroup}
432
+ \def\jyanomebou#1{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny\UTF{25C9}}}\bou{#1}\egroup}
433
+ \def\ajKunojiwithsirogomaBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny\ajWhiteSesame}}\ajKunojiwithBou\egroup}
434
+ \def\ajKunojiwithmaruBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B!|(B}}\ajKunojiwithBou\egroup}
435
+ \def\ajKunojiwithsiromaruBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B!{(B}}\ajKunojiwithBou\egroup}
436
+ \def\ajKunojiwithkurosankakuBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B"%(B}}\ajKunojiwithBou\egroup}
437
+ \def\ajKunojiwithsirosankakuBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B"$(B}}\ajKunojiwithBou\egroup}
438
+ \def\ajKunojiwithnijyuumaruBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B!}(B}}\ajKunojiwithBou\egroup}
439
+ \def\ajKunojiwithjyanomeBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny\UTF{25C9}}}\ajKunojiwithBou\egroup}
440
+ \def\ajDKunojiwithsirogomaBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny\ajWhiteSesame}}\ajDKunojiwithBou\egroup}
441
+ \def\ajDKunojiwithmaruBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B!|(B}}\ajDKunojiwithBou\egroup}
442
+ \def\ajDKunojiwithsiromaruBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B!{(B}}\ajDKunojiwithBou\egroup}
443
+ \def\ajDKunojiwithkurosankakuBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B"%(B}}\ajDKunojiwithBou\egroup}
444
+ \def\ajDKunojiwithsirosankakuBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B"$(B}}\ajDKunojiwithBou\egroup}
445
+ \def\ajDKunojiwithnijyuumaruBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny$B!}(B}}\ajDKunojiwithBou\egroup}
446
+ \def\ajDKunojiwithjyanomeBou{\bgroup\renewcommand{\boutenchar}{\hbox to 1zh{\tate\hfil\tiny\UTF{25C9}}}\ajDKunojiwithBou\egroup}
447
+ \def\kaeriten#1{%
448
+ \nobreak\setbox1\hbox{$B$"(B}\setbox2\hbox{\tiny $B$"(B}
449
+ \ifdim\ht1=\ht2
450
+ \setbox1\hbox{$B$"(B}\setbox2\hbox{\TINY $B$"(B}
451
+ \dimen1=\ht1 \advance\dimen1 by -\ht2
452
+ \raisebox{-\dimen1}{\TINY #1}%
453
+ \else
454
+ \dimen1=\ht1 \advance\dimen1 by -\ht2
455
+ \raisebox{-\dimen1}{\tiny #1}%
456
+ \fi
457
+ }%
458
+ \def\okurigana#1{%
459
+ \nobreak\setbox1\hbox{$B$"(B}\setbox2\hbox{\tiny $B$"(B}
460
+ \ifdim\ht1=\ht2
461
+ \setbox1\hbox{$B$"(B}\setbox2\hbox{\TINY $B$"(B}
462
+ \dimen1=\ht1 \advance\dimen1 by -\ht2
463
+ \raisebox{\dimen1}{\TINY #1}%
464
+ \else
465
+ \dimen1=\ht1 \advance\dimen1 by -\ht2
466
+ \raisebox{\dimen1}{\tiny #1}%
467
+ \fi
468
+ }%
469
+ \def\bousen#1{#1}
470
+ \if@twoup
471
+ \dimen0=2\paperwidth
472
+ \AtBeginDvi{\special{pdf: pagesize height \the\paperheight\space width \the\dimen0}}
473
+ \RequirePackage[notombow, spread]{1010crop}
474
+ \fi
475
+ \if@nakatoji \else
476
+ \AtBeginDvi{\special{pdf: pagesize height \the\paperheight\space width \the\paperwidth}}
477
+ \AtBeginDvi{\special{pdf:docview <</ViewerPreferences <</Direction /R2L>> >>}}
478
+ \fi
479
+ \newcounter{notecount}
480
+ \setcounter{notecount}{0}
481
+ \def\thenotecount{\@arabic\c@notecount}
482
+ \def\endnote#1{%
483
+ \stepcounter{notecount}%
484
+ \raisebox{0.75zh}{\tiny\ajTsumekakko{\c@notecount}}%
485
+ \expandafter\gdef\csname note@\number\c@notecount\endcsname{#1}%
486
+ }
487
+ \def\endnotehead{$B8eCp(B}
488
+ \def\theendnotes{%
489
+ \@ifundefined{note@1}{\relax}{%
490
+ \expandafter\subsection*{\endnotehead}%
491
+ \@tempcnta=\thenotecount\relax%
492
+ \advance\@tempcnta by1\relax%
493
+ \setcounter{notecount}{0}%
494
+ \begin{description}
495
+ \loop
496
+ \stepcounter{notecount}
497
+ \ifnum\@tempcnta>\c@notecount
498
+ \item[\ajTsumekakko{\c@notecount}]\csname note@\number\c@notecount\endcsname\par
499
+ \global\expandafter\let\csname note@\number\c@notecount\endcsname=\@undefined%
500
+ \repeat
501
+ \end{description}
502
+ }%
503
+ \setcounter{notecount}{0}%
504
+ }
505
+ %
506
+ %$BJ#ZKJ8=q$NF1;~=hM}(B
507
+ %
508
+ \def\ArticleInput#1{%
509
+ \begingroup
510
+ \def\documentclass[##1]##2{\relax}
511
+ \def\usepackage{\@ifnextchar[{\az@temp@usepackage}{\az@temp@usepackage[]}}
512
+ \def\az@temp@usepackage[##1]##2{\relax}
513
+ \def\maketitle{\@chapter[\@author]{\@title}}
514
+ \def\document{\relax}
515
+ \let\enddocument\endinput
516
+ \renewenvironment{teihon}{\comment}{\endcomment}
517
+ \def\renewenvironment##1##2##3{\relax}
518
+ \input{#1}
519
+ \endgroup
520
+ }
521
+ \def\articleinput#1{%
522
+ \begingroup
523
+ \def\documentclass[##1]##2{\relax}
524
+ \def\usepackage{\@ifnextchar[{\az@temp@usepackage}{\az@temp@usepackage[]}}
525
+ \def\az@temp@usepackage[##1]##2{\relax}
526
+ \def\maketitle{\chapter{\@title}}
527
+ \def\author##1{\relax}
528
+ \def\document{\relax}
529
+ \let\enddocument\endinput
530
+ \renewenvironment{teihon}{\comment}{\endcomment}
531
+ \def\renewenvironment##1##2##3{\relax}
532
+ \input{#1}
533
+ \endgroup
534
+ }
535
+ %
536
+ %$B%X%C%@$NDj5A(B
537
+ %
538
+ \def\ps@aozora{\let\ps@jpl@in\ps@headnombre
539
+ \let\@oddfoot\@empty\let\@evenfoot\@empty
540
+ \def\@evenhead{\footnotesize\hfil\leftmark\hspace*{36H}\thepage\hspace*{13H}\null}%
541
+ \def\@oddhead{\footnotesize\null\hspace*{13H}\thepage\hspace*{36H}\rightmark\hfil}%
542
+ \let\@mkboth\markboth
543
+ }
544
+ \pagestyle{aozora}
545
+ %
546
+ %$BDlK\$N=hM}$NJQ99!J%@%_!<4D6-!K(B
547
+ %
548
+ \newenvironment{teihon}{\relax}{\relax}
549
+ %
550
+ %$BL\<!$NBN:[$N@_Dj(B
551
+ %
552
+ \def\addcontentsline#1#2#3{%
553
+ \protected@write\@auxout
554
+ {\let\label\@gobble \let\index\@gobble \let\glossary\@gobble
555
+ \@temptokena{\rensuji{\ajLabel\ajTsumesuji2{page}}}}%
556
+ {\string\@writefile{#1}%
557
+ {\protect\contentsline{#2}{#3}{\the\@temptokena}}}%
558
+ }
559
+ \setcounter{tocdepth}{0}%$BL\<!$K:\$k$N$O(B\chapter$B$^$G(B
560
+ \renewcommand{\@pnumwidth}{2zw}
561
+ \setlength\toclineskip{\z@}
562
+ \def\contentsname{$BL\(B\hskip2zw $B<!(B}
563
+ \renewcommand{\tableofcontents}{%
564
+ \if@twocolumn\@restonecoltrue\onecolumn\else\@restonecolfalse\fi
565
+ \begingroup
566
+ \if@twoup \clearpage\else \cleardoublepage\fi
567
+ \pagestyle{empty}
568
+ \vspace*{1\baselineskip}
569
+ {\leftskip13zw\mcfamily\contentsname\par}
570
+ \vspace*{0.5\baselineskip}
571
+ \@starttoc{toc}%
572
+ \clearpage
573
+ \endgroup
574
+ \if@restonecol\twocolumn\fi
575
+ }
576
+ \renewcommand*{\l@chapter}[2]{%
577
+ \ifnum \c@tocdepth >\m@ne
578
+ \begingroup
579
+ \vspace{0.5\baselineskip}
580
+ \rightskip\@pnumwidth
581
+ \advance\rightskip15zw
582
+ \parfillskip-\@pnumwidth
583
+ \leftskip10zw
584
+ \leavevmode
585
+ #1\hskip1zw\nobreak\leaders\hbox to 1zw{$B!D(B}\hfil\nobreak\hbox to\@pnumwidth{\hss#2}\par
586
+ \endgroup
587
+ \fi
588
+ }
589
+ %
590
+ %$B%?%$%H%k%Z!<%8$N%t%!%j%(!<%7%g%s(B
591
+ %
592
+ \def\reserved@a{webomints}
593
+ \ifx\aozora@title@style\reserved@a
594
+ \@namedef{webomints@a5}{\begingroup
595
+ \def\wb##1##2{\fontsize{##1}{##2}\usefont{U}{webo}{xl}{n}}
596
+ \def\rubykatuji{\rubyfamily\small}
597
+ \def\titlefont{\mcfamily\bfseries\propshape}
598
+ \def\authorfont{\mcfamily}
599
+ \if@restonecol \dimen1=0.92\textwidth \else \dimen1=0.97\textwidth\fi
600
+ \leavevmode\hspace*{3mm}\hbox to 0pt{%
601
+ \vbox to \dimen1\bgroup\yoko\hsize\textheight
602
+ \hbox to \textheight{{\wb{36bp}{36bp}A}\hfil{\wb{36bp}{36bp}B}}\par
603
+ \vskip 100pt
604
+ \begin{center}%
605
+ \begin{minipage}{0.8\textheight}
606
+ {\centering\Huge\titlefont \@title \par}%
607
+ \@ifundefined{@subtitle}{\relax}{{\vskip 0.5em\centering\huge\subtitlefont \@subtitle \par}}
608
+ \end{minipage}
609
+ \vskip 30pt%
610
+ {\huge
611
+ \lineskip .75em%
612
+ \begin{tabular}[t]{c}%
613
+ \authorfont\@author
614
+ \@ifundefined{@subauthor}{\relax}{\\\authorfont\@subauthor}
615
+ \end{tabular}\par}%
616
+ \vfil
617
+ {\wb{15bp}{15bp}8}\par
618
+ \vskip 15pt%
619
+ {\large\mcfamily\bfseries \biblioname \par}%
620
+ \end{center}\par
621
+ \hbox to \textheight{{\wb{36bp}{36bp}C}\hfil{\wb{36bp}{36bp}D}}\par
622
+ \egroup
623
+ \hss}
624
+ \endgroup
625
+ }
626
+ \fi
627
+ \def\reserved@a{framed}
628
+ \ifx\aozora@title@style\reserved@a
629
+ \RequirePackage{niceframe}
630
+ \@namedef{framed@a5}{\begingroup
631
+ \def\rubykatuji{\rubyfamily\small}
632
+ \def\titlefont{\mcfamily\bfseries}
633
+ \def\authorfont{\mcfamily}
634
+ \if@restonecol \dimen1=0.92\textwidth \else \dimen1=0.97\textwidth\fi
635
+ \leavevmode\hspace*{3mm}\hbox to 0pt{%
636
+ \vbox to \dimen1\bgroup\yoko\hsize\textheight
637
+ \vskip 60pt
638
+ \hbox to \textheight{\hss\niceframe[0.8\textheight]{%
639
+ \begin{center}%
640
+ \begin{minipage}{0.6\textheight}
641
+ {\centering\Huge\titlefont \@title \par}%
642
+ \@ifundefined{@subtitle}{\relax}{{\vskip 0.5em\centering\huge\subtitlefont \@subtitle \par}}
643
+ \end{minipage}
644
+ \vskip 10pt%
645
+ {\huge
646
+ \lineskip .75em%
647
+ \begin{tabular}[t]{c}%
648
+ \authorfont\@author
649
+ \@ifundefined{@subauthor}{\relax}{\\\authorfont\@subauthor}
650
+ \end{tabular}\par}%
651
+ \vskip 20pt
652
+ {\ding C}\par
653
+ \vskip 5pt%
654
+ {\large\mcfamily\bfseries \biblioname \par}%
655
+ \end{center}\par
656
+ }\hss}
657
+ \egroup
658
+ \endgroup
659
+ }
660
+ \fi
661
+ \endinput