Re: 切り取り線

名前: みなも
日時: 2014-02-04 19:43:42
IPアドレス: 121.94.154.*

>>57371

本格的な使用を考えるならいろいろ調整がいるでしょうが，
あまり細かいことを考えないなら，こんな感じでどうでしょう。

twocolumn で罫線を引いているのは
\@outputdblcol
という命令ですので，これをプリアンブルで再定義。
以下はサンプル。

\documentclass[twocolumn]{jarticle}

\columnseprule=1pt % 破線の太さは \columnseprule を流用

\def\hasen{\hbox{% 破線マクロ「3pt 線分 4pt 空白 3pt 線分」をワンセット
  \vrule width \columnseprule height10pt depth-7pt
  \hskip-\columnseprule
  \vrule width \columnseprule height3pt}}

\makeatletter% ここから再定義
\def\@outputdblcol{%
  \if@firstcolumn
    \global \@firstcolumnfalse
    \global \setbox\@leftcolumn \box\@outputbox
  \else
    \global \@firstcolumntrue
    \setbox\@outputbox \vbox {%
                         \hb@xt@\textwidth {%
                           \hb@xt@\columnwidth {%
                             \box\@leftcolumn \hss}%
                           \hfil
                           \vbox to \ht\@outputbox{\hrule height0pt
                             \leaders\hasen\vfill
                             \hb@xt@\z@{\hss\hbox{\tate 切り取り}\hss}%
                             \leaders\hasen\vfill}
                           \hfil
                           \hb@xt@\columnwidth {%
                             \box\@outputbox \hss}%
                                             }%
                              }%
    \@combinedblfloats
    \@outputpage
    \begingroup
      \@dblfloatplacement
      \@startdblcolumn
      \@whilesw\if@fcolmade \fi
        {\@outputpage
         \@startdblcolumn}%
    \endgroup
  \fi
}
\makeatother

\begin{document}

あああああああ

\newpage

いいいいいいい

\end{document}

この書き込みへの返事：