¿como insertar un salto de linea en comando mleader?

[frojasSUCTK]

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

[calderg1000]

Estimado @frojasSUCTK 

Puedes aplicar:

(command "_mleader" pause pause (strcat "PVC : 110mm. 3% " "\nL: " (rtos 100 2 2) "m.")"")

Saludos.

[frojasSUCTK]

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.

[calderg1000]

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.

[calderg1000 · Accepted solution]

Estimado @frojasSUCTK 

Aqui adjunto screencast mostrando su funcionamiento.

[frojasSUCTK]

Perfecto!!!

Muchas Gracias Calderg1000!!!

[calderg1000]

Estimado @frojasSUCTK 

Un gusto haber podido ayudar..., cualquier consulta estamos por aqui.

Saludos

[calderg1000]

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.