cwide.tex

来自「开放源码的编译器open watcom 1.6.0版的源代码」· TEX 代码 · 共 42 行

% CWIDE -- Tree Ver, Edges St

\unitlength=1pt
\special{em:linewidth 0.4pt}
\linethickness{0.4pt}

\begin{picture}(500,-1000)

	\put(10,-39){\framebox(64,14){}}
	\put(12,-37){\makebox(60,10)[cc]{\small Wide1}}
	\put(84,-103){\framebox(64,14){}}
	\put(86,-101){\makebox(60,10)[cc]{\small Wide6}}
	\put(116,-89){\special{em:moveto}}
	\put(105,-39){\special{em:lineto}}
	\put(10,-103){\framebox(64,14){}}
	\put(12,-101){\makebox(60,10)[cc]{\small Wide4}}
	\put(42,-89){\special{em:moveto}}
	\put(42,-39){\special{em:lineto}}
	\put(47,-167){\framebox(64,14){}}
	\put(49,-165){\makebox(60,10)[cc]{\small Wide5}}
	\put(89,-153){\special{em:moveto}}
	\put(116,-103){\special{em:lineto}}
	\put(68,-153){\special{em:moveto}}
	\put(42,-103){\special{em:lineto}}
	\put(84,-39){\framebox(64,14){}}
	\put(86,-37){\makebox(60,10)[cc]{\small Wide2}}
	\put(160,-103){\framebox(64,14){}}
	\put(162,-101){\makebox(60,10)[cc]{\small Wide7}}
	\put(202,-89){\special{em:moveto}}
	\put(181,-39){\special{em:lineto}}
	\put(181,-89){\special{em:moveto}}
	\put(126,-39){\special{em:lineto}}
	\put(160,-39){\framebox(64,14){}}
	\put(162,-37){\makebox(60,10)[cc]{\small Wide3}}
	\put(239,-103){\framebox(64,14){}}
	\put(241,-101){\makebox(60,10)[cc]{\small Wide8}}
	\put(281,-89){\special{em:moveto}}
	\put(260,-39){\special{em:lineto}}
	\put(260,-89){\special{em:moveto}}
	\put(202,-39){\special{em:lineto}}
\end{picture}