From 6165f44cf87ca75b6071efd3b3d171f9f7cf9f5f Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 27 Apr 2017 21:35:21 +0000 Subject: pxrubrica (27apr17) git-svn-id: svn://tug.org/texlive/trunk@44082 c570f23f-e606-0410-a88d-b1316a301751 --- .../texmf-dist/doc/platex/pxrubrica/README-ja.md | 8 +- Master/texmf-dist/doc/platex/pxrubrica/README.md | 11 +- .../doc/platex/pxrubrica/pxrubrica-en.pdf | Bin 52216 -> 52345 bytes .../doc/platex/pxrubrica/pxrubrica-en.tex | 4 +- .../texmf-dist/doc/platex/pxrubrica/pxrubrica.pdf | Bin 371210 -> 440838 bytes .../doc/platex/pxrubrica/sample/test-sample.pdf | Bin 0 -> 299469 bytes .../doc/platex/pxrubrica/sample/test-sample.tex | 136 ++ .../source/platex/pxrubrica/pxrubrica.dtx | 2096 +++++++++++++++++++- .../texmf-dist/tex/platex/pxrubrica/pxrubrica.sty | 892 ++++++++- 9 files changed, 3101 insertions(+), 46 deletions(-) create mode 100644 Master/texmf-dist/doc/platex/pxrubrica/sample/test-sample.pdf create mode 100644 Master/texmf-dist/doc/platex/pxrubrica/sample/test-sample.tex (limited to 'Master/texmf-dist') diff --git a/Master/texmf-dist/doc/platex/pxrubrica/README-ja.md b/Master/texmf-dist/doc/platex/pxrubrica/README-ja.md index fb4d4a9657c..249c2581590 100644 --- a/Master/texmf-dist/doc/platex/pxrubrica/README-ja.md +++ b/Master/texmf-dist/doc/platex/pxrubrica/README-ja.md @@ -7,13 +7,15 @@ JIS 規格「JIS X 4051」および W3C 技術ノート「[日本語組版処理 で述べられているような、日本において一般的な様式に従ってルビを付ける 機能を提供する。 +1.3 版より、圏点出力機能が追加された。 + [日本語組版処理の要件]: ### 前提環境 * フォーマット： LaTeX * エンジン： pTeX／upTeX／LuaTeX／XeTeX - * DVI ウェア： pTeX 対応のもの + * DVI ウェア（DVI 出力時）： pTeX 対応のもの ### 構成物 @@ -45,6 +47,10 @@ MITライセンスの下で配布される。 更新履歴 -------- + * Version 1.3 〈2017/04/27〉 + - 圏点出力機能（ルビ圏点同時付加を含む）。 + - 和文ゴースト処理の改良。 + - hyperref の PDF 文字列に対する対策。 * Version 1.2 〈2017/04/20〉 - 自動切換のモノルビ・熟語ルビ。 - 安全モード。 diff --git a/Master/texmf-dist/doc/platex/pxrubrica/README.md b/Master/texmf-dist/doc/platex/pxrubrica/README.md index f013d0ee34a..f826a14bcd0 100644 --- a/Master/texmf-dist/doc/platex/pxrubrica/README.md +++ b/Master/texmf-dist/doc/platex/pxrubrica/README.md @@ -8,13 +8,16 @@ follows the style conventional in Japanese typography, as described in the W3C technical note “Requirements for Japanese Text Layout” ([JLREQ]) and the JIS specification JIS X 4051. +Starting with version 1.3, this package also provides function to add +kenten (emphasis marks) to Japanese text. + [JLREQ]: ### SYSTEM REQUIREMENTS * TeX format: LaTeX. - * TeX engine: pTeX and its derivatives. - * DVI driver: Anything that supports pTeX DVI. + * TeX engine: pTeX, upTeX, LuaTeX, XeTeX. + * DVI driver (in DVI output): Anything that supports pTeX DVI. ### CONTENT @@ -47,6 +50,10 @@ This package is distributed under the MIT License. Revision History ---------------- + * Version 1.3 〈2017/04/27〉 + - Kenten function. + - Improve Japanese-text ghost insertion. + - Support the use in PDF strings. * Version 1.2 〈2017/04/20〉 - Mono-ruby and jukugo-ruby with switching. - Safe mode. diff --git a/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica-en.pdf b/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica-en.pdf index 5c126debab3..5508115bfd2 100644 Binary files a/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica-en.pdf and b/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica-en.pdf differ diff --git a/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica-en.tex b/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica-en.tex index 53cb23a1686..3f4b244e1a5 100644 --- a/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica-en.tex +++ b/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica-en.tex @@ -8,8 +8,8 @@ \newcommand*{\Eg}{E.\,g.\mbox{}} \newcommand*{\eg}{e.\,g.\mbox{}} \newcommand*{\ie}{i.\,e.\mbox{}} -\newcommand*{\myfileversion}{1.2} -\newcommand*{\myfiledate}{2017/04/20} +\newcommand*{\myfileversion}{1.3} +\newcommand*{\myfiledate}{2017/04/27} \newsavebox{\myexample} \begin{document} diff --git a/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica.pdf b/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica.pdf index 10d6ea72fb1..ece8940db9b 100644 Binary files a/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica.pdf and b/Master/texmf-dist/doc/platex/pxrubrica/pxrubrica.pdf differ diff --git a/Master/texmf-dist/doc/platex/pxrubrica/sample/test-sample.pdf b/Master/texmf-dist/doc/platex/pxrubrica/sample/test-sample.pdf new file mode 100644 index 00000000000..8c295a0915e Binary files /dev/null and b/Master/texmf-dist/doc/platex/pxrubrica/sample/test-sample.pdf differ diff --git a/Master/texmf-dist/doc/platex/pxrubrica/sample/test-sample.tex b/Master/texmf-dist/doc/platex/pxrubrica/sample/test-sample.tex new file mode 100644 index 00000000000..667848d4c76 --- /dev/null +++ b/Master/texmf-dist/doc/platex/pxrubrica/sample/test-sample.tex @@ -0,0 +1,136 @@ +\documentclass[autodetect-engine,dvi=dvipdfmx,ja=standard, + a4paper]{bxjsarticle} +\usepackage{setspace} +\usepackage{pxrubrica} +\newcommand*{\vb}{\symbol{`\|}} +\newcommand*{\Opt}[1]{\texttt{#1}} +\newcommand*{\PKN}[1]{\textsf{#1}} +\newsavebox{\myexample} +\rubysetup{f} +\begin{document} + +\title{\PKN{pxrubrica}パッケージサンプル} +\author{某ZR} +\date{コンパイル日付： \today} +\maketitle + +\section{サンプル} + +\subsection{基本的な用法} + +\begin{itemize} +\item モノルビ（\Opt{m}オプション）：各漢字に一つのルビブロック\\ +例：\quad +\verb+\ruby[m]{鷹}{たか}+ → \ruby[m]{鷹}{たか}\quad +\verb+\ruby[m]{鶯}{うぐいす}+ → \ruby[m]{鶯}{うぐいす} +\item グループルビ（\Opt{m}オプション）：漢字列全体に一つのルビブロック\\ +例：\quad +\verb+\ruby[g]{雲雀}{ひばり}+ → \ruby[g]{雲雀}{ひばり}\quad +\verb+\ruby[g]{不如帰}{ほととぎす}+ → \ruby[g]{不如帰}{ほととぎす} +\item 熟語ルビ（\Opt{j}オプション）：各漢字にルビを対応させるが熟語として読む\\ +例：\quad +\verb+\ruby[j]{孔雀}{く|じゃく}+ → \ruby[j]{孔雀}{く|じゃく}\quad +\verb+\ruby[j]{七面鳥}{しち|めん|ちょう}+ → \ruby[j]{七面鳥}{しち|めん|ちょう} +\item ルビ文字列中の \verb+|+ は各漢字の読みの境界を示す。 +（孔＝く、雀＝じゃく）。 +グループルビでは不要である。 +\item 組版結果の比較： +\begin{quote}\begin{tabular}{ll@{\ }l@{\ }c*3{@{\quad}c}} +モノルビ & (\verb+\ruby[m]{小鳩}{こ|ばと}+) & → + & \ruby[m]{小鳩}{こ|ばと} + & \ruby[m]{鶺鴒}{せき|れい} + & \ruby[m]{雷鳥}{らい|ちょう} + & \ruby[m]{燕}{つばめ} +\\ +グループルビ & (\verb+\ruby[g]{小鳩}{こばと}+) & → + & \ruby[g]{小鳩}{こばと} + & \ruby[g]{鶺鴒}{せきれい} + & \ruby[g]{雷鳥}{らいちょう} + & \ruby[g]{燕}{つばめ} +\\ +熟語ルビ & (\verb+\ruby[j]{小鳩}{こ|ばと}+) & → + & \ruby[j]{小鳩}{こ|ばと} + & \ruby[j]{鶺鴒}{せき|れい} + & \ruby[j]{雷鳥}{らい|ちょう} + & \ruby[j]{燕}{つばめ} +\end{tabular}\end{quote} +熟語の各漢字とルビが対応する場合は、熟語ルビ（\Opt{j}）を使い、 +そうでない（熟字訓の）場合はグループルビ（\Opt{g}）を使うのが通例である。 +特に熟語の各漢字ごとの読みを明示したい場合は +モノルビ（\Opt{m}）を使うとよい。 +なお、漢字一文字に対するルビの場合は、 +\Opt{m}、\Opt{g}、\Opt{j}の何れも同じ結果になる。 +\item オプションの既定値を \verb+\rubysetup+ 命令で設定できる。 +例えば、\verb+\rubysetup{g}\ruby{軍鶏}{しゃも}+ +は \verb+\ruby[g]{軍鶏}{しゃも}+ と等価になる。 +“既定値の既定値”は\Opt{|cjPeF|}である。 +\end{itemize} + +\subsection{進入・突出} + +\begin{itemize} +\item ルビの進入の制御： +\begin{center}\begin{tabular}{ll@{\ }l@{\ }c*2{@{\quad}c}} +進入無し & \verb+この\ruby[|-|]{鵲}{かささぎ}の+ & → + & この\ruby[|-|]{鵲}{かささぎ}の + & この\ruby[|-|]{鸛}{こうのとり}の + & この\ruby[|-|]{鵜}{う}の +\\ +進入量小 & \verb+この\ruby[(-)]{鵲}{かささぎ}の+ & → + & この\ruby[(-)]{鵲}{かささぎ}の + & この\ruby[(-)]{鸛}{こうのとり}の + & この\ruby[(-)]{鵜}{う}の +\\ +進入量大 & \verb+この\ruby[<->]{鵲}{かささぎ}の+ & → + & この\ruby[<->]{鵲}{かささぎ}の + & この\ruby[<->]{鸛}{こうのとり}の + & この\ruby[<->]{鵜}{う}の +\end{tabular}\end{center} +\item もし「ルビは仮名にはかけてよいが漢字はダメ」という場合は、 +“\verb+この\ruby[<-|]{鵲}{かささぎ}等+” +と書くと「この\ruby[<-|]{鵲}{かささぎ}等」の出力が得られる。 +\item 基本モード（\Opt{m}／\Opt{g}／\Opt{j}）と進入を同時に指定したい場合は、 +オプション文字列を \Opt{|g|} や \Opt{|m>} のようにする。 +ここで、“\Opt{-}”は「基本モードは既定値を用いる」ことを意味する。 +\item 突出の制御： +オプション \Opt{||} で突出が抑止される。 +\begin{quote} +\begin{lrbox}{\myexample} +\small$\leftarrow$ \verb+\ruby[||->]{雀}{すずめ}+ +\end{lrbox} +\fbox{\parbox{.42\linewidth}{% +\ruby[||->]{雀}{すずめ}の… +\quad \usebox{\myexample}% +\rule{0pt}{12pt}\\ +インコの +}}\quad vs.\quad +\begin{lrbox}{\myexample} +\small$\leftarrow$ \verb+\ruby[|->]{雀}{すずめ}+ +\end{lrbox} +\fbox{\parbox{.42\linewidth}{% +\ruby[|->]{雀}{すずめ}の… +\quad \usebox{\myexample}% +\rule{0pt}{12pt}\\ +インコの +}} +\end{quote} +\end{itemize} + +\subsection{発展的な用法} + +\begin{itemize} +\item \verb+\aruby+：欧文に対してルビを付ける： +\par\noindent 例：\quad +\verb+\aruby{Get out}{ゲラウッ}!+ →\ + \aruby{Get out}{ゲラウッ}! +\item \verb+\rubyfontsetup+：ルビ出力のためのフォントを指定する。 +例えば、ゴシック体の漢字列に対して明朝体のルビを振りたい場合は、 +次のようにする： +\par\noindent +{\small +\verb+\rubyfontsetup{\mcfamily}この{\gtfamily \ruby[j]{明朝体}{みん|ちょう|たい}}+} +→\ +{\rubyfontsetup{\mcfamily}この{\gtfamily \ruby[j]{明朝体}{みん|ちょう|たい}}} +\end{itemize} + +\end{document} diff --git a/Master/texmf-dist/source/platex/pxrubrica/pxrubrica.dtx b/Master/texmf-dist/source/platex/pxrubrica/pxrubrica.dtx index 9a46020499d..33b036c5126 100644 --- a/Master/texmf-dist/source/platex/pxrubrica/pxrubrica.dtx +++ b/Master/texmf-dist/source/platex/pxrubrica/pxrubrica.dtx @@ -20,9 +20,9 @@ %<*driver> \ProvidesFile{pxrubrica.dtx} % - [2017/04/20 v1.2 PX Japanese-style ruby] + [2017/04/27 v1.3 PX Japanese-style ruby] %<*driver> -\documentclass{jsarticle} +\documentclass[uplatex]{jsarticle} \usepackage{doc} \addtolength{\textwidth}{-1in} \addtolength{\evensidemargin}{1in} @@ -68,6 +68,7 @@ % \setcounter{tocdepth}{3} % \tableofcontents % +%^^A------------------------------------ % \section{$B%Q%C%1!<%8FI9~(B} % % |\usepackage| $BL?Na$rMQ$$$FFI$_9~$`!#(B @@ -76,7 +77,8 @@ %\usepackage{pxrubrica} %\end{verbatim}\end{quote} % -% \section{$B4pK\5!G=(B} +%^^A------------------------------------ +% \section{$B%k%S5!G=(B} % % \subsection{$BMQ8l=8(B} % @@ -515,6 +517,252 @@ % % \end{itemize} % +%^^A------------------------------------ +% \section{$B7wE@5!G=(B} +% +% \subsection{$B7wE@MQL?Na(B} +% +% \begin{itemize} +% \item |\kenten[|\jmeta{$B%*%W%7%g%s(B}|]{|\jmeta{$B?FJ8;z(B}|}| +% +% $BOBJ8J8;zNs$N>eB&!J2#AH!K!?1&B&!J=DAH!K$K7wE@$rIU$9(B +% $B!J%*%W%7%g%s$G5UB&$K$b$G$-$k!K!#(B +% +% \jmeta{$B%*%W%7%g%s(B}$B$OJ#?t;XDj2DG=$G!"GSB>$J;XDj$,J;B8$7$?>l9g$O(B +% $B8e$N$b$N$,M-8z$K$J$k!#(B +% $B$^$?!">JN,$5$l$?;XDj$K$D$$$F$O(B |\kentensetup| $B$G;XDj$5$l$?(B +% $B4{DjCM$,MQ$$$i$l$k!#(B +% +% $B%*%W%7%g%s$K;XDj$G$-$kCM$O0J2<$NDL$j!#(B +% \begin{quote} +% \newcommand*\fro[1]{{\scriptsize($<$\,\textit{#1})}} +% \begin{tabular}[t]{l@{ }ll} +% \texttt{p} & \fro{primary} & $BeB&G[CV(B\\ +% \texttt{S} & \fro{secondary} & $B2eB&!J2#AH!K!?1&B&!J=DAH!K!"(B +% |S| $B$O?FJ8;zNs$N2oJ8;z!I$NA4$F$K7wE@$rIU2C$9$k!#(B +% |F| $B;XDj;~$O!"LsJ*$G$"$k!HDL>oJ8;z!I$K$O7wE@$rIU2C$7$J$$!#(B +% \end{itemize} +% +% \end{itemize} +% +% \subsection{$B7wE@L?Na$N?FJ8;zNs(B} +% +% $B7wE@IU2C$N=hM}$G$O?FJ8;zNs$rJ8;zKh$KJ,2r$9$kI,MW$,$"$k!#(B +% $B$3$N$?$a!"7wE@L?Na$N?FJ8;zNs$O0lDj$N5,B'$K=>$C$F(B +% $B=q$+$l$kI,MW$,$"$k!#(B +% +% $B7wE@L?Na$N?FJ8;zNs$K$O0J2<$N$b$N$r4^$a$k$3$H$,$G$-$k!#(B +% +% \begin{itemize} +% \item $BDL>oJ8;z(B\Means {\LaTeX}$B$NL?Na$dFCoJ8;z$K$O0l$D$N7wE@$,IU2C$5$l$k!#(B +% \begin{itemize} +% \item |F| $B%*%W%7%g%s$r;XDj$7$?>l9g!"LsJ*!J6gFIE@Ey!K$NJ8;z$K$O(B +% $B7wE@$,IU2C$5$l$J$$!#(B +% \item $B2$J8J8;z$K7wE@$rIU$1$?>l9g!"$=$NJ8;z$OAHHG>e(B +% $B!HOBJ8J8;z$N$h$&$K!I?6Iq$&!#(B +% \end{itemize} +% \item {\LaTeX}$B$NL?Na$*$h$S2$J86uGr(B\Means $B$3$l$i$K$O(B +% $B7wE@$,IU2C$5$l$J$$!#(B +% \begin{itemize} +% \item $Bl9g$O!"0J9_$K<($92?$l$+$N=q<0$rMxMQ$9$kI,MW$,$"$k!#(B +% \footnote{$BA43Q6uGr!J(B\verb|\hspace{1zw}|$B!K$dOB2$J84V6uGr(B +% $B!J(B\verb|\hspace{\kanjiskip}|$B!K$r=PNO$9$k@lMQ$N%^%/%m$rMQ0U$7$F(B +% $B$*$/$HJXMx$+$b$7$l$J$$!#(B} +% \end{itemize} +% \item $B%0%k!<%W(B\Means $B$9$J$o$A!"(B|{ }| $B$K0O$^$l$?G$0U$N%F%-%9%H!#(B +% $B%k%SL?Na$N%0%k!<%W$HF1MM$K!"0l$D$N!TJ8;z!U$H$7$F07$o$l!"(B +% $BA4BN$KBP$7$F0l$D$N7wE@$,IU2C$5$l$k!#(B +% \begin{itemize} +% \item \PKN{japanese-otf}$B%Q%C%1!<%8$N(B |\CID| $BL?Na$N$h$&$J!"(B +% $B!VFCl9g$K;H$($k!#(B +% \item $B$"$k$$$O!"!J>/!9J}$,(B +% $BIU2C$5$l$k!#(B +% \item $Be$N@)8B(B +% \footnote{$B7wE@L?Na$O>o$K%4!<%9%H=hM}$rH<$&$?$a!"@h=R$N(B +% $B!V%4!<%9%H=hM}$H?JF~$O6&B8$7$J$$!W$H$$$&@)8B$K0z$C$+$+$k$N$G$"$k!#(B}% +% $B$N$?$a!"7wE@L?Na$N@hF,$K%k%SL?Na$,$"$k>l9g!"(B +% $B%k%S$NA0B&$N?JF~$,L58z$K$J$k!#(B +% $BF1MM$K!"7wE@L?Na$NKvHx$K%k%SL?Na$,$"$k>l9g!"(B +% $B%k%S$N8eB&$N?JF~$,L58z$K$J$k!#(B +% \item $B7wE@L?NaCf$N%k%S$N=hM}$ODL>o$N>l9g$HHf$Y$F!HJ#;(!I$G$"$k$?$a!"(B +% $B<+F0E*$J6XB'=hM}$,F/$+$J$$2DG=@-$,9b$$!#(B +% $B=>$C$F!"I,MW$K1~$8$FJd=u@_Dj$GJ,3d6X;_!J(B|*|$B!K$r;XDj$9$kI,MW$,$"$k!#(B +% \item $B5U$K%k%SL?Na$NF~NO$K7wE@L?Na$r$=$N$^$^=q$/$3$H$O$G$-$J$$!#(B +%\begin{quote}\begin{verbatim} +%\ruby[|j|]{\kenten{$B7wE@(B}}{$B$1$s(B|$B$F$s(B}% $BIT2D(B +%\end{verbatim}\end{quote} +% |{ }| $B$G0O$C$?!TJ8;z!U$NCf$G$O;H$($k$,!"$3$N>l9g$OF1;~IU2C$H$O(B +% $B8+$J$5$l$:!"FHN)$KF0:n$9$k$3$H$K$J$k!#(B +% \end{itemize} +% \end{itemize} +% +% \subsection{$B%4!<%9%H=hM}(B} +% +% $B7wE@=PNO$G$O%k%S$H0[$J$j?JF~$N=hM}$,ITMW$G$"$k!#(B +% $B$3$N$?$a!"8=>u$G$O!"7wE@L?Na$K$D$$$F$O(B +% \textgt{$B>o$K(B}$BOBJ8%4!<%9%H=hM}$rE,MQ$9$k!#(B +% +% \Note $BHsI8=`$NOBJ8%a%H%j%C%/!J(BJFM$B!K$,;H$o$l$F$$$kEy$NM}M3$G!"(B +% $BOBJ8%4!<%9%H=hM}$,@5>o$K5!G=$7$J$$>l9g$,B8:_$9$k!#(B +% $B$3$N$?$a!">-MhE*$K!"7wE@L?Na$K$D$$$F$bOBJ8%4!<%9%H=hM}$r(B +% $B9T$o$J$$!J%k%SL?Na$HF1MM$NJd=u@_Dj$rE,MQ$9$k!K@_Dj$r(B +% $BMQ0U$9$kM=Dj$G$"$k!#(B +% +% \subsection{$B%Q%i%a%?@_DjL?Na(B} +% +% \begin{itemize} +% +% \item |\kentensetup{|\jmeta{$B%*%W%7%g%s(B}|}| +% +% $B%*%W%7%g%s$N4{DjCM@_Dj!#(B +% $B!N4{Dj(B = \texttt{pPF}$B!O(B +% +% \item |\kentenmarkinyoko{|\jmeta{$BL>A0$^$?$O%F%-%9%H(B}|}| +% +% $B2#AH;~$NA0$G;XDj$G$-$k!#(B +% \begin{quote} +% \newcommand*\Us[1]{\symbol{"#1}} +% \newcommand*\Ucomp{{\small \<$B!J9g@.!K(B\<}} +% \newcommand*\U[1]{\texttt{#1}} +% \begin{tabular}[t]{ll@{ }ll} +% \texttt{bullet*} & {$B!&(B} & \Ucomp & $B9uCfE@(B\\ +% \texttt{bullet} & {$B!&(B} & \U{2022*}& $B9uCfE@(B\\ +% \texttt{Bullet} & \Us{25E6} & \U{25E6*}& $BGrCfE@(B\\ +% \texttt{sesame*} & \Us{FE45} & \Ucomp & $B9u%4%^E@(B\\ +% \texttt{sesame} & \Us{FE45} & \U{FE45*}& $B9u%4%^E@(B\\ +% \texttt{Sesame} & \Us{FE46} & \U{FE46*}& $BGr%4%^E@(B +% \end{tabular}\qquad +% \begin{tabular}[t]{ll@{ }ll} +% \texttt{triangle} & \Us{25B2} & \U{25B2} & $B9u;03Q(B\\ +% \texttt{Triangle} & \Us{25B3} & \U{25B3} & $BGr;03Q(B\\ +% \texttt{circle} & \Us{25CF} & \U{25CF} & $B9u4](B\\ +% \texttt{Circle} & \Us{25CB} & \U{25CB} & $BGr4](B\\ +% \texttt{bullseye} & \Us{25CE} & \U{25CE} & $BFs=E4](B\\ +% \texttt{fisheye} & \Us{25C9} & \U{25C9*}& $Bo$K=PNO$5$l$J$$!"(B +% $B$H$$$&2DG=@-$,$"$k!#(B +% \item $BJ8;z%3!<%ICM$K(B |*| $B$rIU$1$?$b$N$O!"$=$NJ8;z$,(B +% JIS~X~0208$B$K$J$$$3$H$rI=$9!#(B +% {\pLaTeX}$B$G$3$l$i$N7wE@A0$NBe$o$j$KG$0U$N(B{\LaTeX}$B$N%F%-%9%H$r=q$/$3$H$,$G$-$k!#(B +% \footnote{$B$?$@$7!"0z?t$N@hF,$NJ8;z$,(BASCII$B1Q;z$G$"$k>l9g$O(B +% $BL>A0$N;XDj$H8+$J$5$l$k$?$a!"%F%-%9%H$H$7$F07$$$?$$>l9g$O(B +% $BE,59(B \verb|{ }| $B$rJd$&Ey$NAA0$^$?$O%F%-%9%H(B}|}| +% +% $B2#AH;~$NI{%^!<%/!J(B|s| $B;XDj;~!K$H$7$F;H$o$l$k7wE@$r;XDj$9$k!#(B +% $B!N4{Dj(B = |sesame*|$B!O(B +% +% \item |\kentenmarkintate{|\jmeta{$BL>A0$^$?$O%F%-%9%H(B}|}| +% +% $B=DAH;~$NA0$^$?$O%F%-%9%H(B}|}| +% +% $B=DAH;~$NI{%^!<%/!J(B|s| $B;XDj;~!K$H$7$F;H$o$l$k7wE@$r;XDj$9$k!#(B +% $B!N4{Dj(B = |bullet*|$B!O(B +% +% \item |\kentenfontsetup{|\jmeta{$BL?Na(B}|}| +% +% $B7wE@MQ$N%U%)%s%H@ZBXL?Na$r@_Dj$9$k!#(B +% +% \item |\kentenintergap{|\jmeta{$B-Mh$N3HD%5!G=(B\<$B!JL$5$9$Y$-$G$J$$!K(B +% $B%Q%i%a%?$O!"8F=P;~$NCM$rJL$KJ];}$7$F$*$/$Y$-$G$"$k!#(B % % \begin{macro}{\ifpxrr@bprotr} % \begin{macro}{\ifpxrr@aprotr} @@ -1196,7 +1453,20 @@ % \end{macrocode} % \end{macro} % -% \subsection{$BJQ?t(B} +% \begin{macro}{\pxrr@c@ruby@font} +% \begin{macro}{\pxrr@c@size@ratio} +% \begin{macro}{\pxrr@c@inter@gap} +% $B0J2<$O!H%*%W%7%g%s$G;XDj$9$k!I0J30$N%Q%i%a%?$KBP1~$9$k$b$N!#(B +% \begin{macrocode} +\let\pxrr@c@ruby@font\@undefined +\let\pxrr@c@size@ratio\@undefined +\let\pxrr@c@inter@gap\@undefined +% \end{macrocode} +% \end{macro} +% \end{macro} +% \end{macro} +% +% \subsection{$B$=$NB>$NJQ?t(B} % % \begin{macro}{\pxrr@body@list} % $B?FJ8;zNs$N$?$a$K;H$&%j%9%H!#(B @@ -2121,6 +2391,9 @@ % \begin{macro}{\pxrr@get@jchar@token} % |\pxrr@get@jchar@token\CS{|\jmeta{$B@0?t(B}|}|\Means % $BFbItJ8;z%3!<%I$,(B\jmeta{$B@0?t(B}$B$G$"$kOBJ8J8;z$N%H!<%/%s$rF@$k!#(B +% \Note |.sty|$B%U%!%$%k$O40A4$K(BASCII$BJ8;z$@$1$K$9$kJ}?K$N$?$a!"(B +% $BOBJ8J8;z$,I,MW$J>l9g$O$3$NJd=u%^%/%m$d(B |\pxrr@jchardef| $B$r(B +% $BMxMQ$7$FJ#9g%3!<%ICM$+$i:n$j=P$9$3$H$K$J$k!#(B % % {\pTeX}$B7O$N>l9g!#(B|\kansuji| $B%H%j%C%/$rMxMQ$9$k!#(B % \begin{macrocode} @@ -2154,6 +2427,62 @@ % \end{macrocode} % \end{macro} % +% \begin{macro}{\pxrr@zspace} +% $BA43Q6uGrJ8;z!#(B +% $BJ8;z$=$N$b$N$r%U%!%$%k$K4^$^$;$?$/$J$$$N$G(Bchardef$B$K$9$k!#(B +% \begin{macrocode} +\pxrr@jchardef\pxrr@zspace=\pxrr@jc{2121:3000} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@jghost@char} +% $BOBJ8%4!<%9%H=hM}$KMxMQ$9$kJ8;z!#(B +% $B;z7A$,6u$G$"$j!"$+$D0lHL$N4A;z$HF1$85sF0$r<($9I,MW$,$"$k!#(B +% $Bl9g!"A43Q6uGrJ8;z$G9=$o$J$$$,!"A43Q6uGrJ8;z$,(B +% $BJ8;z%?%$%W(B0$B$G$J$$(BJFM$B$,;H$o$l$F$$$k>l9g$OLdBj$K$J$k!#(B +% +% {\upTeX}$B$N>l9g!"!H3HD%Id9f6u4V!I$NJ8;z%3!<%I$r;H$&!#(B +% $B$9$J$o$A!"J8;z%3!<%I(B |"113000| $B$NJ8;z$O(BDVI$B$G$OJ8;z%3!<%I(B |"3000| $B$H(B +% $B07$o$l$k$,!"!H(BBMP$B30!I$K$"$k$?$aI,$:J8;z%?%$%W(B0$B$K$J$k!#(B +% \begin{macrocode} +\ifpxrr@in@uptex + \kchardef\pxrr@jghost@char="113000 +% \end{macrocode} +% {\LuaTeX}-ja$B$N>l9g!#(B +% $BJ8=q@hF,$G!HA43Q6uGrJ8;z$,;H$($k$+!I$r8!::$7$F!"<:GT$7$?>l9g$O(B +% $B!VOBJ8$N(BU+00A0$B!W$rBe$o$j$KMxMQ$9$k$3$H$K$9$k!#(B +% \begin{macrocode} +\else\ifpxrr@in@luatexja + \let\pxrr@jghost@char\pxrr@zspace + \def\pxrr@jghost@check{% + \begingroup +% \ltjsetparameter{jaxspmode={\pxrr@zspace,3}}% +% \ltjsetparameter{xkanjiskip=\p@}% +% \ltjsetparameter{autoxspacing=false}% + \setbox\z@\hbox{\char"3001\char"3000}% +% \ltjsetparameter{autoxspacing=true}% + \setbox\tw@\hbox{\char"3001\inhibitglue\char"3000}% + \ifdim\wd\tw@=\wd\z@ + \global\chardef\pxrr@jghost@char@="00A0 + \gdef\pxrr@jghost@char{\ltjjachar\pxrr@jghost@char@}% + \fi + \endgroup + } + \AtBeginDocument{% + \pxrr@jghost@check + } +% \end{macrocode} +% $B$=$l0J30$N>l9g$O!J;EJ}$,L5$$$N$G!KA43Q6uGr$rMQ$$$k!#(B +% \begin{macrocode} +\else + \let\pxrr@jghost@char\pxrr@zspace +\fi\fi +% \end{macrocode} +% \end{macro} +% % \begin{macro}{\pxrr@x@K} % $BE,Ev$J4A;z!Jl9g!"(B|\prebreakpenalty| $B$r;H$&!#(B % \begin{macrocode} \ifpxrr@in@ptex \def\pxrr@get@prebreakpenalty#1#2{% - #1=\prebreakpenalty`#2\relax + #1=\prebreakpenalty#2\relax } % \end{macrocode} % @@ -2342,7 +2671,7 @@ % \begin{macrocode} \else\ifpxrr@in@luatexja \def\pxrr@get@prebreakpenalty#1#2{% - #1=\ltjgetparameter{prebreakpenalty}{`#2}\relax + #1=\ltjgetparameter{prebreakpenalty}{#2}\relax } % \end{macrocode} % @@ -2356,6 +2685,100 @@ % \end{macrocode} % \end{macro} % +% \begin{macro}{\pxrr@get@postbreakpenalty} +% |\pxrr@get@postbreakpenalty\CS{|\jmeta{$BJ8;z%3!<%I(B}|}|\Means +% $BJ8;z$NA06XB'%Z%J%k%F%#CM$r@0?t%l%8%9%?$KBeF~$9$k!#(B +% +% {\pTeX}$B$N>l9g!"(B|\postbreakpenalty| $B$r;H$&!#(B +% \begin{macrocode} +\ifpxrr@in@ptex + \def\pxrr@get@postbreakpenalty#1#2{% + #1=\postbreakpenalty#2\relax + } +% \end{macrocode} +% +% \PKN{LuaTeX-ja}$B;HMQ;~$O!"(Bpostbreakpenalty $B%W%m%Q%F%#$rFI$_=P$9!#(B +% \begin{macrocode} +\else\ifpxrr@in@luatexja + \def\pxrr@get@postbreakpenalty#1#2{% + #1=\ltjgetparameter{postbreakpenalty}{#2}\relax + } +% \end{macrocode} +% +% $B$=$l0J30$N>l9g$O%<%m$H$7$F07$&!#(B +% \begin{macrocode} +\else + \def\pxrr@get@postbreakpenalty#1#2{% + #1=\z@ + } +\fi\fi +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@check@punct@char} +% |\pxrr@is@punct@char{|\jmeta{$BJ8;z%3!<%I(B}|}{|\jmeta{$BOBJ8%U%i%0(B}|}|\Means +% $B;XDj$NJ8;z%3!<%I$NJ8;z$,!HLsJ*$G$"$k$+!I$rD4$Y$F!"(B +% $B7k2L$r(B |\ifpxrr@ok| $B$KJV$9!#(B +% \jmeta{$BOBJ8%U%i%0(B}$B$O!HBP>]$,(B{\pTeX}$B$NOBJ8$G$"$k!I>l9g$K(B1$B!"(B +% $B$=$l0J30$O(B0$B!#(B +% +% {\pTeX}$B$N>l9g!"2$J8$J$i(B |\xspcode|$B!"OBJ8$J$i(B |\inhibitxspcode| $B$N(B +% $BCM$r8+$F!"$=$l$,(B3$B0J30$J$iLsJ*$H8+$J$9!#(B +% \begin{macrocode} +\ifpxrr@in@ptex + \def\pxrr@check@punct@char#1#2{% + \pxrr@okfalse + \ifcase#2\relax + \ifnum\xspcode#1=\thr@@\else + \pxrr@oktrue + \fi + \else + \ifnum\inhibitxspcode#1=\thr@@\else + \pxrr@oktrue + \fi + \fi + } +% \end{macrocode} +% +% \PKN{LuaTeX-ja}$B;HMQ;~$b4pK\E*$K(B{\pTeX}$B$HF1$8%m%8%C%/$r;H$&!#(B +% $B$?$@$7(B\PKN{LuaTeX-ja}$B$G$O!VJ8;z%H!<%/%s$NOBJ8$H2$J8$N6hJL!W$H$$$&(B +% $B35G0$,B8:_$7$J$$$?$a!"(B\jmeta{$BOBJ8%U%i%0(B}$B$OI,$:(B0$B$H$J$k!#(B +% $B$=$7$F!"(B|\xspcode|$B!?(B|\inhibitxspcode| $B$KAjEv$9$k%Q%i%a%?$H$7$F$O!"(B +% $B2$J8MQ$N(Balxspmode$B$HOBJ8MQ$N(Bjaxspmode$B$,0l1~$"$k$,!"(B +% $B$C$F!"!V(Bjaxspmode$B$,(B3$B0J30$+!W$rD4$Y$k$3$H$K$9$k!#(B +% \begin{macrocode} +\else\ifpxrr@in@luatexja + \def\pxrr@check@punct@char#1#2{% + \ifnum\ltjgetparameter{jaxspmode}{#1}=\thr@@ + \pxrr@okfalse + \else + \pxrr@oktrue + \fi + } +% \end{macrocode} +% +% $B$=$l0J30$N>l9g$O%<%m$H$7$F07$&!#(B +% \begin{macrocode} +\else + \def\pxrr@check@punct@char#1#2{% + \pxrr@okfalse + } +\fi\fi +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@inhibitglue} +% |\inhibitglue| $B$,Dj5A$5$l$F$$$k$J$il9g$ND4@0!#(B +% \begin{macrocode} + \ifpxrr@combo + \pxrr@ck@check@option + \fi } % \end{macrocode} % \end{macro} @@ -3071,7 +3500,7 @@ % \begin{macrocode} \def\pxrr@assign@fsize{% \@tempdima=\f@size\p@ - \@tempdima\pxrr@size@ratio\@tempdima + \@tempdima\pxrr@c@size@ratio\@tempdima \edef\pxrr@ruby@fsize{\the\@tempdima}% \pxrr@get@zwidth\pxrr@body@zw \begingroup @@ -3099,7 +3528,7 @@ \advance\@tempdimb-\pxrr@htratio\@tempdimb \advance\@tempdima\@tempdimb \@tempdimb\pxrr@body@zw\relax - \advance\@tempdima\pxrr@inter@gap\@tempdimb + \advance\@tempdima\pxrr@c@inter@gap\@tempdimb \edef\pxrr@ruby@raise{\the\@tempdima}% % \end{macrocode} % |\pxrr@ruby@lower| $B$NCM$r7W;;$9$k!#(B @@ -3110,8 +3539,14 @@ \@tempdimb\pxrr@htratio\@tempdimb \advance\@tempdima\@tempdimb \@tempdimb\pxrr@body@zw\relax - \advance\@tempdima\pxrr@inter@gap\@tempdimb + \advance\@tempdima\pxrr@c@inter@gap\@tempdimb \edef\pxrr@ruby@lower{\the\@tempdima}% +% \end{macrocode} +% $B7wE@%k%SF1;~IU2C$N@_Dj!#(B +% \begin{macrocode} + \ifpxrr@combo + \pxrr@ck@assign@fsize + \fi } % \end{macrocode} % \end{macro} @@ -3123,7 +3558,7 @@ \pxrr@without@macro@trace{% \let\rubyfontsize\pxrr@ruby@fsize \fontsize{\pxrr@ruby@fsize}{\z@}\selectfont - \pxrr@ruby@font + \pxrr@c@ruby@font }% } % \end{macrocode} @@ -3480,6 +3915,8 @@ % #4$B$O6u(B \def\pxrr@compose@oneside@block@do#1#2#3#4{% \setbox\pxrr@boxa\pxrr@hbox{#2}% + \edef\pxrr@ck@body@natwd{\the\wd\pxrr@boxa}% + \let\pxrr@ck@locate\pxrr@locate@inner \setbox\pxrr@boxr\pxrr@hbox{% \pxrr@use@ruby@font #3% @@ -3500,6 +3937,7 @@ \let\pxrr@locate@temp\pxrr@locate@head \fi \fi + \let\pxrr@ck@locate\pxrr@locate@temp \pxrr@decompose{#2}% \edef\pxrr@natwd{\the\wd\pxrr@boxa}% \pxrr@evenspace@int\pxrr@locate@temp\pxrr@boxa\relax @@ -3542,6 +3980,9 @@ \lower\pxrr@ruby@lower\box\pxrr@boxr \fi }% + \ifnum \ifpxrr@combo\pxrr@ck@ruby@combo\else\z@\fi >\z@ + \pxrr@ck@compose{#2}% + \fi \ht\z@\z@ \dp\z@\z@ \@tempdima\wd\z@ \setbox\pxrr@boxr\hbox{% @@ -3572,6 +4013,8 @@ % |\pxrr@boxb| $B$K2eB&$H2\z@ + \pxrr@ck@compose{#2}% + \fi \ht\z@\z@ \dp\z@\z@ \@tempdima\wd\z@ \setbox\pxrr@boxr\hbox{% @@ -3973,7 +4420,7 @@ \pxrr@check@kinsoku@c#1#1% } \def\pxrr@check@kinsoku@c#1{% - \pxrr@get@prebreakpenalty\pxrr@cntr{#1}% + \pxrr@get@prebreakpenalty\pxrr@cntr{`#1}% \pxrr@tempb } % \end{macrocode} @@ -4392,6 +4839,29 @@ % \end{macrocode} % \end{macro} % +% \begin{macro}{\pxrr@bind@param} +% $B!H8F=P;~JQ?t!I$X$N%3%T!<$r9T$&!#(B +% \begin{macrocode} +\def\pxrr@bind@param{% +% \end{macrocode} +% $B7wE@%k%SF1;~IU2C%U%i%0$N=hM}!#(B +% $B7wE@B&$,;XDj$7$?(B |apply@combo| $B$NCM$r!H8F=P;~%Q%i%a%?!I$N(B |pxrr@combo| $B$K(B +% $B0\F0$5$;$k!#(B +% \begin{macrocode} + \ifpxrr@apply@combo + \pxrr@apply@combofalse + \pxrr@combotrue + \pxrr@ck@bind@param + \else + \pxrr@combofalse + \fi + \let\pxrr@c@ruby@font\pxrr@ruby@font + \let\pxrr@c@size@ratio\pxrr@size@ratio + \let\pxrr@c@inter@gap\pxrr@inter@gap +} +% \end{macrocode} +% \end{macro} +% % \begin{macro}{\pxrr@ruby@proc} % |\pxrr@ruby@proc{|\jmeta{$B?FJ8;zNs(B}|}{|\jmeta{$B%k%SJ8;zNs(B}|}|\Means % $B$3$l$,A0$N7wE@J8;z$,L$EPO?$N>l9g!#(B +% \begin{macrocode} +\def\pxrr@warn@na@kmark#1{% + \pxrr@warn{Unavailable kenten mark '#1'}% +} +% \end{macrocode} +% +% $B%Q%i%a%?@_DjL?Na$GL58z$JCM$,;XDj$5$l$?>l9g!#(B +% \begin{macrocode} +\def\pxrr@err@invalid@value#1{% + \pxrr@error{Invalid value '#1'}% + {\@eha}% +} +% \end{macrocode} +% +% \subsection{$B%Q%i%a%?(B} +% +% \subsubsection{$BA4HL@_Dj(B} +% +% \begin{macro}{\pxrr@k@ymark} +% $B2#AH$Ne2<$N$I$A$i$KIU$9$+!#(B +% 0 = $B>eB&!((B1 = $B2l9g$N5sF0!#(B +% 0 = $B%k%S$@$1=PNO!((B1 = $B%k%S$N>e$K7wE@!JF1;~IU2C!K!#(B +% |\kentenrubycombination| $B$N@_DjCM$KBP1~$9$k!#(B +% $B@0?tDj?t!#(B +% \begin{macrocode} +\chardef\pxrr@k@ruby@combo=1 +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@d@full} +% $BLsJ*$K$b7wE@$rIU2C$9$k$+!#(B +% 0 = $BL58z!((B1 = $BM-8z!#(B +% |\kentensetup| $B$N(B |f|$B!?(B|F| $B$N@_Dj!#(B +% $B@0?tDj?t!#(B +% \begin{macrocode} +\chardef\pxrr@k@d@full=0 +% \end{macrocode} +% \end{macro} +% +% \subsubsection{$B8F=P;~$N@_Dj(B} +% +% |\kenten| $B$N(B |P|$B!?(B|S| $B$N@_Dj$O!"(B|\pxrr@side| $B$r%k%S$H6&MQ$9$k!#(B +% +% \begin{macro}{\pxrr@k@mark} +% $B7wE@%^!<%/$NA0(B}|}{|\jmeta{$BK\BN(B}|}|\Means +% $B7wE@%^!<%/L?Na$rDj5A$9$k!#(B +% \begin{macrocode} +\def\pxrr@k@declare@mark#1{% + \global\@namedef{pxrr@k@mark@@#1}% +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@let@mark} +% |\pxrr@k@declare@mark{|\jmeta{$BL>A0(B}|}\CS|\Means +% $B7wE@%^!<%/L?Na$r(B |\let| $B$GDj5A$9$k!#(B +% \begin{macrocode} +\def\pxrr@k@let@mark#1{% + \global\pxrr@cslet{pxrr@k@mark@@#1}% +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@get@mark} +% |\pxrr@k@get@mark\CS{|\jmeta{$BL>A0$^$?$ODj5AK\BN(B}|}|\Means +% $B;XDj$N7wE@%^!<%/L?Na$r(B |\CS| $B$KBeF~$9$k!#(B +% $BBh(B2$B0z?t$N@hF,%H!<%/%s$,(BASCII$B1Q;z$N>l9g$OL>A0$H8+$J$7!"(B +% $B$=$l0J30$ODj5AK\BN$N%3!<%I$H8+$J$9!#(B +% \begin{macrocode} +\def\pxrr@k@get@mark#1#2{% + \futurelet\pxrr@token\pxrr@k@get@mark@a#2\pxrr@nil#1% +} +\def\pxrr@k@get@mark@a{% + \pxrr@cond\ifcat A\noexpand\pxrr@token\fi{% + \pxrr@k@get@mark@c + }{%else + \pxrr@k@get@mark@b + }% +} +\def\pxrr@k@get@mark@b#1\pxrr@nil#2{% + \def#2{#1}% +} +\def\pxrr@k@get@mark@c#1#2\pxrr@nil#3{% + \ifnum`#1<128 + \pxrr@letcs\pxrr@tempa{pxrr@k@mark@@#1#2}% + \ifx\pxrr@tempa\relax + \pxrr@warn@na@kmark{#1#2}% + \else + \let#3\pxrr@tempa + \fi + \else + \pxrr@k@get@mark@b#1#2\pxrr@nil#3% + \fi +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@declare@mark@char} +% |\pxrr@k@declare@mark@char\CS{|\jmeta{$BFs=E%3!<%I(B}|}|\Means +% $B;XDj$N%3!<%ICM$NJ8;z$N!JOBJ8!K(Bchardef$B$r(B |\CS| $B$KBeF~$9$k!#(B +% $B$?$@$7(B{\pTeX}$B$G(BJIS$B$KL5$$J8;z(B +% $B!JJX59E*$KOBJ86uGr$N(BJIS$B%3!<%ICM(B|2121|$B$GI=$9!K(B +% $B$N>l9g$OBe$o$j$K(B |\pxrr@k@char@UTF| $B$rMxMQ$9$k!#(B +% \begin{macrocode} +\def\pxrr@k@declare@mark@char#1#2{% + \pxrr@k@declare@mark@char@a{#1}#2\pxrr@end +} +\def\pxrr@k@declare@mark@char@a#1#2:#3\pxrr@end{% + \pxrr@jchardef\pxrr@tempa\pxrr@jc{#2:#3}% + \ifnum\pxrr@tempa=\pxrr@zspace +% \end{macrocode} +% $B%(%s%8%s$,(B{\pTeX}$B$G$+$D(BJIS$B$KL5$$J8;z$G$"$k>l9g!#(B +% \begin{macrocode} + \pxrr@k@declare@mark{#1}{\pxrr@k@char@UTF{#1}{#3}}% + \else + \pxrr@k@let@mark{#1}\pxrr@tempa + \fi +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@char@UTF} +% |\pxrr@k@char@UTF{|\jmeta{$BL>A0(B}|}{|\jmeta{Unicode$BCM(B}|}|\Means +% |\UTF{|\jmeta{Unicode$BCM(B}|}| $B$rl9g$O!"(B +% $B!J:G=i$N(B1$B2s$@$1!K7Y9p$7$?>e$G2?$b=PNO$7$J$$!#(B +% \begin{macrocode} +\def\pxrr@k@char@UTF#1#2{% + \pxrr@decide@avail@UTF + \ifpxrr@avail@UTF + \pxrr@k@declare@mark{#1}{\UTF{#2}}% + \UTF{#2}% + \else + \pxrr@k@let@mark{#1}\@empty + \pxrr@warn@na@kmark{#1}% + \fi +} +% \end{macrocode} +% \end{macro} +% +% $BI8=`%5%]!<%H$N7wE@%^!<%/$NDj5A!#(B +% \begin{macrocode} +\pxrr@k@declare@mark@char{bullet} {2121:2022} +\pxrr@k@declare@mark@char{triangle}{2225:25B2} +\pxrr@k@declare@mark@char{Triangle}{2224:25B3} +\pxrr@k@declare@mark@char{fisheye} {2121:25C9} +\pxrr@k@declare@mark@char{Circle} {217B:25CB} +\pxrr@k@declare@mark@char{bullseye}{217D:25CE} +\pxrr@k@declare@mark@char{circle} {217C:25CF} +\pxrr@k@declare@mark@char{Bullet} {2121:25E6} +\pxrr@k@declare@mark@char{sesame} {2121:FE45} +\pxrr@k@declare@mark@char{Sesame} {2121:FE46} +\pxrr@jchardef\pxrr@ja@dot=\pxrr@jc{2126:30FB} +\pxrr@jchardef\pxrr@ja@comma=\pxrr@jc{2122:3001} +\pxrr@k@declare@mark{bullet*}{% + \pxrr@dima=\pxrr@ruby@zw\relax + \hb@xt@\pxrr@dima{% + \kern-.5\pxrr@dima + \pxrr@if@in@tate{}{\lower.38\pxrr@dima}% + \hbox{% + \pxrr@dima=\f@size\p@ + \fontsize{2\pxrr@dima}{\z@}\selectfont + \pxrr@ja@dot + }% + \hss + }% +} +\pxrr@k@declare@mark{sesame*}{% + \pxrr@dima=\pxrr@ruby@zw\relax + \hb@xt@\pxrr@dima{% + \pxrr@if@in@tate{\kern.1\pxrr@dima}{\kern.05\pxrr@dima}% + \pxrr@if@in@tate{\lower.85\pxrr@dima}{\raise.3\pxrr@dima}% + \hbox{% + \pxrr@dima=\f@size\p@ + \fontsize{2.4\pxrr@dima}{\z@}\selectfont + \pxrr@ja@comma + }% + \hss + }% +} +% \end{macrocode} +% +% \subsection{$B7wE@%*%W%7%g%s2r@O(B} +% +% \begin{macro}{\pxrr@k@parse@option} +% |\pxrr@k@parse@option{|\jmeta{$B%*%W%7%g%s(B}|}|\Means +% \jmeta{$B%*%W%7%g%s(B}$B$r2r@O$7!"(B +% |\pxrr@side| $B$d(B |\pxrr@k@mark| $BEy$N%Q%i%a%?$r@_Dj$9$k!#(B +% \begin{macrocode} +\def\pxrr@k@parse@option#1{% + \edef\pxrr@tempa{#1}% + \let\pxrr@side\pxrr@k@d@side + \let\pxrr@k@mark\pxrr@k@d@mark + \let\pxrr@k@full\pxrr@k@d@full + \expandafter\pxrr@k@parse@option@loop\pxrr@tempa @\pxrr@end +} +\def\pxrr@k@parse@option@loop#1{% +% \end{macrocode} +% $B7wE@%*%W%7%g%s$N2r@O4o$O!HM-8B>uBV!I$r;}$?$J$$$N$G(B +% $BHs>o$KC1=c$G$"$k!#(B +% \begin{macrocode} + \pxrr@letcs\pxrr@tempa{pxrr@k@po@PR@#1}% + \pxrr@cond\ifx\pxrr@tempa\relax\fi{% + \pxrr@fatal@knx@letter{#1}% + \pxrr@k@parse@option@exit + }{% + \pxrr@tempa + \pxrr@k@parse@option@loop + }% +} +\def\pxrr@k@parse@option@exit#1\pxrr@end{% + \ifpxrr@in@setup\else + \pxrr@k@check@option +% \end{macrocode} +% $B$3$3$G(B |\pxrr@k@the@mark| $B$rE,@Z$KDj5A$9$k!#(B +% \begin{macrocode} + \pxrr@if@in@tate{% + \ifcase\pxrr@k@mark \let\pxrr@k@the@mark\pxrr@k@tmark + \or \let\pxrr@k@the@mark\pxrr@k@tsmark + \fi + }{% + \ifcase\pxrr@k@mark \let\pxrr@k@the@mark\pxrr@k@ymark + \or \let\pxrr@k@the@mark\pxrr@k@ysmark + \fi + }% + \fi +} +\def\pxrr@k@po@PR@@{% + \pxrr@k@parse@option@exit +} +\def\pxrr@k@po@PR@P{% + \chardef\pxrr@side\z@ +} +\def\pxrr@k@po@PR@S{% + \chardef\pxrr@side\@ne +} +\def\pxrr@k@po@PR@p{% + \chardef\pxrr@k@mark\z@ +} +\def\pxrr@k@po@PR@s{% + \chardef\pxrr@k@mark\@ne +} +\def\pxrr@k@po@PR@F{% + \chardef\pxrr@k@full\z@ +} +\def\pxrr@k@po@PR@f{% + \chardef\pxrr@k@full\@ne +} +% \end{macrocode} +% \end{macro} +% +% \subsection{$B%*%W%7%g%s@09g@-8!::(B} +% +% $B:#$N$H$3$m8!::$9$Y$-E@$,$J$$!#(B +% \begin{macrocode} +\def\pxrr@k@check@option{% +} +% \end{macrocode} +% +% \subsection{$B%V%m%C%/Kh$NAHHG(B} +% +% \begin{macro}{\pxrr@k@compose@block} +% |\pxrr@k@compose@block{|\jmeta{$B?FJ8;z%V%m%C%/(B}|}|^^A +% |{|\jmeta{$B7wE@$N8D?t(B}|}|\Means +% 1$B$D$N%V%m%C%/$NAHHG=hM}!#(B +% $B%\%C%/%9(B |\pxrr@boxb| $B$K7wE@(B1$B$D$rAHHG$7$?$b$N$,F~$C$F$$$k(B +% $BI,MW$,$"$k!#(B +% $B$J$*!"7wE@$O%<%mI}$KDY$7$?7A$G07$&A0Ds$N$?$a!"(B +% |\pxrr@boxb| $B$NI}$O%<%m$G$J$$$H$$$1$J$$!#(B +% +% $B4pK\E*$K!"%k%SMQ$N(B |\pxrr@compose@oneside@block| $B$rHs>o$K4JN,2=(B +% $B$7$?=hM}$K$J$C$F$$$k!#(B +% \begin{macrocode} +\def\pxrr@k@compose@block#1#2{% + \setbox\pxrr@boxa\pxrr@hbox{#1}% +% \end{macrocode} +% |\pxrr@evenspace@int| $B$r;H$&$?$a$KDTjm$r9g$o$;$k!#(B +% $B$9$J$o$A!"(B|\copy\pxrr@boxb| $B$r7wE@8D?tJ,$@$1H?I|$7$?(B +% $B%j%9%H$r(B |\pxrr@res| $B$KF~$l$F!"!H7wE@$N<+A3D9!I$K(B +% $BEv$?$k(B |\pxrr@natwd| $B$r%<%m$H$9$k!#(B +% \begin{macrocode} + \pxrr@k@make@rep@list{\copy\pxrr@boxb}{#2}% + \let\pxrr@natwd\pxrr@zeropt + \pxrr@evenspace@int\pxrr@locate@inner\pxrr@boxr + \relax{\wd\pxrr@boxa}% + \setbox\z@\hbox{% + \ifnum\pxrr@side=\z@ + \raise\pxrr@ruby@raise\box\pxrr@boxr + \else + \lower\pxrr@ruby@lower\box\pxrr@boxr + \fi + }% + \ht\z@\z@ \dp\z@\z@ + \@tempdima\wd\z@ + \setbox\pxrr@boxr\hbox{% + \box\z@ + \kern-\@tempdima + \box\pxrr@boxa + }% +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@make@rep@list} +% |\pxrr@k@make@rep@list{|\jmeta{$BMWAG(B}|}{|\jmeta{$B2s?t(B}|}|\Means +% $BMWAG$r;XDj$N2s?t$@$1H?I|$7$?%j%9%H$r(B |\pxrr@res| $B$KBeF~$9$k!#(B +% \begin{macrocode} +\def\pxrr@k@make@rep@list#1#2{% + \def\pxrr@res{\pxrr@pre{#1}}% + \pxrr@cntr=#2\relax + \ifnum\pxrr@cntr>\@ne + \@tempcnta\pxrr@cntr \advance\@tempcnta\m@ne + \@whilenum{\@tempcnta>\z@}\do{% + \pxrr@appto\pxrr@res{\pxrr@inter{#1}}% + \advance\@tempcnta\m@ne + }% + \fi + \pxrr@appto\pxrr@res{\pxrr@post}% +} +% \end{macrocode} +% \end{macro} +% +% \subsection{$B7wE@9`L\(B} +% +% \begin{itemize} +% \item $B7wE@9`L\%j%9%H(B\Means +% $B%F%-%9%H$r(B |\pxrr@k@decompose| $B$GJ,2r$7$?7k2L$N%j%9%H!#(B +% \item $B7wE@9`L\(B\Means +% $B7wE@%j%9%H$K4^$^$l$k(B |\pxrr@entry|[|@XXX|]|{...}| $B$H$$$&7A<0$N$3$H!#(B +% $B7wE@9`L\$OD>@\$KHJ8;z%3!<%I(B\Means +% $B7wE@9`L\$N=PNO$NA08e$N6XB'%Z%J%k%F%#$N07$$$K$*$$$F!"(B +% $B!V$"$kJ8;z$HF1Ey!W$H07$&>l9g$N!"$=$NJ8;z$NJ8;z%3!<%I!#(B +% \end{itemize} +% +% $B"(8=>u$G$O!"$^$:(B |\pxrr@kenten@entry@XXX| $B$H$$$&%^%/%m$rDj5A$7$F(B +% $B7wE@L?Na$NA0$N9`L\$N7k2L$,7wE@%V%m%C%/$G$"$C$?$+!#(B +% \begin{macrocode} +\newif\ifpxrr@k@prev@is@block +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@accum@res} +% $BN_@Q$ND>@\=PNO!#(B +% \begin{macrocode} +\let\pxrr@k@accum@res\relax +% \end{macrocode} +% \end{macro} +% +% $B0J2<$N(B3$B$D$NJQ?t$O!H9`L\$N2<@A$1%^%/%m!I$,CM$rJV$9$Y$-$b$N!#(B +% $B$3$l$i$K2C$($F!"(B|\pxrr@res| $B$H(B |\pxrr@boxr| $B$N0lJ}$K(B +% $B!JAHHG$N!K7k2L$rJV$9I,MW$,$"$k!#(B +% +% \begin{macro}{\pxrr@k@prebreakpenalty} +% $B7wE@9`L\$NA06XB'%Z%J%k%F%#!#(B +% \begin{macrocode} +\mathchardef\pxrr@k@prebreakpenalty\z@ +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@postbreakpenalty} +% $B7wE@9`L\$N8e6XB'%Z%J%k%F%#!#(B +% \begin{macrocode} +\mathchardef\pxrr@k@postbreakpenalty\z@ +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@entry@res@type} +% $B9`L\$N=PNO$N%?%$%W!#(B +% 0=$BD>@\=PNO!((B1=$B%\%C%/%9=PNO!((B2=$B7wE@%V%m%C%/!#(B +% 0$B$N>l9g!"=PNO$O(B |\pxrr@res| $B$K$"$j!"$=$l0J30$O!"(B +% $B=PNO$O(B |\pxrr@boxr| $B$K$"$k!#(B +% \begin{macrocode} +\chardef\pxrr@k@entry@res@type\z@ +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@list@pre} +% $B7wE@9`L\%j%9%H$N=PNO$N3+;O;~$K9T$&=hM}!#(B +% \begin{macrocode} +\def\pxrr@k@list@pre{% + \pxrr@k@first@entrytrue + \pxrr@k@last@entryfalse + \pxrr@k@prev@is@blockfalse + \let\pxrr@k@accum@res\@empty + \chardef\pxrr@k@block@seq@state\z@ +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@entry@with} +% $BJd=u%^%/%m!#(B +% $B3F@\=PNO$N=hM}!#(B +% \begin{macrocode} + \ifnum\pxrr@k@entry@res@type=\z@ + \expandafter\pxrr@appto\expandafter\pxrr@k@accum@res + \expandafter{\pxrr@res}% + \else + \pxrr@k@accum@res + \let\pxrr@k@accum@res\@empty + \fi +% \end{macrocode} +% $BA06XB'%Z%J%k%F%#$rF~$l$k!#(B +% \begin{macrocode} + \ifnum\pxrr@k@prebreakpenalty>\z@ + \@tempcntb\lastpenalty \unpenalty + \advance\@tempcntb\pxrr@k@prebreakpenalty + \penalty\@tempcntb + \fi +% \end{macrocode} +% $B7wE@%V%m%C%/$,O"B3$9$k>l9g$OOBJ84V6uGr$rF~$l$k!#(B +% \begin{macrocode} + \ifnum\pxrr@k@entry@res@type=\tw@ + \ifpxrr@k@prev@is@block + \pxrr@inter@mono + \fi + \pxrr@k@prev@is@blocktrue + \else + \pxrr@k@prev@is@blockfalse + \fi +% \end{macrocode} +% $B%\%C%/%9$N7k2L$r\z@ + \unhbox\pxrr@boxr + \fi +% \end{macrocode} +% $B8e6XB'%Z%J%k%F%#$rF~$l$k!#(B +% \begin{macrocode} + \ifnum\pxrr@k@postbreakpenalty>\z@ + \penalty\pxrr@k@postbreakpenalty + \fi +% \end{macrocode} +% $Bl9g$K!"(B +% $n$$B8D$N7wE@$r%k%S6QEy3d$j$GG[CV$7$F=PNO$9$k!#(B +% \begin{macrocode} +\def\pxrr@kenten@entry@kspan{% + \pxrr@k@entry@with\pxrr@kenten@entry@kspan@ +} +\def\pxrr@kenten@entry@kspan@#1{% + \pxrr@kenten@entry@kspan@a#1% +} +\def\pxrr@kenten@entry@kspan@a#1{% +% \end{macrocode} +% |\kspan|$B!J(B=\,|#1|$B!K$,(B |*| $BIU$+$rD4$Y$k!#(B +% \begin{macrocode} + \@ifstar{% + \@testopt\pxrr@kenten@entry@kspan@c{}% + }{% + \@testopt\pxrr@kenten@entry@kspan@b{}% + }% +} +\def\pxrr@kenten@entry@kspan@b[#1]#2{% +% \end{macrocode} +% ($n-1/4$)zw$B0J>e(B($n+3/4$)zw$BL$K~$N;~$K!H$*$h$=(B$n$$BA43Q!I$H8+$J$9!#(B +% \begin{macrocode} + \setbox\z@\pxrr@hbox{#2}% + \@tempdima\pxrr@body@zw\relax + \@tempdimb\wd\z@ \advance\@tempdimb.25\@tempdima + \divide\@tempdimb\@tempdima + \edef\pxrr@kenten@entry@tempa{\number\@tempdimb}% + \pxrr@k@compose@block{#2}\pxrr@kenten@entry@tempa + \chardef\pxrr@k@entry@res@type=\tw@ +} +\def\pxrr@kenten@entry@kspan@c[#1]#2{% +% \end{macrocode} +% |\kspan*| $B$H$J$C$F$$$k>l9g!#(B +% $B$3$N;~$O7wE@$rIU2C$;$:D>@\=PNO$9$k!#(B +% \begin{macrocode} + \def\pxrr@res{#2}% + \chardef\pxrr@k@entry@res@type=\z@ +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@kenten@entry@kenten} +% $B%M%9%H$7$?(B |\kenten| $BL?Na$N7wE@9`L\!#(B +% $BC1=c$K$=$N(B |\kenten| $B$rl9g$O7wE@%V%m%C%/$H$O8+$J$5$J$$$3$H$KCm0U!#(B +% \begin{macrocode} + \setbox\pxrr@boxr\hbox{#1}% + \chardef\pxrr@k@entry@res@type=\@ne +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@kenten@entry@ruby} +% $B%k%SL?Na$N7wE@9`L\!#(B +% \begin{macrocode} +\def\pxrr@kenten@entry@ruby{% + \pxrr@k@entry@with\pxrr@kenten@entry@ruby@ +} +\def\pxrr@kenten@entry@ruby@#1{% + \pxrr@apply@combotrue + \setbox\pxrr@boxr\hbox{#1}% + \chardef\pxrr@k@entry@res@type=\@ne +} +% \end{macrocode} +% \end{macro} +% +% \subsubsection{\cs{kspan}$BL?Na(B} +% +% \begin{macro}{\kspan} +% $B%F%-%9%H$NI}$KAj1~$7$?8D?t$N7wE@$rIU$1$kL?Na!#(B +% |\kenten| $B$N0z?t$N%F%-%9%H$NCf$G;H$&!#(B +% +% |\kenten| $B$N30$G;H$o$l$?>l9g$OC1=c$K0z?t$r=PNO$9$k$@$1!#(B +% +% \Note $B=hM}$NET9g>e!"%*%W%7%g%s0z?t$r;}$?$;$F$$$k$,!"(B +% $Bo9`L\!J(B|\pxrr@entry|$B!K$N0z?t$r8!::$7$F!"(B +% $B7wE@$rIU2C$9$Y$-$+H]$+$r%9%$%C%A(B |pxrr@ok| $B$KJV$9!#(B +% $B$^$?!"9`L\$NA06XB'!&8e6XB'%Z%J%k%F%#$r@_Dj$9$k!#(B +% +% $B0z?t$,!JC10l$N!KDL>oJ8;z$G$"$k;~$O$=$NJ8;z!"(B +% $B0z?t$,%0%k!<%W$N>l9g$OOBJ86uGr$NFbItJ8;z%3!<%I$r(B |\pxrr@cntr| $B$K(B +% $BJV$9!J6XB'%Z%J%k%F%#$r8e$G8+$i$l$k$h$&$K!K!#(B +% \begin{macrocode} +\def\pxrr@k@check@char#1{% + \futurelet\pxrr@token\pxrr@k@check@char@a#1\pxrr@end +} +\def\pxrr@k@check@char@a#1\pxrr@end{% + \pxrr@cond\ifx\pxrr@token\bgroup\fi{% +% \end{macrocode} +% $B%0%k!<%W$K$O7wE@$rIU$1$k!#(B +% \begin{macrocode} + \pxrr@oktrue + }{\pxrr@cond\ifx\pxrr@token\@sptoken\fi{% +% \end{macrocode} +% $B2$J86uGr$K$O7wE@$rIU$1$J$$!#(B +% \begin{macrocode} + \pxrr@okfalse + }{% + \pxrr@check@char\pxrr@token + \ifcase\pxrr@cntr +% \end{macrocode} +% $BDL>oJ8;z$G$J$$$N$G7wE@$rIU$1$J$$!#(B +% \begin{macrocode} + \pxrr@okfalse + \or +% \end{macrocode} +% $B2$J8$NDL>oJ8;z!#7wE@$rIU$1$k!#(B +% \begin{macrocode} + \pxrr@oktrue + \chardef\pxrr@check@char@temp\z@ + \or +% \end{macrocode} +% $BOBJ8$NDL>oJ8;z!#7wE@$rIU$1$k!#(B +% \begin{macrocode} + \pxrr@oktrue + \chardef\pxrr@check@char@temp\@ne + \fi +% \end{macrocode} +% $BLsJ*$N7wE@IU2C$,L58z$N>l9g$O!"0z?t$NJ8;z$,LsJ*$G$"$k$+8!::$7!"(B +% $B$=$&$G$"$k>l9g$O7wE@$rIU$1$J$$!#(B +% \begin{macrocode} + \ifnum\pxrr@k@full=\z@\ifpxrr@ok + \pxrr@check@punct@char{`#1}\pxrr@check@char@temp + \ifpxrr@ok \pxrr@okfalse + \else \pxrr@oktrue + \fi + \fi\fi + \ifpxrr@ok + \pxrr@get@prebreakpenalty\@tempcnta{`#1}% + \mathchardef\pxrr@k@prebreakpenalty\@tempcnta + \pxrr@get@postbreakpenalty\@tempcnta{`#1}% + \mathchardef\pxrr@k@postbreakpenalty\@tempcnta + \fi + }}% +} +% \end{macrocode} +% \end{macro} +% +% \subsection{$B%a%$%s$G$9(B} +% +% \subsubsection{$B%(%s%H%j!<%]%$%s%H(B} +% +% \begin{macro}{\kenten} +% \begin{macro}{\jkenten} +% $B7wE@$N8x3+L?Na!#(B +% |\jkenten| $B$r4h6/$JL?Na$H$7$FDj5A$7$?>e$G!"(B|\kenten| $B$O$=$l$K(B +% $BE83+$5$l$k%^%/%m$K!JL$Dj5A$J$i$P!KDj5A$9$k!#(B +% \begin{macrocode} +\AtBeginDocument{% + \providecommand*{\kenten}{\jkenten}% +} +\newcommand*{\jkenten}{% + \pxrr@k@prologue + \pxrr@kenten +} +\pxrr@add@protect\jkenten +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\pxrr@kenten} +% $B%*%W%7%g%s$N=hM}$r9T$&!#(B +% \begin{macrocode} +\def\pxrr@kenten{% + \@testopt\pxrr@kenten@a{}% +} +\def\pxrr@kenten@a[#1]{% + \def\pxrr@option{#1}% + \ifpxrr@safe@mode +% \end{macrocode} +% $B0BA4%b!<%I$G$O7wE@5!G=$OL58z$J$N$G!"%U%)!<%k%P%C%/$H$7$F(B +% $B0z?t$N%F%-%9%H$r$=$N$^$^=PNO$9$k!#(B +% \begin{macrocode} + \expandafter\@firstofone + \else + \expandafter\pxrr@kenten@proc + \fi +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@k@bind@param} +% $B!H8F=P;~JQ?t!I$X$N%3%T!<$r9T$&!#(B +% \begin{macrocode} +\def\pxrr@k@bind@param{% + \let\pxrr@c@ruby@font\pxrr@k@ruby@font + \let\pxrr@c@size@ratio\pxrr@k@size@ratio + \let\pxrr@c@inter@gap\pxrr@k@inter@gap +} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@kenten@proc} +% |\pxrr@kenten@proc{|\jmeta{$B?FJ8;zNs(B}|}|\Means +% $B$3$l$,8e$K$NJQ?t(B} +% +% \begin{macro}{\pxrr@ck@zw} +% $B7wE@$NA43QI}!#(B +% \begin{macrocode} +\let\pxrr@ck@zw\relax +% \end{macrocode} +% \end{macro} +% \begin{macro}{\pxrr@ck@raise@P} +% $B%k%SB&$,(B |P| $B$G$"$k>l9g$N!"7wE@$N?bD>J}8~$N0\F0NL!#(B +% \Note $B7wE@B&$,(B |S| $B$G$"$k>l9g$OIiCM$K$J$k!#(B +% \begin{macrocode} +\let\pxrr@ck@raise@P\relax +% \end{macrocode} +% \end{macro} +% \begin{macro}{\pxrr@ck@raise@S} +% $B%k%SB&$,(B |S| $B$G$"$k>l9g$N!"7wE@$N?bD>J}8~$N0\F0NL!#(B +% \begin{macrocode} +\let\pxrr@ck@raise@S\relax +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@ck@raise@t} +% $B%k%SB&$,N>B&%k%S$G$"$k>l9g$N!"7wE@$N?bD>J}8~$N0\F0NL!#(B +% \begin{macrocode} +\let\pxrr@ck@raise@t\relax +% \end{macrocode} +% \end{macro} +% +% \subsection{$B%*%W%7%g%s@09g@-8!::(B} +% +% \begin{macro}{\pxrr@ck@check@option} +% $BF1;~IU2C$N$?$a$N8F=P;~%Q%i%a%?$ND4@0!#(B +% \begin{macrocode} +\def\pxrr@ck@check@option{% + \ifpxrr@ck@kenten@head + \let\pxrr@bintr@\@empty + \let\pxrr@bscomp=.\relax + \pxrr@bnobrtrue + \fi + \ifpxrr@ck@kenten@end + \let\pxrr@aintr@\@empty + \let\pxrr@ascomp=.\relax + \pxrr@anobrtrue + \fi +} +% \end{macrocode} +% \end{macro} +% +% \subsection{$B%U%)%s%H%5%$%:(B} +% +% \begin{macro}{\pxrr@ck@assign@fsize} +% $B%U%)%s%H$K4XO"$9$k@_Dj!#(B +% \begin{macrocode} +\def\pxrr@ck@assign@fsize{% +% \end{macrocode} +% |\pxrr@ck@zw| $B$NCM$r5a$a$k!#(B +% \begin{macrocode} + \begingroup + \@tempdima=\f@size\p@ + \@tempdima\pxrr@ck@size@ratio\@tempdima + \edef\pxrr@ruby@fsize{\the\@tempdima}% + \let\pxrr@c@ruby@font\pxrr@ck@ruby@font + \pxrr@use@ruby@font + \pxrr@get@zwidth\pxrr@ck@zw + \global\let\pxrr@gtempa\pxrr@ck@zw + \endgroup + \let\pxrr@ck@zw\pxrr@gtempa +% \end{macrocode} +% |\pxrr@ck@raise@P|$B!"(B|\pxrr@ck@raise@S| $B$NCM$r7W;;$9$k!#(B +% \begin{macrocode} + \ifcase\pxrr@ck@side +% \end{macrocode} +% $B7wE@B&$,(B |P| $B$N>l9g!#(B +% \begin{macrocode} + \@tempdimc\pxrr@ck@zw + \advance\@tempdimc-\pxrr@htratio\@tempdimc + \@tempdima\pxrr@ruby@raise\relax + \@tempdimb\pxrr@ruby@zw\relax + \advance\@tempdima\pxrr@htratio\@tempdimb + \@tempdimb\pxrr@body@zw\relax + \advance\@tempdima\pxrr@ck@ruby@inter@gap\@tempdimb + \advance\@tempdima\@tempdimc + \edef\pxrr@ck@raise@P{\the\@tempdima}% + \@tempdima\pxrr@body@zw\relax + \@tempdima\pxrr@htratio\@tempdima + \@tempdimb\pxrr@body@zw\relax + \advance\@tempdima\pxrr@ck@inter@gap\@tempdimb + \advance\@tempdima\@tempdimc + \edef\pxrr@ck@raise@S{\the\@tempdima}% + \let\pxrr@ck@raise@t\pxrr@ck@raise@P + \or +% \end{macrocode} +% $B7wE@B&$,(B |S| $B$N>l9g!#(B +% \begin{macrocode} + \@tempdimc\pxrr@ck@zw + \@tempdimc\pxrr@htratio\@tempdimc + \@tempdima-\pxrr@ruby@lower\relax + \@tempdimb\pxrr@ruby@zw\relax + \advance\@tempdimb-\pxrr@htratio\@tempdimb + \advance\@tempdima-\@tempdimb + \@tempdimb\pxrr@body@zw\relax + \advance\@tempdima-\pxrr@ck@ruby@inter@gap\@tempdimb + \advance\@tempdima-\@tempdimc + \edef\pxrr@ck@raise@S{\the\@tempdima}% + \@tempdima-\pxrr@body@zw\relax + \advance\@tempdima-\pxrr@htratio\@tempdima + \@tempdimb\pxrr@body@zw\relax + \advance\@tempdima-\pxrr@ck@inter@gap\@tempdimb + \advance\@tempdima-\@tempdimc + \edef\pxrr@ck@raise@P{\the\@tempdima}% + \let\pxrr@ck@raise@t\pxrr@ck@raise@S + \fi +} +% \end{macrocode} +% \end{macro} +% +% \subsection{$B%V%m%C%/Kh$NAHHG(B} +% +% \begin{macro}{\pxrr@ck@body@natwd} +% $B?FJ8;zNs$N<+A3D9!#(B +% \begin{macrocode} +\let\pxrr@ck@body@natwd\relax +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@ck@locate} +% $B7wE@Ns$N%Q%?!<%s;XDj!#(B +% \begin{macrocode} +\let\pxrr@ck@locate\relax +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@ck@kenten@list} +% $B7wE@Ns$N%j%9%H!#(B +% \begin{macrocode} +\let\pxrr@ck@kenten@list\relax +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@ck@compose} +% |#1| $B$K?FJ8;z%F%-%9%H!"(B|\pxrr@ck@body@natwd| $B$K?FJ8;z$N<+A3D9!"(B +% $B%\%C%/%9(B0$B$K%k%S=PNO!"(B|\pxrr@boxa| $B$K?FJ8;z=PNO!"(B +% |\pxrr@ck@locate| $B$K%Q%?!<%s$,F~$C$F$$$kA0Ds$G!"(B +% $B%\%C%/%9(B0$B$K7wE@$rDI2C$9$k!#(B +% +% \begin{macrocode} +\def\pxrr@ck@compose#1{% +% \end{macrocode} +% $B7wE@$rAH$s$@%\%C%/%9$r:n$k!#(B +% \begin{macrocode} + \setbox\tw@\pxrr@hbox@to\z@{% + \@tempdima=\f@size\p@ + \@tempdima\pxrr@ck@size@ratio\@tempdima + \edef\pxrr@ruby@fsize{\the\@tempdima}% + \let\pxrr@c@ruby@font\pxrr@ck@ruby@font + \pxrr@use@ruby@font + \hss\pxrr@ck@the@mark\hss + }% +% \end{macrocode} +% $B?FJ8;z%F%-%9%H$rJ,2r$7$?8e!"%j%9%H(B |\pxrr@res| $B$r(B +% $B7wE@$N%j%9%H$KCV$-49$($k!#(B +% \begin{macrocode} + \pxrr@save@listproc + \pxrr@decompose{#1}% + \def\pxrr@pre{% + \let\pxrr@res\@empty + \pxrr@ck@compose@entry\pxrr@pre + }% + \def\pxrr@inter{% + \pxrr@ck@compose@entry\pxrr@inter + }% + \def\pxrr@post{% + \pxrr@appto\pxrr@res{\pxrr@post}% + }% + \pxrr@res + \pxrr@restore@listproc + \let\pxrr@natwd\pxrr@ck@body@natwd +% \end{macrocode} +% $B7wE@%j%9%H$r6QEyG[CV$9$k!#(B +% \begin{macrocode} + \pxrr@evenspace@int\pxrr@ck@locate\pxrr@boxb\relax + {\wd\pxrr@boxa}% +% \end{macrocode} +% $B9g@.=hM}!#(B +% \begin{macrocode} + \setbox\z@\hbox{% + \unhcopy\z@ + \kern-\wd\z@ + \ifcase\pxrr@side + \raise\pxrr@ck@raise@P + \or + \raise\pxrr@ck@raise@S + \or + \raise\pxrr@ck@raise@t + \fi + \hb@xt@\wd\pxrr@boxa{\hss\copy\pxrr@boxb\hss}% + }% +} +\def\pxrr@ck@compose@entry#1#2{% + \setbox\pxrr@boxb\pxrr@hbox{#2}% + \edef\pxrr@tempa{% + \noexpand\pxrr@appto\noexpand\pxrr@res{\noexpand#1{% + \hb@xt@\the\wd\pxrr@boxb{\hss\copy\tw@\hss}}}% + }\pxrr@tempa +} +% \end{macrocode} +% \end{macro} +% +%^^A------------------------------------ +% \section{$Bu$G$O!"%k%S!&7wE@$H$b$K?FJ8;z$N$_$r=PNO$9$k$3$H$K$9$k!#(B +% +% \begin{macro}{\pxrr@dumb@sub} +% $B%*%W%7%g%sItJ,$rFI$_Ht$P$9Jd=u%^%/%m!#(B +% \begin{macrocode} +\def\pxrr@dumb@sub#1#2#{#1} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@dumb@ruby} +% $BL5Fq$J%k%SL?Na!#(B +% \begin{macrocode} +\def\pxrr@dumb@ruby{% + \pxrr@dumb@sub\pxrr@dumb@ruby@ +} +\def\pxrr@dumb@ruby@#1#2{#1} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@dumb@truby} +% $BL5Fq$JN>B&%k%SL?Na!#(B +% \begin{macrocode} +\def\pxrr@dumb@truby{% + \pxrr@dumb@sub\pxrr@dumb@truby@ +} +\def\pxrr@dumb@truby@#1#2#3{#1} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\pxrr@dumb@tkenten} +% $BL5Fq$J7wE@L?Na!#(B +% \Note |\kspan| $B$b$3$NDj5A$rMxMQ$9$k!#(B +% \begin{macrocode} +\def\pxrr@dumb@kenten{% + \pxrr@dumb@sub\pxrr@dumb@kenten@ +} +\def\pxrr@dumb@kenten@#1{#1} +% \end{macrocode} +% \end{macro} +% +% \PKN{hyperref}$B$N(B |\pdfstringdef| $BMQ$N%U%C%/(B |\pdfstringdefPreHook| +% $B$K>e=q$-=hM}$rDI5-$9$k!#(B +% \begin{macrocode} +\providecommand*\pdfstringdefPreHook{} +\g@addto@macro\pdfstringdefPreHook{% +% \end{macrocode} +% |\ruby| $B$H(B |\kenten| $B$O!VK\%Q%C%1!<%8$NL?Na$G$"$k$+!W$N8!::$,I,MW!#(B +% \begin{macrocode} + \ifx\pxrr@cmd@ruby\ruby + \let\ruby\pxrr@dumb@ruby + \fi + \let\jruby\pxrr@dumb@ruby + \let\aruby\pxrr@dumb@ruby + \let\truby\pxrr@dumb@truby + \let\atruby\pxrr@dumb@truby + \ifx\pxrr@cmd@kenten\kenten + \let\kenten\pxrr@dumb@kenten + \fi + \let\kspan\pxrr@dumb@kenten +} +% \end{macrocode} +% +%^^A------------------------------------ % \Finale % \endinput diff --git a/Master/texmf-dist/tex/platex/pxrubrica/pxrubrica.sty b/Master/texmf-dist/tex/platex/pxrubrica/pxrubrica.sty index 7bc67f1b6a2..3efd8853ac3 100644 --- a/Master/texmf-dist/tex/platex/pxrubrica/pxrubrica.sty +++ b/Master/texmf-dist/tex/platex/pxrubrica/pxrubrica.sty @@ -22,7 +22,7 @@ %% in the same archive or directory.) \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{pxrubrica} - [2017/04/20 v1.2 PX Japanese-style ruby] + [2017/04/27 v1.3 PX Japanese-style ruby] \RequirePackage{keyval} \def\pxrr@pkgname{pxrubrica} \def\pxrr@error{% @@ -159,6 +159,9 @@ \chardef\pxrr@evensp=1 \chardef\pxrr@revensp=1 \chardef\pxrr@fullsize=1 +\let\pxrr@c@ruby@font\@undefined +\let\pxrr@c@size@ratio\@undefined +\let\pxrr@c@inter@gap\@undefined \let\pxrr@body@list\@undefined \let\pxrr@body@count\@undefined \let\pxrr@ruby@list\@undefined @@ -609,6 +612,27 @@ \def#1{?}% } \fi\fi +\pxrr@jchardef\pxrr@zspace=\pxrr@jc{2121:3000} +\ifpxrr@in@uptex + \kchardef\pxrr@jghost@char="113000 +\else\ifpxrr@in@luatexja + \let\pxrr@jghost@char\pxrr@zspace + \def\pxrr@jghost@check{% + \begingroup + \setbox\z@\hbox{\char"3001\char"3000}% + \setbox\tw@\hbox{\char"3001\inhibitglue\char"3000}% + \ifdim\wd\tw@=\wd\z@ + \global\chardef\pxrr@jghost@char@="00A0 + \gdef\pxrr@jghost@char{\ltjjachar\pxrr@jghost@char@}% + \fi + \endgroup + } + \AtBeginDocument{% + \pxrr@jghost@check + } +\else + \let\pxrr@jghost@char\pxrr@zspace +\fi\fi \pxrr@jchardef\pxrr@x@K=\pxrr@jc{306C:4E00} \ifpxrr@in@ptex \def\pxrr@get@iiskip#1{% @@ -711,17 +735,61 @@ \fi\fi\fi\fi \ifpxrr@in@ptex \def\pxrr@get@prebreakpenalty#1#2{% - #1=\prebreakpenalty`#2\relax + #1=\prebreakpenalty#2\relax } \else\ifpxrr@in@luatexja \def\pxrr@get@prebreakpenalty#1#2{% - #1=\ltjgetparameter{prebreakpenalty}{`#2}\relax + #1=\ltjgetparameter{prebreakpenalty}{#2}\relax } \else \def\pxrr@get@prebreakpenalty#1#2{% #1=\z@ } \fi\fi +\ifpxrr@in@ptex + \def\pxrr@get@postbreakpenalty#1#2{% + #1=\postbreakpenalty#2\relax + } +\else\ifpxrr@in@luatexja + \def\pxrr@get@postbreakpenalty#1#2{% + #1=\ltjgetparameter{postbreakpenalty}{#2}\relax + } +\else + \def\pxrr@get@postbreakpenalty#1#2{% + #1=\z@ + } +\fi\fi +\ifpxrr@in@ptex + \def\pxrr@check@punct@char#1#2{% + \pxrr@okfalse + \ifcase#2\relax + \ifnum\xspcode#1=\thr@@\else + \pxrr@oktrue + \fi + \else + \ifnum\inhibitxspcode#1=\thr@@\else + \pxrr@oktrue + \fi + \fi + } +\else\ifpxrr@in@luatexja + \def\pxrr@check@punct@char#1#2{% + \ifnum\ltjgetparameter{jaxspmode}{#1}=\thr@@ + \pxrr@okfalse + \else + \pxrr@oktrue + \fi + } +\else + \def\pxrr@check@punct@char#1#2{% + \pxrr@okfalse + } +\fi\fi +\ifx\inhibitglue\@undefined + \let\pxrr@inhibitglue\relax +\else + \let\pxrr@inhibitglue\inhibitglue +\fi \newif\ifpxrr@in@setup \pxrr@in@setupfalse \newcommand*\rubysetup[1]{% \pxrr@in@setuptrue @@ -1131,6 +1199,9 @@ \if g\pxrr@mode\else \chardef\pxrr@evensp\@ne \fi + \ifpxrr@combo + \pxrr@ck@check@option + \fi } \let\pxrr@ruby@fsize\pxrr@zeropt \let\pxrr@body@zw\pxrr@zeropt @@ -1142,7 +1213,7 @@ \let\pxrr@iaiskip\pxrr@zeropt \def\pxrr@assign@fsize{% \@tempdima=\f@size\p@ - \@tempdima\pxrr@size@ratio\@tempdima + \@tempdima\pxrr@c@size@ratio\@tempdima \edef\pxrr@ruby@fsize{\the\@tempdima}% \pxrr@get@zwidth\pxrr@body@zw \begingroup @@ -1164,7 +1235,7 @@ \advance\@tempdimb-\pxrr@htratio\@tempdimb \advance\@tempdima\@tempdimb \@tempdimb\pxrr@body@zw\relax - \advance\@tempdima\pxrr@inter@gap\@tempdimb + \advance\@tempdima\pxrr@c@inter@gap\@tempdimb \edef\pxrr@ruby@raise{\the\@tempdima}% \@tempdima\pxrr@body@zw\relax \advance\@tempdima-\pxrr@htratio\@tempdima @@ -1172,14 +1243,17 @@ \@tempdimb\pxrr@htratio\@tempdimb \advance\@tempdima\@tempdimb \@tempdimb\pxrr@body@zw\relax - \advance\@tempdima\pxrr@inter@gap\@tempdimb + \advance\@tempdima\pxrr@c@inter@gap\@tempdimb \edef\pxrr@ruby@lower{\the\@tempdima}% + \ifpxrr@combo + \pxrr@ck@assign@fsize + \fi } \def\pxrr@use@ruby@font{% \pxrr@without@macro@trace{% \let\rubyfontsize\pxrr@ruby@fsize \fontsize{\pxrr@ruby@fsize}{\z@}\selectfont - \pxrr@ruby@font + \pxrr@c@ruby@font }% } \chardef\pxrr@locate@inner=1 @@ -1368,6 +1442,8 @@ } \def\pxrr@compose@oneside@block@do#1#2#3#4{% \setbox\pxrr@boxa\pxrr@hbox{#2}% + \edef\pxrr@ck@body@natwd{\the\wd\pxrr@boxa}% + \let\pxrr@ck@locate\pxrr@locate@inner \setbox\pxrr@boxr\pxrr@hbox{% \pxrr@use@ruby@font #3% @@ -1382,6 +1458,7 @@ \let\pxrr@locate@temp\pxrr@locate@head \fi \fi + \let\pxrr@ck@locate\pxrr@locate@temp \pxrr@decompose{#2}% \edef\pxrr@natwd{\the\wd\pxrr@boxa}% \pxrr@evenspace@int\pxrr@locate@temp\pxrr@boxa\relax @@ -1409,6 +1486,9 @@ \lower\pxrr@ruby@lower\box\pxrr@boxr \fi }% + \ifnum \ifpxrr@combo\pxrr@ck@ruby@combo\else\z@\fi >\z@ + \pxrr@ck@compose{#2}% + \fi \ht\z@\z@ \dp\z@\z@ \@tempdima\wd\z@ \setbox\pxrr@boxr\hbox{% @@ -1426,6 +1506,8 @@ } \def\pxrr@compose@twoside@block@do#1#2#3#4{% \setbox\pxrr@boxa\pxrr@hbox{#2}% + \edef\pxrr@ck@body@natwd{\the\wd\pxrr@boxa}% + \let\pxrr@ck@locate\pxrr@locate@inner \setbox\pxrr@boxr\pxrr@hbox{% \pxrr@use@ruby@font #3% @@ -1449,6 +1531,7 @@ \let\pxrr@locate@temp\pxrr@locate@head \fi \fi + \let\pxrr@ck@locate\pxrr@locate@temp \ifdim\wd\pxrr@boxr<\wd\pxrr@boxb \pxrr@compose@twoside@block@sub{#2}{#3}% \pxrr@boxr\pxrr@boxb @@ -1487,6 +1570,9 @@ \kern-\@tempdima \lower\pxrr@ruby@lower\box\pxrr@boxb }% + \ifnum \ifpxrr@combo\pxrr@ck@ruby@combo\else\z@\fi >\z@ + \pxrr@ck@compose{#2}% + \fi \ht\z@\z@ \dp\z@\z@ \@tempdima\wd\z@ \setbox\pxrr@boxr\hbox{% @@ -1643,7 +1729,7 @@ \pxrr@check@kinsoku@c#1#1% } \def\pxrr@check@kinsoku@c#1{% - \pxrr@get@prebreakpenalty\pxrr@cntr{#1}% + \pxrr@get@prebreakpenalty\pxrr@cntr{`#1}% \pxrr@tempb } \def\pxrr@tempa#1#2\pxrr@nil{% @@ -1834,8 +1920,21 @@ \else F% \fi\fi T% } +\def\pxrr@bind@param{% + \ifpxrr@apply@combo + \pxrr@apply@combofalse + \pxrr@combotrue + \pxrr@ck@bind@param + \else + \pxrr@combofalse + \fi + \let\pxrr@c@ruby@font\pxrr@ruby@font + \let\pxrr@c@size@ratio\pxrr@size@ratio + \let\pxrr@c@inter@gap\pxrr@inter@gap +} \def\pxrr@ruby@proc#1#2{% \pxrr@prepare@fallback{#1}% + \pxrr@bind@param \pxrr@assign@fsize \pxrr@parse@option\pxrr@option \pxrr@decompbar{#2}% @@ -1873,6 +1972,7 @@ } \def\pxrr@truby@proc#1#2#3{% \pxrr@prepare@fallback{#1}% + \pxrr@bind@param \pxrr@assign@fsize \pxrr@parse@option\pxrr@option \def\pxrr@all@input{{#1}{#2}{#3}}% @@ -2213,16 +2313,16 @@ } \let\pxrr@ruby@main@mg\@undefined \newif\ifpxrr@ghost -\pxrr@jchardef\pxrr@zspace=\pxrr@jc{2121:3000} \def\pxrr@jprologue{% \ifpxrr@jghost - \pxrr@zspace + \pxrr@jghost@char + \pxrr@inhibitglue \fi \begingroup \pxrr@abodyfalse \pxrr@csletcs{ifpxrr@ghost}{ifpxrr@jghost}% \ifpxrr@jghost - \setbox\pxrr@boxa\hbox{\pxrr@zspace}% + \setbox\pxrr@boxa\hbox{\pxrr@jghost@char}% \kern-\wd\pxrr@boxa \fi } @@ -2266,12 +2366,13 @@ } \def\pxrr@jepilogue{% \ifpxrr@jghost - \setbox\pxrr@boxa\hbox{\pxrr@zspace}% + \setbox\pxrr@boxa\hbox{\pxrr@jghost@char}% \kern-\wd\pxrr@boxa \fi \endgroup \ifpxrr@jghost - \pxrr@zspace + \pxrr@inhibitglue + \pxrr@jghost@char \fi } \def\pxrr@aepilogue{% @@ -2339,6 +2440,771 @@ \typeout{----\pxrr@pkgname\space resolve-mode: \meaning\pxrr@mode}% } +\def\pxrr@warn@na@kmark#1{% + \pxrr@warn{Unavailable kenten mark '#1'}% +} +\def\pxrr@err@invalid@value#1{% + \pxrr@error{Invalid value '#1'}% + {\@eha}% +} +\let\pxrr@k@ymark\@undefined +\let\pxrr@k@ysmark\@undefined +\let\pxrr@k@tmark\@undefined +\let\pxrr@k@tsmark\@undefined +\AtEndOfPackage{% + \pxrr@k@get@mark\pxrr@k@ymark{bullet*}% + \pxrr@k@get@mark\pxrr@k@ysmark{sesame*}% + \pxrr@k@get@mark\pxrr@k@tmark{sesame*}% + \pxrr@k@get@mark\pxrr@k@tsmark{bullet*}% +} +\let\pxrr@k@ruby@font\@empty +\def\pxrr@k@size@ratio{0.5} +\newif\ifpxrr@k@ghost \pxrr@k@ghosttrue +\def\pxrr@k@inter@gap{0} +\def\pxrr@k@ruby@inter@gap{0} +\chardef\pxrr@k@d@side=0 +\chardef\pxrr@k@d@mark=0 +\chardef\pxrr@k@ruby@combo=1 +\chardef\pxrr@k@d@full=0 +\chardef\pxrr@k@mark=0 +\chardef\pxrr@k@full=0 +\let\pxrr@k@the@mark\relax +\newif\ifpxrr@avail@UTF +\def\pxrr@decide@avail@UTF{% + \global\let\pxrr@decide@avail@UTF\relax + \ifx\UTF\@undefined \global\pxrr@avail@UTFfalse + \else \global\pxrr@avail@UTFtrue + \fi +} +\def\pxrr@k@decompose#1{% + \let\pxrr@res\@empty + \pxrr@cntr=\z@ + \pxrr@k@decompose@loopa#1\pxrr@end +} +\def\pxrr@k@decompose@loopa{% + \futurelet\pxrr@token\pxrr@k@decompose@loopb +} +\def\pxrr@k@decompose@loopb{% + \pxrr@cond\ifx\pxrr@token\pxrr@end\fi{% + \pxrr@appto\pxrr@res{\pxrr@post}% + }{\pxrr@if@kspan@cmd\pxrr@token{% + \pxrr@k@decompose@special\pxrr@k@decompose@kspan + }{\pxrr@if@ruby@cmd\pxrr@token{% + \pxrr@k@decompose@special\pxrr@k@decompose@ruby + }{\pxrr@if@truby@cmd\pxrr@token{% + \pxrr@k@decompose@special\pxrr@k@decompose@truby + }{\pxrr@if@kenten@cmd\pxrr@token{% + \pxrr@k@decompose@special\pxrr@k@decompose@kenten + }{\pxrr@cond\ifx\pxrr@token\@sptoken\fi{% + \pxrr@k@decompose@loope + }{% + \pxrr@setok{\pxrr@ifx{\pxrr@token\bgroup}}% + \pxrr@k@decompose@loopc + }}}}}}% +} +\def\pxrr@k@decompose@loopc#1{% + \pxrr@appto\pxrr@res{\pxrr@entry}% + \ifpxrr@ok + \pxrr@appto\pxrr@res{{{#1}}}% + \else + \pxrr@appto\pxrr@res{{#1}}% + \fi + \pxrr@k@decompose@loopd +} +\def\pxrr@k@decompose@loopd{% + \advance\pxrr@cntr\@ne + \pxrr@k@decompose@loopa +} +\expandafter\def\expandafter\pxrr@k@decompose@loope\space{% + \pxrr@okfalse + \pxrr@k@decompose@loopc{ }% +} +\def\pxrr@k@decompose@special#1#2#{% + #1{#2}% +} +\def\pxrr@k@decompose@kspan#1#2{% + \pxrr@appto\pxrr@res{\pxrr@entry@kspan{#1{#2}}}% + \pxrr@k@decompose@loopd +} +\def\pxrr@k@decompose@ruby#1#2#3{% + \pxrr@appto\pxrr@res{\pxrr@entry@ruby{#1{#2}{#3}}}% + \pxrr@k@decompose@loopd +} +\def\pxrr@k@decompose@truby#1#2#3#4{% + \pxrr@appto\pxrr@res{\pxrr@entry@ruby{#1{#2}{#3}{#4}}}% + \pxrr@k@decompose@loopd +} +\def\pxrr@k@decompose@kenten#1#2{% + \pxrr@appto\pxrr@res{\pxrr@entry@kenten{#1{#2}}}% + \pxrr@k@decompose@loopd +} +\def\pxrr@cmd@ruby{\jruby} +\def\pxrr@cmd@kenten{\jkenten} +\def\pxrr@if@ruby@cmd#1{% + \if \ifcat\noexpand#1\relax + \ifx#1\pxrr@cmd@ruby T% + \else\ifx#1\jruby T% + \else\ifx#1\aruby T% + \else F% + \fi\fi\fi + \else F% + \fi T\expandafter\@firstoftwo + \else \expandafter\@secondoftwo + \fi +} +\def\pxrr@if@truby@cmd#1{% + \if \ifcat\noexpand#1\relax + \ifx#1\truby T% + \else\ifx#1\atruby T% + \else F% + \fi\fi + \else F% + \fi T\expandafter\@firstoftwo + \else \expandafter\@secondoftwo + \fi +} +\def\pxrr@if@kspan@cmd#1{% + \pxrr@cond\ifx#1\kspan\fi +} +\def\pxrr@if@kenten@cmd#1{% + \if \ifcat\noexpand#1\relax + \ifx#1\pxrr@cmd@kenten T% + \else\ifx#1\jkenten T% + \else F% + \fi\fi + \else F% + \fi T\expandafter\@firstoftwo + \else \expandafter\@secondoftwo + \fi +} +\newcommand*\kentensetup[1]{% + \pxrr@in@setuptrue + \pxrr@fatal@errorfalse + \pxrr@k@parse@option{#1}% + \ifpxrr@fatal@error\else + \let\pxrr@k@d@side\pxrr@side + \let\pxrr@k@d@mark\pxrr@k@mark + \let\pxrr@k@d@full\pxrr@k@full + \fi + \pxrr@in@setupfalse +} +\newcommand*\kentenfontsetup{} +\def\kentenfontsetup#{% + \def\pxrr@k@ruby@font +} +\newcommand*\kentensizeratio[1]{% + \edef\pxrr@k@size@ratio{#1}% +} +\newcommand*\kentenintergap[1]{% + \edef\pxrr@k@inter@gap{#1}% +} +\newcommand*\kentenrubyintergap[1]{% + \edef\pxrr@k@ruby@inter@gap{#1}% +} +\newcommand*\kentenmarkinyoko[1]{% + \pxrr@k@get@mark\pxrr@k@ymark{#1}% +} +\newcommand*\kentensubmarkinyoko[1]{% + \pxrr@k@get@mark\pxrr@k@ysmark{#1}% +} +\newcommand*\kentenmarkintate[1]{% + \pxrr@k@get@mark\pxrr@k@tmark{#1}% +} +\newcommand*\kentensubmarkintate[1]{% + \pxrr@k@get@mark\pxrr@k@tsmark{#1}% +} +\chardef\pxrr@k@ruby@combo@ruby=0 +\chardef\pxrr@k@ruby@combo@both=1 +\newcommand*\kentenrubycombination[1]{% + \pxrr@letcs\pxrr@tempa{pxrr@k@ruby@combo@#1}% + \ifx\pxrr@tempa\relax + \pxrr@err@invalid@value{#1}% + \else + \let\pxrr@k@ruby@combo\pxrr@tempa + \fi +} +\def\pxrr@k@declare@mark#1{% + \global\@namedef{pxrr@k@mark@@#1}% +} +\def\pxrr@k@let@mark#1{% + \global\pxrr@cslet{pxrr@k@mark@@#1}% +} +\def\pxrr@k@get@mark#1#2{% + \futurelet\pxrr@token\pxrr@k@get@mark@a#2\pxrr@nil#1% +} +\def\pxrr@k@get@mark@a{% + \pxrr@cond\ifcat A\noexpand\pxrr@token\fi{% + \pxrr@k@get@mark@c + }{%else + \pxrr@k@get@mark@b + }% +} +\def\pxrr@k@get@mark@b#1\pxrr@nil#2{% + \def#2{#1}% +} +\def\pxrr@k@get@mark@c#1#2\pxrr@nil#3{% + \ifnum`#1<128 + \pxrr@letcs\pxrr@tempa{pxrr@k@mark@@#1#2}% + \ifx\pxrr@tempa\relax + \pxrr@warn@na@kmark{#1#2}% + \else + \let#3\pxrr@tempa + \fi + \else + \pxrr@k@get@mark@b#1#2\pxrr@nil#3% + \fi +} +\def\pxrr@k@declare@mark@char#1#2{% + \pxrr@k@declare@mark@char@a{#1}#2\pxrr@end +} +\def\pxrr@k@declare@mark@char@a#1#2:#3\pxrr@end{% + \pxrr@jchardef\pxrr@tempa\pxrr@jc{#2:#3}% + \ifnum\pxrr@tempa=\pxrr@zspace + \pxrr@k@declare@mark{#1}{\pxrr@k@char@UTF{#1}{#3}}% + \else + \pxrr@k@let@mark{#1}\pxrr@tempa + \fi +} +\def\pxrr@k@char@UTF#1#2{% + \pxrr@decide@avail@UTF + \ifpxrr@avail@UTF + \pxrr@k@declare@mark{#1}{\UTF{#2}}% + \UTF{#2}% + \else + \pxrr@k@let@mark{#1}\@empty + \pxrr@warn@na@kmark{#1}% + \fi +} +\pxrr@k@declare@mark@char{bullet} {2121:2022} +\pxrr@k@declare@mark@char{triangle}{2225:25B2} +\pxrr@k@declare@mark@char{Triangle}{2224:25B3} +\pxrr@k@declare@mark@char{fisheye} {2121:25C9} +\pxrr@k@declare@mark@char{Circle} {217B:25CB} +\pxrr@k@declare@mark@char{bullseye}{217D:25CE} +\pxrr@k@declare@mark@char{circle} {217C:25CF} +\pxrr@k@declare@mark@char{Bullet} {2121:25E6} +\pxrr@k@declare@mark@char{sesame} {2121:FE45} +\pxrr@k@declare@mark@char{Sesame} {2121:FE46} +\pxrr@jchardef\pxrr@ja@dot=\pxrr@jc{2126:30FB} +\pxrr@jchardef\pxrr@ja@comma=\pxrr@jc{2122:3001} +\pxrr@k@declare@mark{bullet*}{% + \pxrr@dima=\pxrr@ruby@zw\relax + \hb@xt@\pxrr@dima{% + \kern-.5\pxrr@dima + \pxrr@if@in@tate{}{\lower.38\pxrr@dima}% + \hbox{% + \pxrr@dima=\f@size\p@ + \fontsize{2\pxrr@dima}{\z@}\selectfont + \pxrr@ja@dot + }% + \hss + }% +} +\pxrr@k@declare@mark{sesame*}{% + \pxrr@dima=\pxrr@ruby@zw\relax + \hb@xt@\pxrr@dima{% + \pxrr@if@in@tate{\kern.1\pxrr@dima}{\kern.05\pxrr@dima}% + \pxrr@if@in@tate{\lower.85\pxrr@dima}{\raise.3\pxrr@dima}% + \hbox{% + \pxrr@dima=\f@size\p@ + \fontsize{2.4\pxrr@dima}{\z@}\selectfont + \pxrr@ja@comma + }% + \hss + }% +} +\def\pxrr@k@parse@option#1{% + \edef\pxrr@tempa{#1}% + \let\pxrr@side\pxrr@k@d@side + \let\pxrr@k@mark\pxrr@k@d@mark + \let\pxrr@k@full\pxrr@k@d@full + \expandafter\pxrr@k@parse@option@loop\pxrr@tempa @\pxrr@end +} +\def\pxrr@k@parse@option@loop#1{% + \pxrr@letcs\pxrr@tempa{pxrr@k@po@PR@#1}% + \pxrr@cond\ifx\pxrr@tempa\relax\fi{% + \pxrr@fatal@knx@letter{#1}% + \pxrr@k@parse@option@exit + }{% + \pxrr@tempa + \pxrr@k@parse@option@loop + }% +} +\def\pxrr@k@parse@option@exit#1\pxrr@end{% + \ifpxrr@in@setup\else + \pxrr@k@check@option + \pxrr@if@in@tate{% + \ifcase\pxrr@k@mark \let\pxrr@k@the@mark\pxrr@k@tmark + \or \let\pxrr@k@the@mark\pxrr@k@tsmark + \fi + }{% + \ifcase\pxrr@k@mark \let\pxrr@k@the@mark\pxrr@k@ymark + \or \let\pxrr@k@the@mark\pxrr@k@ysmark + \fi + }% + \fi +} +\def\pxrr@k@po@PR@@{% + \pxrr@k@parse@option@exit +} +\def\pxrr@k@po@PR@P{% + \chardef\pxrr@side\z@ +} +\def\pxrr@k@po@PR@S{% + \chardef\pxrr@side\@ne +} +\def\pxrr@k@po@PR@p{% + \chardef\pxrr@k@mark\z@ +} +\def\pxrr@k@po@PR@s{% + \chardef\pxrr@k@mark\@ne +} +\def\pxrr@k@po@PR@F{% + \chardef\pxrr@k@full\z@ +} +\def\pxrr@k@po@PR@f{% + \chardef\pxrr@k@full\@ne +} +\def\pxrr@k@check@option{% +} +\def\pxrr@k@compose@block#1#2{% + \setbox\pxrr@boxa\pxrr@hbox{#1}% + \pxrr@k@make@rep@list{\copy\pxrr@boxb}{#2}% + \let\pxrr@natwd\pxrr@zeropt + \pxrr@evenspace@int\pxrr@locate@inner\pxrr@boxr + \relax{\wd\pxrr@boxa}% + \setbox\z@\hbox{% + \ifnum\pxrr@side=\z@ + \raise\pxrr@ruby@raise\box\pxrr@boxr + \else + \lower\pxrr@ruby@lower\box\pxrr@boxr + \fi + }% + \ht\z@\z@ \dp\z@\z@ + \@tempdima\wd\z@ + \setbox\pxrr@boxr\hbox{% + \box\z@ + \kern-\@tempdima + \box\pxrr@boxa + }% +} +\def\pxrr@k@make@rep@list#1#2{% + \def\pxrr@res{\pxrr@pre{#1}}% + \pxrr@cntr=#2\relax + \ifnum\pxrr@cntr>\@ne + \@tempcnta\pxrr@cntr \advance\@tempcnta\m@ne + \@whilenum{\@tempcnta>\z@}\do{% + \pxrr@appto\pxrr@res{\pxrr@inter{#1}}% + \advance\@tempcnta\m@ne + }% + \fi + \pxrr@appto\pxrr@res{\pxrr@post}% +} +\newif\ifpxrr@k@first@entry +\newif\ifpxrr@k@last@entry +\newif\ifpxrr@k@prev@is@block +\let\pxrr@k@accum@res\relax +\mathchardef\pxrr@k@prebreakpenalty\z@ +\mathchardef\pxrr@k@postbreakpenalty\z@ +\chardef\pxrr@k@entry@res@type\z@ +\def\pxrr@k@list@pre{% + \pxrr@k@first@entrytrue + \pxrr@k@last@entryfalse + \pxrr@k@prev@is@blockfalse + \let\pxrr@k@accum@res\@empty + \chardef\pxrr@k@block@seq@state\z@ +} +\def\pxrr@k@entry@with#1#2{% + \pxrr@if@last{% + \pxrr@k@last@entrytrue + \pxrr@k@entry@with@a#1{#2}% + }{% + \pxrr@k@entry@with@a#1{#2}% + }% +} +\def\pxrr@k@entry@with@a#1#2{% + \mathchardef\pxrr@k@prebreakpenalty\z@ + \mathchardef\pxrr@k@postbreakpenalty\z@ + #1{#2}% + \ifnum\pxrr@k@entry@res@type=\z@ + \expandafter\pxrr@appto\expandafter\pxrr@k@accum@res + \expandafter{\pxrr@res}% + \else + \pxrr@k@accum@res + \let\pxrr@k@accum@res\@empty + \fi + \ifnum\pxrr@k@prebreakpenalty>\z@ + \@tempcntb\lastpenalty \unpenalty + \advance\@tempcntb\pxrr@k@prebreakpenalty + \penalty\@tempcntb + \fi + \ifnum\pxrr@k@entry@res@type=\tw@ + \ifpxrr@k@prev@is@block + \pxrr@inter@mono + \fi + \pxrr@k@prev@is@blocktrue + \else + \pxrr@k@prev@is@blockfalse + \fi + \ifnum\pxrr@k@entry@res@type>\z@ + \unhbox\pxrr@boxr + \fi + \ifnum\pxrr@k@postbreakpenalty>\z@ + \penalty\pxrr@k@postbreakpenalty + \fi + \pxrr@k@first@entryfalse +} +\def\pxrr@k@list@post{% + \pxrr@k@accum@res + \let\pxrr@k@accum@res\@empty +} +\def\pxrr@kenten@entry{% + \pxrr@k@entry@with\pxrr@kenten@entry@ +} +\def\pxrr@kenten@entry@#1{% + \pxrr@k@check@char{#1}% + \ifpxrr@ok + \pxrr@k@compose@block{#1}\@ne + \chardef\pxrr@k@entry@res@type=\tw@ + \else + \def\pxrr@res{#1}% + \chardef\pxrr@k@entry@res@type=\z@ + \fi +} +\def\pxrr@kenten@entry@kspan{% + \pxrr@k@entry@with\pxrr@kenten@entry@kspan@ +} +\def\pxrr@kenten@entry@kspan@#1{% + \pxrr@kenten@entry@kspan@a#1% +} +\def\pxrr@kenten@entry@kspan@a#1{% + \@ifstar{% + \@testopt\pxrr@kenten@entry@kspan@c{}% + }{% + \@testopt\pxrr@kenten@entry@kspan@b{}% + }% +} +\def\pxrr@kenten@entry@kspan@b[#1]#2{% + \setbox\z@\pxrr@hbox{#2}% + \@tempdima\pxrr@body@zw\relax + \@tempdimb\wd\z@ \advance\@tempdimb.25\@tempdima + \divide\@tempdimb\@tempdima + \edef\pxrr@kenten@entry@tempa{\number\@tempdimb}% + \pxrr@k@compose@block{#2}\pxrr@kenten@entry@tempa + \chardef\pxrr@k@entry@res@type=\tw@ +} +\def\pxrr@kenten@entry@kspan@c[#1]#2{% + \def\pxrr@res{#2}% + \chardef\pxrr@k@entry@res@type=\z@ +} +\def\pxrr@kenten@entry@kenten{% + \pxrr@k@entry@with\pxrr@kenten@entry@kenten@ +} +\def\pxrr@kenten@entry@kenten@#1{% + \setbox\pxrr@boxr\hbox{#1}% + \chardef\pxrr@k@entry@res@type=\@ne +} +\def\pxrr@kenten@entry@ruby{% + \pxrr@k@entry@with\pxrr@kenten@entry@ruby@ +} +\def\pxrr@kenten@entry@ruby@#1{% + \pxrr@apply@combotrue + \setbox\pxrr@boxr\hbox{#1}% + \chardef\pxrr@k@entry@res@type=\@ne +} +\newcommand*\kspan{% + \@ifstar{% + \@testopt\pxrr@kspan@a{}% + }{% + \@testopt\pxrr@kspan@a{}% + }% +} +\pxrr@add@protect\kspan +\def\pxrr@kspan@a[#1]#2{% + \begingroup + #2% + \endgroup +} +\def\pxrr@k@check@char#1{% + \futurelet\pxrr@token\pxrr@k@check@char@a#1\pxrr@end +} +\def\pxrr@k@check@char@a#1\pxrr@end{% + \pxrr@cond\ifx\pxrr@token\bgroup\fi{% + \pxrr@oktrue + }{\pxrr@cond\ifx\pxrr@token\@sptoken\fi{% + \pxrr@okfalse + }{% + \pxrr@check@char\pxrr@token + \ifcase\pxrr@cntr + \pxrr@okfalse + \or + \pxrr@oktrue + \chardef\pxrr@check@char@temp\z@ + \or + \pxrr@oktrue + \chardef\pxrr@check@char@temp\@ne + \fi + \ifnum\pxrr@k@full=\z@\ifpxrr@ok + \pxrr@check@punct@char{`#1}\pxrr@check@char@temp + \ifpxrr@ok \pxrr@okfalse + \else \pxrr@oktrue + \fi + \fi\fi + \ifpxrr@ok + \pxrr@get@prebreakpenalty\@tempcnta{`#1}% + \mathchardef\pxrr@k@prebreakpenalty\@tempcnta + \pxrr@get@postbreakpenalty\@tempcnta{`#1}% + \mathchardef\pxrr@k@postbreakpenalty\@tempcnta + \fi + }}% +} +\AtBeginDocument{% + \providecommand*{\kenten}{\jkenten}% +} +\newcommand*{\jkenten}{% + \pxrr@k@prologue + \pxrr@kenten +} +\pxrr@add@protect\jkenten +\def\pxrr@kenten{% + \@testopt\pxrr@kenten@a{}% +} +\def\pxrr@kenten@a[#1]{% + \def\pxrr@option{#1}% + \ifpxrr@safe@mode + \expandafter\@firstofone + \else + \expandafter\pxrr@kenten@proc + \fi +} +\def\pxrr@k@bind@param{% + \let\pxrr@c@ruby@font\pxrr@k@ruby@font + \let\pxrr@c@size@ratio\pxrr@k@size@ratio + \let\pxrr@c@inter@gap\pxrr@k@inter@gap +} +\def\pxrr@kenten@proc#1{% + \pxrr@prepare@fallback{#1}% + \pxrr@k@bind@param + \pxrr@assign@fsize + \pxrr@k@parse@option\pxrr@option + \pxrr@if@alive{% + \pxrr@k@decompose{#1}% + \let\pxrr@body@list\pxrr@res + \pxrr@kenten@main + }% + \pxrr@kenten@exit +} +\def\pxrr@kenten@main{% + \setbox\pxrr@boxb\pxrr@hbox@to\z@{% + \pxrr@use@ruby@font + \hss\pxrr@k@the@mark\hss + }% + \let\pxrr@entry\pxrr@kenten@entry + \let\pxrr@entry@kspan\pxrr@kenten@entry@kspan + \let\pxrr@entry@ruby\pxrr@kenten@entry@ruby + \let\pxrr@entry@kenten\pxrr@kenten@entry@kenten + \let\pxrr@post\pxrr@k@list@post + \pxrr@k@list@pre + \pxrr@body@list +} +\def\pxrr@k@prologue{% + \ifpxrr@k@ghost + \pxrr@jghost@char + \pxrr@inhibitglue + \fi + \begingroup + \ifpxrr@k@ghost + \setbox\pxrr@boxa\hbox{\pxrr@jghost@char}% + \kern-\wd\pxrr@boxa + \fi +} +\def\pxrr@kenten@exit{% + \ifpxrr@fatal@error + \pxrr@fallback + \fi + \pxrr@k@epilogue +} +\def\pxrr@k@epilogue{% + \ifpxrr@k@ghost + \setbox\pxrr@boxa\hbox{\pxrr@jghost@char}% + \kern-\wd\pxrr@boxa + \fi + \endgroup + \ifpxrr@k@ghost + \pxrr@inhibitglue + \pxrr@jghost@char + \fi +} +\def\pxrr@debug@show@kenten@input{% + \typeout{% +pxrr@k@the@mark=\meaning\pxrr@k@the@mark^^J% +pxrr@side=\meaning\pxrr@side^^J% +pxrr@body@list=\meaning\pxrr@body@list^^J% + }% +} +\newif\ifpxrr@apply@combo +\newif\ifpxrr@combo +\let\pxrr@ck@ruby@font\relax +\let\pxrr@ck@size@ratio\relax +\let\pxrr@ck@inter@gap\relax +\let\pxrr@ck@ruby@inter@gap\relax +\let\pxrr@ck@side\relax +\let\pxrr@ck@the@mark\relax +\let\pxrr@ck@ruby@combo\relax +\newif\ifpxrr@ck@kenten@head +\newif\ifpxrr@ck@kenten@end +\def\pxrr@ck@bind@param{% + \let\pxrr@ck@ruby@font\pxrr@c@ruby@font + \let\pxrr@ck@size@ratio\pxrr@c@size@ratio + \let\pxrr@ck@inter@gap\pxrr@c@inter@gap + \let\pxrr@ck@ruby@inter@gap\pxrr@k@ruby@inter@gap + \let\pxrr@ck@side\pxrr@side + \let\pxrr@ck@the@mark\pxrr@k@the@mark + \let\pxrr@ck@ruby@combo\pxrr@k@ruby@combo + \pxrr@csletcs{ifpxrr@ck@kenten@head}{ifpxrr@k@first@entry}% + \pxrr@csletcs{ifpxrr@ck@kenten@end}{ifpxrr@k@last@entry}% +} + +\let\pxrr@ck@zw\relax +\let\pxrr@ck@raise@P\relax +\let\pxrr@ck@raise@S\relax +\let\pxrr@ck@raise@t\relax +\def\pxrr@ck@check@option{% + \ifpxrr@ck@kenten@head + \let\pxrr@bintr@\@empty + \let\pxrr@bscomp=.\relax + \pxrr@bnobrtrue + \fi + \ifpxrr@ck@kenten@end + \let\pxrr@aintr@\@empty + \let\pxrr@ascomp=.\relax + \pxrr@anobrtrue + \fi +} +\def\pxrr@ck@assign@fsize{% + \begingroup + \@tempdima=\f@size\p@ + \@tempdima\pxrr@ck@size@ratio\@tempdima + \edef\pxrr@ruby@fsize{\the\@tempdima}% + \let\pxrr@c@ruby@font\pxrr@ck@ruby@font + \pxrr@use@ruby@font + \pxrr@get@zwidth\pxrr@ck@zw + \global\let\pxrr@gtempa\pxrr@ck@zw + \endgroup + \let\pxrr@ck@zw\pxrr@gtempa + \ifcase\pxrr@ck@side + \@tempdimc\pxrr@ck@zw + \advance\@tempdimc-\pxrr@htratio\@tempdimc + \@tempdima\pxrr@ruby@raise\relax + \@tempdimb\pxrr@ruby@zw\relax + \advance\@tempdima\pxrr@htratio\@tempdimb + \@tempdimb\pxrr@body@zw\relax + \advance\@tempdima\pxrr@ck@ruby@inter@gap\@tempdimb + \advance\@tempdima\@tempdimc + \edef\pxrr@ck@raise@P{\the\@tempdima}% + \@tempdima\pxrr@body@zw\relax + \@tempdima\pxrr@htratio\@tempdima + \@tempdimb\pxrr@body@zw\relax + \advance\@tempdima\pxrr@ck@inter@gap\@tempdimb + \advance\@tempdima\@tempdimc + \edef\pxrr@ck@raise@S{\the\@tempdima}% + \let\pxrr@ck@raise@t\pxrr@ck@raise@P + \or + \@tempdimc\pxrr@ck@zw + \@tempdimc\pxrr@htratio\@tempdimc + \@tempdima-\pxrr@ruby@lower\relax + \@tempdimb\pxrr@ruby@zw\relax + \advance\@tempdimb-\pxrr@htratio\@tempdimb + \advance\@tempdima-\@tempdimb + \@tempdimb\pxrr@body@zw\relax + \advance\@tempdima-\pxrr@ck@ruby@inter@gap\@tempdimb + \advance\@tempdima-\@tempdimc + \edef\pxrr@ck@raise@S{\the\@tempdima}% + \@tempdima-\pxrr@body@zw\relax + \advance\@tempdima-\pxrr@htratio\@tempdima + \@tempdimb\pxrr@body@zw\relax + \advance\@tempdima-\pxrr@ck@inter@gap\@tempdimb + \advance\@tempdima-\@tempdimc + \edef\pxrr@ck@raise@P{\the\@tempdima}% + \let\pxrr@ck@raise@t\pxrr@ck@raise@S + \fi +} +\let\pxrr@ck@body@natwd\relax +\let\pxrr@ck@locate\relax +\let\pxrr@ck@kenten@list\relax +\def\pxrr@ck@compose#1{% + \setbox\tw@\pxrr@hbox@to\z@{% + \@tempdima=\f@size\p@ + \@tempdima\pxrr@ck@size@ratio\@tempdima + \edef\pxrr@ruby@fsize{\the\@tempdima}% + \let\pxrr@c@ruby@font\pxrr@ck@ruby@font + \pxrr@use@ruby@font + \hss\pxrr@ck@the@mark\hss + }% + \pxrr@save@listproc + \pxrr@decompose{#1}% + \def\pxrr@pre{% + \let\pxrr@res\@empty + \pxrr@ck@compose@entry\pxrr@pre + }% + \def\pxrr@inter{% + \pxrr@ck@compose@entry\pxrr@inter + }% + \def\pxrr@post{% + \pxrr@appto\pxrr@res{\pxrr@post}% + }% + \pxrr@res + \pxrr@restore@listproc + \let\pxrr@natwd\pxrr@ck@body@natwd + \pxrr@evenspace@int\pxrr@ck@locate\pxrr@boxb\relax + {\wd\pxrr@boxa}% + \setbox\z@\hbox{% + \unhcopy\z@ + \kern-\wd\z@ + \ifcase\pxrr@side + \raise\pxrr@ck@raise@P + \or + \raise\pxrr@ck@raise@S + \or + \raise\pxrr@ck@raise@t + \fi + \hb@xt@\wd\pxrr@boxa{\hss\copy\pxrr@boxb\hss}% + }% +} +\def\pxrr@ck@compose@entry#1#2{% + \setbox\pxrr@boxb\pxrr@hbox{#2}% + \edef\pxrr@tempa{% + \noexpand\pxrr@appto\noexpand\pxrr@res{\noexpand#1{% + \hb@xt@\the\wd\pxrr@boxb{\hss\copy\tw@\hss}}}% + }\pxrr@tempa +} +\def\pxrr@dumb@sub#1#2#{#1} +\def\pxrr@dumb@ruby{% + \pxrr@dumb@sub\pxrr@dumb@ruby@ +} +\def\pxrr@dumb@ruby@#1#2{#1} +\def\pxrr@dumb@truby{% + \pxrr@dumb@sub\pxrr@dumb@truby@ +} +\def\pxrr@dumb@truby@#1#2#3{#1} +\def\pxrr@dumb@kenten{% + \pxrr@dumb@sub\pxrr@dumb@kenten@ +} +\def\pxrr@dumb@kenten@#1{#1} +\providecommand*\pdfstringdefPreHook{} +\g@addto@macro\pdfstringdefPreHook{% + \ifx\pxrr@cmd@ruby\ruby + \let\ruby\pxrr@dumb@ruby + \fi + \let\jruby\pxrr@dumb@ruby + \let\aruby\pxrr@dumb@ruby + \let\truby\pxrr@dumb@truby + \let\atruby\pxrr@dumb@truby + \ifx\pxrr@cmd@kenten\kenten + \let\kenten\pxrr@dumb@kenten + \fi + \let\kspan\pxrr@dumb@kenten +} \endinput %% %% End of file `pxrubrica.sty'. -- cgit v1.2.3