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
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
% Croatian Glagolitic, angular type
% 1994, darko.zubrinic@etf.hr
mode_setup;
u#:=.8pt#; font_quad= 24u#;
font_normal_space= 8u#;
font_normal_stretch= 3u#;
font_normal_shrink= 1u#;
em#:=10pt#; cap#:=7pt#;
thin#:=2/3pt#; thick#:=.9*5/6pt#;
o#:=1/5pt#;
define_pixels(em,cap);
define_blacker_pixels(thin,thick);
curve_sidebar:= round 1.1*1/10em;
input croblv % velika slova
mode_setup;
u#:=3/4u#;
em#:=3/4em#; cap#:=3/4cap#;
thick#:=3/4thick#;
o#:=3/4o#;
define_pixels(em,cap);
define_blacker_pixels(thin,thick);
%curve_sidebar:=3/4curve_sidebar;
input croblm % mala slova
input glz % znakovi
ligtable "c": "c" =: oct"013", "h" =: oct"011", "x" =: oct"000";
ligtable "s": "s" =: oct"014"; %umjesto sh
ligtable "z": "x" =: oct"006", "z" =: oct"015", "o" kern -.5u#,
"u" kern -.5u#;
ligtable "d": "d" =: oct"016"; % "d" =: oct"012";
ligtable "y": "a" =: oct"002", "e" =: oct"002", "u" =: oct"004";
ligtable "-": "-" =: oct"173";
ligtable "e": "i" kern -.5u#;
ligtable "f": "o" kern -u#, "u" kern -u#, "i" kern -.5u#, "g" kern-.5u#;
ligtable "i": "f" kern -.5u#;
ligtable "r": "k" kern -.5u#;
ligtable "n": "a" kern -.5u#;
ligtable "j": "a" kern -.5u#;
u#:=4/3u#;
ligtable "C": "c" =: oct"023", "C" =: oct "023", "H" =:
oct"021", "h" =: oct"021",
"x" =: oct"001", "X" =: oct"001";
ligtable "S": "S" =: oct"024", "s" =: oct"024";
ligtable "Z": "x" =: oct"007", "Z" =: oct"025", "z"=: oct"025",
"X" =: oct"007", "O" kern -.5u#,
"u" kern -.5u#;
ligtable "D": "d" =: oct"026", "D" =: oct"026"; % "d" =: oct"022";
ligtable "Y": "a" =: oct"003", "A" =: oct"003",
"e" =: oct"003", "E" =: oct"003",
"u" =: oct"005", "U" =: oct"005";
ligtable "E": "I" kern -.5u#;
ligtable "F": "O" kern -u#, "U" kern -u#, "I" kern -.5u#, "G" kern-.5u#;
ligtable "I": "F" kern -.5u#;
ligtable "R": "K" kern -.5u#;
ligtable "N": "A" kern -.5u#;
end.
|