Refine glyph shape of Armenian Capital/Lower To.

This commit is contained in:
John McWilliams 2025-04-08 06:48:24 -04:00
parent 01f47d2249
commit a151f07a2a
2 changed files with 16 additions and 12 deletions

3
changes/33.2.1.md Normal file
View file

@ -0,0 +1,3 @@
* Refine shape of the following characters:
- ARMENIAN CAPITAL LETTER TO (`U+0539`).
- ARMENIAN SMALL LETTER TO (`U+0569`).

View file

@ -18,8 +18,9 @@ glyph-block Letter-Armenian-To : begin
do "T'o"
create-glyph 'armn/To' 0x539 : glyph-proc
local df : include : DivFrame para.advanceScaleT
local fine : df.adviceStroke2 6 3 CAP
local barPosT : barPos + df.mvs / 2
include : df.markSet.capital
local fine : df.adviceStroke2 3 3 XH
local barPosT : barPos + fine / 2
include : dispiro
widths.rhs df.mvs
flat df.leftSB 0 [heading Upward]
@ -27,30 +28,30 @@ glyph-block Letter-Armenian-To : begin
arch.rhs CAP (sw -- df.mvs)
flatside.rd df.rightSB 0 CAP df.archDepthA df.archDepthB 0
arch.rhs 0 (sw -- df.mvs) (swAfter -- fine)
g4 (df.middle - [HSwToV : 0.5 * fine]) [mix 0 barPosT 0.5] [widths.rhs fine]
g4 (df.middle - [HSwToV : 0.5 * fine]) [mix 0 barPosT (df.archDepthB / (df.archDepthA + df.archDepthB))] [widths.rhs fine]
arcvh
flat [mix df.leftSB df.rightSB 0.7] barPosT [widths.rhs df.mvs]
curl (df.rightSB + jut - [HSwToV : 0.5 * df.mvs]) barPosT
flat [mix (df.middle - [HSwToV : 0.5 * fine]) df.rightSB 0.5] barPosT
curl (df.rightSB + jut * [if SLAB 1.5 1] - [HSwToV : 0.5 * df.mvs]) barPosT [heading Rightward]
if SLAB : begin
local sf : SerifFrame.fromDf df CAP 0
include sf.lb.full
create-glyph 'armn/to' 0x569 : glyph-proc
local df : include : DivFrame para.advanceScaleT
local fine : df.adviceStroke2 6 3 XH
include : df.markSet.p
local fine : df.adviceStroke2 3 3 XH
local barPosT : barPos + fine / 2
include : VBar.l df.leftSB Descender XH df.mvs
local barPosT : barPos + df.mvs / 2
include : dispiro
flat (df.leftSB + [HSwToV : df.mvs - df.shoulderFine]) (XH - df.smallArchDepthA - TINY) [widths.rhs df.shoulderFine]
curl (df.leftSB + [HSwToV : df.mvs - df.shoulderFine]) (XH - df.smallArchDepthA)
widths.rhs df.shoulderFine
straight.up.start (df.leftSB + [HSwToV : df.mvs - df.shoulderFine]) [if (df.smallArchDepthA + df.smallArchDepthB < XH) (XH - df.smallArchDepthA) : mix XH 0 (df.smallArchDepthA / (df.smallArchDepthA + df.smallArchDepthB))] [heading Upward]
arch.rhs XH (sw -- df.mvs) (swBefore -- df.shoulderFine)
flatside.rd df.rightSB 0 XH df.smallArchDepthA df.smallArchDepthB 0 [widths.rhs df.mvs]
arch.rhs 0 (sw -- df.mvs) (swAfter -- fine)
g4 (df.middle - [HSwToV : 0.5 * fine]) [mix 0 barPosT 0.5] [widths.rhs fine]
g4 (df.middle - [HSwToV : 0.5 * fine]) [mix 0 barPosT (df.smallArchDepthB / (df.smallArchDepthA + df.smallArchDepthB))] [widths.rhs fine]
arcvh
flat [mix df.leftSB df.rightSB 0.7] barPosT [widths.rhs df.mvs]
curl (df.rightSB + jut - [HSwToV : 0.5 * df.mvs]) barPosT
flat [mix (df.middle - [HSwToV : 0.5 * fine]) df.rightSB 0.5] barPosT
curl (df.rightSB + jut * [if SLAB 1.5 1] - [HSwToV : 0.5 * df.mvs]) barPosT [heading Rightward]
if SLAB : begin
local sf : SerifFrame.fromDf df XH Descender
include : composite-proc sf.lt.outer sf.lb.fullSide