summaryrefslogtreecommitdiff
path: root/language/vispeech/visvowels.mf
blob: fda2f569506b7295a9499140acad26f4fd4ff106 (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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
% Visible speech vowels.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
for opcl=0,1:
for bar=0,1:
for hor=1,2,3:
beginchar(incr ccode,3/2curve#+ if hor=3: 2 fi vowel_curl#+2sidebar#,
	loop_h#+vowel_asc#,0);
if hor=3: fix_width; fi
x.stem=if hor=3: 1/2[lside,rside] elseif
      hor=1: lside+full_serif else: rside-full_serif fi;
vowelstem;
pickup serifpen;
bot y.stem=0;
serifize(y.stem);
if bar=1: roundingbar; fi
if opcl=0: widecurl else: closebulb fi
	((x.stem,loop_h),1,if hor=1: 1 else: -1 fi);
if hor=3: if opcl=0: widecurl else: closebulb fi((x.stem,loop_h),1,1); fi
endchar;
endfor;endfor;

for bar=0,1:
for hor=1,2,3:
beginchar(incr ccode, 3/2curve#+ if hor=3: 2 fi vowel_curl#+2sidebar#,
	loop_h#,vowel_d#);
if hor=3: fix_width; fi
x.stem=if hor=3: 1/2[lside,rside] elseif
	hor=1: lside+full_serif else: rside-full_serif fi;
vowelstem;
pickup serifpen;
top y.stem=h;
serifize(y.stem);
if bar=1: roundingbar; fi
if opcl=0: widecurl else: closebulb fi((x.stem,0),-1,if hor=1: 1 else: -1 fi);
if hor=3: if opcl=0: widecurl else: closebulb fi((x.stem,0),-1,1); fi
endchar;
endfor;endfor;

for bar=0,1:
for hor=1,2,3:
beginchar(incr ccode, 3/2curve#+ if hor=3: 2 fi vowel_curl#+2sidebar#,
	loop_h#+vowel_asc#,vowel_d#);
if hor=3: fix_width; fi
x.stem=if hor=3: 1/2[lside,rside] elseif
	hor=1: lside+full_serif else: rside-full_serif fi;
vowelstem;
if bar=1: roundingbar; fi
if opcl=0: widecurl else: closebulb fi
	((x.stem,loop_h),1,if hor=1: 1 else: -1 fi);
if opcl=0: widecurl else: closebulb fi((x.stem,0),-1,if hor=2: -1 else: 1 fi);
endchar;
endfor;endfor;
endfor;