In the example the text is drawn as: draw followtext(q, "\strut TEXT ONE") it looks as if the \strut generates a space before the text. e.g. if you omit the \strut, the text will align at the start point. In my perception, the \strut is a zero width box, so it should not generate the space before. But I might be wrong here (most likely ;-) .F On 05/10/2021 23:32, Thomas A. Schmitz via ntg-context wrote:
\startuseMPgraphic{empedocless} path p, q, r ; pair a ;
p := fullcircle scaled 10cm ; drawarrow p withpen pencircle scaled 1mm withcolor red ; draw point 0 of p withpen pencircle scaled 1mm withcolor blue ; q := p cutafter (point .4 along p) ; drawarrow q withpen pencircle scaled .5mm withcolor green ; draw followtext(q, "\strut TEXT ONE") ;
p := fullcircle scaled 8cm ; drawarrow p withpen pencircle scaled 1mm withcolor cyan ; draw point 0 of p withpen pencircle scaled 1mm withcolor magenta ; q := p cutafter (point .3 along p) ; q := q rotated 120 ; drawarrow q withpen pencircle scaled .5mm withcolor yellow ; draw followtext(q, "\strut TEXT TWO") ;
% the real deal: best make a macro for this
p := fullcircle scaled 6cm ; draw point 0 of p withpen pencircle scaled 5mm withcolor blue ; drawarrow p withpen pencircle scaled 1mm withcolor red ; a := (point eps of p) rotated 45 ; draw a withpen pencircle scaled 2mm; q := p cutafter a ; q := q rotated 20 ; drawarrow q withpen pencircle scaled .5mm withcolor green ; draw followtext(q, "\strut TEXT TWO") ;
\stopuseMPgraphic
\useMPgraphic{empedocless}