add l.tailed

This commit is contained in:
be5invis 2016-09-19 00:25:05 +08:00
parent f529cbe0cc
commit 186edd2d72
4 changed files with 35 additions and 11 deletions

View File

@ -43,7 +43,7 @@ export : define [apply] : begin
define [IotaShape top] : glyph-construction define [IotaShape top] : glyph-construction
local middle MIDDLE local middle MIDDLE
set-anchor 'above' BASE middle top set-anchor 'above' BASE middle top
include : LeftwardTopSerif middle top LONGJUT include : tagged 'serifLT' : LeftwardTopSerif middle top LONGJUT
include : dispiro include : dispiro
widths.center widths.center
flat middle top [heading DOWNWARD] flat middle top [heading DOWNWARD]
@ -71,8 +71,8 @@ export : define [apply] : begin
sketch # dotlessi.hooky sketch # dotlessi.hooky
include markset.e include markset.e
include : VBar (MIDDLE + IBALANCE) 0 XH include : VBar (MIDDLE + IBALANCE2) 0 XH
include : LeftwardTopSerif (MIDDLE + IBALANCE) XH LONGJUT include : LeftwardTopSerif (MIDDLE + IBALANCE2) XH LONGJUT
save 'dotlessi.hooky' save 'dotlessi.hooky'
sketch # dotlessi.zshaped sketch # dotlessi.zshaped
@ -309,16 +309,16 @@ export : define [apply] : begin
sketch # l.hooky sketch # l.hooky
include markset.b include markset.b
include : VBar (MIDDLE + LBALANCE) 0 (CAP - STROKE) include : VBar (MIDDLE + LBALANCE2) 0 (CAP - STROKE)
include : LeftwardTopSerif (MIDDLE + LBALANCE) CAP LONGJUT include : LeftwardTopSerif (MIDDLE + LBALANCE2) CAP LONGJUT
save 'l.hooky' save 'l.hooky'
sketch # l.zshaped sketch # l.zshaped
include markset.b include markset.b
include : VBar MIDDLE 0 (CAP - STROKE) include : VBar MIDDLE 0 (CAP - STROKE)
include : LeftwardTopSerif MIDDLE CAP LONGJUT include : tagged 'serifLT' : LeftwardTopSerif MIDDLE CAP LONGJUT
include : RightwardBottomSerif MIDDLE 0 LONGJUT include : tagged 'serifRB' : RightwardBottomSerif MIDDLE 0 LONGJUT
save 'l.zshaped' save 'l.zshaped'
@ -344,7 +344,7 @@ export : define [apply] : begin
curl left (SMALLSMOOTHB * 0.85) curl left (SMALLSMOOTHB * 0.85)
hookend O hookend O
g4 right HOOK g4 right HOOK
include : dispiro include : tagged 'serifLT': dispiro
flat SB CAP [widths 0 STROKE] flat SB CAP [widths 0 STROKE]
curl left CAP curl left CAP
set-anchor 'above' BASE (left + HALFSTROKE) CAP set-anchor 'above' BASE (left + HALFSTROKE) CAP
@ -353,11 +353,31 @@ export : define [apply] : begin
: else : include : IotaShape CAP : else : include : IotaShape CAP
save 'l.italic' save 'l.italic'
sketch # l.tailed
include markset.b
local middle : MIDDLE - HALFSTROKE / 2
local top CAP
local x0 : (HOOK - HALFSTROKE + 1) * 0.9 + HALFSTROKE / 2
local x1 : [Math.max (HOOK - HALFSTROKE + 1) LONGJUT] + HALFSTROKE / 2
include : dispiro
widths.center
flat (middle) top [heading DOWNWARD]
curl (middle) HOOK
arcvh
g4.right.mid (middle + x0) (HALFSTROKE + O) [heading RIGHTWARD]
g4 (middle + x1) (HALFSTROKE - O) [heading RIGHTWARD]
set-anchor 'above' BASE middle CAP
set-anchor 'below' BASE middle 0
set-anchor 'overlay' BASE middle (CAP * OVERLAYPOS)
save 'l.tailed'
select-variant 'l' 'l' [if para.isItalic 'italic' 'serifed'] { select-variant 'l' 'l' [if para.isItalic 'italic' 'serifed'] {
.'cv07' 'l.serifed' .'cv07' 'l.serifed'
.'cv08' 'l.italic' .'cv08' 'l.italic'
.'cv09' 'l.hooky' .'cv09' 'l.hooky'
.'cv10' 'l.zshaped' .'cv10' 'l.zshaped'
.'cv27' 'l.tailed'
} }
alias 'palochka' 0x4CF 'l' alias 'palochka' 0x4CF 'l'
turned 'turnl' 0xA781 'l' MIDDLE (XH / 2) markset.p turned 'turnl' 0xA781 'l' MIDDLE (XH / 2) markset.p

