mikeslab/Iosevka
1
0
Fork 0
Code Issues Pull requests Projects Releases 1 Packages Wiki Activity Actions 1

Add variant selection for Guillemets (#1899).

Browse source
This commit is contained in:
be5invis 2023-08-19 01:33:37 -07:00
parent fdcde32d71
commit 02e8fe60ca
4 changed files with 77 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

54
font-src/glyphs/symbol/punctuation/guillemet.ptl
View file

@ -9,32 +9,54 @@ glyph-block Symbol-Punctuation-Guillemet : begin
glyph-block-import CommonShapes
glyph-block-import Common-Derivatives
create-glyph 'singleGuillemetLeft' 0x2039 : glyph-proc
create-glyph 'singleGuillemetLeft.straight' : glyph-proc
local top : mix SymbolMid ParenTop 0.5
local bot : mix SymbolMid ParenBot 0.5
local mid : mix bot top 0.5
local extension 0.55
local cor 1
local sw : AdviceStroke 3.5
local sw : AdviceStroke 3
local fine : AdviceStroke 4
include : dispiro
widths.center sw
g4 [mix Middle RightSB extension] top
quadControls 0.4 0.75
g4 [mix Middle SB extension] [mix top bot 0.5] [widths.center.heading (cor * sw) Leftward]
include : intersection [MaskAbove mid] : dispiro
flat [mix Middle SB extension] mid [widths.rhs sw]
curl [mix Middle RightSB extension] top [widths.center fine]
include : dispiro
widths.center (sw * cor)
g4 [mix Middle SB extension] [mix top bot 0.5] [heading Rightward]
quadControls (1 - 0.4) (1 - 0.75)
g4 [mix Middle RightSB extension] bot [widths.center sw]
include : intersection [MaskBelow mid] : dispiro
flat [mix Middle SB extension] mid [widths.lhs sw]
curl [mix Middle RightSB extension] bot [widths.center fine]
include : Translate (-(RightSB - SB) * 0.05) 0
create-glyph 'guillemetLeft' 0xAB : glyph-proc
include : refer-glyph "singleGuillemetLeft"
create-glyph 'singleGuillemetLeft.curly' : glyph-proc
local top : mix SymbolMid ParenTop 0.5
local bot : mix SymbolMid ParenBot 0.5
local mid : mix bot top 0.5
local extension 0.55
local sw : AdviceStroke 3
local fine : AdviceStroke 4
include : intersection [MaskAbove mid] : dispiro
g4 [mix Middle SB extension] (mid + sw * 0.25) [widths.rhs sw]
quadControls 0.6 0.3
g4 [mix Middle RightSB extension] top [widths.center fine]
include : intersection [MaskBelow mid] : dispiro
g4 [mix Middle SB extension] (mid - sw * 0.25) [widths.lhs sw]
quadControls 0.6 0.3
g4 [mix Middle RightSB extension] bot [widths.center fine]
include : VBar.l [mix Middle SB extension] (mid - sw * 0.25) (mid + sw * 0.25) sw
include : Translate (-(RightSB - SB) * 0.05) 0
select-variant 'singleGuillemetLeft' 0x2039 (follow -- 'guillemet')
derive-glyphs 'guillemetLeft' 0xAB 'singleGuillemetLeft' : function [src sel] : glyph-proc
include : refer-glyph src
include : Translate ((RightSB - SB) * 0.5) 0
include : refer-glyph "singleGuillemetLeft"
include : refer-glyph src
include : Translate (-(RightSB - SB) * 0.25) 0
turned 'singleGuillemetRight' 0x203A "singleGuillemetLeft" Middle SymbolMid