blob: 9eb800b2766bb45adbf7c52a69e0aa5747b8d866 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
beginchar(oct"025",.4em#,.5cap#,0dth#); "Diatoniki fthora tou Bou";
picture NAK;
path p[];
y0 = y1 = 9h/10;
x0 = 4w/5; x6 = 7w/10;
x2 = 16w/25; y2 = 33h/50;
y3 = .5h; y5 = 3h/10;
x4 = 3w/5; y4 = 2h/5;
y6 = 7h/50;
x7 = 29w/50; y7 = 3w/50;
x1 = x3 = x5 = 3w/10;
p0 = z0--z1 & z1--z2 & z2--z3 & z3--z4 & z4--z5 & z5..controls z6..z7;
pickup pencircle scaled .8pt;
draw p0;
NAK = currentpicture;
endchar;
|