summaryrefslogtreecommitdiff
path: root/fonts/knot/knot6.mf
blob: 716aefc776da1025cbe2490147e71a585c50b5c5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
mode_setup;

scale# := 0.5pt#;
knotwid# = 8scale#;
croswid# = 1.25knotwid#;
thin# = 1scale#;
thick# = 2scale#;
sqwid# = 25scale#;
sqht# = 25scale#;
define_pixels(scale, thick, thin);
define_blacker_pixels(knotwid, croswid);
font_normal_space sqwid#;
def --- = .. tension 2 .. enddef;
numeric indist;
numeric	knotstyle.ll, knotstyle.rr, knotstyle.l, knotstyle.r, knotstyle.c;
numeric	knotstyle.solid;
% A knotstroke is composed of up to five strokes:       l ll  c  rr r
% Each line can be drawn five ways. If knotstyle.x	| |   |   | |
% is 0 it is not drawn, if it is 1 it is drawn with     | |   |   | |
% the thin pen and if 2 it is drawn with the thick pen. | |   |   | |
% -1 and -2 undraw it with the thin & thick pen         | |   |   | |
% respectively. knotstyle.solid can have four different | |   |   | |
% values. If it is zero, no solid filling is done. If   | |   |   | |
% 1 then the stroke is filled from l to r. If it is     |xxxxxxxxxxx|
% 2 it is filled from ll to rr. Lastly if it is         | |xxxxxxx| |
% 3 it is filled from l to ll and rr to r.              |x|   |   |x|

indist := 1/4;
knotstyle.l = 0;
knotstyle.r = 0;
knotstyle.ll = 0;
knotstyle.rr = 0;
knotstyle.c = -1;
knotstyle.solid = 1;
input doknots

input bits

end.