在纯 TeX 中是否有类似但垂直方向的宏\leftarrowfill
,类似于\uparrowfill
?我知道它存在于 LaTeX 中,但我只对纯 TeX 感兴趣。
答案1
我不明白这是做什么用的,但这可能会有用。
\def\downarrowfill{%
\par
\begingroup\offinterlineskip
\setbox0=\hbox{$\downarrow$}%
\setbox2=\hbox to\wd0{\hss$|$\hss}%
\copy2
\kern-3pt
\leaders\vbox{\kern-2pt\copy2\kern-2pt}\vfill
\kern-3pt
\box0
\endgroup
}
\def\uparrowfill{%
\par
\begingroup\offinterlineskip
\setbox0=\hbox{$\uparrow$}%
\setbox2=\hbox to\wd0{\hss$|$\hss}%
\copy0
\kern-3pt
\cleaders\vbox{\kern-2pt\copy2\kern-2pt}\vfill
\kern-3pt
\box2
\endgroup
}
\vbox to 3cm{\hsize=1cm\vbox to1cm{\uparrowfill}\vfill\vbox to1cm{\downarrowfill}}
\bye
另一种方法:
\def\arrowto#1#2{%
\setbox0=\hbox{%
$\left#1%
\vcenter to #2{}
\right.
\kern-\nulldelimiterspace$%
}%
\leavevmode\raise\dp0\box0}
\def\uparrowto{\arrowto\uparrow}
\def\downarrowto{\arrowto\downarrow}
a\uparrowto{12pt}a\downarrowto{12pt}a
\bye