Add new constant QuarterStroke. (#2639)

Co-authored-by: Belleve <belleve@typeof.net>
This commit is contained in:
John McWilliams 2025-01-08 11:40:28 -05:00 committed by GitHub
parent 9033363efb
commit 065f242eac
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
60 changed files with 398 additions and 385 deletions

View file

@ -21,7 +21,7 @@ glyph-block Letter-Latin-Upper-B : begin
local barleft SB
local mockBowlDepth : BowlXDepth top (bowl - stroke) barleft RightSB stroke
local curvleft : RightSB - SB * 0.5 - mockBowlDepth + topArcInnerShift
local curvleftTop : Math.min curvleft (RightSB - SB * 0.5 - OX - stroke * 1.375 + topArcInnerShift)
local curvleftTop : Math.min curvleft : RightSB - SB * 0.5 - OX - stroke * 1.375 + topArcInnerShift
local xTopArcRight : [mix SB RightSB BArcMix] - OX * 2 + topArcShift
local fine : stroke * CThin
@ -78,7 +78,7 @@ glyph-block Letter-Latin-Upper-B : begin
define [InterruptShape bp top sw st sb] : begin
local bowl : top * bp + sw * (1 - bp)
local gap : Math.max ((RightSB - SB - [HSwToV : 2 * sw]) * 0.15) [AdviceStroke 10]
local gap : Math.max ((RightSB - SB - [HSwToV : 2 * sw]) * 0.15) : AdviceStroke 10
return : VBar.l (SB + [HSwToV sw]) (bowl - 1 * sw + O) (bowl + 0 * sw - O) gap
define [StdShape top sw st sb] : BShape top (stroke -- sw) (serifTop -- st) (serifBot -- sb)
@ -88,16 +88,16 @@ glyph-block Letter-Latin-Upper-B : begin
define [AsymmetricShape top sw st sb] : BShape top
stroke -- [fallback sw : AdviceStroke2 2 3 top]
barPos -- AsymmetricBBarPos
topArcShift -- -(RightSB - SB) * 0.05
topArcInnerShift -- -(RightSB - SB) * 0.1
topArcShift -- ((-0.05) * (RightSB - SB))
topArcInnerShift -- ((-0.1) * (RightSB - SB))
serifTop -- st
serifBot -- sb
define [AsymmetricShapeInterrupted top sw st sb] : difference [AsymmetricShape top sw st sb] [InterruptShape 0.6 top sw st sb]
define [AsymmetricMask top sw] : BShapeMask top
stroke -- [fallback sw : AdviceStroke2 2 3 top]
barPos -- AsymmetricBBarPos
topArcShift -- -(RightSB - SB) * 0.05
topArcInnerShift -- -(RightSB - SB) * 0.1
topArcShift -- ((-0.05) * (RightSB - SB))
topArcInnerShift -- ((-0.1) * (RightSB - SB))
define [BOverlayStroke top bp] : begin
local stroke : AdviceStroke2 2 3 top
@ -111,7 +111,7 @@ glyph-block Letter-Latin-Upper-B : begin
define [BahtBar sw] : VBar.m [mix SB RightSB 0.48] (CAP - Descender / 2) (Descender / 2) sw
define [BitcoinBar sw] : begin
local xMid : mix SB RightSB 0.48
local gap : Math.max [AdviceStroke 4] ((RightSB - SB) / 6)
local gap : Math.max ((RightSB - SB) / 6) : AdviceStroke 4
return : union
VBar.m (xMid - (gap + [HSwToV sw]) / 2) (CAP - Descender / 2) (Descender / 2) sw
VBar.m (xMid + (gap + [HSwToV sw]) / 2) (CAP - Descender / 2) (Descender / 2) sw