% engine=luatex
\definefontfeature[latin-smallcaps][smallcaps][script=latn]

\starttypescript [serif] [warnockpro]
  \setups[font:fallback:sans]      
  \definefontsynonym [WarnockPro-Regular]    [name:Envy Code R]  [features=default]
  \definefontsynonym [WarnockPro-Bold]       [name:Envy Code R Bold]    [features=default]
  \definefontsynonym [WarnockPro-Italic]     [name:Envy Code R Italic]   [features=default]    
\stoptypescript

\starttypescript [serif] [warnockpro]
  \definefontsynonym [Serif]           [WarnockPro-Regular]        [features=default]
  \definefontsynonym [SerifBold]       [WarnockPro-Bold]           [features=default]
  \definefontsynonym [SerifItalic]     [WarnockPro-Italic]         [features=default]
\stoptypescript

\definetypeface[adobe][rm][serif][warnockpro][default]
\setupbodyfont[adobe,11pt]

\starttext
\dorecurse{10}{\input zapf}
\stoptext