Balances: /ae, /oe, /cyrzhe, /nu, etc.
This commit is contained in:
parent
816568a6e7
commit
1df7dae16a
|
@ -201,11 +201,11 @@ define [CyrZheShape top] : glyph-construction {
|
||||||
local midx : mix SB MIDDLE 0.3
|
local midx : mix SB MIDDLE 0.3
|
||||||
define [CyrAngleShape] : glyph-construction {
|
define [CyrAngleShape] : glyph-construction {
|
||||||
local cor 1
|
local cor 1
|
||||||
start-from [SB + O * 2] 0
|
start-from [SB + O * 4] 0
|
||||||
line-to [SB + fine * cor + O * 2] 0
|
line-to [SB + fine * cor + O * 4] 0
|
||||||
line-to [midx + fine * cor] [top / 2]
|
line-to [midx + fine * cor] [top / 2]
|
||||||
line-to [SB + fine * cor + O * 2] top
|
line-to [SB + fine * cor + O * 4] top
|
||||||
line-to [SB + O * 2] top
|
line-to [SB + O * 4] top
|
||||||
line-to midx [top / 2]
|
line-to midx [top / 2]
|
||||||
reverse-last
|
reverse-last
|
||||||
}
|
}
|
||||||
|
|
|
@ -94,8 +94,8 @@ create-glyph 'Pi' : glyph-construction {
|
||||||
assign-unicode 0x3A0
|
assign-unicode 0x3A0
|
||||||
include capitalMarks
|
include capitalMarks
|
||||||
include : HBar SB RIGHTSB [CAP - HALFSTROKE]
|
include : HBar SB RIGHTSB [CAP - HALFSTROKE]
|
||||||
include : VBar [[mix SB RIGHTSB 0.1] + HALFSTROKE] 0 CAP
|
include : VBar [[mix SB RIGHTSB 0.05] + HALFSTROKE] 0 CAP
|
||||||
include : VBar [[mix RIGHTSB SB 0.1] - HALFSTROKE] 0 CAP
|
include : VBar [[mix RIGHTSB SB 0.05] - HALFSTROKE] 0 CAP
|
||||||
}
|
}
|
||||||
create-glyph 'Phi' : glyph-construction {
|
create-glyph 'Phi' : glyph-construction {
|
||||||
assign-unicode 0x3A6
|
assign-unicode 0x3A6
|
||||||
|
@ -180,13 +180,13 @@ create-glyph 'iota' : glyph-construction {
|
||||||
set-anchor 'above' BASE middle XH
|
set-anchor 'above' BASE middle XH
|
||||||
include : leftwardTopSerif middle XH LONGJUT
|
include : leftwardTopSerif middle XH LONGJUT
|
||||||
include : create-stroke
|
include : create-stroke
|
||||||
:.start-from middle HOOK
|
:.start-from middle XH
|
||||||
:.heads-to UPWARD
|
:.heads-to DOWNWARD
|
||||||
:.set-width HALFSTROKE HALFSTROKE
|
:.set-width HALFSTROKE HALFSTROKE
|
||||||
:.line-to middle XH
|
:.line-to middle HOOK
|
||||||
:.heads-to UPWARD
|
:.arc-vh-to [middle + HOOK - HALFSTROKE] HALFSTROKE
|
||||||
|
:.line-to [middle + LONGJUT * 1.05] HALFSTROKE
|
||||||
include : VerticalHook middle HOOK [HOOK * 1.2] [HOOK * 0.75]
|
:.heads-to RIGHTWARD
|
||||||
}
|
}
|
||||||
create-glyph 'eta' : glyph-construction {
|
create-glyph 'eta' : glyph-construction {
|
||||||
assign-unicode 0x3B7
|
assign-unicode 0x3B7
|
||||||
|
@ -380,7 +380,7 @@ create-glyph 'nu' : glyph-construction {
|
||||||
local y0 : mix 0 XH 0.8
|
local y0 : mix 0 XH 0.8
|
||||||
local y1 : mix 0 XH 0.16
|
local y1 : mix 0 XH 0.16
|
||||||
local y2 0
|
local y2 0
|
||||||
local xmid : MIDDLE + HALFSTROKE
|
local xmid : MIDDLE + HALFSTROKE * 0.75
|
||||||
include : create-stroke
|
include : create-stroke
|
||||||
:.start-from [SB + 0.4 * STROKE * ITALICCOR] XH
|
:.start-from [SB + 0.4 * STROKE * ITALICCOR] XH
|
||||||
:.set-width 0 STROKE
|
:.set-width 0 STROKE
|
||||||
|
@ -413,26 +413,23 @@ create-glyph 'sigmafinal' : glyph-construction {
|
||||||
create-glyph 'upsilon' : glyph-construction {
|
create-glyph 'upsilon' : glyph-construction {
|
||||||
assign-unicode 0x3C5
|
assign-unicode 0x3C5
|
||||||
include eMarks
|
include eMarks
|
||||||
local x0 : [mix SB RIGHTSB 0.1] + STROKE
|
|
||||||
local y0 : XH - STROKE * 0.2 + TAILADJY * globalTransform.yx
|
|
||||||
local y1 : mix 0 XH 0.75
|
|
||||||
local x1 : SB + STROKE * ITALICCOR + O
|
|
||||||
local y3 : XH * 0.45
|
|
||||||
include : create-stroke
|
include : create-stroke
|
||||||
:.start-from [WIDTH - x0] y0
|
:.start-from SB XH
|
||||||
|
:.heads-to DOWNWARD
|
||||||
:.set-width STROKE 0
|
:.set-width STROKE 0
|
||||||
:.curve-to [WIDTH - x1] y1 [WIDTH - x1] [XH / 2]
|
:.line-to SB SMALLSMOOTHB
|
||||||
:.arc-vh-to [mix [WIDTH - x1] [SB + STROKE] 0.5] [STROKE + O]
|
:.arc-vh-to MIDDLE O
|
||||||
:.arc-hv-to [SB + STROKE] y3
|
:.heads-to RIGHTWARD
|
||||||
:.line-to [SB + STROKE] XH
|
:.arc-hv-to RIGHTSB SMALLSMOOTHA
|
||||||
|
:.line-to RIGHTSB XH
|
||||||
:.heads-to UPWARD
|
:.heads-to UPWARD
|
||||||
}
|
}
|
||||||
create-glyph 'pi' : glyph-construction {
|
create-glyph 'pi' : glyph-construction {
|
||||||
assign-unicode 0x3C0
|
assign-unicode 0x3C0
|
||||||
include eMarks
|
include eMarks
|
||||||
include : HBar SB RIGHTSB [XH - HALFSTROKE]
|
include : HBar SB RIGHTSB [XH - HALFSTROKE]
|
||||||
include : VBar [[mix SB RIGHTSB 0.1] + HALFSTROKE] 0 XH
|
include : VBar [[mix SB RIGHTSB 0.05] + HALFSTROKE] 0 XH
|
||||||
include : VBar [[mix RIGHTSB SB 0.1] - HALFSTROKE] 0 XH
|
include : VBar [[mix RIGHTSB SB 0.05] - HALFSTROKE] 0 XH
|
||||||
}
|
}
|
||||||
create-glyph 'tau' : glyph-construction {
|
create-glyph 'tau' : glyph-construction {
|
||||||
assign-unicode 0x3C4
|
assign-unicode 0x3C4
|
||||||
|
@ -472,7 +469,7 @@ create-glyph 'omega' : glyph-construction {
|
||||||
local fine : adviceBlackness 3.5
|
local fine : adviceBlackness 3.5
|
||||||
local x0 : [mix SB RIGHTSB 0.1] + fine
|
local x0 : [mix SB RIGHTSB 0.1] + fine
|
||||||
local y0 : XH - STROKE * 0.2
|
local y0 : XH - STROKE * 0.2
|
||||||
local y1 : mix 0 XH 0.75
|
local y1 : mix 0 XH 0.8
|
||||||
local x1 : SB + fine * ITALICCOR + O
|
local x1 : SB + fine * ITALICCOR + O
|
||||||
local y3 : XH / 2
|
local y3 : XH / 2
|
||||||
local y4 : XH * 0.65
|
local y4 : XH * 0.65
|
||||||
|
@ -527,6 +524,7 @@ create-glyph 'varphi' : glyph-construction {
|
||||||
:.arc-vh-to [mix [WIDTH - x1] [MIDDLE + fine / 2] 0.5] [XH - fine - O]
|
:.arc-vh-to [mix [WIDTH - x1] [MIDDLE + fine / 2] 0.5] [XH - fine - O]
|
||||||
:.arc-hv-to [MIDDLE + fine / 2] y3
|
:.arc-hv-to [MIDDLE + fine / 2] y3
|
||||||
:.line-to [MIDDLE + fine / 2] DESCENDER
|
:.line-to [MIDDLE + fine / 2] DESCENDER
|
||||||
|
:.heads-to DOWNWARD
|
||||||
}
|
}
|
||||||
|
|
||||||
create-glyph 'psi' : glyph-construction {
|
create-glyph 'psi' : glyph-construction {
|
||||||
|
|
|
@ -79,17 +79,17 @@ create-glyph 'ae-epart' : glyph-construction {
|
||||||
local eMiddle : [mix eLeft [RIGHTSB - O] 0.5] - sw * globalTransform.yx
|
local eMiddle : [mix eLeft [RIGHTSB - O] 0.5] - sw * globalTransform.yx
|
||||||
local barbottom [XH * EBARPOS]
|
local barbottom [XH * EBARPOS]
|
||||||
|
|
||||||
local hookx [RIGHTSB - O - OXHOOK + TAILADJX * globalTransform.yx]
|
local hookx [RIGHTSB - O * 2 - OXHOOK + TAILADJX * globalTransform.yx]
|
||||||
local eHookMiddle [mix eLeft hookx 0.5]
|
local eHookMiddle [mix eLeft hookx 0.5]
|
||||||
|
|
||||||
local sma : SMALLSMOOTHA * 0.6
|
local sma : SMALLSMOOTHA * 0.6
|
||||||
local smb : SMALLSMOOTHB * 0.6
|
local smb : SMALLSMOOTHB * 0.6
|
||||||
|
|
||||||
include : create-stroke
|
include : create-stroke
|
||||||
:.start-from [RIGHTSB - O] barbottom
|
:.start-from [RIGHTSB - O * 2] barbottom
|
||||||
:.heads-to UPWARD
|
:.heads-to UPWARD
|
||||||
:.set-width sw 0
|
:.set-width sw 0
|
||||||
:.line-to [RIGHTSB - O] [XH - smb]
|
:.line-to [RIGHTSB - O * 2] [XH - smb]
|
||||||
:.arc-vh-to eMiddle XO
|
:.arc-vh-to eMiddle XO
|
||||||
:.arc-hv-to eLeft [XH - sma]
|
:.arc-hv-to eLeft [XH - sma]
|
||||||
:.line-to eLeft smb
|
:.line-to eLeft smb
|
||||||
|
@ -124,7 +124,7 @@ create-glyph 'ae-apart' : glyph-construction {
|
||||||
:.start-from abarRight smb
|
:.start-from abarRight smb
|
||||||
:.set-width 0 sw
|
:.set-width 0 sw
|
||||||
:.arc-vh-to lowmiddle O
|
:.arc-vh-to lowmiddle O
|
||||||
:.arc-hv-to [SB + O] [mix 0 bartop [smb / [sma + smb]]]
|
:.arc-hv-to [SB + O * 2] [mix 0 bartop [smb / [sma + smb]]]
|
||||||
:.arc-vh-to barsmooth bartop
|
:.arc-vh-to barsmooth bartop
|
||||||
:.line-to abarRight bartop
|
:.line-to abarRight bartop
|
||||||
:.heads-to RIGHTWARD
|
:.heads-to RIGHTWARD
|
||||||
|
@ -143,8 +143,8 @@ create-glyph 'oe-opart' : glyph-construction {
|
||||||
:.start-from abarRight smb
|
:.start-from abarRight smb
|
||||||
:.set-width 0 sw
|
:.set-width 0 sw
|
||||||
:.arc-vh-to [m1 + sw * globalTransform.yx] O
|
:.arc-vh-to [m1 + sw * globalTransform.yx] O
|
||||||
:.arc-hv-to [SB + O] smb
|
:.arc-hv-to [SB + O * 2] smb
|
||||||
:.line-to [SB + O] [XH - sma]
|
:.line-to [SB + O * 2] [XH - sma]
|
||||||
:.arc-vh-to [m1 - sw * globalTransform.yx] [XH - O]
|
:.arc-vh-to [m1 - sw * globalTransform.yx] [XH - O]
|
||||||
:.arc-hv-to abarRight [XH - smb]
|
:.arc-hv-to abarRight [XH - smb]
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue
Block a user