\usetypescript[berry][ec]
\definetypeface[bookman][rm][serif][bookman][default][encoding=ec]
\definetypeface[charter][rm][serif][charter][default][encoding=ec]
\definetypeface[palatino][rm][serif][palatino][default][encoding=ec]
\definetypeface[utopia][rm][serif][utopia][default][encoding=ec]
\setupbodyfont[12pt]

\pdfmapfile{+texnansi-georgia.map}

\startbuffer[Example]
\blank
0123456789
\input tufte
\input knuth
\blank
\stopbuffer

\starttext
Computer Modern
\getbuffer[Example]

\switchtobodyfont[bookman]
Bookman
\getbuffer[Example]

\switchtobodyfont[charter]
Charter
\getbuffer[Example]

\switchtobodyfont[palatino]
Palatino
\getbuffer[Example]

\switchtobodyfont[utopia]
Utopia
\getbuffer[Example]

% Sorry, haven't had time to make a typescript yet. 
\font\Myfont=texnansi-georgia at 12pt
\Myfont 
Georgia
\getbuffer[Example]
\stoptext