suzanne.soy/Iosevka
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added horn shapes. So yeah, we support Vietnamese now.

Browse Source
This commit is contained in:
be5invis 2015-08-14 02:59:17 +08:00
parent b4bff79335
commit 2b628d77c2
2 changed files with 27 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
buildglyphs.patel
View File

@ -145,21 +145,18 @@ define [buildFont para recursive] : begin {
.type anchor.type
)
define markAboveLower (.anchors (.above [tm (.x MIDDLE .y XH .type BASE)]))
define markAboveCap (.anchors (.above [tm (.x MIDDLE .y CAP .type BASE)]))
define markBelowLower (.anchors (.below [tm (.x MIDDLE .y DESCENDER .type BASE)]))
define markBelowZero (.anchors (.below [tm (.x MIDDLE .y 0 .type BASE)]))
define markTrailingLower (.anchors (.trailing [tm (.x MIDDLE .y DESCENDER .type BASE)]))
define markTrailingZero (.anchors (.trailing [tm (.x MIDDLE .y 0 .type BASE)]))
define markLFLower (.anchors (.lf [tm (.x MIDDLE .y DESCENDER .type BASE)]))
define markLFZero (.anchors (.lf [tm (.x MIDDLE .y 0 .type BASE)]))
define markAboveLower (.anchors (.above [tm (.x MIDDLE .y XH .type BASE)]))
define markAboveCap (.anchors (.above [tm (.x MIDDLE .y CAP .type BASE)]))
define markBelowLower (.anchors (.below [tm (.x MIDDLE .y DESCENDER .type BASE)]))
define markBelowZero (.anchors (.below [tm (.x MIDDLE .y 0 .type BASE)]))
define markHornRTLower (.anchors (.hornRT [tm (.x RIGHTSB .y XH .type BASE)]))
define markHornRTCap (.anchors (.hornRT [tm (.x RIGHTSB .y CAP .type BASE)]))
define capitalMarks (.anchors (.above markAboveCap.anchors.above .below markBelowZero.anchors.below))
define bMarks (.anchors (.above markAboveCap.anchors.above .below markBelowZero.anchors.below))
define eMarks (.anchors (.above markAboveLower.anchors.above .below markBelowZero.anchors.below))
define pMarks (.anchors (.above markAboveLower.anchors.above .below markBelowLower.anchors.below))
define ifMarks (.anchors (.above markAboveCap.anchors.above .below markBelowLower.anchors.below))
define capitalMarks (.anchors (.above markAboveCap.anchors.above .hornRT markHornRTCap.anchors.hornRT .below markBelowZero.anchors.below))
define bMarks (.anchors (.above markAboveCap.anchors.above .hornRT markHornRTCap.anchors.hornRT .below markBelowZero.anchors.below))
define eMarks (.anchors (.above markAboveLower.anchors.above .hornRT markHornRTLower.anchors.hornRT .below markBelowZero.anchors.below))
define pMarks (.anchors (.above markAboveLower.anchors.above .hornRT markHornRTLower.anchors.hornRT .below markBelowLower.anchors.below))
define ifMarks (.anchors (.above markAboveCap.anchors.above .hornRT markHornRTCap.anchors.hornRT .below markBelowLower.anchors.below))
Stroke.bindParameters para

16
glyphs/overmarks.patel
View File

@ -296,6 +296,22 @@ create-glyph 'revCommaAbove' : glyph-construction {
apply-transform : Translate 0 [DOTRADIUS * 0.25]
apply-transform : Italify
}
create-glyph 'horn' : glyph-construction {
set-width 0
assign-unicode 0x31B
local radius : markHalfStroke * 1.5
include : list {
Ring [XH + ACCENT + radius] [XH + ACCENT - radius] [markMiddle - radius] [markMiddle + radius]
}
include : create-stroke
:.start-from [markMiddle + radius] [XH + ACCENT]
:.set-width 0 [markFine * 1.75]
:.curve-to [markMiddle + radius] [mix [XH + ACCENT] [aboveMarkBot - radius] 0.75] [markMiddle - radius - markHalfStroke] [aboveMarkBot - radius]
apply-transform : Upright
apply-transform : Translate [-markMiddle + radius * 0.35] 0
apply-transform : Italify
set-anchor 'hornRT' MARK 0 [aboveMarkBot + markFine * 0.75] 0 aboveMarkTop
}
create-glyph 'barAbove' : glyph-construction {
set-width 0
assign-unicode 0x30D