\_famdecl [PP Writer] \PPWriter {PangramPangram Writer Font Family} {} {\rm \bf \it \bi} {Garamond-Math}% %{} {\rm \bf \it \bi \tx \bt} {Garamond-Math} {[PPWriter-Regular]} {\_def\_fontnamegen {[PPWriter-\_currV]:\_fontfeatures}} \_moddef\resetmod{\_fvars Regular Bold Italic BoldItalic } %\_wlog{\_detokenize{% %Modifiers:^^J % \lighter ... All \rm \mf \bf \it \mi \bi are lighter by 1/4 of weight step^^J % \bolder .... All \rm \mf \bf \it \mi \bi are bolder by 1/4 of weight step^^J %}} %\_sdef{fv:PPWriter:rm}{\_fsetV wght={\__vf_wght} } %\_sdef{fv:PPWriter:bf}{\_fsetV wght={\__vf_wght+400} } %\_sdef{fv:PPWriter:it}{\_fsetV wght={\__vf_wght} } %\_addto\_fmodrm {\_cs{fv:\_currfamily:rm}} %\_addto\_fmodbf {\_cs{fv:\_currfamily:bf}} %\_addto\_fmodit {\_cs{fv:\_currfamily:it}} %\_addto\_fmodbi {\_cs{fv:\_currfamily:bi}} %\_newcount\__vf_wght \__vf_wght=400 % default weight for \rm %\_newpublic \_let \wght=\__vf_wght % user can write: \wght=500 \rm ... %\_moddef \resetmod {\_fsetV caps={},cond={} \_fvars Regular Bold Italic BoldItalic Text BoldText} %\_moddef \caps {\_fsetV caps=+smcp;\_ffonum; } %\_moddef \nocaps {\_fsetV caps={} } %\_moddef \cond {\_fsetV cond=cn } %\_moddef \nocond {\_fsetV cond={} } \_initfontfamily % new font family must be initialized