1 \setlength{\unitlength}{0.0125in
}
3 \begingroup\makeatletter\ifx\SetFigFont\undefined
4 % extract first six characters in \fmtname
5 \def\x#1#2#3#4#5#6#7\relax{\def\x{#1#2#3#4#5#6}}%
6 \expandafter\x\fmtname xxxxxx
\relax \def\y{splain
}%
7 \ifx\x\y % LaTeX or SliTeX?
8 \gdef\SetFigFont#1#2#3{%
9 \ifnum #1<
17\tiny\else \ifnum #1<
20\small\else
10 \ifnum #1<
24\normalsize\else \ifnum #1<
29\large\else
11 \ifnum #1<
34\Large\else \ifnum #1<
41\LARGE\else
12 \huge\fi\fi\fi\fi\fi\fi
13 \csname #3\endcsname}%
15 \gdef\SetFigFont#1#2#3{\begingroup
16 \count@
#1\relax \ifnum 25<
\count@
\count@
25\fi
17 \def\x{\endgroup\@setsize
\SetFigFont{#2pt
}}%
19 \csname \romannumeral\the\count@ pt
\expandafter\endcsname
20 \csname @
\romannumeral\the\count@ pt
\endcsname
21 \csname #3\endcsname}%
24 \begin{picture
}(
166,
195)(
0,-
10)
25 \put(
20,
45)
{\blacken\ellipse{10}{10}}
26 \put(
20,
45)
{\ellipse{10}{10}}
27 \put(
135,
60)
{\blacken\ellipse{10}{10}}
28 \put(
135,
60)
{\ellipse{10}{10}}
29 \put(
150,
125)
{\blacken\ellipse{10}{10}}
30 \put(
150,
125)
{\ellipse{10}{10}}
31 \put(
115,
95)
{\blacken\ellipse{10}{10}}
32 \put(
115,
95)
{\ellipse{10}{10}}
33 \put(
45,
155)
{\blacken\ellipse{10}{10}}
34 \put(
45,
155)
{\ellipse{10}{10}}
35 \put(
55,
90)
{\blacken\ellipse{10}{10}}
36 \put(
55,
90)
{\ellipse{10}{10}}
37 \put(
105,
20)
{\blacken\ellipse{10}{10}}
38 \put(
105,
20)
{\ellipse{10}{10}}
39 \put(
10,
115)
{\blacken\ellipse{10}{10}}
40 \put(
10,
115)
{\ellipse{10}{10}}
41 \path(
20,
45)(
105,
20)(
135,
60)
42 \dashline{4.000}(
20,
45)(
55,
90)(
135,
60)
43 \path(
20,
45)(
10,
115)(
115,
95)(
105,
20)
44 \path(
115,
95)(
150,
125)(
135,
60)
45 \path(
10,
115)(
45,
155)(
150,
125)
46 \drawline(
45,
155)(
45,
155)
47 \dashline{4.000}(
45,
155)(
55,
90)
48 \put(
55,
70)
{\makebox(
0,
0)
[lb
]{\smash{{{\SetFigFont{12}{14.4}{rm
}1}}}}}
49 \put(
15,
20)
{\makebox(
0,
0)
[lb
]{\smash{{{\SetFigFont{12}{14.4}{rm
}2}}}}}
50 \put(
105,
0)
{\makebox(
0,
0)
[lb
]{\smash{{{\SetFigFont{12}{14.4}{rm
}3}}}}}
51 \put(
140,
45)
{\makebox(
0,
0)
[lb
]{\smash{{{\SetFigFont{12}{14.4}{rm
}4}}}}}
52 \put(
160,
135)
{\makebox(
0,
0)
[lb
]{\smash{{{\SetFigFont{12}{14.4}{rm
}8}}}}}
53 \put(
110,
105)
{\makebox(
0,
0)
[lb
]{\smash{{{\SetFigFont{12}{14.4}{rm
}7}}}}}
54 \put(
40,
165)
{\makebox(
0,
0)
[lb
]{\smash{{{\SetFigFont{12}{14.4}{rm
}5}}}}}
55 \put(
0,
125)
{\makebox(
0,
0)
[lb
]{\smash{{{\SetFigFont{12}{14.4}{rm
}6}}}}}