Adaption of 'Beauty of LaTeX' by Dario Taraborelli (2008)

xelatex-test.tex

%!TEX TS-program = xelatex
%!TEX encoding = UTF-8 Unicode

% Dario Taraborelli (2008)
% The Beauty of LaTeX
% URL: http://nitens.org/taraborelli/latex
% Some rights reserved: CC-BY-SA

\documentclass[11pt,a4paper]{article}
\usepackage[dvipdfm, colorlinks, breaklinks, pdftitle={The Beauty of LaTeX},pdfauthor={Taraborelli, Dario}]{hyperref}
\usepackage[usenames]{color}
\definecolor{Gray}{rgb}{.5,.5,.5}
\usepackage{xunicode}
\usepackage{xltxtra}
\defaultfontfeatures{Mapping=tex-text}

\newcommand{\red}[1]{\color{red} #1}
\newcommand{\old}[1]{\fontspec[Alternate=1,Ligatures={Common, Rare}, Swashes={LineInitial, LineFinal}]{Hoefler Text}\fontsize{24pt}{30pt}\selectfont #1}%

\newcommand{\smallprint}[1]{\fontspec{Adobe Garamond Pro}\fontsize{10pt}{13pt}\color{Gray}\selectfont #1}%

\begin{document}
\thispagestyle{empty}
\vspace*{1in}
\old\begin{quote}
``\emph{N}{\textsc eque} porro quisquam est qui do{\red lorem ipsum} quia {\red dolor sit amet, consectetur, adipisci velit}.''
\end{quote}
\vfill{}
\raggedleft\smallprint{from sections 1.10.32 of Cicero's \emph{De finibus bonorum et malorum}, \url{http://en.wikipedia.org/wiki/Lorem_ipsum}}
\end{document}