Some Metapost Problems

["Wolfgang Werners-Lucchini" <wwl@musensturm.de>]

Hallo,

I have a lot of problems with the following example:
------------------------------------------------
\usetypescriptfile[type-exa]
\usetypescript[iwona][ec]
\setupbodyfont[iwona,11pt]

\startMPenvironment%[global]
\usetypescript[iwona][ec]
\setupbodyfont[iwona,8pt]
\stopMPenvironment

\startuseMPgraphic{Wochentage}
 save x,y ;

 z0 = (3cm,6cm) ;
 for i:=1 upto 6:
  z[i] = z[i-1] rotatedaround((3cm,3cm),720/7) ;
 endfor ;

 label.top(\sometxt{Samstag}, z0) ;
 label.lft(\sometxt{Donnerstag}, z1) ;
 label.lrt(\sometxt{Dienstag}, z2) ;
 label.urt(\sometxt{Sonntag}, z3) ;
 label.ulft(\sometxt{Freitag}, z4) ;
 label.llft(\sometxt{Mittwoch}, z5) ;
 label.rt(\sometxt{Montag}, z6) ;
\stopuseMPgraphic

\startuseMPgraphic{Tierkreis}
 save x,y ;

 z0 = (4cm,8cm) rotatedaround((4cm,4cm),15) ;
 for i:=1 upto 11:
  z[i] = z[i-1] rotatedaround((4cm,4cm),30) ;
 endfor ;

 label.ulft(\sometxt{Zwillinge}, z0) ;
 label.ulft(\sometxt{Stier}, z1) ;
 label.lft(\sometxt{Widder}, z2) ;
 label.lft(\sometxt{Fische}, z3) ;
 label.llft(\sometxt{Wassermann}, z4) ;
 label.llft(\sometxt{Steinbock}, z5) ;
 label.lrt(\sometxt{Schütze}, z6) ;
 label.lrt(\sometxt{Skorpion}, z7) ;
 label.rt(\sometxt{Waage}, z8) ;
 label.rt(\sometxt{Jungfrau}, z9) ;
 label.urt(\sometxt{Löwe}, z[10]) ;
 label.urt(\sometxt{Krebs}, z[11]) ;
\stopuseMPgraphic

\starttext

\useMPgraphic{Wochentage}

Bla

\useMPgraphic{Tierkreis}

\stoptext
------------------------------------------------

1. The labels of the first graphic are xscaled (randomly) when the 
second graphic is included. Comment the second, and the first is ok.
What I am doing wrong here?

This seems to be ok with luatex.

2. The settings in \startMPenvironment do not use the smaller font 
size [8pt] without [global]. And the outside Text (Bla) remains not 
big [11pt] with [global]. How can I toggle the two sizes differently?

3. After editing the mp-code I allways have to purge files between 
two runs. Is this normal?

Thanks for your help

Wolfgang
___________________________________________________________________________________
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  : https://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________