@@ -8,33 +8,33 @@ glyph-module
8
8
glyph-block Letter-Armenian-Hook-Group : begin
9
9
glyph-block-import CommonShapes
10
10
glyph-block-import Common-Derivatives
11
- glyph-block-import Letter-Shared-Shapes : nShoulder uBowl SerifFrame
11
+ glyph-block-import Letter-Shared-Shapes : SerifFrame
12
12
glyph-block-import Letter-Armenian-Shared-Shapes : ArmHBar
13
13
14
14
define [RightHook df top bot _sw _hook _ada _adb] : glyph-proc
15
15
local sw : fallback _sw df.mvs
16
16
local hook : fallback _hook Hook
17
17
local ada : fallback _ada ArchDepthA
18
18
local adb : fallback _adb ArchDepthB
19
- local yMid : if (top - bot > ada + adb) (top - ada) : mix top bot (ada / (ada + adb))
19
+ local yMidLeft : if (top - bot > ada + adb) (top - ada) : mix top bot (ada / (ada + adb))
20
20
include : dispiro
21
21
widths.lhs sw
22
22
g4 df.rightSB (top - hook)
23
23
hookstart top (sw -- sw)
24
- flat df.leftSB yMid
24
+ flat df.leftSB yMidLeft
25
25
curl df.leftSB bot [heading Downward]
26
26
27
27
define [LeftHook df top bot _sw _hook _ada _adb] : glyph-proc
28
28
local sw : fallback _sw df.mvs
29
29
local hook : fallback _hook Hook
30
30
local ada : fallback _ada ArchDepthA
31
31
local adb : fallback _adb ArchDepthB
32
- local yMid : if (top - bot > ada + adb) (top - adb) : mix top bot (adb / (ada + adb))
32
+ local yMidRight : if (top - bot > ada + adb) (top - adb) : mix top bot (adb / (ada + adb))
33
33
include : dispiro
34
34
widths.rhs sw
35
35
g4 df.leftSB (top - hook)
36
36
hookstart top (sw -- sw)
37
- flat df.rightSB yMid
37
+ flat df.rightSB yMidRight
38
38
curl df.rightSB bot [heading Downward]
39
39
40
40
do "Ben"
@@ -78,43 +78,6 @@ glyph-block Letter-Armenian-Hook-Group : begin
78
78
local sf : SerifFrame.fromDf df CAP 0
79
79
include sf.lb.outer
80
80
81
- do "Ini"
82
- create-glyph 'armn/Ini' 0x53B : glyph-proc
83
- local df : include : DivFrame 1
84
- include : df.markSet.capital
85
- include : nShoulder.shape
86
- left -- (df.leftSB + [HSwToV df.mvs])
87
- right -- df.rightSB
88
- top -- XH
89
- bottom -- (XH / 2)
90
- ada -- ArchDepthA
91
- adb -- ArchDepthB
92
- stroke -- df.mvs
93
- include : VBar.l df.leftSB 0 CAP
94
- if SLAB : begin
95
- local sf : SerifFrame.fromDf df CAP 0
96
- include : composite-proc sf.lt.full sf.lb.full
97
-
98
- do "Ken"
99
- create-glyph 'armn/Ken' 0x53F : glyph-proc
100
- local df : include : DivFrame 1
101
- include : df.markSet.capital
102
- local midy : XH / 2 - df.mvs / 2
103
- include : uBowl.shape
104
- left -- df.leftSB
105
- right -- (df.rightSB - [HSwToV df.mvs])
106
- top -- CAP
107
- bottom -- midy
108
- ada -- ArchDepthA
109
- adb -- ArchDepthB
110
- stroke -- df.mvs
111
- include : VBar.r df.rightSB 0 XH
112
-
113
- if SLAB : begin
114
- local sf : SerifFrame.fromDf df CAP 0
115
- local sf2 : SerifFrame.fromDf df XH 0
116
- include : composite-proc sf.lt.full sf2.rt.full sf.rb.full
117
-
118
81
do "Ghat"
119
82
create-glyph 'armn/Ghat' 0x542 : glyph-proc
120
83
local df : include : DivFrame 1
@@ -146,26 +109,6 @@ glyph-block Letter-Armenian-Hook-Group : begin
146
109
local sf : SerifFrame.fromDf df CAP 0
147
110
include sf.rb.full
148
111
149
- do "Vew"
150
- create-glyph 'armn/Vew' 0x54E : glyph-proc
151
- local df : include : DivFrame 1
152
- include : df.markSet.capital
153
- local midy : XH / 2 - df.mvs / 2
154
- include : uBowl.shape
155
- left -- df.leftSB
156
- right -- (df.rightSB - [HSwToV df.mvs])
157
- top -- XH
158
- bottom -- midy
159
- ada -- ArchDepthA
160
- adb -- ArchDepthB
161
- stroke -- df.mvs
162
- include : VBar.r df.rightSB 0 CAP df.mvs
163
- include : [ArmHBar.right df].base
164
- if SLAB : begin
165
- local sf : SerifFrame.fromDf df XH 0
166
- local sf2 : SerifFrame.fromDf df CAP 0
167
- include : composite-proc sf.lt.full sf2.rt.full sf.rb.full
168
-
169
112
do "Reh"
170
113
create-glyph 'armn/Reh' 0x550 : glyph-proc
171
114
local df : include : DivFrame 1
0 commit comments