\newcommand {\ExampleTitle} [4][e]{%
  \pagestyle{empty}
  \begingroup
  \fontfamily{cmr}\selectfont
  \Facies \tituli {##1}
  \SpatiumSuper \titulum {4ex}
  \SpatiumInfra {8ex}
  \RelSize{4}
  \setbox\z@=\hbox{\MakeUppercase{#2}}
  \ifdim \wd\z@ > \hsize
    \RelSize{-5}
  \else
    \RelSize{-4}
  \fi
  \titulus {\RelSize{4}\MakeUppercase{#2}}
  \titulus {\RelSize{4}#3}
  \vfill
  \titulus {\RelSize{2}\scshape
    \ifx #1e\relax
	  \ifx \@undefined \languagename
	  \else
		\gdef \languagename {english}
	  \fi
      technica editions\\[.5ex]ventimiglia $\cdot$ milano%
    \else \ifx #1f\relax
      \'editions technica\\[.5ex]ventimille $\cdot$ milan%
    \else \ifx #1i\relax
      edizioni technica\\[.5ex]ventimiglia $\cdot$ milano%
    \else \ifx #1d\relax
      technica verlag\\[.5ex]ventimiglia $\cdot$ milano%
    \else \ifx #1s\relax
      ediciones technica\\[.5ex]ventimiglia $\cdot$ milano%
    \else \ifx #1l\relax
      albintimili $\cdot$ mediolani\\[.5ex]%
      {\RelSize{-1}e typographeo technico}%
    \fi \fi \fi \fi \fi \fi
  }
  \newpage
  \ifx #4\empty
	\vfill
  \else
    \ \par\vfill
    \RelSize{2}
    \Facies \tituli {\itshape##1}
    \SpatiumSuper {0ex}
    \SpatiumInfra {.5ex} 
	\def \TXN@temp {#4}%
	\ifx \empty	\TXN@temp
	\else
      \titulus {Typeset in the style of}
      \Facies \tituli {\upshape##1}
      \titulus{#4}
    \fi
  \fi
  \newpage
  \endgroup
}


