aozora4reader 1.1.0

Sign up to get free protection for your applications and to get access to all the features.
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