Make Latin Lower Th with Strikethrough slightly wider under QP. (#2697)
This commit is contained in:
parent
42f1a21f77
commit
d1db7b0a17
3 changed files with 15 additions and 11 deletions
|
@ -1642,7 +1642,7 @@ glyph-block Autobuild-Pnonetic-Ligatures : begin
|
|||
list 0xFB05 { 'longs/compLigLeft' 't/compLigRight' } null
|
||||
list 0xFB06 { 's/compLigLeft' 't/compLigRight' } null
|
||||
|
||||
createPhoneticLigatures ToLetter 'phonetic3' [Math.max 1 : para.advanceScaleF * [mix 1 para.advanceScaleMM 2]] 3 stdShrink 1 : list
|
||||
createPhoneticLigatures ToLetter 'phonetic3' [Math.max para.advanceScaleMM : para.advanceScaleF * [mix 1 para.advanceScaleMM 2]] 3 stdShrink 1 : list
|
||||
list 0xFB03 { 'f/compLigLeft1' 'f/compLigLeft1' 'dotlessi/compLigRight' } null
|
||||
list 0xFB04 { 'f/compLigLeft3' 'f/compLigLeft2' 'l/compLigRight' } null
|
||||
|
||||
|
@ -1666,7 +1666,7 @@ glyph-block Autobuild-Pnonetic-Ligatures : begin
|
|||
createPhoneticLigatures ToSubscript 'tenSubscript' 1 2 1 0.5 : list
|
||||
list 0x23E8 { 'one.lnum' 'zero.lnum' } 'capital'
|
||||
|
||||
createPhoneticLigatures ToLetter 'thSlash' 1 2 stdShrink 1 : list
|
||||
createPhoneticLigatures ToLetter 'thSlash' para.advanceScaleMM 2 stdShrink 1 : list
|
||||
list 0x1D7A { 't/phoneticLeft1' 'h' 'wideSlash' } 'b'
|
||||
|
||||
glyph-block Autobuild-Double-Emotions : begin
|
||||
|
|
|
@ -183,14 +183,14 @@ glyph-block Mark-Overlay : begin
|
|||
set-width 0
|
||||
set-mark-anchor 'slash' markMiddle (XH / 2) markMiddle (XH / 2)
|
||||
include : dispiro
|
||||
flat (SB - O * 3 + 0.5 * fine - Width) (XH * (-0.1)) [widths.center fine]
|
||||
curl (RightSB + O * 3 - 0.5 * fine - Width) (XH * 1.1)
|
||||
flat (SB - O * 3 + 0.5 * fine - Width) (XH * (-0.1)) [widths.center fine]
|
||||
curl (RightSB + O * 3 - 0.5 * fine - Width) (XH * (+1.1))
|
||||
|
||||
create-glyph 'longSlash' 0x338 : glyph-proc
|
||||
set-width 0
|
||||
set-mark-anchor 'slash' markMiddle (XH / 2) markMiddle (XH / 2)
|
||||
include : dispiro
|
||||
flat (SB - O * 3 + 0.5 * fine - Width) (XH * 0.5 - CAP * 0.6) [widths.center fine]
|
||||
flat (SB - O * 3 + 0.5 * fine - Width) (XH * 0.5 - CAP * 0.6) [widths.center fine]
|
||||
curl (RightSB + O * 3 - 0.5 * fine - Width) (XH * 0.5 + CAP * 0.6)
|
||||
|
||||
create-glyph 'longVStrokeOver' 0x20D2 : glyph-proc
|
||||
|
@ -205,14 +205,14 @@ glyph-block Mark-Overlay : begin
|
|||
set-mark-anchor 'slash' markMiddle (XH * 0.5) markMiddle (XH * 0.5)
|
||||
include : dispiro
|
||||
flat markMiddle (XH * (-0.1)) [widths.center fine]
|
||||
curl markMiddle (XH * 1.1)
|
||||
curl markMiddle (XH * (+1.1))
|
||||
|
||||
create-glyph 'revLongSlash' 0x20E5 : glyph-proc
|
||||
set-width 0
|
||||
set-mark-anchor 'slash' markMiddle (XH * 0.5) markMiddle (XH * 0.5)
|
||||
include : dispiro
|
||||
flat (RightSB + O * 3 - 0.5 * fine - Width) (XH * 0.5 - CAP * 0.6) [widths.center fine]
|
||||
curl (SB - O * 3 + 0.5 * fine - Width) (XH * 0.5 + CAP * 0.6)
|
||||
curl (SB - O * 3 + 0.5 * fine - Width) (XH * 0.5 + CAP * 0.6)
|
||||
|
||||
create-glyph 'dblLongVStrokeOver' 0x20E6 : glyph-proc
|
||||
set-width 0
|
||||
|
@ -228,7 +228,7 @@ glyph-block Mark-Overlay : begin
|
|||
|
||||
create-glyph 'dblLongSlash' 0x20EB : glyph-proc
|
||||
set-width 0
|
||||
local l : SB - O * 3 + 0.5 * fineDbl - Width
|
||||
local l : SB - O * 3 + 0.5 * fineDbl - Width
|
||||
local r : RightSB + O * 3 - 0.5 * fineDbl - Width
|
||||
local dy : CAP * 0.6
|
||||
local gap : Math.max fineDbl (Width * 0.1)
|
||||
|
@ -241,11 +241,14 @@ glyph-block Mark-Overlay : begin
|
|||
curl (r + gap) (XH * 0.5 + dy)
|
||||
|
||||
create-glyph 'wideSlash' : glyph-proc
|
||||
local df : DivFrame para.advanceScaleMM 3
|
||||
set-width 0
|
||||
local l : markMiddle - (df.rightSB - df.leftSB) / 2 + O * 3 + 0.5 * fine
|
||||
local r : markMiddle + (df.rightSB - df.leftSB) / 2 - O * 3 - 0.5 * fine
|
||||
set-mark-anchor 'slash' markMiddle (XH / 2) markMiddle (XH / 2)
|
||||
include : dispiro
|
||||
flat (SB + O * 3 + 0.5 * fine - Width) (XH * (-0.1)) [widths.center fine]
|
||||
curl (RightSB - O * 3 - 0.5 * fine - Width) (XH * 1.1)
|
||||
flat l (XH * (-0.1)) [widths.center fine]
|
||||
curl r (XH * (+1.1))
|
||||
|
||||
do "Arrow overlays"
|
||||
local fine : AdviceStroke 6
|
||||
|
@ -335,7 +338,7 @@ glyph-block Mark-Overlay : begin
|
|||
set-width 0
|
||||
set-mark-anchor 'overlay' 0 0 0 0
|
||||
|
||||
include : VBar.m (markExtend) (-XH / 4) (XH / 4) MarkStroke
|
||||
include : VBar.m (+markExtend) (-XH / 4) (XH / 4) MarkStroke
|
||||
include : HBar.m (-markExtend) (markExtend) 0 MarkStroke
|
||||
|
||||
create-glyph 'rightTackOver' : glyph-proc
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue