Hola:
Estoy creando una rutina lisp para insertar datos de tuberías, pero no sé como ingresar un salto de linea en la sintaxis:
command "_mleader" "_m2p" pto1 pto2 (getpoint) (strcat "PVC 😧 110mm. 3% L: " dista "m."))
La idea es poder introducir un salto de manera que el texto se escriba en 2 lineas del leader:
PVC 😧 110mm. 3%
L: x,xx m.
Saludos y gracias
¡Resuelto! Ir a solución.
Resuelto por calderg1000. Ir a solución.
Estimado @frojasSUCTK
Puedes aplicar:
(command "_mleader" pause pause (strcat "PVC : 110mm. 3% " "\nL: " (rtos 100 2 2) "m.")"")
Saludos.
Carlos Calderon G
>Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
Gracias Caldberg1000.
El problema es que no funciona como estaba pensado. La idea es que automaticamente indique la distancia entre pto1 y pto2, y me permita elegir el punto en el que inserto el mleader.
Saludos.
Estimado @frojasSUCTK
Si desde luego se puede automatizar mucho mas MLEADER admite varios tipos de configuración, pero requiere mas código:
Para iniciar luego de hacer la configuración mínima que te muestro en el Screencast, te adjunto la rutina con algunos complementos mínimos.
Cambiando los valores de 1 y 3 puedes hacer modificaciones del angulo de inclinacion del Leader y del color de texto.
(defun c:Test()
(while
(setq p1(getpoint "Ingrese Ubicacion de Pto. en Pantalla...:"))
(setq p2(polar p1 (* 1 (/ pi 4)) 20.0))
(command "_mleader" p1 p2 (strcat "{\\C3;" "PVC : 110mm. 3% " "\nL: " (rtos 100 2 2) "m." "}") "")
)
)
Saludos.
Carlos Calderon G
>Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
Estimado @frojasSUCTK
Aqui adjunto screencast mostrando su funcionamiento.
Carlos Calderon G
>Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
Estimado @frojasSUCTK
Un gusto haber podido ayudar..., cualquier consulta estamos por aqui.
Saludos
Carlos Calderon G
>Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
Estimado @frojasSUCTK
Revise la rutina y me di cuenta que las comillas al final de la linea (command..., estaban demás y originaban retrasó en el procesamiento.
(defun c:Test()
(while
(setq p1(getpoint "Ingrese Ubicacion de Pto. en Pantalla...:"))
(setq p2(polar p1 (* 1 (/ pi 4)) 20.0))
(command "_mleader" p1 p2 (strcat "{\\C3;" "PVC : 110mm. 3% " "\nL: " (rtos 100 2 2) "m." "}"))
)
)
Saludos.
Carlos Calderon G
>Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
¿No encontraste lo que buscabas? Pregúntale a la comunidad o comparte tus conocimientos.