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