Idris Samawi Hamid wrote:
\TextDroppedCaps In general, Baroque letterforms appear more
\noindenting \TextD....
or replace this in supp-fun.tex
\def\DroppedCaps#1#2#3#4#5#6#7% does not yet handle accented chars
{\convertargument #7\to\asciia
\convertcommand \DroppedString\to\asciib
\ExpandBothAfter\doifinstringelse\asciia\asciib
{\noindenting
\dontleavehmode
%\ifhmode\hskip-\parindent\fi % sensitive for context mechanism
\keeplinestogether{#6}%
\setbox0\hbox{\definedfont[#2 at #3]#1{#7}\hskip#4}%
\ifdim\dp0>\strutdp % one of those Q's , will be option
\setbox2\hbox{\raise\dp0\hbox{\lower\strutdp\copy0}}%
\ht2\ht0
\dp0\strutdp
\setbox0\box2
\fi
\setbox0\hbox
{\ifnum\DropMode=\plusone
\hskip-\wd0\wd0\zeropoint
\fi
\lower#5\box0}%
\ht0\strutht
\dp0\strutdp
\ifnum\DropMode=\plusone
\globaldropcaps\let\DroppedIndent\!!zeropoint
\globaldropcaps\edef\DroppedLines{\number\maxdimen}%
\globaldropcaps\chardef\DroppedStatus\plusthree
\else
\globaldropcaps\edef\DroppedIndent{\the\wd0}%
\globaldropcaps\edef\DroppedLines {\number#6}%
\globaldropcaps\chardef\DroppedStatus\plustwo
\globaldropcaps\hangindent\DroppedIndent
\globaldropcaps\hangafter-\DroppedLines
\noindent
\hskip-\DroppedIndent
\fi
\vbox{\forgetall\box0}%
\nobreak
\let\next\ignorespaces} % Could be a one character word !
{\globaldropcaps\let\DroppedIndent\!!zeropoint
\globaldropcaps\edef\DroppedLines{\number\maxdimen}%
\globaldropcaps\chardef\DroppedStatus\plusthree
\def\next{#7}}%
\let\globaldropcaps\global
\next}
btw, another way is:
\setupinitial
[n=3,
distance=.125em,
font=SansBold]
% or: \definefontsynonym[Initial][SansBold]
\setupinitial[state=start] \placeinitial \input tufte
(and there is taco's lettrines module)
Hans
_______________________________________________
ntg-context mailing list
ntg-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/ntg-context
