\setuplayout[
rightmargin=2in,
rightmargindistance=0.375in,
width=4.125in,
]
\showframe
\definecolor [transparentred] [r=1,t=.5,a=1]
\definefloat[topfigure][topfigures][figure]
\setupfloat[topfigure][
default={top,none},
location=flushright,
maxwidth=6.5in,
]
\setupcaption[topfigure][
number=no,
]
\define\TopFigureCaption{%
\blank[-line,force,overlay]
\vsmash{%
\blank[line]
\framed[align=flushright,width=6.5in,frame=off,offset=overlay]{%
\startframedtext[
width=\rightmarginwidth,
frame=off,
offset=overlay,
style={\switchtobodyfont[8bp]},
align=flushleft,
]\floatuserdataparameter{subtitle}
\stopframedtext}}}
\starttext
\dorecurse{3}{\samplefile{knuth}}
\startplacetopfigure[title=This is the title][subtitle={\samplefile{ward}}]
\blackrule[width=6.5in,height=2in,color=transparentred]
\TopFigureCaption
\stopplacetopfigure
\dorecurse{3}{\samplefile{knuth}}
\startplacetopfigure[title=This is the title][subtitle={\samplefile{ward}}]
\blackrule[width=6.5in,height=2in,color=transparentred]
\TopFigureCaption
\stopplacetopfigure
\stoptext