review 2.5.0 → 3.0.0.preview1

data/templates/latex/review-jlreq/review-jlreq.cls

@@ -0,0 +1,141 @@
+% Re:VIEW + jlreq
+% Copyright 2018 Kenshi Muto <kmuto@debian.org>
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesClass{review-jlreq}[2018/4/28]
+\LoadClassWithOptions{jlreq}
+
+% クラスオプション
+% TODO:
+% hanmen(boolean)→版面表示。便利なので入れたい
+% draft(boolean)→これはjlreqでいけるはず?
+% mentuke(boolean)→なくてもよいか
+% cameraready=pdf/print(string)→設定が難しい
+% paper=a5+3mm→jlreq-trimmarksのオプションとだいぶ違う
+% toc:break-before=right, index:break-before=both→完全白ページが問題になる同人誌だと怖そう
+% 白ページでもノンブルを打つ という設定(とpagestyle)がほしいか
+% 扉画像の指定はreviewmacroのパラメータのほうでやらせるべきか
+%
+% <<review-jlreq独自>>
+% tombo:bleed(数値+単位) : 裁ち落とし幅。デフォルト3mm
+% tombo:color(\colorの色またはcmykの組み合わせ) : トンボの色。デフォルトcmyk(全プレート)
+% tombo:paper(トンボ入り紙面サイズ) : トンボを付けたときのサイズ。デフォルトは現在のサイズ+2インチ。a4, b5(ここでのbはJISサイズ)などを指定可能。{width, height}も指定可能…だが今はダメ(FIXME)
+% tombo:show({}指定) : {trimmarks,banner,digital}からの組み合わせ。trimmarksはトンボマーク表示、bannerはファイル名+日付、digitalはデジタルトンボ情報を入れる (FIXME、{}がまだとれない)
+% hyperrefの設定もやったほうがよさそう
+
+% FIXME: Unused global option [book] が出るの嫌だ(実際はchapterに必要)
+% \setkeyしたら別の影響が出る
+\DeclareOption{book}{\OptionNotUsed}
+\DeclareOption{dvipdfmx}{\OptionNotUsed}
+
+% documentclassでのkeyval使用定義
+\DeclareOption*{\rjreq@setkey}
+\def\rjreq@setkey{\expandafter\@rjreq@setkey\expandafter{\CurrentOption}}
+\def\@rjreq@setkey{\setkeys{rjreq}}
+
+% トンボ有効化時設定
+\newif\if@review@jlreq@tombo
+\@review@jlreq@tombofalse
+\DeclareOption{tombo}{\@review@jlreq@tombotrue}
+% トンボの詳細設定
+%% パッケージオプション系。初期値は定義しないことにしてundefined評価でオプション追加するかどうかを判定させる
+%\def\@review@jkreq@tombo@paper{a4}
+%\def\@review@jkreq@tombo@show{trimmarks,banner,digital}
+
+%% \jlreqtrimmarkssetup設定系
+\def\@review@jlreq@tombo@banner{\jobname\space(\number\year-\two@digits\month-\two@digits\day\space\two@digits\hour:\two@digits\minute)}% バナー(動的にはできない)
+\def\@review@jlreq@tombo@bleed{3mm}% 裁ち落とし幅
+\def\@review@jlreq@tombo@color{cmyk}% トンボの色。cmykはCMYK全プレートで100%
+
+% documentoptionからの取り込み
+\define@key{rjreq}{tombo:paper}{\def\@review@jlreq@tombo@paper{#1}}
+\define@key{rjreq}{tombo:show}{\def\@review@jlreq@tombo@show{#1}}% FIXME:これは{}を取るのでダメ
+\define@key{rjreq}{tombo:banner}{\def\@review@jlreq@tombo@banner{#1}}
+\define@key{rjreq}{tombo:bleed}{\def\@review@jlreq@tombo@bleed{#1}}
+\define@key{rjreq}{tombo:color}{\def\@review@jlreq@tombo@color{#1}}
+
+\ExecuteOptions{}% 初期有効化するもの
+\ProcessOptions\relax
+% パッケージオプションの適用
+\ifdefined\@review@jlreq@tombo@paper
+  \PassOptionsToPackage{trimmarks_paper=\@review@jlreq@tombo@paper}{jlreq-trimmarks}
+\fi
+\ifdefined\@review@jlreq@tombo@show% FIXME:これは{}を取るのでダメ
+  \PassOptionsToPackage{show=\@review@jlreq@tombo@show}{jlreq-trimmarks}
+\fi
+
+%% fixes to LaTeX2e
+\RequirePackage{fix-cm,exscale}
+\IfFileExists{latexrelease.sty}{}{\RequirePackage{fixltx2e}}
+\IfFileExists{platexrelease.sty}{%% is bundled in TL16 or higher release version
+
+\PassOptionsToPackage{nosetpagesize}{graphicx}%%for TL16 or higher version
+}{}
+
+% トンボ指定
+\if@review@jlreq@tombo
+% FIXME:パッケージオプションのtrimmarks_paper, showをどう渡すか
+\RequirePackage{jlreq-trimmarks}
+\fi
+
+\def\maxwidth{%
+  \ifdim\Gin@nat@width>\linewidth
+    % \linewidth
+    \dimexpr\linewidth - 1\p@ - 3mm\relax
+  \else
+    % \Gin@nat@width
+    \dimexpr\Gin@nat@width - 1\p@ - 3mm\relax
+  \fi
+}
+
+% エンジンとドライバの情報。jlreq-trimmarksが定義されていればそっちから持ってくる。
+% 定義されていなければjlreqから持ってくる
+\def\review@jlreq@driver@luatex{luatex}
+\def\review@jlreq@engine{}
+\def\review@jlreq@driver{}
+\ifdefined\jlreq@trimmarks@engine
+  \ifx l\jlreq@trimmarks@engine\def\review@jlreq@engine{lualatex}\fi
+  \ifx u\jlreq@trimmarks@engine\def\review@jlreq@engine{uplatex}\fi
+  \ifx p\jlreq@trimmarks@engine\def\review@jlreq@engine{platex}\fi
+\else% jlreqから持ってくる
+  \ifx l\jlreq@engine\def\review@jlreq@engine{lualatex}\fi
+  \ifx u\jlreq@engine\def\review@jlreq@engine{uplatex}\fi
+  \ifx p\jlreq@engine\def\review@jlreq@engine{platex}\fi
+\fi
+\ifdefined\jlreq@trimmarks@driver
+  \ifx f\jlreq@trimmarks@driver\def\review@jlreq@driver{dvipdfmx}\fi
+  \ifx s\jlreq@trimmarks@driver\def\review@jlreq@driver{dvips}\fi
+  \ifx o\jlreq@trimmarks@driver\def\review@jlreq@driver{dviout}\fi
+\else% jlreqから持ってくる
+  \ifx l\jlreq@engine
+    \def\review@jlreq@driver{luatex}
+  \else
+    \def\review@jlreq@driver{dvipdfmx}
+  \fi
+\fi
+
+\RequirePackage[\review@jlreq@driver]{graphicx}
+\RequirePackage[\review@jlreq@driver,table]{xcolor}
+
+% jlreq-trimmarksへ追加オプション渡し(事前にxcolorが必要)
+% trimmarks_widthを指定したくなるケースはまずないとしてよいか…bannerもどうするか
+\if@review@jlreq@tombo
+  \jlreqtrimmarkssetup{bleed_margin=\@review@jlreq@tombo@bleed,color=\@review@jlreq@tombo@color,banner=\@review@jlreq@tombo@banner}% デフォルトは3mm, cmyk
+\fi
+
+% TODO:documentoptionである程度指定したい
+\RequirePackage[\review@jlreq@driver, bookmarks=true, bookmarksnumbered=true,
+  % colorlinks=true,
+  hidelinks,
+setpagesize=false]{hyperref}[2016/06/24 v6.83q]
+\RequirePackage[T1]{fontenc}
+\RequirePackage{textcomp}%T1/TS1
+\RequirePackage{lmodern}%\ttdefault: lmtt
+\def\review@jlreq@driver@luatex{luatex}
+\ifx\review@jlreq@driver\review@jlreq@driver@luatex\else
+\RequirePackage[\review@jlreq@driver]{pxjahyper}[2012/05/27 v0.2]
+\fi
+\RequirePackage{tikz}
+\usetikzlibrary{calc}
+\RequirePackage{multirow}
+\RequirePackage{amsmath}
+\RequirePackage{amssymb}

data/templates/latex/review-jlreq/review-style.sty

@@ -0,0 +1,149 @@
+% コードリスト装飾のデフォルト
+\RequirePackage{tcolorbox}
+\tcbuselibrary{xparse,hooks,skins,breakable}
+
+\newenvironment{reviewemlist}{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,colback=black!10,colframe=black!10,boxrule=0mm,arc=0mm]\begin{alltt}}%
+ {\end{alltt}\end{tcolorbox}}
+
+\newenvironment{reviewlist}{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,colback=white,colframe=black,boxrule=0.15mm,arc=0mm]\begin{alltt}}%
+ {\end{alltt}\end{tcolorbox}}
+
+\newenvironment{reviewsource}{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,colback=white,colframe=black,boxrule=0.15mm,arc=0mm]\begin{alltt}}%
+ {\end{alltt}\end{tcolorbox}}
+
+\newenvironment{reviewcmd}{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,colback=black!99,colframe=black!99,boxrule=0mm,arc=0mm]\begin{alltt}\begingroup\color{white}\ignorespaces}%
+ {\endgroup\end{alltt}\end{tcolorbox}}
+
+% 囲み記事
+\newenvironment{reviewnote}[1][]{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,empty,coltitle=black,title={\sffamily\bfseries NOTE #1},borderline horizontal={0.5mm}{0pt}{black!50}, left=1mm, right=1mm, left skip=6mm]}
+ {\end{tcolorbox}}
+
+\newenvironment{reviewmemo}[1][]{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,empty,coltitle=black,title={\sffamily\bfseries MEMO #1},borderline horizontal={0.5mm}{0pt}{black!50}, left=1mm, right=1mm, left skip=6mm]}
+ {\end{tcolorbox}}
+
+\newenvironment{reviewtip}[1][]{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,empty,coltitle=black,title={\sffamily\bfseries Tips #1},borderline horizontal={0.5mm}{0pt}{black!50}, left=1mm, right=1mm, left skip=6mm]}
+ {\end{tcolorbox}}
+
+\newenvironment{reviewinfo}[1][]{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,empty,coltitle=black,title={\sffamily\bfseries INFORMATION #1},borderline horizontal={0.5mm}{0pt}{black!50}, left=1mm, right=1mm, left skip=6mm]}
+ {\end{tcolorbox}}
+
+\newenvironment{reviewwarning}[1][]{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,empty,coltitle=black,title={\sffamily\bfseries WARNING! #1},borderline horizontal={0.5mm}{0pt}{black!50}, left=1mm, right=1mm, left skip=6mm]}
+ {\end{tcolorbox}}
+
+\newenvironment{reviewimportant}[1][]{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,empty,coltitle=black,title={\sffamily\bfseries IMPORTANT! #1},borderline horizontal={0.5mm}{0pt}{black!50}, left=1mm, right=1mm, left skip=6mm]}
+ {\end{tcolorbox}}
+
+\newenvironment{reviewcaution}[1][]{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,empty,coltitle=black,title={\sffamily\bfseries CAUTION! #1},borderline horizontal={0.5mm}{0pt}{black!50}, left=1mm, right=1mm, left skip=6mm]}
+ {\end{tcolorbox}}
+
+\newenvironment{reviewnotice}[1][]{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,empty,coltitle=black,title={\sffamily\bfseries NOTICE #1},borderline horizontal={0.5mm}{0pt}{black!50}, left=1mm, right=1mm, left skip=6mm]}
+ {\end{tcolorbox}}
+
+% コラム
+\newenvironment{reviewcolumn}[1][COLUMN]{%
+  \begin{tcolorbox}[skin=enhanced jigsaw,breakable,boxrule=0.2mm,arc=2mm,colback=white,colframe=black!100!white,title={\sffamily\bfseries #1}]\par}
+ {\end{tcolorbox}}
+
+\renewcommand{\@makecaption}[2]{{% %本当はl,c,rを[]で指定したい
+  \reset@font\small
+  \vskip\abovecaptionskip
+  \jlreq@ifempty{#1}{%
+    \sbox\@tempboxa{{\jlreq@@makecaption@font #2}}}{%
+    \sbox\@tempboxa{{\jlreq@@makecaption@label@font #1}\review@intn@captionprefix{\jlreq@@makecaption@font #2}}}
+  \ifdim \wd\@tempboxa >\hsize
+  \jlreq@ifempty{#1}{%
+    {\jlreq@@makecaption@font #2}}{%
+    {\jlreq@@makecaption@label@font #1}\review@intn@captionprefix{\jlreq@@makecaption@font #2}}\relax\par
+  \else
+    \global\@minipagefalse
+    \hbox to\hsize{\box\@tempboxa\hfil}% キャプションLeft
+%    \hbox to\hsize{\hfil\box\@tempboxa\hfil}% キャプションCenter
+%    \hbox to\hsize{\hfil\box\@tempboxa}% キャプションRight
+  \fi
+  \vskip\belowcaptionskip}}
+
+\newcommand{\review@commoncaption}[2]{\@makecaption{#1}{#2}}
+\newcommand{\reviewlistcaption}[1]{\review@commoncaption{}{#1}}
+\newcommand{\reviewemlistcaption}[1]{\review@commoncaption{}{#1}}
+\newcommand{\reviewsourcecaption}[1]{\review@commoncaption{}{#1}}
+\newcommand{\reviewcmdcaption}[1]{\review@commoncaption{}{#1}}
+\newenvironment{reviewlistblock}{\list{}{\topsep.5\baselineskip \leftmargin\z@ \itemindent\z@}\item\relax}{\endlist}% 上下アキ0.5
+
+\newenvironment{reviewimage}[1][H]{%
+  \begin{figure}[#1]\begin{center}}{\end{center}\end{figure}}
+
+\newenvironment{reviewdummyimage}[1][ht]{%
+  \begin{reviewimage}[#1]}{\end{reviewimage}}
+
+\newcommand{\reviewindepimagecaption[2]}{\@makecaption{}{#2}}
+
+% 表
+\newenvironment{reviewtablesetup}{%
+}{}
+\newcommand{\reviewth}[1]{\cellcolor{black!70}\textcolor{white}{\bfseries #1}}
+\newcommand\reviewtablecaption[1]{\caption{#1}\vskip\abovecaptionskip}% アキをより広げる
+% \reviewtablecaption* を定義する(suffixパッケージ効果)
+%\WithSuffix\newcommand\reviewtablecaption*[1]{\@makecaption{}{#1}\vskip\abovecaptionskip}% アキをより広げる
+\newenvironment{reviewtable}[1]{%
+\begin{reviewtablesetup}\begin{tabular}{#1}}%
+{\end{tabular}\end{reviewtablesetup}}
+
+\newcommand*\reviewimgtablecaption[1]{\caption{#1}}
+
+\newcommand{\reviewimageref}[2]{\review@intn@image #1}
+\newcommand{\reviewtableref}[2]{\review@intn@table #1}
+\newcommand{\reviewlistref}[1]{\review@intn@list #1}
+\newcommand{\reviewbibref}[2]{#1}
+\newcommand{\reviewcolumnref}[2]{\review@intn@columnname #1}
+\newcommand{\reviewsecref}[2]{#1}
+
+% 書体
+\newcommand{\reviewkw}[1]{\textbf{\textgt{#1}}}
+\newcommand{\reviewami}[1]{#1}% FIXME
+\newcommand{\reviewballoon}[1]{←{#1}}
+\newcommand{\reviewem}[1]{\textbf{#1}}
+\newcommand{\reviewstrong}[1]{\textbf{#1}}
+\newcommand{\reviewunderline}[1]{\underline{#1}}% FIXME
+\newcommand{\reviewit}[1]{\textit{#1}}
+\newcommand{\reviewbold}[1]{\textbf{#1}}
+\newcommand{\reviewcode}[1]{\texttt{#1}}
+\newcommand{\reviewtt}[1]{\texttt{#1}}
+\newcommand{\reviewtti}[1]{\texttt{\textit{#1}}}
+\newcommand{\reviewttb}[1]{\texttt{\textbf{#1}}}
+
+\newcommand{\reviewbackslash}[0]{\textbackslash{}}
+
+% コードリスト用色
+\definecolor{shadecolor}{gray}{0.9}
+\definecolor{shadecolorb}{gray}{0.1}
+\definecolor{reviewgreen}{rgb}{0,0.4,0}
+\definecolor{reviewblue}{rgb}{0.2,0.2,0.4}
+\definecolor{reviewred}{rgb}{0.7,0,0}
+\definecolor{reviewdarkred}{rgb}{0.3,0,0}
+
+% ハイフネーション禁止。@M=10000。@m=1000
+% latexdef 〜 で確認
+\hyphenpenalty\@M\relax
+\exhyphenpenalty\@M\relax
+
+% 上下アキ
+% 引用
+\jlreqsetup{quote_beforeafter_space=\baselineskip}
+% 箇条書き
+\jlreqsetup{itemization_beforeafter_space=\baselineskip}
+
+% ヘッダスタイル
+\ModifyPageStyle{headings}{nombre_position={top-fore_edge},running_head_position={top-fore_edge}}
+\pagestyle{headings}

data/templates/latex/review-jlreq/reviewmacro.sty

@@ -0,0 +1,8 @@
+% 基本定義
+\usepackage{review-base}
+
+% スタイル装飾
+\usepackage{review-style}
+
+% ユーザー固有の定義
+\usepackage{review-custom}

data/templates/latex/review-jsbook/jumoline.sty

@@ -0,0 +1,310 @@
+%%
+%% This is file `jumoline.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% jumoline.dtx  (with options: `package')
+%% 
+%% IMPORTANT NOTICE:
+%% 
+%% For the copyright see the source file.
+%% 
+%% Any modified versions of this file must be renamed
+%% with new filenames distinct from jumoline.sty.
+%% 
+%% For distribution of the original source see the terms
+%% for copying and modification in the file jumoline.dtx.
+%% 
+%% This generated file may be distributed as long as the
+%% original source files, as listed above, are part of the
+%% same distribution. (The sources need not necessarily be
+%% in the same archive or directory.)
+%% Style file `jumoline'.
+%% Copyright (C) 1999-2001  Hiroshi Nakashima
+%%        (Toyohashi Univ. of Tech.)
+%%
+%% This program can be redistributed and/or modified under the terms
+%% of the LaTeX Project Public License distributed from CTAN
+%% archives in directory macros/latex/base/lppl.txt; either
+%% version 1 of the License, or any later version.
+%%
+%% \CharacterTable
+%%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%%   Digits        \0\1\2\3\4\5\6\7\8\9
+%%   Exclamation   \!     Double quote  \"     Hash (number) \#
+%%   Dollar        \$     Percent       \%     Ampersand     \&
+%%   Acute accent  \'     Left paren    \(     Right paren   \)
+%%   Asterisk      \*     Plus          \+     Comma         \,
+%%   Minus         \-     Point         \.     Solidus       \/
+%%   Colon         \:     Semicolon     \;     Less than     \<
+%%   Equals        \=     Greater than  \>     Question mark \?
+%%   Commercial at \@     Left bracket  \[     Backslash     \\
+%%   Right bracket \]     Circumflex    \^     Underscore    \_
+%%   Grave accent  \`     Left brace    \{     Vertical bar  \|
+%%   Right brace   \}     Tilde         \~}
+%%
+%%
+\def\next{LaTeX2e}
+\ifx\fmtname\next
+\def\next{
+\NeedsTeXFormat{LaTeX2e}[1994/12/01]
+\ProvidesPackage{jumoline}}
+\else\def\next[#1]{}\fi
+\next
+[2001/05/31 v1.2 ]
+
+\ifx\PackageError\undefined
+\def\PackageError#1#2#3{\@latexerr{#1:#2}{#3^^J\@ehc}}
+\fi
+
+%%^L
+
+%% Register Declaration
+
+\newdimen\UnderlineDepth \UnderlineDepth-\maxdimen
+\newdimen\MidlineHeight \MidlineHeight-\maxdimen
+\newdimen\OverlineHeight \OverlineHeight-\maxdimen
+\newdimen\UMOlineThickness \UMOlineThickness.4pt
+
+\newdimen\UMO@height \newdimen\UMO@depth
+\newdimen\UMO@dqspace \newdimen\UMO@tempdim
+
+\newskip\UMO@prejfmglue \newskip\UMO@postjfmglue
+
+\newcount\UMO@mode
+\let\UMO@afterblock\z@
+\let\UMO@afterword\@ne
+\let\UMO@afterchar\tw@
+
+\newcount\UMO@spacefactor
+\newcount\UMO@firstxspcode
+\newcount\UMO@lastxspcode
+\newcount\UMO@inhibitxspcode
+\newcount\UMO@prebreakpenalty
+\newcount\UMO@postbreakpenalty
+\newcount\UMO@kpostbreakpenalty
+
+\newif\ifUMO@nospace \newif\ifUMO@firstelem
+
+%%^L
+
+%% User Interface and Initialization
+
+\def\Underline{\UMO@line\UnderlineDepth{-\UnderlineDepth}{-\dp\strutbox}}
+\def\Midline{\setbox\@tempboxa\hbox{あ}%
+        \UMO@line\MidlineHeight\MidlineHeight{.5\ht\@tempboxa}}
+\def\Overline{\UMO@line\OverlineHeight\OverlineHeight{\ht\strutbox}}
+\def\UMOline{\UMO@line{-\maxdimen}\z@}
+
+\def\UMO@line#1#2#3#4{\begingroup \let\\\UMOnewline
+        \relax\ifdim#1<\z@ \UMO@height#3\relax
+        \else \UMO@height#2\relax \fi
+        \UMO@depth-\UMO@height
+        \ifdim\UMO@height<\z@ \advance\UMO@depth\UMOlineThickness
+        \else                 \advance\UMO@height\UMOlineThickness \fi
+        \settowidth\UMO@dqspace{“}\advance\UMO@dqspace-1zw
+        \UMO@dqspace-\UMO@dqspace \divide\UMO@dqspace\tw@
+        \UMO@nospacetrue \UMO@firstelemtrue
+        \UMO@mode\UMO@afterblock
+        \ifvmode\leavevmode\fi
+        \def\@tempa{#4 }\edef\@tempb{\noexpand\@nil\space}%
+        \expandafter\expandafter\expandafter\UMO@wordloop
+                \expandafter\@tempa\@tempb
+        \endgroup \UMO@aftergroup}
+
+%%^L
+
+%% Processing Word Elements
+
+\def\UMO@wordloop{\UMO@ifbgroup\UMO@wordblock\UMO@iwordloop}
+\def\UMO@ifbgroup#1#2{\let\@tempa#1\let\@tempb#2\futurelet\@tempc\UMO@ifnc}
+\def\UMO@ifnc{\ifx\@tempc\bgroup \let\next\@tempa \else\let\next\@tempb \fi
+        \next}
+\def\UMO@wordblock#1{\UMO@spaceskip
+        \UMO@putbox\relax{#1}\UMO@nospacetrue \UMO@mode\UMO@afterblock
+        \UMO@spacefactor\@m \UMO@wordloop}
+\def\UMO@iwordloop#1 {\def\@tempa{#1}\ifx\@tempa\@nnil \let\next\UMO@end
+        \else
+        \ifx\@tempa\empty \UMO@nospacefalse
+        \else
+                \UMO@spaceskip \UMO@mode\UMO@afterblock
+                \def\UMO@theword{}\UMO@firstxspcode\m@ne
+                \UMO@charloop#1\@nil \fi
+        \let\next\UMO@wordloop \fi
+        \next}
+
+%%^L
+
+%% Interword Spacing
+
+\def\UMO@spaceskip{\ifUMO@nospace \UMO@nospacefalse \else
+        \ifdim\spaceskip=\z@
+            \@tempdima\fontdimen3\font\relax
+                \multiply\@tempdima\UMO@spacefactor \divide\@tempdima\@m
+            \@tempdimb\fontdimen4\font\relax \multiply\@tempdimb\@m
+                \divide\@tempdimb\UMO@spacefactor
+            \@tempskipa\fontdimen2\font plus\@tempdima minus\@tempdimb\relax
+        \else
+            \edef\@tempa{\the\spaceskip\space @ @ @ @ }%
+            \expandafter\UMO@setspaceskip\@tempa\@nil
+        \fi
+        \ifnum\UMO@spacefactor<2000\else
+                \ifdim\xspaceskip=\z@ \advance\@tempskipa\fontdimen7\font
+                \else \@tempskipa\xspaceskip
+        \fi\fi
+        \UMO@skip\@tempskipa \fi}
+\def\UMO@setspaceskip#1 #2 #3 #4 #5 #6\@nil{\@tempdima\z@ \@tempdimb\z@
+        \def\@tempa{#2}\def\@tempb{#3}%
+        \ifx\@tempa\UMO@plus \@tempdima#3\def\@tempa{#4}\def\@tempb{#5}\fi
+        \ifx\@tempa\UMO@minus \@tempdimb\@tempb\relax\fi
+        \multiply\@tempdima\UMO@specefactor \divide\@tempdima\@m
+        \multiply\@tempdimb\@m \divide\UMO@spacefactor
+        \@tempskipa#1 plus\@tempdima minus\@tempdimb\relax}
+\def\@tempa#1 #2 #3 #4 #5\@nil{\def\UMO@plus{#2}\def\UMO@minus{#4}}
+\@tempskipa1pt plus 2pt minus 3pt
+\expandafter\@tempa\the\@tempskipa\@nil
+
+%%^L
+
+%% Processing Characters
+
+\def\UMO@charloop{\UMO@ifbgroup\UMO@charblock\UMO@icharloop}
+\def\UMO@charblock#1{\UMO@putword
+        \UMO@putbox\relax{#1}\UMO@mode\UMO@afterblock \UMO@spacefactor\@m
+        \UMO@charloop}
+\def\UMO@icharloop#1{\def\@tempa{#1}%
+        \ifx\@tempa\@nnil \UMO@putword \let\next\relax
+        \else\ifx\UMOspace#1\relax \UMO@putword \let\next\UMO@space
+        \else\ifx\UMOnewline#1\relax \UMO@putword \let\next\UMO@newline
+        \else
+        \ifnum`#1<256\relax \edef\UMO@theword{\UMO@theword#1}%
+                \ifnum\UMO@firstxspcode<\z@
+                        \UMO@firstxspcode\xspcode`#1\relax
+                        \UMO@prebreakpenalty\prebreakpenalty`#1\relax
+                        \fi
+                \UMO@lastxspcode\xspcode`#1\relax
+                \UMO@postbreakpenalty\postbreakpenalty`#1\relax
+        \else \UMO@putword \UMO@putchar{#1}\UMO@spacefactor\@m\fi
+        \let\next\UMO@charloop \fi\fi\fi \next}
+\def\UMOspace{\PackageError{jumoline}%
+        {\string\UMOspace\space cannot be used here.}%
+        {\string\UMOspace\space can be used only in the argument of
+                \string\Underline\space and its relatives.}}
+\def\UMOnewline{\PackageError{jumoline}%
+        {\string\UMOnewline\space cannot be used here.}%
+        {\string\UMOnewline\space can be used only in the argument of
+                \string\Underline\space and its relatives.}}
+
+%%^L
+
+%% Put ASCII String
+
+\def\UMO@putword{\ifx\UMO@theword\empty\else
+        \ifnum\UMO@mode=\UMO@afterchar
+                \advance\UMO@kpostbreakpenalty\UMO@prebreakpenalty
+                \penalty\UMO@kpostbreakpenalty
+                \ifdim\UMO@postjfmglue>\z@ \UMO@skip\UMO@postjfmglue
+                \else\ifodd\UMO@inhibitxspcode \ifodd\UMO@firstxspcode
+                        \UMO@skip\xkanjiskip \fi\fi\fi\fi
+        \setbox\@tempboxa\hbox{%
+                \UMO@theword\global\UMO@spacefactor\spacefactor}%
+        \UMO@putbox\relax\UMO@theword \UMO@mode\UMO@afterword
+        \def\UMO@theword{}\fi \UMO@firstxspcode\m@ne}
+
+%%^L
+
+%% Put Kanji Letter
+
+\def\UMO@putchar#1{%
+        \ifnum\UMO@mode=\UMO@afterchar \UMO@prejfmglue\UMO@postjfmglue
+        \else                          \UMO@prejfmglue\z@ \fi
+        \UMO@postjfmglue\z@
+        \ifnum`#1<\kuten"1001\relax\UMO@setjfmglue{#1}\fi
+        \@tempskipa\UMO@prejfmglue
+        \UMO@inhibitxspcode\inhibitxspcode`#1\relax
+        \@tempcnta\prebreakpenalty`#1\relax
+        \ifnum\UMO@mode=\UMO@afterchar
+                \advance\@tempcnta\UMO@kpostbreakpenalty
+                \ifdim\UMO@prejfmglue=\z@ \@tempskipa\kanjiskip \fi
+        \else\ifnum\UMO@mode=\UMO@afterword
+                \advance\@tempcnta\UMO@postbreakpenalty
+                \ifdim\UMO@prejfmglue=\z@
+                \ifnum\UMO@lastxspcode>\@ne \ifnum\UMO@inhibitxspcode>\@ne
+                        \@tempskipa\xkanjiskip \fi\fi\fi\fi\fi
+        \penalty\@tempcnta
+        \edef\@tempa{\the\@tempskipa}\ifx\@tempa\UMO@zskip\else
+                \UMO@skip\@tempskipa \fi
+        \UMO@putbox\inhibitglue{#1}%
+        \UMO@kpostbreakpenalty\postbreakpenalty`#1\relax
+        \UMO@mode\UMO@afterchar}
+\@tempskipa\z@
+\edef\UMO@zskip{\the\@tempskipa}
+\def\UMO@setjfmglue#1{%
+        \settowidth\@tempdima{あ#1}\settowidth\@tempdimb{あ\inhibitglue#1}%
+        \advance\@tempdima-\@tempdimb
+        \settowidth\UMO@tempdim{#1あ}\settowidth\@tempdimb{#1\inhibitglue あ}%
+        \advance\UMO@tempdim-\@tempdimb
+        \ifdim\@tempdima>\z@
+                \ifdim\UMO@tempdim>\z@
+                        \@tempskipa\@tempdima minus\@tempdima\relax
+                        \UMO@postjfmglue\UMO@tempdim minus\UMO@tempdim\relax
+                \else   \@tempskipa\@tempdima minus\UMO@dqspace\relax \fi
+                \advance\UMO@prejfmglue\@tempskipa
+        \else \UMO@postjfmglue\UMO@tempdim minus\UMO@dqspace \fi}
+
+%%^L
+
+%% Draw Under/Mid/Overline
+
+\def\UMO@putbox#1#2{\setbox\@tempboxa\hbox{#1#2#1}\@tempdima\wd\@tempboxa
+        \ifUMO@firstelem\else
+        \rlap{\vrule\@height\UMO@height\@depth\UMO@depth\@width\@tempdima}\fi
+        \box\@tempboxa
+        \ifUMO@firstelem \UMO@firstelemfalse
+        \llap{\vrule\@height\UMO@height\@depth\UMO@depth\@width\@tempdima}\fi}
+\def\UMO@skip#1{%
+        \leaders\hrule\@height\UMO@height\@depth\UMO@depth\hskip#1\relax}
+
+%%^L
+
+%% Explicit Spacing and Line Breaking
+
+\def\UMO@space{\UMO@mode\UMO@afterblock
+        \@ifstar\UMO@sspace\UMO@ispace}
+\def\UMO@sspace#1{\vrule width\z@\nobreak\UMO@skip{#1}\UMO@charloop}
+\def\UMO@ispace#1{\@tempskipa#1\relax
+        \@ifstar{\@tempswafalse\UMO@iispace}{\@tempswatrue\UMO@iispace}}
+\def\UMO@iispace{\@ifnextchar[%]
+                              {\UMO@penalty}%
+                              {\UMO@skip\@tempskipa \UMO@charloop}}
+\def\UMO@penalty[#1]{\@tempcnta#1\relax
+        \if@tempswa
+                \ifnum\@tempcnta<\z@ \@tempcnta-\@tempcnta \fi
+                \ifcase\@tempcnta \or
+                        \@tempcnta\@lowpenalty \or
+                        \@tempcnta\@medpenalty \or
+                        \@tempcnta\@highpenalty \else
+                        \@tempcnta\@M \fi
+                \ifnum#1<\z@ \@tempcnta-\@tempcnta \fi \fi
+        \penalty\@tempcnta \UMO@skip\@tempskipa \UMO@charloop}
+
+\def\UMO@newline{\UMO@mode\UMO@afterblock
+        \@ifstar{\UMO@skip{0pt plus1fil}\break \UMO@charloop}%
+                                 {\hfil \break \UMO@charloop}}
+
+%%^L
+
+%% Finalization
+
+\def\UMO@end{\ifnum\UMO@mode=\UMO@afterchar
+        \ifnum\UMO@kpostbreakpenalty>\z@
+                \penalty\UMO@kpostbreakpenalty \fi
+        \ifdim\UMO@postjfmglue>\z@
+                \UMO@skip\UMO@postjfmglue\fi \fi
+        \xdef\UMO@aftergroup{\ifnum\UMO@mode=\UMO@afterword
+                \spacefactor\number\UMO@spacefactor\fi}}
+\endinput
+%%
+%% End of file `jumoline.sty'.