Hello,
I notice a strange behavior of the macro numberstriped ( ).
Thanks.
Fabrice

\starttext
 \switchtobodyfont[9pt]
 \startMPcode
   
  path p, q, r, b ;
  p  := unitsquare xyscaled (4cm,4cm) ;
  z[0] = (2cm,0cm) ;
  z[1] = (2cm,4cm) ;
  z[2] = (0cm,2cm) ;
  q := llcorner p--z[0]--z[1]--z[2]--cycle ;
  r := unitsquare xyscaled (1cm,1cm) shifted(0,3cm) ;
  b := unitsquare xyscaled (3cm,3cm) shifted(1cm,0) ;
  draw p ;
  draw r withcolor red;
  draw r numberstriped (.25,20,5) withcolor magenta ;
  draw b numberstriped (.25,20,5) withcolor magenta ;
  label.llft("D", p) ;
  label.lrt("C", p) ;
  label.ulft("A", p) ;
  label.urt("B", p) ;
  label.urt("P", lrcorner r) ;
  label.lft("Q", llcorner r) ;
  label.top("M", urcorner r) ;
 
  \stopMPcode
\stoptext