AutoCad - Acabar una polilinea

 
Vista:
sin imagen de perfil

Acabar una polilinea

Publicado por Antonio (5 intervenciones) el 20/01/2020 12:13:34
buenos días, necesito ayuda.
Me facilitaría mi trabajo una rutina que hiciera lo siguiente:

creo una polilinea normal ,varios punto ..pongamos 7 p1, p2, p3.....p6, p7
luego empiezo a dibujar otra polilinea x1, x2, x3...y si la rutina ve que el siguiente punto coincide con alguno de la polilinea anterior, entonces continua por esos puntos.. p5,p6,p7

La verdad es que no se si se entenderá.
gracias de antemano.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 1.285
Oro
Ha mantenido su posición en AutoCad (en relación al último mes)
Gráfica de AutoCad

Acabar una polilinea

Publicado por Gerardo (989 intervenciones) el 20/01/2020 19:44:38
Hola
Eso se resolvería sin rutina con un "copy" y un "fillet"

¿Que ganarías con la rutina frente a hacerlo con ese par de comandos? ¿Es que dibujas acaso cientos de polilineas?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

Acabar una polilinea

Publicado por Antonio (5 intervenciones) el 20/01/2020 23:16:18
Buenas noches, gracias por la respuesta
La verdad es que tengo que hacer bastantes, y lo que comentas lo hago a veces, otras copio y añado puntos, o estiro... varias cosas pero lo que me gustaria , esa rutina que acabara una pililinea por unos puntos ya existentes, creo que ahorraria
Gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 1.285
Oro
Ha mantenido su posición en AutoCad (en relación al último mes)
Gráfica de AutoCad

Acabar una polilinea

Publicado por Gerardo (989 intervenciones) el 21/01/2020 01:32:26
ya veo

detectarla automáticamente se las trae un poco

por ahora te paso este código a ver si te sirve. Es lo mismo que te dije del copy y el fillet, pero por lo menos no tienes que digitar los comandos indicando que copias y que juntas con fillet. Solo trazas la poly y al terminar con intro o click derecho se te pide seleccionar las dos polis, en los mismos puntos que lo harías para juntarlas con fillet. La rutina llama a los comandos para hacer la copia de la pline existente y juntarla. Ya me dirás si te ayuda en algo

1
2
3
4
5
6
7
8
9
10
11
(defun c:fi2 ( / s1 s2)
	(command "_pline")
	(while (= (getvar "CMDACTIVE") 1)
		(command Pause)
	)
	(setq s1 (entsel)
			s2 (entsel)
	)
	(entmake (entget (car s2)))
	(command "_fillet" (cadr s1) (cadr s2))
)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
sin imagen de perfil

Acabar una polilinea

Publicado por Antonio (5 intervenciones) el 21/01/2020 07:13:27
Gracias, lo pruebo nada mas llegue al trabajo y te comento
Muchas gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

Acabar una polilinea

Publicado por Antonio (5 intervenciones) el 21/01/2020 09:31:10
Magnifico, me sirve estupendamente. muy agradecido
no me lo había planteado de esa forma tan sencilla y genial.
gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 1.285
Oro
Ha mantenido su posición en AutoCad (en relación al último mes)
Gráfica de AutoCad

Acabar una polilinea

Publicado por Gerardo (989 intervenciones) el 21/01/2020 19:11:06
me alegro. Con todo gusto
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar