LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
3 participantes
Página 1 de 1.
LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Hola Compañeros, utilizo de forma muy frecuente la orden layon y me preguntava si alguien tiene una rutina para desactivar todas las capas menos la capa "0" y dejarla como capa actual.
Gracias!
Gracias!
stg- Mensajes : 6
Fecha de inscripción : 12/04/2017
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Osea necesitas que se apaguen todos los layers menos el 0???....entendi bien??
saulo2016- Mensajes : 210
Fecha de inscripción : 17/03/2016
Edad : 58
Localización : Monterrey, Nuevo León, Mexico
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Haber si te sirve esto??
solo debes posicionar el layer 0 en el Satus actual
saludos
solo debes posicionar el layer 0 en el Satus actual
- Código:
(defun C:LON ()
(prompt "\n Turning all layers on...")
(command "-LAYER" "ON" "*" "")
(prompt " DONE")
(princ)
)
(defun C:LOFF ()
(prompt "\n Turning all layers off...")
(command "-LAYER" "OFF" "*" "" "")
(prompt " DONE")
(princ)
)
saludos
saulo2016- Mensajes : 210
Fecha de inscripción : 17/03/2016
Edad : 58
Localización : Monterrey, Nuevo León, Mexico
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Primero de todo agradecerte el esfuerzo @saulo2016
He probado el lisp y no me funciona....no soy un experto en el tema peró imagino que en la opción "*" tendria que indicar "0", aun asi tampoco me ha funcionado, he modificado tambien el comando -layer por _layer,.....mejor te pego el codigo
(defun C:LON ()
(prompt "\n Turning all layers on...")
(command "_LAYER" "ON" "0" "")
(prompt " DONE")
(princ)
)
(defun C:LOFF ()
(prompt "\n Turning all layers off...")
(command "_LAYER" "OFF" "0" "" "")
(prompt " DONE")
(princ)
)
He probado el lisp y no me funciona....no soy un experto en el tema peró imagino que en la opción "*" tendria que indicar "0", aun asi tampoco me ha funcionado, he modificado tambien el comando -layer por _layer,.....mejor te pego el codigo
(defun C:LON ()
(prompt "\n Turning all layers on...")
(command "_LAYER" "ON" "0" "")
(prompt " DONE")
(princ)
)
(defun C:LOFF ()
(prompt "\n Turning all layers off...")
(command "_LAYER" "OFF" "0" "" "")
(prompt " DONE")
(princ)
)
stg- Mensajes : 6
Fecha de inscripción : 12/04/2017
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Bueno mira....te voy a pedir 2 favores....
1.- saca una foto del dialogo de error y pegalo para ver la falla.
2.- Necesito tener mas claro lo que pides....¿quieres que se apaguen todos los layers y solo quede encendido el 0?.....o ¿quieres que se enciendan todos menos el 0??
perdoname pero no me queda claro.
1.- saca una foto del dialogo de error y pegalo para ver la falla.
2.- Necesito tener mas claro lo que pides....¿quieres que se apaguen todos los layers y solo quede encendido el 0?.....o ¿quieres que se enciendan todos menos el 0??
perdoname pero no me queda claro.
saulo2016- Mensajes : 210
Fecha de inscripción : 17/03/2016
Edad : 58
Localización : Monterrey, Nuevo León, Mexico
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Hola de nuevo
La idea es poder desactivar (apagar) todas las capas y establecer la capa "0" como actual y activada.
La opción activar todas la capas con el comando layeron ya me vale.
Te cuento porque me planteo esto....tengo un dibujo de un edificio de distintas plantas y contiene muchas capas (por planta) y tambien dispone de filtros de capa para poder gestionar todo el dibujo.
Para poder realizar modificaciones en distintas plantas tengo que activar y descativar capas con la ayuda de los filtros (que van de fabula) pero es un poco laborioso tener que ir saltando de filtro en filtro....etc...etc...
En conclusión.... al igual que el comando layeron te lo activa todo, me interesaria realizar la misma operación però en sentido contrario y estableciendo la capa "0" como actual y activada.
thanks
La idea es poder desactivar (apagar) todas las capas y establecer la capa "0" como actual y activada.
La opción activar todas la capas con el comando layeron ya me vale.
Te cuento porque me planteo esto....tengo un dibujo de un edificio de distintas plantas y contiene muchas capas (por planta) y tambien dispone de filtros de capa para poder gestionar todo el dibujo.
Para poder realizar modificaciones en distintas plantas tengo que activar y descativar capas con la ayuda de los filtros (que van de fabula) pero es un poco laborioso tener que ir saltando de filtro en filtro....etc...etc...
En conclusión.... al igual que el comando layeron te lo activa todo, me interesaria realizar la misma operación però en sentido contrario y estableciendo la capa "0" como actual y activada.
thanks
stg- Mensajes : 6
Fecha de inscripción : 12/04/2017
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Ok listo ya te entendi
Mira pues yo utilizo un comando muy comun en AutoCAD y se llama LAYWALK, en este solo vas a seleccionar el layer que necesitas establecer en el status actual y que el resto este deactivados, cuida que la casilla RESTORE ON EXIT este desactivada y listo....se apagan todos los layers menos el que seleccionaste...
Dime si esto te funciona bien y si no pues vamos a trabajar en algo programado desde un lisp
Mira pues yo utilizo un comando muy comun en AutoCAD y se llama LAYWALK, en este solo vas a seleccionar el layer que necesitas establecer en el status actual y que el resto este deactivados, cuida que la casilla RESTORE ON EXIT este desactivada y listo....se apagan todos los layers menos el que seleccionaste...
Dime si esto te funciona bien y si no pues vamos a trabajar en algo programado desde un lisp
saulo2016- Mensajes : 210
Fecha de inscripción : 17/03/2016
Edad : 58
Localización : Monterrey, Nuevo León, Mexico
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Perdon me falto explicarte que cuando le des LAYWALK vas a ver todo el listado de layers, solamente dale doble click al layer 0 y cierras y ya....
saulo2016- Mensajes : 210
Fecha de inscripción : 17/03/2016
Edad : 58
Localización : Monterrey, Nuevo León, Mexico
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Hola "stg" te envío un lisp espero sea lo que necesitas.
Saludos.
- Código:
(defun c:lym ()
(setvar "cmdecho" 0)
(if (not *layval*) (setq *layval* "Apagar"))
(initget "Apagar Encender")
(setq *layval* (cond ((getkword (strcat "\nDeseas [A]pagar o [E]ncender los layers < " *layval* " >: " ))) (*layval*)))
(cond
((= *layval* "Apagar")
(setvar "clayer" "0")
(vl-cmdf "-LAYER" "OFF" "*" "" "")
(princ "\nCapa Actual= 0 , Capa Apagada= Todas")
)
((= *layval* "Encender")
(setvar "clayer" "0")
(vl-cmdf "-LAYER" "ON" "*" "" "")
(princ "\nCapa Actual= 0 , Capa Encendida= Todas")
)
)
(setvar "cmdecho" 1)
(princ)
)
Saludos.
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Desconocía el comando LAYWALK, es justo lo que necesito.
Lo he probado en un dibujo donde tengo muchas capas y filtros de capa pero no me permite seleccionar los filtros aunque en el DCL del comando aparece una casilla donde indica filtro y esta inactiva.
Sabéis porque?
La verdad es que poder trabajar con este comando o similar donde te permite activar y/o desactivar los filtros de capa es un puntazo, si sabéis como solucionarlo o tenéis alguna alternativa seria GENIAL,
Gracias Craks!!!!
Lo he probado en un dibujo donde tengo muchas capas y filtros de capa pero no me permite seleccionar los filtros aunque en el DCL del comando aparece una casilla donde indica filtro y esta inactiva.
Sabéis porque?
La verdad es que poder trabajar con este comando o similar donde te permite activar y/o desactivar los filtros de capa es un puntazo, si sabéis como solucionarlo o tenéis alguna alternativa seria GENIAL,
Gracias Craks!!!!
stg- Mensajes : 6
Fecha de inscripción : 12/04/2017
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Ahora bien... si quieres que se apaguen algunos y queden otros encendidos, en el mismo LAYWALK + Ctrl seleccionas solo los que te interesa dejar visibles, luego cuando ya necesites encender todos los layers nuevamente utilizas el LAYWALK y en la parte superior en el campo vacio teclea * y le das enter y asi te vuelve a encender todos los alyers o si bien lo que quieres es filtrar con la primera letra solo teclea en ese mismo campo la primera letra + * y listo o tambien si necesitas que sean todos los layers que tengan en su nombre una palabra especifica teclea en ese campo la palabra que se repita en varios layers + * y solo esos te va a flitrar...
Creo que eso es lo que tu quieres saber....
ahi nos cuentas como te fué.
Creo que eso es lo que tu quieres saber....
ahi nos cuentas como te fué.
saulo2016- Mensajes : 210
Fecha de inscripción : 17/03/2016
Edad : 58
Localización : Monterrey, Nuevo León, Mexico
Re: LISP: DESACTIVAR TODAS LAS CAPAS MENOS LA CAPA "0" Y DEJARLA COMO ACTUAL
Milgracias Saulo2016! Tras tus indicaciones ya me sirve el comando.
Sugerencia para los cracks en programación....poder saltar de un filtro de capa a otro "filterwalk"
Un Saludo!
Sugerencia para los cracks en programación....poder saltar de un filtro de capa a otro "filterwalk"
Un Saludo!
stg- Mensajes : 6
Fecha de inscripción : 12/04/2017
Temas similares
» Ejecuta comando en una capa y establece la actual a capa 0
» Poner como actual Estilo de MLEADER
» LISP (SELECCIÓNAR TODO Y CONVERTIR TODO COLOR PORCAPA), LISP (BLOQUES COLOR PORCAPA Y CAPA 0)
» Seleccionar capas mediante cuadro de diálogo
» Mover ucs con entmake y funciones vl...
» Poner como actual Estilo de MLEADER
» LISP (SELECCIÓNAR TODO Y CONVERTIR TODO COLOR PORCAPA), LISP (BLOQUES COLOR PORCAPA Y CAPA 0)
» Seleccionar capas mediante cuadro de diálogo
» Mover ucs con entmake y funciones vl...
Página 1 de 1.
Permisos de este foro:
No puedes responder a temas en este foro.
|
|