View File

@ -79,6 +79,8 @@ export : define [calculateMetrics para] : begin
define TAILADJY : XH * 0.25 define TAILADJY : XH * 0.25
define LBALANCE : LONGJUT * 0.04 define LBALANCE : LONGJUT * 0.04
define IBALANCE : fallback para.ibalance (LONGJUT * 0.04) define IBALANCE : fallback para.ibalance (LONGJUT * 0.04)
define LBALANCE2 : LONGJUT * 0.14
define IBALANCE2 : fallback para.ibalance (LONGJUT * 0.14)
define JBALANCE : fallback para.jbalance 0 define JBALANCE : fallback para.jbalance 0
define JBALANCE2 : fallback para.jbalance2 (STROKE * 0.25 + LBALANCE) define JBALANCE2 : fallback para.jbalance2 (STROKE * 0.25 + LBALANCE)
define TBALANCE : fallback para.tbalance JBALANCE define TBALANCE : fallback para.tbalance JBALANCE
@ -142,7 +144,7 @@ export : define [calculateMetrics para] : begin
TANSLANT SINSLANT COSSLANT HVCONTRAST UPWARD DOWNWARD RIGHTWARD LEFTWARD TANSLANT SINSLANT COSSLANT HVCONTRAST UPWARD DOWNWARD RIGHTWARD LEFTWARD
O OX OXHOOK HOOK AHOOK SHOOK RHOOK JHOOK FHOOK HOOKX SMOOTH SMALLSMOOTH STROKE DOTSIZE PERIODSIZE O OX OXHOOK HOOK AHOOK SHOOK RHOOK JHOOK FHOOK HOOKX SMOOTH SMALLSMOOTH STROKE DOTSIZE PERIODSIZE
BARPOS GBARPOS PBARPOS EBARPOS OVERLAYPOS FIVEBARPOS LONGJUT JUT VJUT ACCENT ACCENTX CTHIN CTHINB SLAB BARPOS GBARPOS PBARPOS EBARPOS OVERLAYPOS FIVEBARPOS LONGJUT JUT VJUT ACCENT ACCENTX CTHIN CTHINB SLAB
TAILADJX TAILADJY LBALANCE IBALANCE JBALANCE JBALANCE2 TBALANCE TBALANCE2 RBALANCE RBALANCE2 TAILADJX TAILADJY LBALANCE IBALANCE LBALANCE2 IBALANCE2 JBALANCE JBALANCE2 TBALANCE TBALANCE2 RBALANCE RBALANCE2
FBALANCE ONEBALANCE FULLWIDTH FULLWIDTH1 FULLWIDTH2 FULLWIDTH3 OXE ESS ESSQUESTION XO CAPO HALFSTROKE RIGHTSB FWRSB FBALANCE ONEBALANCE FULLWIDTH FULLWIDTH1 FULLWIDTH2 FULLWIDTH3 OXE ESS ESSQUESTION XO CAPO HALFSTROKE RIGHTSB FWRSB
MIDDLE FWMIDDLE CAPMIDDLE CAP_SMOOTH DOTRADIUS PERIODRADIUS SIDEJUT SMOOTHA SMOOTHB SMALLSMOOTHA SMALLSMOOTHB CORRECTION_OMIDX CORRECTION_OMIDS MIDDLE FWMIDDLE CAPMIDDLE CAP_SMOOTH DOTRADIUS PERIODRADIUS SIDEJUT SMOOTHA SMOOTHB SMALLSMOOTHA SMALLSMOOTHB CORRECTION_OMIDX CORRECTION_OMIDS
WHITENESS adviceBlackness MVERTSTROKE OVERLAYSTROKE OPERATORSTROKE SHOULDERFINE SUPERNESS superxy WHITENESS adviceBlackness MVERTSTROKE OVERLAYSTROKE OPERATORSTROKE SHOULDERFINE SUPERNESS superxy

