cparenty.tex

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

% CPARENTY -- Tree Vertical, Edges Straight

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

\begin{picture}(500,-1000)

	\put(10,-39){\framebox(100,14){}}
	\put(12,-37){\makebox(96,10)[cc]{\small Parenty5}}
	\put(450,-39){\framebox(100,14){}}
	\put(452,-37){\makebox(96,10)[cc]{\small Parenty4}}
	\put(340,-39){\framebox(100,14){}}
	\put(342,-37){\makebox(96,10)[cc]{\small Parenty3}}
	\put(230,-39){\framebox(100,14){}}
	\put(232,-37){\makebox(96,10)[cc]{\small Parenty2}}
	\put(120,-39){\framebox(100,14){}}
	\put(122,-37){\makebox(96,10)[cc]{\small Parenty1}}
	\put(873,-89){\special{em:moveto}}
	\put(1056,-39){\special{em:lineto}}
	\put(854,-89){\special{em:moveto}}
	\put(940,-39){\special{em:lineto}}
	\put(836,-89){\special{em:moveto}}
	\put(830,-39){\special{em:lineto}}
	\put(817,-89){\special{em:moveto}}
	\put(720,-39){\special{em:lineto}}
	\put(798,-89){\special{em:moveto}}
	\put(610,-39){\special{em:lineto}}
	\put(224,-103){\framebox(112,14){}}
	\put(226,-101){\makebox(108,10)[cc]{\small Parenty11}}
	\put(317,-89){\special{em:moveto}}
	\put(500,-39){\special{em:lineto}}
	\put(298,-89){\special{em:moveto}}
	\put(390,-39){\special{em:lineto}}
	\put(280,-89){\special{em:moveto}}
	\put(280,-39){\special{em:lineto}}
	\put(261,-89){\special{em:moveto}}
	\put(170,-39){\special{em:lineto}}
	\put(242,-89){\special{em:moveto}}
	\put(60,-39){\special{em:lineto}}
	\put(579,-153){\special{em:moveto}}
	\put(836,-103){\special{em:lineto}}
	\put(542,-153){\special{em:moveto}}
	\put(280,-103){\special{em:lineto}}

\end{picture}