Re: [Syracuse] [metapost] grosse misère avec la macro drawboxed

Auteur: david.cobac <david.cobac@free.fr>
Date: mar déc 05 2006 - 10:38:00 CET

david.cobac a écrit :
> [...]
> Alors comment faire un truc aussi simple sans que ça plante ?
> [...]

J'ai pas l'air d'inspirer grand-monde, alors je me réponds, voilà un
bout de code qui fait ce que je veux mais ça fait "méthode du pauvre"...

input boxes;

vardef lesboites (text t) :=
   forsuffixes $=t :
     boxit.$(str $);
   endfor;
enddef;

vardef effacetout (text t) :=
   drawboxed(t);
   forsuffixes $=t :
        undraw bpath $ withpen pencircle scaled 2bp;
        unfill bpath $;
   endfor;
enddef;

beginfig(0);
   lesboites(elsa,david,yann,sarah);
   elsa.e-david.w=yann.e-sarah.w=-(1cm,0);
   david.e-yann.w=-(3cm,0);
   %%
   effacetout(elsa,david,yann,sarah);
   draw bpath yann withcolor red;
   draw pic elsa withcolor blue;
   draw pic david;
   draw bpath sarah withcolor .5white;
endfig;
end

-- 
cordialement
                           david cobac
_______________________________________________
Liste de diffusion Syracuse 
Syracuse@melusine.eu.org
http://melusine.eu.org/cgi-bin/mailman/listinfo/syracuse
Adresses alternatives du site :
http://syracuse.eu.org/syracuse/
http://193.55.139.7/syracuse/ 
Received on Tue Dec 5 10:39:22 2006

Cette archive a été créée par hypermail 2.1.8 : mar déc 05 2006 - 22:37:01 CET