X-Git-Url: https://melusine.eu.org/syracuse/G/git/?a=blobdiff_plain;f=luamesh.sty;h=28608819eab17f582028ae0ef7d7099b4821f81c;hb=5d563ad5ea0e2ca2074f5262b69f24f7fc91f211;hp=9cc0b681e83d47f65528d75b3368460e25334c68;hpb=99c7eb1c5fdd23d7617d3817806af416e4614d15;p=delaunay.git

diff --git a/luamesh.sty b/luamesh.sty
index 9cc0b68..2860881 100644
--- a/luamesh.sty
+++ b/luamesh.sty
@@ -83,11 +83,11 @@
 }%
 %
 %% a complete picture or some code of the engine
-\define@choicekey*{buildMesh}{picture}[\val\nr]{full, simple}{%
+\define@choicekey*{buildMesh}{picture}[\val\nr]{full, embedded}{%
   \ifcase\nr\relax%
   \def\luameshval@picture{full}%
   \or%
-  \def\luameshval@picture{simple}%
+  \def\luameshval@picture{embedded}%
   \fi%
 }%
 %color
@@ -163,7 +163,22 @@
   \def\luameshval@mode{ext}%
   \fi%
 }%
-\presetkeys{MeshAddOne}{tikz=false,scale, meshpoint,newpoint,color,colorBack,colorNew,colorCircle,step=badtriangles,mode=int}{}%
+%% a complete picture or some code of the engine
+\define@choicekey*{MeshAddOne}{picture}[\val\nr]{full, embedded}{%
+  \ifcase\nr\relax%
+  \def\luameshval@picture{full}%
+  \or%
+  \def\luameshval@picture{embedded}%
+  \fi%
+}%
+\define@choicekey*{MeshAddOne}{bbox}[\val\nr]{none, show}{%
+  \ifcase\nr\relax%
+  \def\luameshval@bbox{none}%
+  \or%
+  \def\luameshval@bbox{bbox}%
+  \fi%
+}%
+\presetkeys{MeshAddOne}{tikz=false,scale, meshpoint,newpoint,color,colorBack,colorNew,colorCircle,step=badtriangles,mode=int,picture=full,bbox=none}{}%
 %
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % the difinition
@@ -178,8 +193,12 @@
     buildMeshTikZ("#2","\luameshval@mode","\luameshval@print","\luameshval@bbox","full","\luameshval@scale","\luameshval@color")%
   }%
   \else % we are using MP
+  \mplibcolor{\mpcolorcolor}{\luameshval@color}
+  \mplibcolor{\mpcolorcolorBack}{\luameshval@colorback}
+  \mplibcolor{\mpcolorcolorNew}{\luameshval@colornew}
+  \mplibcolor{\mpcolorcolorCircle}{\luameshval@colorcircle}
   \directlua{%
-    TeXFullOnePointMP("#2","#3","\luameshval@step","\luameshval@color","\luameshval@colorback","\luameshval@colornew","\luameshval@colorcircle","\luameshval@scale","\luameshval@mode")%
+    TeXOnePointMP("#2","#3","\luameshval@step","\luameshval@color","\luameshval@colorback","\luameshval@colornew","\luameshval@colorcircle","\luameshval@scale","\luameshval@mode","\luameshval@picture","\luameshval@bbox")%
   }%
   %
   \fi%