Add new constant QuarterStroke
. (#2639)
Co-authored-by: Belleve <belleve@typeof.net>
This commit is contained in:
parent
9033363efb
commit
065f242eac
60 changed files with 398 additions and 385 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue