Ajout d'une option lorsque le paramètre traits est à false.
authorChristophe Poulain <cp@Debian.(none)>
Mon, 22 Aug 2011 10:31:31 +0000 (12:31 +0200)
committerChristophe Poulain <cp@Debian.(none)>
Mon, 22 Aug 2011 10:31:31 +0000 (12:31 +0200)
objets.mp

index 4942bcb..39c4ecc 100644 (file)
--- a/objets.mp
+++ b/objets.mp
@@ -256,6 +256,16 @@ vardef DessineFusion=
        Projette(Fc[cpt[k]][l])--
       endfor
       cycle withpen pencircle scaled0.25bp;
+      %add by cp 22/08/2011
+       else:
+         draw for l=1 upto Fc[cpt[k]].nb:
+             Projette(Fc[cpt[k]][l])--
+         endfor
+         cycle withcolor if Vue[cpt[k]]:
+             if arcenciel: lumin(cpt[k])*Hsvtorgb(((cpt[k]/tapj)*360,satu,lum))
+           else:lumin(cpt[k])*cou[cpt[k]] fi
+         else: abs(lumin(cpt[k]))*cou[cpt[k]] fi;
+         %fin add
     fi;
   endfor;
 enddef;

Licence Creative Commons Les fichiers de Syracuse sont mis à disposition (sauf mention contraire) selon les termes de la
Licence Creative Commons Attribution - Pas d’Utilisation Commerciale - Partage dans les Mêmes Conditions 4.0 International.