Problem to place a label in an environment \startMPcode \stopMPcode

Problem to place a label in an environment \startMPcode \stopMPcode

[Fabrice Couvreur]

[-- Attachment #1.1: Type: text/plain, Size: 734 bytes --]

Hello,
The code below works perfectly without the placement of the label, but if I
want to place the label, it no longer works.
Thank you

\definefloat
   [recipe]
   [figure]

\setupfloat
   [recipe]
   [default={right,none}]

\starttext

\switchtobodyfont [pagella, 9pt]

\placerecipe{}{

\startMPcode

pair vert[] ;
n:=6 ; radius=2cm ;
for i=0 upto n :
        vert[i] = radius * dir(360*i/n) ;
endfor ;

draw for i=0 upto n-1: vert[i] -- endfor cycle withcolor blue ;

draw for i=0 upto n-1: vert[i] .. endfor cycle withcolor red ;

draw (0,0)--vert[0] withcolor green ;

draw (0,0)--vert[5] withcolor green ;

draw (0,0) --(vert[0]+vert[5])/2 dashed evenly ;

% label.urt("C",vert[1])  ;


\stopMPcode
}

\input knuth

\stoptext

[-- Attachment #1.2: Type: text/html, Size: 1238 bytes --]

[-- Attachment #2: Type: text/plain, Size: 485 bytes --]

___________________________________________________________________________________
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
___________________________________________________________________________________

Re: Problem to place a label in an environment \startMPcode \stopMPcode

[Alan BRASLAU]

Works fine here.

Alan


P.S. I simplified your code slightly:


\definefloat
   [recipe]
   [figure]
   [default={right,none}]

\setupbodyfont [pagella,9pt]

\starttext

\startplacerecipe

  \startMPcode

  pair vert[] ;
  numeric n ; n := 5 ;
  numeric radius ; radius := 2cm ;

  for i=0 upto n : 
        vert[i] = radius * dir(360*i/(n+1)) ;
  endfor ;

  draw for i=0 upto n: vert[i] -- endfor cycle withcolor blue ; 

  draw for i=0 upto n: vert[i] .. endfor cycle withcolor red ; 

  draw origin--vert0 withcolor green ;

  draw origin--vert5 withcolor green ;

  draw origin--.5[vert0,vert5] dashed evenly ;

  label.urt("C",vert1) ;
  %alternately:
  %draw textext.urt("C") shifted vert1 ;

  \stopMPcode  

\stopplacerecipe

\input knuth

\stoptext




On Thu, 31 Dec 2015 17:46:35 +0100
Fabrice Couvreur <fabrice1.couvreur@gmail.com> wrote:

> Hello,
> The code below works perfectly without the placement of the label,
> but if I want to place the label, it no longer works.
> Thank you
> 
> \definefloat
>    [recipe]
>    [figure]
> 
> \setupfloat
>    [recipe]
>    [default={right,none}]
> 
> \starttext
> 
> \switchtobodyfont [pagella, 9pt]
> 
> \placerecipe{}{
> 
> \startMPcode
> 
> pair vert[] ;
> n:=6 ; radius=2cm ;
> for i=0 upto n :
>         vert[i] = radius * dir(360*i/n) ;
> endfor ;
> 
> draw for i=0 upto n-1: vert[i] -- endfor cycle withcolor blue ;
> 
> draw for i=0 upto n-1: vert[i] .. endfor cycle withcolor red ;
> 
> draw (0,0)--vert[0] withcolor green ;
> 
> draw (0,0)--vert[5] withcolor green ;
> 
> draw (0,0) --(vert[0]+vert[5])/2 dashed evenly ;
> 
> % label.urt("C",vert[1])  ;
> 
> 
> \stopMPcode
> }
> 
> \input knuth
> 
> \stoptext



-- 
Alan Braslau
CEA DSM-IRAMIS-SPEC
CNRS UMR 3680
Orme des Merisiers
91191 Gif-sur-Yvette cedex FRANCE
tel: +33 1 69 08 73 15
fax: +33 1 69 08 87 86
mailto:alan.braslau@cea.fr
___________________________________________________________________________________
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
___________________________________________________________________________________

Re: Problem to place a label in an environment \startMPcode \stopMPcode

[Wolfgang Schuster]

[-- Attachment #1.1: Type: text/plain, Size: 505 bytes --]

> Alan BRASLAU <mailto:alan.braslau@cea.fr>
> 31. Dezember 2015 um 20:09
> Works fine here.
>
> Alan
>
>
> P.S. I simplified your code slightly:
>
>
> \definefloat
> [recipe]
> [figure]
> [default={right,none}]
You can’t do this because the second argument is used the names of the 
\placelistof… and \completelistof… command.


The correct definition for the new float is:

     \definefloat[recipe][recipes][figure]
     \setupfloat[recipe][default={right,none}]

Wolfgang

[-- Attachment #1.2: Type: text/html, Size: 1529 bytes --]

[-- Attachment #2: Type: text/plain, Size: 485 bytes --]

___________________________________________________________________________________
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
___________________________________________________________________________________