-
lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Le envió una rutina lisp para sumar multiples líneas, polilineas y arcos de un dibujo espero que le pueda servir.
el lisp suma las siguientes entidades:
Suma distancias consecutivamente entre puntos
Suma distancias no necesariamente entre puntos consecutivos
Suma las longitudes de un número indeterminado de arcos
Suma las longitudes de un número indeterminado de líneas
Suma las longitudes de un número indeterminado de líneas y/o polilineas
Suma las áreas y perímetros/longitudes de un número indeterminado de polilineas
Suma las longitudes de todas las líneas de una capa
Cordialmente
José Q.
-
1 Attachment(s)
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Me disculpan me falto el lisp
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Una rutina que sirve para seleccionar grupos de lineas, arcos y/o polilineas, obtiene
longitudes y devuelve la suma total:
Code:
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun c:sll () (sum-long-lin) (princ))
(defun sum-long-lin (/ ss c i sl e vlae l)
(vl-load-com)
(setq ss (ssget '((0 . "LINE,ARC,LWPOLYLINE,POLYLINE")))
c (sslength ss)
i 0
sl 0
)
(repeat c
(setq e (ssname ss i)
vlae (vlax-ename->vla-object e)
l (vlax-get vlae 'length)
sl (+ l sl)
)
)
(princ "\nsuma total de longitudes: ")
(princ sl)
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
GENIAAAAAAAAAAAAAAALLLLLLLLLLLLLLL
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Muchas gracias j, me cae como del cielo...
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Gracias! funciona perfecto!!
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
BUEN..POST....APLICADO EN AUTOCAD 2010..SI CORRE...GRXS....
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
gracias por el aporte esta muy bueno
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Hola a todos! Oye super bueno este LISP, Nunca antes habia usado uno y corrio perfectamente bien en cad 2007. Oye ahora lo que necesito es un LISP que me cuente las intersecciones que se generaron entre 2 o mas polilineas. Donde puedo encontrarlo, o si es algun comando que probablemente desconozca. Gracias a todos!:mrgreen:
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Te pasaste!!!!!!
Excelente lisp!! :D
+10! jakjakaj
Quote:
Originally Posted by
jquintero
Me disculpan me falto el lisp
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
FUNCIONA A LA PERFECCION, ES UNA GRAN HERRAMIENTA, GRACIAS.
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
oye me podrias mandar el lisp lo quise descargar y no pude
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Hola, perdón... pero no sé si hice mal o no me funciona...
pongo SUMLP selecciono las polilíenas y me da error ¿?
Estoy haciendo algo mal?
GRACIAS.
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
La rutina, tal como está, no suma correctamente. Lo que hace es sumar la longitud del primer objeto seleccionado tantas veces como objetos se han seleccionado. Para que funcione bien tiene ser.
Code:
(defun c:sll () (sum-long-lin) (princ))
(defun sum-long-lin (/ ss c i sl e vlae l)
(vl-load-com)
(setq ss (ssget '((0 . "LINE,ARC,LWPOLYLINE,POLYLINE")))
c (sslength ss)
i 0
sl 0
)
(repeat c
(setq e (ssname ss i)
vlae (vlax-ename->vla-object e)
l (vlax-get vlae 'length)
sl (+ l sl)
i (+ i 1)
)
)
(princ "\nsuma total de longitudes: ")
(princ sl)
)
Le faltaba i (+ i 1)
Tampoco funciona si se selecciona un arco
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
muy bueno....buen aporte al mundo Cad
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Buen aporte! Gracias por compartir (Y)
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Muy buen lisp, funciona a la perfeccion.
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Más que agradecido !! Me ha ayudado mucho en mi trabajo haciendo presupuestos, ya que tengo que medir distancias para calcular precios de cables.
Saludos!
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
excelente es lo que siempre he estado buscando. gracias por el aporte
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
¡¡Mil gracias!!
Este lisp es majestuoso.
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Por favor, necesitaría que alguien me ayude, nunca antes había usado LISP y resulta que cuando lo cargo y ejecuto el comando me pide que seleccione las lineas y cuando termino de hacerlo pongo enter y no me devuelve el resultado. Si alguien puede explicarme en que me estoy equivocando me haria un gran favor. Muchas Gracias
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Hola!!soy new en esto...tanto en usar los lisp como en foros... ;) ...pero necesito con urgencia esa herramienta...ya que anteriormente con arkitool podia sumar polilineas, pero con la restriccion a 20 usos....para mi es inviable...he intentado utilizar el ultimo lisp q hay pero no me funciona bien, no las suma correctamente al no ser que tengan la misma longitud....me preguntaba si alguien consiguio alguna modificacion q funcione correctamente....y muxas gracias d antemano!! ;)
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Muchaaaas gracias j funciona perfecto justo lo que estaba buscando
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
todo esto es una reverenda mierda, no aparece el link de descarga y los maricones que elogian esta pagina son el mismo creador q quiere echarse flores asimismo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Por favor, necesitaría que alguien me ayude, nunca antes había usado LISP y resulta que cuando lo cargo y ejecuto el comando me pide que seleccione las lineas y cuando termino de hacerlo pongo enter y no me devuelve el resultado. Si alguien puede explicarme en que me estoy equivocando me haria un gran favor. Muchas Gracias...
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Excelente...funciona...100% recomendado...(para la persona que no encuentra el link, está en la pag. 3 del foro)
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Muchas gracias era algo que necesitaba
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
realmente genial esta coleccion.. gracias.
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Muy buen lisp, lo acabo de probar con Autocad 2016 y funciona perfecto. Muchas gracias!
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
-
Re: lisp para sumar multiples líneas, polilineas y arcos de un dibujo
Quote:
Originally Posted by
jquintero
Me disculpan me falto el lisp
Muchiísima gracias por su aporte:)