1 % Miscellaneous symbols
3 filenametemplate "%j-%c.mps";
9 thin := pencircle scaled 3;
10 thick := thin scaled 2;
16 draw (300, 300) -- (180, 260) --
17 (180, 50) .. controls (200, 30) and (250, 0) .. (280, 0) --
18 (400, 100) -- (400, 280) -- cycle;
21 draw (280, 210) .. controls (250, 210) and (200, 230) .. (180, 260);
22 draw fullcircle scaled 15 yscaled 1.4 shifted (260, 80);
23 draw fullcircle scaled 15 yscaled 1.4 shifted (260, 50);
24 draw (260, 185) .. controls (240, 190) and (220, 190) .. (190, 220);
25 draw (260, 165) .. controls (240, 170) and (220, 170) .. (190, 200);
26 draw (400, 280) -- (280, 210) -- (280, 0);
31 beginfig(1) % Database
34 draw halfcircle scaled 200 yscaled 0.2 shifted (100, 100) --
35 halfcircle rotated 180 scaled 200 yscaled 0.2 shifted (100, 20) --
39 draw halfcircle rotated 180 scaled 200 yscaled 0.2 shifted (100, 100);
47 draw (100, 0) -- (300, 0) -- (300, 70) -- (100, 70) -- cycle;
49 quartercircle rotated -90 scaled 60 shifted (370, 80) ..
50 quartercircle scaled 60 shifted (370, 200) ..
51 quartercircle rotated 90 scaled 60 shifted (30, 200) ..
52 quartercircle rotated 180 scaled 60 shifted (30, 80) .. (100, 50);
53 draw (300, 230) -- (300, 330) -- (100, 330) -- (100, 230);
56 draw (120, 20) -- (280, 20);
57 draw (120, 35) -- (280, 35);
58 draw (120, 50) -- (280, 50);
59 draw (40, 200) -- (360, 200) -- (360, 190) -- (40, 190) -- cycle;
67 draw (0, 0) -- (200, 0) -- (200, 180) -- (100, 280) -- (0, 280) -- cycle;
69 draw (200, 180) -- (100, 180) -- (100, 280);
72 draw (170, 30) -- (30, 30) -- (30, 250) -- cycle;
73 draw (115, 60) -- (60, 60) -- (60, 145) -- cycle;
74 for n = 50 step 20 until 210: draw (30, n) -- (40, n); endfor
83 draw (50, 100) -- (350, 100) -- (350, 300) -- (50, 300) -- cycle;
84 draw (50, 100) -- (0, 20) -- (10, 0) -- (390, 0) -- (400, 20) -- (350, 100);
85 draw (0, 20) -- (400, 20);
88 draw quartercircle rotated -90 scaled 40 shifted (320, 130) ..
89 quartercircle scaled 40 shifted (320, 270) ..
90 quartercircle rotated 90 scaled 40 shifted (80, 270) ..
91 quartercircle rotated 180 scaled 40 shifted (80, 130) .. cycle;
92 draw (35, 55) -- (55, 92) -- (345, 92) -- (365, 55) -- cycle;
93 draw (170, 50) -- (230, 50) -- (233, 28) -- (167, 28) -- cycle;
101 draw (305, 25) .. controls (279, 20) and (253, 26) ..
102 (235, 39) .. controls (225, 30) and (223, 24) ..
103 (198, 20) .. controls (148, 12) and (118, 30) ..
104 (107, 60) .. controls (106, 62) and (106, 65) ..
105 (105, 67) .. controls ( 70, 64) and ( 35, 81) ..
106 ( 25, 108) .. controls ( 15, 135) and ( 33, 162) ..
107 ( 66, 174) .. controls ( 64, 177) and ( 63, 180) ..
108 ( 61, 183) .. controls ( 50, 213) and ( 74, 244) ..
109 (113, 252) .. controls (132, 256) and (152, 254) ..
110 (168, 247) .. controls (177, 262) and (193, 273) ..
111 (216, 278) .. controls (248, 284) and (280, 274) ..
112 (297, 255) .. controls (304, 259) and (312, 262) ..
113 (321, 264) .. controls (361, 272) and (402, 254) ..
114 (412, 224) .. controls (417, 209) and (414, 194) ..
115 (404, 181) .. controls (414, 174) and (421, 165) ..
116 (425, 155) .. controls (436, 125) and (412, 94) ..
117 (373, 85) .. controls (369, 84) and (365, 84) ..
118 (360, 83) .. controls (362, 56) and (340, 31) .. cycle;
126 draw quartercircle rotated -90 scaled 60 shifted (140, 30) ..
127 quartercircle scaled 60 shifted (140, 170) ..
128 quartercircle rotated 90 scaled 60 shifted (60, 170) ..
129 quartercircle rotated 180 scaled 60 shifted (60, 30) .. cycle;
132 draw (45, 35) -- (45, 165) -- (155, 165) -- (155, 35) -- cycle;
133 draw fullcircle scaled 25 shifted (100, 18);
134 draw (75, 185) -- (125, 185) -- (120, 180) -- (80, 180) -- cycle;
139 beginfig(7) % Workstation
142 draw (0, 100) -- (300, 100) -- (300, 300) -- (0, 300) -- cycle;
143 draw (130, 90) -- (170, 90){down} .. (180, 65) -- (120, 65) .. {up}cycle;
144 draw (80, 50) -- (0, 10) -- (10, 0) -- (290, 0) -- (300, 10) -- (220, 50) -- cycle;
145 draw (318, 28) .. controls (320, 33) and (335, 43) ..
146 (350, 38) .. controls (367, 32) and (380, 15) ..
147 (368, 4) .. controls (360, -5) and (344, 7) ..
148 (339, 11) .. controls (334, 15) and (318, 23) .. (318, 28) .. cycle;
151 draw quartercircle rotated -90 scaled 40 shifted (270, 130) ..
152 quartercircle scaled 40 shifted (270, 270) ..
153 quartercircle rotated 90 scaled 40 shifted (30, 270) ..
154 quartercircle rotated 180 scaled 40 shifted (30, 130) .. cycle;
155 draw (0, 10) -- (300, 10);
156 draw (370, 10) .. {dir 135}(340, 20) .. (320, 30);
158 draw (313, 35){dir 135} .. (280, 50) .. (290, 60) .. (250, 70) ..
159 (220, 70) .. {dir 220}(185, 75);
165 beginfig(8) % ADG logo
167 pickup thick scaled 2;
168 draw (20, 40) -- (100, 120) .. (140, 80) .. (100, 40) -- (100, 120);
169 draw (180, 120) .. (140, 80) .. (180, 40) -- (180, 60) -- (170, 60);
170 draw (100, 60) -- (60, 60);
173 draw (0, 0) -- (210, 0) -- (210, 160) -- (0, 160) -- cycle;
176 draw quartercircle rotated -90 scaled 80 shifted (160, 50) ..
177 quartercircle scaled 80 shifted (160, 110) ..
178 quartercircle rotated 90 scaled 80 shifted (50, 110) ..
179 quartercircle rotated 180 scaled 80 shifted (50, 50) .. cycle;
187 draw fullcircle scaled 100 shifted (115, 115);
188 draw for n = 0 step 1 until 7:
189 subpath (n, n + 0.5) of fullcircle scaled 190 --
190 subpath (n + 0.5, n + 1) of fullcircle scaled 230 --
192 cycle shifted (115, 115);