1 Archivos adjunto(s)
Lisp para acotación automática en AutoCAD
Años sin publicar nada.
Estuve modificando un Lisp de AutoCAD para generar cotas automáticas al seleccionar líneas o polilíneas. Es un Lisp que funciona en versiones en inglés (no probé en español porque no es el idioma de mi programa).
Bueno, supongo que, todos saben cómo cargar Lisps en AutoCAD por lo que sólo describiré algunas cosas que hace:
Creé con la misma base, cuatro Lisps diferenciados por el tamaño de las fuentes que más utilizo para mis planos: 0.16, 0.2, 0.3, 0.4. Pudiendo crear más Lisp a gusto cambiando el comando a llamar (ejemplo (defun c:ML2()) y modificando el tamaño de la fuente en la línea (command ._Text j bc txt_ins 0.20 ang (rtos thr)).
Llamando al Lisp con el comando ML2 se carga el Lisp donde acotará todo con fuente tamaño 0.20, con ML3 cargará el Lisp con fuente 0.30 y así con cada una de los cargados y nuevos creados. Cada Lisp se diferencia justamente en el comando que lo llama.
Cuando terminan de seleccionar las entidades a acotar, aparecen las cotas correspondientes y al mismo tiempo se crea una capa (Layer) nueva llamada - COTA ML por lo que no es necesario crear nada más y sirve para discriminarlas del resto de las cotas. Las líneas donde se crea el layer y envía la cota son las siguientes:
Layer creado: (Cre_Lay - COTAS ML 7) donde primero figura el nombre que le di a la capa y luego el número correspondiente al color (ejemplo, 1 es rojo, 3 es amarillo, 6 es magenta, 7 es blanco) Se puede modificar a gusto.
Layer donde se envía la cota: (command ._Change (entlast) p la - COTAS ML ) que es el mismo nombre del layer creado, claro.
o Acota líneas en diferentes ángulos, pero a las curvas sólo las acota por sus extremos.
Adjunto los 4 Lisp y recuerden que se pueden crear y modificar a gusto, y cualquier mejora será bienvenida.
-- IMÁGENES ADJUNTAS --
https://foro3d.com/attachment.php?attachmentid=221562
Lisp para acotación automática AutoCAD
Madre mía, cuanto tiempo, bienvenido a casa, no tardes tanto para el próximo mensaje, un saludo amigo.
Lisp para acotación automática AutoCAD
Cita:
Iniciado por
3dpoder
Madre mía, cuanto tiempo, bienvenido a casa, no tardes tanto para el próximo mensaje, un saludo amigo.
JA. Gracias, el AutoCAD es necesario ya qué hago proyecto de viviendas, generalmente, y es muy útil poder personalizarlo a tu gusto. Tengo otros Lisps que he encontrado en la web y modificado a mi gusto, no soy programador, ni nada cercano, pero con un ojo crítico se puede estudiar las líneas y cambiarlas para poder usar estas herramientas con más soltura. También se puede personalizar todos los comandos de AutoCAD.
Los comandos por defecto del programa no son muy eficientes, lo principal arranca instalando EXPRES que es opcional en la instalación de AutoCAD, pero que igual se puede instalar desde el disco más adelante. En esta extensión se puede ver y modificar muchas cosas del programa, pero principalmente, para mí, los comandos (Command Alias Editor).
Ya qué la velocidad es crucial cuando se trabaja con AutoCAD, es necesario poder usar las dos manos en funciones diferentes: la derecha (mayormente) para manejar el mouse sobre el dibujo, y la izquierda para ingresar los comandos que llaman a las herramientas. Al modificar los comandos hay que tener algo en cuenta, y es que deben quedar cómodos para la mano que los escribe. Por ejemplo: para llamar la herramienta Cota continua el comando es ACO; esto implica tener que levantar el codo y bajar la vista al teclado para ir de la C a la O, entonces se debe modificar el comando (que se suma al anterior, no lo sobrescribe) por ejemplo, por ACD, en este caso no se levanta la mano ni se baja la vista al teclado y sólo usás cuatro dedos y de forma muy rápida.
Yo tengo, por ejemplo, las cotas de esta manera:
Cota ► AC
Cota continua ► ACD, el original es DCO
Cota angular ► ACA, el original es ADN
cota alineada ► ACX, para acotar cosas que no son ortogonales a la grilla. El original es DAL.
De esta manera se puede añadir comandos personalizados para no tener que ir al botón de la herramienta con el mouse y así perder tiempo y evitás alejarte del área del dibujo donde estás trabajando.
Hay que recordar que con el dedo gordo de la mano izquierda se teclea la barra espaciadora, que es el otro INTRO en autoCAD.
