Convertir un conjunto de objetos Puntos Libres a un objeto Lista de Puntos y borrar los Puntos Libres en JavaScript - Versión deja las listas sin borrar mas Geogebra Scripting

JavaScript

//Convertir un conjunto de objetos Puntos Libres //a un objeto Lista de Puntos y borrar los Puntos Libres //en JavaScript var no = ggbApplet.getObjectNumber(); var xV, yV; var j = 1; /////////////////////////////////////////////// // Enlista el nombre de los objetos del mismo tipo en un arreglo ggbApplet.evalCommand("LxV={ }"); ggbApplet.evalCommand("LyV={ }"); for (var i = 0; i < no; i++) { if (ggbApplet.getObjectType(ggbApplet.getObjectName(i)) == "point") { ggbApplet.evalCommand("xV=x(" + ggbApplet.getObjectName(i) + ")"); ggbApplet.evalCommand("yV=y(" + ggbApplet.getObjectName(i) + ")"); xV = ggbApplet.getValue("xV"); yV = ggbApplet.getValue("yV"); //alert(i + " xV=" + xV + " yV=" + yV); ggbApplet.setListValue("LxV", j, xV); ggbApplet.setListValue("LyV", j, yV); j++; } // si } // para ggbApplet.evalCommand("LP=Sequence((Element(LxV,i),Element(LyV,i)),i,1,Length(LxV),1)"); ggbApplet.evalCommand("index=Sequence(IndexOf(Element(Sort(LxV),i),LxV),i,1,Length(LxV),1)"); ggbApplet.evalCommand("LP2=Sequence(Element(LP,Element(index,i)),i,1,Length(LP),1)"); ggbApplet.setVisible("LP", false); ggbApplet.setVisible("LP2", true); ggbApplet.deleteObject("xV"); ggbApplet.deleteObject("yV"); var opt = prompt("Deseas borrar las coordenadas de los puntos? (Y/N)", "N"); var dno=no; if (opt == 'Y' || opt == 'y') { for (var i = dno; 0<i ; i--) { if (ggbApplet.getObjectType(ggbApplet.getObjectName(i)) == "point") { ggbApplet.deleteObject(ggbApplet.getObjectName(i)); //dno--; } // si } // para } //if opt