cstar.tex

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

% CSTAR - Tree Vertical, Edges Straight

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

\begin{picture}(500,-1000)

	\put(12,-231){\framebox(64,14){}}
	\put(14,-229){\makebox(60,10)[cc]{\small Star4}}
	\put(54,-217){\special{em:moveto}}
	\put(72,-167){\special{em:lineto}}
	\put(33,-217){\special{em:moveto}}
	\put(31,-103){\special{em:lineto}}
	\put(30,-39){\framebox(100,14){}}
	\put(32,-37){\makebox(96,10)[cc]{\small StarRoot}}
	\put(10,-103){\framebox(64,14){}}
	\put(12,-101){\makebox(60,10)[cc]{\small Star1}}
	\put(42,-89){\special{em:moveto}}
	\put(55,-39){\special{em:lineto}}
	\put(51,-167){\framebox(64,14){}}
	\put(53,-165){\makebox(60,10)[cc]{\small Star3}}
	\put(99,-153){\special{em:moveto}}
	\put(108,-103){\special{em:lineto}}
	\put(83,-153){\special{em:moveto}}
	\put(80,-39){\special{em:lineto}}
	\put(67,-153){\special{em:moveto}}
	\put(52,-103){\special{em:lineto}}
	\put(87,-103){\framebox(64,14){}}
	\put(89,-101){\makebox(60,10)[cc]{\small Star2}}
	\put(119,-89){\special{em:moveto}}
	\put(105,-39){\special{em:lineto}}
	\put(91,-231){\framebox(64,14){}}
	\put(93,-229){\makebox(60,10)[cc]{\small Star5}}
	\put(133,-217){\special{em:moveto}}
	\put(129,-103){\special{em:lineto}}
	\put(112,-217){\special{em:moveto}}
	\put(93,-167){\special{em:lineto}}

\end{picture}