On 2013–01–20 Devendra Ghate wrote:
> I am using a layout with wide right margin. For floats that are
> \textwidth wide, I can place captions in the margin
> using**\setupcaption[location=rightmargin,high/low].
>
> However, for figures that are
> (*\textwidth+\marginwidth+\margindistance*) wide, I would like to
> *place the caption in the margin below the figure*.
For a recent project I had the similar requirements. I did not find
a proper solution. I attached an example of the code I used.
However, it has several issues:
1) Margin floats and texts overlay and need manual adjustment.
2) The baseline of the float description does not match the baseline
of the main text (fixed using manual trial and error). I used an
ugly hack (toffset=7.5ex) to align the description vertically.
3) The \startplacesmartfigure is not very robust. My notes say “Do
not indent \startplacesmartfigure”. I don't recall what the exact
issue was.
4) Probably many more that I haven't discovered, yet.
Feel free to suggest fixes for the mentioned issues.
Marco
\useMPlibrary [dum]
\unprotect
\setupfloat
[figure]
[default={top,bottom}]
\setupfloat
[table]
[default={bottom,top}]
\definefloat
[margintable]
[margintables]
[table]
\definefloat
[marginfigure]
[marginfigures]
[figure]
\setupcaptions
[width=\marginwidth,
prefix=no]
\setupcaption
[table]
[location={outermargin, high}]
\setupcaption
[figure]
[location={outermargin, high}]
\setupcaption
[marginfigure, margintable]
[align=flushleft,
location=bottom]
\setupcaption
[table, figure]
[way=bytext]
\setupfloat
[marginfigure, margintable]
[default=margin]
\definefloat
[widetable]
[widetables]
[table]
\setupfloat
[widetable]
[location=inner]
\definefloat
[widefigure]
[widefigures]
[figure]
\setupfloat
[widefigure]
[location=inner]
\defineframed
[caption_framed]
[frame=off,
offset=overlay,
location=high,
toffset=7.5ex]
\starttexdefinition caption_command #1
\caption_framed{#1}
\stoptexdefinition
\setupcaption
[widetable]
[location={outermargin, low},
command=\caption_command]
\setupcaption
[widefigure]
[location={outermargin, low},
command=\caption_command]
\newtoks\t_smart_figure_args
\starttexdefinition startplacesmartfigure [#1]
\t_smart_figure_args={#1}
\grabbufferdata
[smart_figure_buffer]
[startplacesmartfigure]
[stopplacesmartfigure]
\stoptexdefinition
\startluacode
userdata = userdata or { }
function userdata.do_place_smart_figure(width)
context.unprotect()
if tex.sp(width) <= tex.dimen.rightmarginwidth + tex.sp(".1pt") then
context.startplacemarginfigure{tex.toks.t_smart_figure_args}
tex.print(buffers.getcontent("smart_figure_buffer"))
context.stopplacemarginfigure()
else
if tex.sp(width) <= tex.dimen.textwidth + tex.sp(".1pt") then
context.startplacefigure{tex.toks.t_smart_figure_args}
tex.print(buffers.getcontent("smart_figure_buffer"))
context.stopplacefigure()
else
context.startplacewidefigure{tex.toks.t_smart_figure_args}
tex.print(buffers.getcontent("smart_figure_buffer"))
context.stopplacewidefigure()
end
end
context.protect()
end
\stopluacode
\starttexdefinition stopplacesmartfigure
\scratchdimen\hsize
\hsize\maxdimen
\setbox\scratchbox\vbox{\getbuffer[smart_figure_buffer]}
\hsize\scratchdimen
\luacode{userdata.do_place_smart_figure("\the\wd\scratchbox")}
\stoptexdefinition
\protect
\starttext
\startplacesmartfigure [title=Foo]
\externalfigure [dummy] [width=\rightmarginwidth, height=3cm]
\stopplacesmartfigure
\dorecurse{5}{%%
\input knuth\par}
\startplacesmartfigure [title=\input ward\par]
\externalfigure [dummy] [width=\textwidth, height=8cm]
\stopplacesmartfigure
\startplacesmartfigure [title=\input ward\par]
\externalfigure [dummy] [width=\dimexpr\textwidth+\rightmargintotal\relax, height=3cm]
\stopplacesmartfigure
\stoptext
signature.asc
Description: Digital signature
___
If your question is of interest to others as well, please add an entry to the
Wiki!
maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://tex.aanhet.net
archive : http://foundry.supelec.fr/projects/contextrev/
wiki : http://contextgarden.net
___
