Added /ramshorn, /ezhcurlytail and /smcpturnE.

This commit is contained in:
be5invis 2015-08-15 07:38:03 +08:00
parent 564f31fc84
commit a71f74e68c
3 changed files with 59 additions and 32 deletions

View file

@ -419,7 +419,6 @@ createSubscripts : list {
list 0x1D68 'rho' list 0x1D68 'rho'
list 0x1D69 'phi' list 0x1D69 'phi'
list 0x1D6A 'chi' list 0x1D6A 'chi'
list 0x2C7B 'turnE'
list 0x2C7C 'j' list 0x2C7C 'j'
} }

View file

@ -388,10 +388,10 @@ create-glyph 'U' : glyph-construction {
### F E H L I T Z ### F E H L I T Z
define [FShape y] : glyph-construction { define [FShape top y] : glyph-construction {
include : VBarLeft [SB * 1.5] 0 CAP include : VBarLeft [SB * 1.5] 0 [fallback top CAP]
include : HBarTop [SB * 1.5 - O] RIGHTSB CAP include : HBarTop [SB * 1.5 - O] RIGHTSB [fallback top CAP]
include : HBar [SB * 1.5 - O] [RIGHTSB - HALFSTROKE] [CAP * [fallback y 0.54]] include : HBar [SB * 1.5 - O] [RIGHTSB - HALFSTROKE] [[fallback top CAP] * [fallback y 0.54]]
} }
create-glyph 'F' : glyph-construction { create-glyph 'F' : glyph-construction {
set-width WIDTH set-width WIDTH
@ -399,13 +399,15 @@ create-glyph 'F' : glyph-construction {
include capitalMarks include capitalMarks
include : FShape include : FShape
} }
define [EShape top] : glyph-construction {
include : FShape top
include : HBarBottom [SB * 1.5 - O] RIGHTSB 0
}
create-glyph 'E' : glyph-construction { create-glyph 'E' : glyph-construction {
set-width WIDTH set-width WIDTH
assign-unicode 'E' assign-unicode 'E'
include capitalMarks include capitalMarks
include : FShape include : EShape CAP
include : HBarBottom [SB * 1.5 - O] RIGHTSB 0
} }
define [HShape top] : glyph-construction { define [HShape top] : glyph-construction {
include : VBarLeft SB 0 top include : VBarLeft SB 0 top

View file

@ -334,14 +334,6 @@ define [EzhShape top bot pleft] : glyph-construction {
local ezhRight : mix SB RIGHTSB 0.925 local ezhRight : mix SB RIGHTSB 0.925
include : create-stroke :.start-from SB top :.heads-to RIGHTWARD :.set-width 0 STROKE include : create-stroke :.start-from SB top :.heads-to RIGHTWARD :.set-width 0 STROKE
:.line-to ezhRight top :.heads-to RIGHTWARD :.to-outline :.line-to ezhRight top :.heads-to RIGHTWARD :.to-outline
include : create-stroke
:.start-from ezhLeft yMidBar
:.heads-to RIGHTWARD
:.set-width 0 STROKE
:.line-to MIDDLE yMidBar
:.arc-hv-to RIGHTSB [mix yMidBar bot 0.5]
:.to-outline
include : XSHookLower bot SB [mix SB RIGHTSB 0.465] RIGHTSB [[yMidBar - bot] / 2] SHOOK
start-from ezhLeft yMidBar start-from ezhLeft yMidBar
line-to [ezhLeft + STROKE * cor] [yMidBar - HALFSTROKE] line-to [ezhLeft + STROKE * cor] [yMidBar - HALFSTROKE]
@ -350,6 +342,14 @@ define [EzhShape top bot pleft] : glyph-construction {
line-to [ezhRight - STROKE * cor] [top - STROKE] line-to [ezhRight - STROKE * cor] [top - STROKE]
reverse-last reverse-last
include : create-stroke
:.start-from ezhLeft yMidBar
:.heads-to RIGHTWARD
:.set-width 0 STROKE
:.line-to MIDDLE yMidBar
:.arc-hv-to RIGHTSB [mix yMidBar bot 0.5]
:.to-outline
include : XSHookLower bot SB [mix SB RIGHTSB 0.465] RIGHTSB [[yMidBar - bot] / 2] SHOOK
} }
create-glyph 'Ezh' : glyph-construction { create-glyph 'Ezh' : glyph-construction {
set-width WIDTH set-width WIDTH
@ -560,26 +560,33 @@ create-glyph 'scriptg' : glyph-construction {
include : sHookLower DESCENDER SMALLSMOOTHA SHOOK include : sHookLower DESCENDER SMALLSMOOTHA SHOOK
include : VBarRight RIGHTSB [DESCENDER + SMALLSMOOTHA] XH include : VBarRight RIGHTSB [DESCENDER + SMALLSMOOTHA] XH
} }
create-glyph 'latingamma' : glyph-construction { define [RamsHornShape bottom top] : glyph-construction {
assign-unicode 0x263
include pMarks
local hf : [adviceBlackness 4] / 2 local hf : [adviceBlackness 4] / 2
local d : hf * 2 + WIDTH * 0.05 local d : hf * 2 + WIDTH * 0.05
include : create-stroke include : create-stroke
:.start-from [SB + HALFSTROKE * ITALICCOR + O] XH :.start-from [SB + HALFSTROKE * ITALICCOR + O] top
:.heads-to DOWNWARD :.heads-to DOWNWARD
:.set-width HALFSTROKE HALFSTROKE :.set-width HALFSTROKE HALFSTROKE
:.curve-to [MIDDLE + d - hf] 0 [MIDDLE + d - hf] [DESCENDER + d * [1 - globalTransform.yx * 0.5]] :.curve-to [MIDDLE + d - hf] [mix bottom top 0.3] [MIDDLE + d - hf] [bottom + d * [1 - globalTransform.yx * 0.5]]
:.set-width hf hf :.set-width hf hf
:.arc-vh-to [MIDDLE + OMIDCOR * hf * 2] [DESCENDER + hf] :.arc-vh-to [MIDDLE + OMIDCOR * hf * 2] [bottom + hf]
:.arc-hv-to [MIDDLE - d + hf] [DESCENDER + d * [1 + globalTransform.yx * 0.5]] :.arc-hv-to [MIDDLE - d + hf] [bottom + d * [1 + globalTransform.yx * 0.5]]
:.curve-to [MIDDLE - d + hf] 0 [RIGHTSB - HALFSTROKE * ITALICCOR - O] XH :.curve-to [MIDDLE - d + hf] [mix bottom top 0.3] [RIGHTSB - HALFSTROKE * ITALICCOR - O] top
:.set-width HALFSTROKE HALFSTROKE :.set-width HALFSTROKE HALFSTROKE
:.heads-to UPWARD :.heads-to UPWARD
} }
create-glyph 'latingamma' : glyph-construction {
assign-unicode 0x263
include pMarks
include : RamsHornShape DESCENDER XH
}
create-glyph 'ramshorn' : glyph-construction {
assign-unicode 0x264
include eMarks
include : RamsHornShape 0 XH
}
# legged # legged
create-glyph 'rlongleg' : glyph-construction { create-glyph 'rlongleg' : glyph-construction {
assign-unicode 0x27C assign-unicode 0x27C
@ -771,6 +778,21 @@ create-glyph 'ccurlytail' : glyph-construction {
local y2 : -XH * 0.1 local y2 : -XH * 0.1
include : CurlyTail STROKE STROKE rinner m1 SMALLSMOOTHB 0 RIGHTSB x1 x2 y2 include : CurlyTail STROKE STROKE rinner m1 SMALLSMOOTHB 0 RIGHTSB x1 x2 y2
} }
create-glyph 'ezhcurlytail' : glyph-construction {
assign-unicode 0x293
include eMarks
local rinner : [[XH * 0.425] - STROKE * 1.5] / 2
include : EzhShape XH DESCENDER
this.contours.pop
this.contours.pop
local m1 : RIGHTSB - STROKE * ITALICCOR
local x1 : mix RIGHTSB SB 0.25
local x2 : RIGHTSB - HALFSTROKE
local y2 DESCENDER
include : CurlyTail STROKE STROKE rinner m1 [mix [mix DESCENDER XH 0.6] DESCENDER 0.5] DESCENDER SB x1 x2 y2
}
create-glyph 'zcurlytail' : glyph-construction { create-glyph 'zcurlytail' : glyph-construction {
assign-unicode 0x291 assign-unicode 0x291
include eMarks include eMarks
@ -921,16 +943,14 @@ create-glyph 'rflap' : glyph-construction {
} }
create-glyph 'ifishhook' : glyph-construction { create-glyph 'ifishhook' : glyph-construction {
assign-unicode 0x27F assign-unicode 0x27F
include eMarks include pMarks
include : VBar MIDDLE 0 [XH - HOOK] include : VBar MIDDLE DESCENDER [XH - HOOK]
include : VerticalHook MIDDLE [XH - HOOK] [-LONGJUT + ILBALANCE] [-HOOK + HALFSTROKE] include : VerticalHook MIDDLE [XH - HOOK] [-LONGJUT + ILBALANCE] [-HOOK + HALFSTROKE]
apply-transform : Translate ILBALANCE 0 apply-transform : Translate ILBALANCE 0
include : rightwardBottomSerif MIDDLE 0 LONGJUT
include : leftwardBottomSerif MIDDLE 0 LONGJUT
} }
create-glyph 'iviby' : glyph-construction { create-glyph 'iviby' : glyph-construction {
assign-unicode 0x285 assign-unicode 0x285
include eMarks include pMarks
include : VBar MIDDLE 0 [XH - HOOK - HALFSTROKE] include : VBar MIDDLE 0 [XH - HOOK - HALFSTROKE]
include : VerticalHook MIDDLE [XH - HOOK - HALFSTROKE] [-LONGJUT] [-HOOK] include : VerticalHook MIDDLE [XH - HOOK - HALFSTROKE] [-LONGJUT] [-HOOK]
include : VerticalHook MIDDLE 0 LONGJUT HOOK include : VerticalHook MIDDLE 0 LONGJUT HOOK
@ -956,6 +976,12 @@ create-glyph 'smcpI' : glyph-construction {
include eMarks include eMarks
include : ISerifShape XH include : ISerifShape XH
} }
create-glyph 'smcpturnE' : glyph-construction {
assign-unicode 0x2C7B
include eMarks
include : EShape XH
include : FlipAround MIDDLE [XH / 2]
}
# Others # Others
create-glyph 'turnf' : glyph-construction { create-glyph 'turnf' : glyph-construction {
assign-unicode 0x25F assign-unicode 0x25F
@ -968,7 +994,7 @@ create-glyph 'lyogh' : glyph-construction {
assign-unicode 0x26E assign-unicode 0x26E
include ifMarks include ifMarks
include : EzhShape XH DESCENDER 0.4 include : EzhShape XH DESCENDER 0.4
include : VBarLeft SB STROKE CAP include : VBarLeft SB [XH * 0.1] CAP
} }
# Aliases # Aliases
alias 'latinLambda' 0x245 'Lambda' alias 'latinLambda' 0x245 'Lambda'