View File

@ -155,7 +155,7 @@ define-macro glyph-module-entry : syntax-rules
TANSLANT SINSLANT COSSLANT HVCONTRAST UPWARD DOWNWARD RIGHTWARD LEFTWARD TANSLANT SINSLANT COSSLANT HVCONTRAST UPWARD DOWNWARD RIGHTWARD LEFTWARD
O OX OXHOOK HOOK AHOOK SHOOK RHOOK JHOOK FHOOK HOOKX SMOOTH SMALLSMOOTH STROKE DOTSIZE PERIODSIZE O OX OXHOOK HOOK AHOOK SHOOK RHOOK JHOOK FHOOK HOOKX SMOOTH SMALLSMOOTH STROKE DOTSIZE PERIODSIZE
BARPOS GBARPOS PBARPOS EBARPOS OVERLAYPOS FIVEBARPOS LONGJUT JUT VJUT ACCENT ACCENTX CTHIN CTHINB SLAB BARPOS GBARPOS PBARPOS EBARPOS OVERLAYPOS FIVEBARPOS LONGJUT JUT VJUT ACCENT ACCENTX CTHIN CTHINB SLAB
TAILADJX TAILADJY LBALANCE IBALANCE JBALANCE JBALANCE2 TBALANCE TBALANCE2 RBALANCE RBALANCE2 TAILADJX TAILADJY LBALANCE IBALANCE LBALANCE2 IBALANCE2 JBALANCE JBALANCE2 TBALANCE TBALANCE2 RBALANCE RBALANCE2
FBALANCE ONEBALANCE FULLWIDTH FULLWIDTH1 FULLWIDTH2 FULLWIDTH3 OXE ESS ESSQUESTION XO CAPO HALFSTROKE RIGHTSB FWRSB FBALANCE ONEBALANCE FULLWIDTH FULLWIDTH1 FULLWIDTH2 FULLWIDTH3 OXE ESS ESSQUESTION XO CAPO HALFSTROKE RIGHTSB FWRSB
MIDDLE FWMIDDLE CAPMIDDLE CAP_SMOOTH DOTRADIUS PERIODRADIUS SIDEJUT SMOOTHA SMOOTHB SMALLSMOOTHA SMALLSMOOTHB CORRECTION_OMIDX CORRECTION_OMIDS MIDDLE FWMIDDLE CAPMIDDLE CAP_SMOOTH DOTRADIUS PERIODRADIUS SIDEJUT SMOOTHA SMOOTHB SMALLSMOOTHA SMALLSMOOTHB CORRECTION_OMIDX CORRECTION_OMIDS
WHITENESS adviceBlackness MVERTSTROKE OVERLAYSTROKE OPERATORSTROKE SHOULDERFINE SUPERNESS superxy WHITENESS adviceBlackness MVERTSTROKE OVERLAYSTROKE OPERATORSTROKE SHOULDERFINE SUPERNESS superxy

View File

@ -560,6 +560,8 @@ dotlessi = 'serifed'
l = 'italic' l = 'italic'
[v-i-italic.variantSelector] [v-i-italic.variantSelector]
dotlessi = 'italic' dotlessi = 'italic'
[v-l-tailed.variantSelector]
l = 'tailed'
[v-a-singlestorey.variantSelector] [v-a-singlestorey.variantSelector]
a = 'singlestorey' a = 'singlestorey'
[v-a-doublestorey.variantSelector] [v-a-doublestorey.variantSelector]