% Time-stamp: <2018-03-16 18:30:35 nagata>
% コンパイルの仕方：ソースが file.tex であれば
% uplatex file
% dvipdfmx file
% パスワードを付与する場合は
% dvipdfmx -S -P 0x0804 -K 128 file
%%%%%%%%%%%%%%%%%%%%%%
\documentclass[a4paper,11pt,uplatex]{jsarticle}% twocolumn NG
\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}
\usepackage[german]{babel}
\usepackage[japanese]{pxbabel}
\usepackage[autostyle,german=quotes]{csquotes}
\usepackage{boustrophedon_color}
\usepackage[deluxe,expert]{otf}
\usepackage[prefernoncjk]{pxcjkcat}% 日本語約物と欧文文字の混在同時処理
\usepackage{newpxtext}
%%%%%%%%%% 偶数行をRedにする %%%%%%%%%%
\TeXXeTstate=1
\newbox\textbox
\newbox\linebox
\newif\ifrtl
\def\ltrrtl#1{%
  \setbox\textbox=\vbox{#1}%
  \rtlfalse
  \loop\ifvbox\textbox
    \vbadness=10000
    \splittopskip0pt
    \setbox\linebox\vsplit\textbox to\baselineskip
    \unvbox\linebox\setbox\linebox=\lastbox
    \hbox to \hsize{\ifrtl\textcolor{red}{\beginR}\fi\unhbox\linebox\ifrtl\endR\fi}%
    \ifrtl\rtlfalse\else\rtltrue\fi
  \repeat
}
%%%%%%%%%%%
\begin{document}
\thispagestyle{empty}
\section{通常}
Es war einmal mitten im Winter, und die Schneeflocken
fielen wie Federn vom Himmel herab, da saß eine Königin
  an einem Fenster, das einen Rahmen von schwarzem Ebenholz
hatte, und nähte.

\section{左から右，右から左，・・・}
\leavevmode\vspace{-\baselineskip} \ltrrtl{%
Es war einmal mitten im Winter, und die Schneeflocken
fielen wie Federn vom Himmel herab, da saß eine Königin
  an einem Fenster, das einen Rahmen von schwarzem Ebenholz
hatte, und nähte.
}

\section{boustrophedon}
\begin{boustrophedon}
Es war einmal mitten im Winter, und die Schneeflocken
fielen wie Federn vom Himmel herab, da saß eine Königin
  an einem Fenster, das einen Rahmen von schwarzem Ebenholz
hatte, und nähte.
\end{boustrophedon}

\section{Rongorongo}
\begin{rongorongo}
Es war einmal mitten im Winter, und die Schneeflocken
fielen wie Federn vom Himmel herab, da saß eine Königin
  an einem Fenster, das einen Rahmen von schwarzem Ebenholz
hatte, und nähte.
\end{rongorongo}

\section{牛耕式}
\begin{boustrophedon}
むかし昔，冬のさなかのことでした。雪が，ふわりふわりと，空か
らまいおりていました。そのとき，どこやらの国の王さまのおきさ
きが，黒檀の枠の窓際に腰をおろして，針しごとをしていました。
\end{boustrophedon}

\section{ロンゴロンゴ}
\begin{rongorongo}
むかし昔，冬のさなかのことでした。雪が，ふわりふわりと，空か
らまいおりていました。そのとき，どこやらの国の王さまのおきさ
きが，黒檀の枠の窓際に腰をおろして，針しごとをしていました。
\end{rongorongo}
\end{document}