Paratype typescript for mkiv

From Wiki
Revision as of 09:35, 9 September 2011 by MelmothX (talk | contribs)
Jump to navigation Jump to search




\definefontfeature
[ptfeatures]
[mode=node,liga=yes,kern=yes,tlig=yes,trep=yes,
  ccmp=yes,language=dflt,script=cyrl,
  protrusion=quality,
  expansion=quality]


\starttypescript [sans] [paratype]
  \definefontsynonym[PTSans-Regular]          [file:PTS55F]
  \definefontsynonym[PTSans-Bold]             [file:PTS75F]
  \definefontsynonym[PTSans-BoldItalic]       [file:PTS76F]
  \definefontsynonym[PTSans-Italic]           [file:PTS56F]
\stoptypescript

\starttypescript [serif] [paratype]
  \definefontsynonym[PTSerif-Regular]         [file:PTF55F] 
  \definefontsynonym[PTSerif-Bold]            [file:PTF75F] 
  \definefontsynonym[PTSerif-BoldItalic]      [file:PTF76F] 
  \definefontsynonym[PTSerif-Italic]          [file:PTF56F] 
\stoptypescript

\starttypescript [sans] [paratype] [name]
  \definefontsynonym [Sans]           [PTSans-Regular]     [features=ptfeatures]
  \definefontsynonym [SansItalic]     [PTSans-Italic]      [features=ptfeatures]
  \definefontsynonym [SansSlanted]    [PTSans-Italic]      [features=ptfeatures]
  \definefontsynonym [SansBold]       [PTSans-Bold]        [features=ptfeatures]
  \definefontsynonym [SansBoldItalic] [PTSans-BoldItalic]  [features=ptfeatures]
  \definefontsynonym [SansBoldSlanted][PTSans-BoldItalic]  [features=ptfeatures]
  \definefontsynonym [SansCaps]       [PTSans-Regular]     [features=ptfeatures]
\stoptypescript

\starttypescript [serif] [paratype] [name]
  \definefontsynonym [Serif]           [PTSerif-Regular]     [features=ptfeatures]
  \definefontsynonym [SerifItalic]     [PTSerif-Italic]      [features=ptfeatures]
  \definefontsynonym [SerifSlanted]    [PTSerif-Italic]      [features=ptfeatures]
  \definefontsynonym [SerifBold]       [PTSerif-Bold]        [features=ptfeatures]
  \definefontsynonym [SerifBoldItalic] [PTSerif-BoldItalic]  [features=ptfeatures]
  \definefontsynonym [SerifBoldSlanted][PTSerif-BoldItalic]  [features=ptfeatures]
  \definefontsynonym [SerifCaps]       [PTSerif-Regular]     [features=ptfeatures]
\stoptypescript

\starttypescript [paratype]
  \definetypeface [paratype] [rm] [serif] [paratype] [default]
  \definetypeface [paratype] [ss] [sans]  [paratype]  [default]
  \definetypeface [paratype] [tt] [mono]  [default]   [default]
  \definetypeface [paratype] [mm] [math]  [default]   [default]
\stoptypescript

\setupbodyfont[paratype,11pt]
\setupalign[hz,hanging]

\starttext

\mainlanguage[ru]

\startlines

табак
Возможно ль? вместо роз, Амуром
насажденных,
Тюльпанов, гордо наклоненных,
Душистых ландышей, ясминов и лилей,
Которых ты всегда любила
И прежде всякий день носила
На мраморной груди твоей--
Возможно ль, милая Климена?
Какая странная во вкусе перемена! . .
Ты любишь обонять не утренний цветок,
А вредную траву зелену,
Искусством превращену
В пушистый порошок!
Пускай уже седой профессор Геттингена,
На старой кафедре согнувшися дугой,
Вперив в латинщину глубокий разум свой,
Раскашлявшись, табак толченый
Пихает в длинный нос иссохшею рукой.
Пускай младой драгун усатый
Поутру, сидя у окна,
Стаканы сушит все до дна,
С остатком утреннего сна
Из трубки пенковой дым гонит сероватый.
Пускай красавица шестидесяти лет,
У граций в отпуску, и у любви в отставке
У коей держится вся прелесть на подставке,
У коей без морщин на теле места нет,
Чаек в прикуску попивает,
И с верным табаком печали забывает,
Злословит, молится, зевает.
А ты, прелестная! . . но если уж табак
Так нравится тебе--о пыл воображенья!
Ах! если, превращенный в прах,
И в табакерке, в заточеньи,
Я в персты нежные твои попасться мог,
Тогда б в сердечном восхищеньи
Рассыпался на грудь под шалевый платок
И даже, может быть. . о сладость
вожделенья
...До тайных прелестей, которых сам
Эрот
Запрятал за леса и горы,
Чтоб не могли нескромны взоры
Открыть вместилище божественных
красот.
Но что! мечта, мечта пустая.
Не будет этого никак.
Судьба завистливая злая!
Ах, отчего я не табак! . . 

\stoplines


\setupbodyfont[paratype,ss,11pt]

\startlines

табак
Возможно ль? вместо роз, Амуром
насажденных,
Тюльпанов, гордо наклоненных,
Душистых ландышей, ясминов и лилей,
Которых ты всегда любила
И прежде всякий день носила
На мраморной груди твоей--
Возможно ль, милая Климена?
Какая странная во вкусе перемена! . .
Ты любишь обонять не утренний цветок,
А вредную траву зелену,
Искусством превращену
В пушистый порошок!
Пускай уже седой профессор Геттингена,
На старой кафедре согнувшися дугой,
Вперив в латинщину глубокий разум свой,
Раскашлявшись, табак толченый
Пихает в длинный нос иссохшею рукой.
Пускай младой драгун усатый
Поутру, сидя у окна,
Стаканы сушит все до дна,
С остатком утреннего сна
Из трубки пенковой дым гонит сероватый.
Пускай красавица шестидесяти лет,
У граций в отпуску, и у любви в отставке
У коей держится вся прелесть на подставке,
У коей без морщин на теле места нет,
Чаек в прикуску попивает,
И с верным табаком печали забывает,
Злословит, молится, зевает.
А ты, прелестная! . . но если уж табак
Так нравится тебе--о пыл воображенья!
Ах! если, превращенный в прах,
И в табакерке, в заточеньи,
Я в персты нежные твои попасться мог,
Тогда б в сердечном восхищеньи
Рассыпался на грудь под шалевый платок
И даже, может быть. . о сладость
вожделенья
...До тайных прелестей, которых сам
Эрот
Запрятал за леса и горы,
Чтоб не могли нескромны взоры
Открыть вместилище божественных
красот.
Но что! мечта, мечта пустая.
Не будет этого никак.
Судьба завистливая злая!
Ах, отчего я не табак! . . 


\stoplines

\stoptext