Puedes obtener estas rutinas con el autor.
Lisp para conversiones y operaciones |
||||
Convertir pies a metros y viceversa Esta rutina generada con Autolisp, nos permite convertir el valor ingresado de pies a metros y viceversa, el resultado es mostrado en la línea de comandos. Aquí también usamos la función CVunit, esta función lisp, obtiene los valores de conversión, del archivo acad.unt (AutoCAD Unit Definition), si deseas observar con detalle cuales son estos valores y los diferentes tipos de conversión, te aconsejo que veas este archivo. Para utilizar esta rutina se debe de hacer lo siguiente:
|
||||
Multiplica todos los textos seleccionados Esta rutina generada en AutoLisp permite obtener la multiplicación de todos los valores de los textos seleccionados, para que esta rutina trabaje correctamente es necesario que los textos seleccionados sean de tipo TEXT y no de tipo MTEXT. Por ejemplo, si se tiene 3 tres textos cada uno con los valores: 1, 2, 3 y se seleccionan los tres, el resultado del comando será la multiplicación de estos tres números, que será igual a: 6. Para utilizar esta rutina se debe de hacer lo siguiente:
|
||||
Convertir pulgadas a metros Esta pequeña rutina nos permite convertir el valor ingresado en pulgadas a metros mostrando el resultado en la línea de comandos, además muestra también el resultado divido entre 2 como parte de información adicional. Se puede modificar este comando para que convierta otro tipo de unidades, para ello se deberá de modificar el código fuente, por ejemplo, convertir pulgadas a centímetros o minutos a segundos, para ello solo basta con cambiar los parámetros de la función «cvunit«, en este comando cvunit tiene los siguientes parámetros: «inches» «meters», con estos parámetros, el valor ingresado sera tomando como pulgadas (inches) y será convertido a metros (meters), puedes cambiar los parámetros por los siguientes: «minute» «second», «inch» «cm», «acre» «sq yard», «ft» «in», entre otros. Para utilizar esta rutina se debe de hacer lo siguiente:
Listo, obtendrás la información con la conversión de unidades. |
||||
Sumar las longitudes de las líneas de la capa seleccionada Esta rutina te permite sumar las distancias de todas las líneas que estan contenidas en la capa del objeto que selecciones. Esta rutina te permite sumar las distancias de todas las líneas que están contenidas en la capa del objeto que selecciones, si en la capa seleccionada se encontraran polilíneas, éstas serán ignoradas. Para utilizar esta rutina se debe de hacer lo siguiente:
|
||||
Puedes obtener estas rutinas con el autor. | ||||
Sumar o restar valores a los textos seleccionados Esta rutina hecha con AutoLisp nos permite sumar o restar valores a los textos que se seleccionen. Por ejemplo, si tenemos un texto con un valor de 5 y utilizamos este comando e ingresamos el valor 2, el texto seleccionado cambiará, actualizándose por el valor 7, si se ingresa el valor -2, el texto se actualizará a 3. Haz lo siguiente para utilizar esta rutina.
|
||||
Obtener áreas a partir de sombreados de secciones Esta rutina te permite obtener áreas de los sombreados (achurados) de secciones transversales y establecer los valores obtenidos en atributos de bloques seleccionados. Los sombreados seleccionados deberán de estar en una capa que describa el tipo de área a obtener, por defecto el lisp leerá dos nombres de capas, que son las siguientes: «SombreadoCorte» y «SombreadoRelleno«. El lisp suma todas las áreas de los sombreados que estan en la capa «SombreadoCorte» y todas las áreas de los sombreados de la capa «SombreadoRelleno» y una vez finalizada la selección de los achurados se procede a actualizar los atributos del bloque de áreas, para ello se de deberá de seleccionar primero el atributo de la progresiva del bloque, este es un atributo invisible, pero el lisp justo antes de la selección lo muestra y luego lo vuelve a ocultar, eso lo realiza mediante el comando «Attdisp«, a continuación se seleccionaran los atributos de las áreas de corte y relleno y estas se actualizarán por lo valores de las áreas halladas. La selección de los objetos se realiza mediante una ventana que abarque todos los achurados incluyendo el texto de la progresiva de la sección. Para utilizar esta rutina debes de hacer lo siguiente:
Con el lisp se adjunta un archivo CAD de ejemplo para una mayor comprensión del comando. |
||||
Obtener la pendiente de una línea o polilinea Este comando (rutina Autolisp) obtiene el valor de la pendiente de una línea o una polilinea, además también obtiene la longitud de la línea, la longitud horizontal y el ángulo. Presenta una gran ayuda cuando deseamos controlar nuestras pendientes, para obtener la pendiente solo basta con seleccionar la línea o polilinea, el resultado se puede mostrar en pantalla (línea de comandos) o seleccionando un texto (el valor de este texto cambiará por el valor de la pendiente hallada). Vale la pena recalcar que en el caso de un polilinea, este comando halla la pendiente de solo el primer segmento. Para utilizar esta rutina se debe de hacer lo siguiente:
RUTINA EN VISUALLISP PARA OBTENER LA SUMA DE LAS LÍNEAS O POLILÍNEAS SELECCIONADAS Se trata de una rutina generada en Lisp que obtiene la suma de las longitudes de las líneas o polilíneas seleccionadas, el resultado de esta suma se puede establecer en un texto seleccionándolo o de lo contrario solo se puede mostrar en la línea de comandos. Puedes seleccionar líneas y polilíneas todas juntas mediante una ventana o de lo contrario una por una. El número de decimales por defecto de la suma de las longitudes halladas es 2, pero se puede indicar otro valor. Para utilizar esta rutina debes de hacer lo siguiente:
RUTINA EN VISUALLISP QUE GENERA UN LISTADO DE LAS CAPAS DEL DIBUJO ACTUAL Se trata de una pequeña rutina que genera un listado con los nombres de todas las capas del dibujo actual y lo muestra en la línea de comandos. Para utilizar esta rutina debes de hacer lo siguiente: Carga el archivo lisp en AutoCAD. |
||||
Trabajo con coordenadas
|
||||
Puedes obtener estas rutinas con el autor. | ||||
RUTINA AUTOLISP QUE INSERTA UNA TABLA DE DATOS Esta rutina genera una tabla con el número de filas y columnas especificado, es similar al comando Table de AutoCAD, pero más ligera de utilizar. Esta rutina genera una tabla con el número de filas y columnas especificado, es similar al comando Table de AutoCAD, pero más ligera de utilizar, aunque no vincula datos con Excel tiene la opción de rellenar la tabla con un valor predefinido que por defecto es «0.00» y es colocado en cada celda para ser editado posteriormente. Este comando también permite generar la tabla mediante dos opciones, la primera opción permite definir la tabla mediante un alto y ancho fijo de las celdas y la otra opción ajusta estos valores para que el número especificado de filas y columnas ingresen en la designación de una ventana. Como opciones adicionales cuenta con las siguientes:
Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Rutinas Lisp para interacción con Excel |
||||
Exportar puntos de Coordenadas a un archivo CSV Esta rutina generada con Autolisp, te permite exportar puntos de coordenadas hacia un archivo CSV de Microsoft Excel. Los objetos desde los cuales puedes exportar estas coordenadas son puntos, textos y bloques, basta con seleccionarlos e indicar un archivo de destino de las coordenadas. Se deberá de tener especial cuidado en el caso de que los objetos sean textos, ya que el punto de inserción que se toma en cuenta al momento de exportar las coordenadas, depende de la justificación que estos textos tengan, si estás seguro de que la justificación de los textos es la correcta no hay problema en la exportación de los puntos. Lo recomendable es seleccionar objetos que tengan un solo punto de inserción, como bloques o puntos de AutoCAD, de esa manera es más seguro que las coordenadas exportadas sean las que corresponden. Como mencionamos inicialmente, esta rutina exporta coordenadas a partir de puntos, textos (o también Mtext) y bloques, pero se puede complementar el código fuente para que tome en cuenta otras entidades como por ejemplo: círculos, puntos iniciales de líneas, entre otros objetos que en su base de datos tengan el código 10. Las coordenadas exportadas tienen el formato P,N,E,C (Punto, Norte=Y, Este=X, Cota=Z) y como se exporta a un archivo CSV (separado por comas), al abrir el archivo cada valor ocupará su celda independiente. Para utilizar la rutina debes de hacer lo siguiente:
RUTINA QUE EXPORTA PUNTOS DE COORDENADAS DE LÍNEAS A UN ARCHIVO CSV Esta rutina generada Autolisp para AutoCAD, te permite exportar los puntos de las coordenadas de los extremos de las líneas seleccionadas hacia un archivo CSV de Microsoft Excel Las coordenadas exportadas corresponden al punto inicial y final de las líneas, por lo que en el caso de las líneas estén unidas por el mismo punto, el lisp leerá 2 veces la misma coordenada. En este caso, si se desea se deberá de considerar la opción de ordenar las coordenadas y eliminar las que se encuentren duplicadas, las coordenadas exportadas tienen el formato P,N,E,C (Punto, Norte=Y, Este=X, Cota=Z) y como se exporta a un archivo CSV (separado por comas), al abrir el archivo cada valor ocupará su celda independiente y en forma ordenada. Para utilizar la rutina debes de hacer lo siguiente:
RUTINA LISP PARA IMPORTAR PUNTOS DE COORDENADAS DESDE MICROSOFT Esta rutina generada para usar en AutoCAD y sus aplicaciones verticales, te permitirá insertar las coordenadas de puntos desde un archivo de Microsoft Excel, con esta rutina no es necesario especificar detalles relacionados al archivo a importar, ya que mediante su interface tendrás al alcance las opciones necesarias para importar los puntos según como lo desees. Para importar los puntos, se considera necesario que el archivo de puntos a importar tenga extensión XLS (de versiones anteriores a office 2007) o XLSX (versión 2007 o posterior) y que en el archivo las coordenadas estén formateadas con el formato: P,N,E,C,D, (Punto, Norte, Este, Cota, Descripción), así como lo muestra la siguiente imagen: Nota importante: Debes de tener cuidado de cerrar el archivo de coordenadas antes de ejecutar el comando, de lo contrario la rutina tendrá inconvenientes para accesar a el. (Esta nota fue superada). Construcgeek iCe te permite elegir entre 3 tipos diferentes de maneras de insertar un objeto punto en la coordenada leída.
Además puedes controlar el número de decimales del texto de la cota insertada, la escala que tendrá la etiqueta, la rotación de la misma cuyo punto base es la ubicación del punto importado y la separación de la etiqueta con respecto al punto, estas opciones las puedes almacenar con un nombre, para que así puedas llamarlas de acuerdo a los puntos que vas a importar. Todas estas opciones te permitirán importar tus puntos desde un archivo de Excel de una manera rápida y con una apariencia clara, vale la pena aclarar que la forma como se ven los textos de la etiqueta del punto no depende de la rutina, sino del estilo de texto actual de tu dibujo y de la capa actual. Hace algún tiempo publiqué en Construcgeek, una rutina desarrollada por un usuario, que permitía importar las coordenadas pero desde un archivo de texto pero con muchas limitaciones, esta vez mediante este nuevo comando tendremos más opciones de controlar la inserción de puntos de coordenadas. En el archivo adjunto también se suministra un bloque de ejemplo que puedes importar, aparte de una hoja de cálculo con el formato correcto que necesita el comando para importar las coordenadas sin ningún inconveniente. Para utilizar la rutina debes de hacer lo siguiente:
|
||||
Puedes obtener estas rutinas con el autor. | ||||
Importar áreas desde un archivo csv a secciones tranversales Este comando te permite importar áreas (por defecto de corte y relleno) a secciones transversales de terreno, las áreas a importar deben de estar en un archivo con formato CSV (delimitado por comas), según el archivo de ejemplo adjunto. Este comando lee la progresiva ubicada en la primera columna del archivo csv y busca el texto con esa misma progresiva en el archivo de dibujo, insertando su correspondiente área de corte y relleno en la parte superior derecha de la sección transversal. Los sufijos insertados del área de corte y relleno por defecto son: «A.C.=» y «A.R.=», pudiendo ser manipulados mediante código, así como también el número de los decimales y la altura del texto insertado. Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Listar las rutas de las imágenes insertadas en el dibujo Si trabajas con imágenes, a menudo te habrá sido necesario generar un listado de las mismas, incluida su ruta de ubicación, con esta rutina podrás generar un listado con las rutas de todas las imágenes insertadas en el dibujo actual. Esta rutina no necesita del ingreso de alguna opción, basta con llamar al comando e inmediatamente se mostrará en la línea de comandos de AutoCAD, la lista con las rutas de las imágenes insertadas. Para utilizar la rutina debes de hacer lo siguiente:
|
||||
Reemplaza un texto con la ruta del archivo actual Esta rutina desarrollada en Autolisp, nos permite actualizar un texto cualquiera, con la ruta y nombre del archivo actual. Se trata de una buena ayuda al momento de actualizar los membretes de los planos con esta información. Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Reemplaza un texto seleccionado por la fecha actual con diferentes formatos de salida Con ayuda de esta buena rutina podremos reemplazar un texto cualquiera, con el valor de la fecha actual. El comando brinda 8 diferentes tipos de formatos para esta fecha, que van desde un tipo de fecha simple, hasta un tipo de fecha con formato largo, donde se obtiene mediante programación con AutoLisp el nombre del día de la fecha actual. Se pueden seleccionar entidades de tipo Text y Mtext, estos serán reemplazados automáticamente por la fecha actual con el formato seleccionado, los formatos de fecha disponibles son los que se muestran en la ilustración, cada uno está identificado por su número, que servirá para elegir el formato cuando se solicite en la línea de comandos de AutoCAD. Para utilizar esta rutina se debe de hacer lo siguiente:
RUTINA LISP QUE INVIERTE O TRANSPONE LOS TEXTOS SELECCIONADOS En ocasiones deseamos invertir los valores de dos textos, por ejemplo, que el texto con el numero 1346 pase a ser 1111 y viceversa, esta rutina nos permite transponer los valores de los textos que se seleccionen. Para lograr este resultado, basta con indicar los dos textos, uno después del otro. Haz lo siguiente para utilizar esta rutina.
RUTINA QUE REEMPLAZA EL CONTENIDO DE UN TEXTO POR LA COTA DEL PUNTO DE INDICADO Este nuevo comando obtiene el valor de la cota (coordenada Y) de un punto indicado y lo establece como contenido del texto seleccionado. Esta rutina es de mucha utilidad por ejemplo cuando se trabaja con perfiles de terreno y deseamos obtener la cota de un vértice y establecerla en uno de los textos que indican la cota de terreno, también se puede utilizar cuando se trabaja con secciones transversales de terreno y se desea obtener el valor de la cota en el eje de la sección y establecerla en un texto que indicará ese valor de cota. En este comando se puede indicar que escala tendrá la cota a establecer en el texto, no se trata de la altura del texto seleccionado, sino de la escala que tiene el perfil o la sección a indicar, si tu perfil por ejemplo esta escalado 10 veces en el vertical, deberás de establecer como escala a de la cota en el comando NC de 10, para que de esa manera el comando, haga la división correspondiente y establezca el valor adecuado en el texto seleccionado. Para utilizar esta rutina se debe de hacer lo siguiente:
RUTINA QUE REEMPLAZA TEXTOS POR LA PROGRESIVA Y OTRO CON LA COTA INDICADA AGREGANDO UN PREFIJO O SUFIJO Este comando permite obtener los valores de progresiva y cota (valores X e Y) de un punto indicado y los establece en los 2 textos seleccionados. Además a cada texto le agrega un prefijo o un sufijo, por ejemplo si se indica un prefijo para la cota (coordenada Y) igual a «CT=», cuando se seleccione el texto de cota, el comando actualizará el texto seleccionado por el valor de la cota obtenida, mas el prefijo indicado, por ejemplo «CT=236.42», cuando se seleccione el texto de la progresiva, este se actualizará con el valor de la coordenada X obtenida mas el sufijo «0+», por ejemplo «0+10.0». Este comando viene con los prefijos para la progresiva y cotas ya definidos (“0+” y “CT=”) y solo pueden ser cambiados modificando el código fuente, además este comando se puede modificar si se desea, para que se agregue un prefijo y un sufijo al mismo tiempo en los textos. Para utilizar esta rutina se debe de hacer lo siguiente:
Los valores de los textos se actualizarán con los datos obtenidos RUTINA AUTOLISP PARA ESTABLECER UNA COTA ESPECÍFICA EN UN PUNTO INDICADO Se trata de una rutina hecha en Autolisp que nos permite establecer un valor de cota (coordenada Y) en un punto indicado. Este comando solicita datos (puntos y valores) y realiza operaciones para obtener el valor final que se establecerá en la coordenada Y del punto indicado (cambia el valor de la coordenada del UCS (Sistema de Coordenadas Universal) en un punto indicado por el valor ingresado). Para utilizar esta rutina se debe de hacer lo siguiente:
Para verificar que se ha establecido la cota ingresada en el punto indicado ejecute el comando ID, indique el punto, y observará en la linea de comandos que el valor de la coordenada Y ahora esta con el valor ingresado.
AREASX: RUTINA LISP PARA HALLAR ÁREAS POR CONTORNOS Este comando te permite hallar áreas indicando un punto interno entre objetos o mediante la selección de contornos cerrados, este comando te muestra el área obtenida o de lo contrario la establece en un texto seleccionado. El comando Ax dispone de las siguientes opciones: Solicitudes iníciales: Aquí se deberá de indicar los puntos internos de los cuales se obtendrá el área, las demas opciones se describen a continuación: Seleccionar objeto: En lugar de indicar puntos internos para hallar aéreas, mediante esta opción podrás seleccionar polígonos cerrados para hallar su área. Opciones: Esta opción te carga el cuadro de diálogo Opciones del comando, el cuadro de diálogo es el siguiente: A continuación se describe cada opción: Número de decimales: El número de decimales que tendrá el área hallada (2 por defecto). Conversiones de areas: Esta opción permite realizar operaciones con los valores de las areas halladas, cada area se suma, resta, multiplica o divide por un factor que se debe de especificar en la parte inferior de esta opción. Esta opción permite personalizar las areas cuando el dibujo se encuentra en diferentes escalas o en otras unidades de dibujo. Aplicar sombreados: Esta opción permite que cada área indicada sea sombreada para tener una mejor visión del área que se está hallando, permitiendo de esa manera verificar si es correcta (Activada por defecto). Escala (del sombreado): Aquí se indica el factor de escala del sombreado, este factor es variable de acuerdo al tipo de sombreado seleccionado. Color (del sombreado): El color que tendrá el sombreado aplicado en las áreas indicadas. Terminando el sombreado: Las opciones a continuación se aplican una vez que se culmina la aplicación del comando. Retener los contornos: Si está activada los contornos generados no son eliminados. Retener el sombreado: Si está activada los sombreados generados no son eliminados. Solicitudes finales: Insertar texto área: Esta opción permite insertar un texto con el área obtenida en lugar de seleccionar uno para reemplazarlo. El texto con el área hallada tiene como prefijo por defecto: » Area =», este prefijo se puede modificar en el código del programa. Cambiar texto: Esta opción se activa cuando se presiona la tecla Enter o se presiona el botón derecho del mouse, lo que solicitará que se seleccione un texto, por ejemplo si se tiene un texto con el siguiente contenido: «AC=0.00m2» y mediante el comando se ha hallado un área de 3.25, entonces el comando reemplazará al texto actualizándolo por «AC=3.25m2». Como se puede ver, AX, reemplaza solo los valores numéricos del texto a reemplazar, por lo que puedes tener textos de aéreas con diferentes prefijos, por ejemplo: «AR=0.00m2», «AM=0.00m2», «Area de corte=0.00m2», «Mi área=0.00m2», etc. Contornos válido e inválidos: Contorno válido Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Selección de objetos |
||||
Selecciona todas las entidades de la capa del objeto seleccionado Esta pequeña rutina realiza lo mismo que la anterior, la diferencia consiste en que aquí no se ingresa el nombre de la capa para seleccionar los objetos, sino que se selecciona una entidad de la cual se desea obtener el nombre de la capa. Así como en la rutina anterior, la selección de entidades no se hace visible, pero existe como conjunto de entidades seleccionadas, por lo que se deberá de indicar el modo de selección «Previous» para seleccionar los objetos. Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Eliminar objetos internos o externos de una polilinea seleccionada Mediante esta rutina podrás borrar los objetos que se encuentren en el área interior o exterior de una polilinea seleccionada, si se indica la opción recortar, los objetos que sean intersectados por la polilinea serán recortados por el lado que se indique. Cuando se trata de eliminar objetos fuera de la polilinea, se deberá de tener especial cuidado ya que este comando elimina todos los objetos que se encuentren fuera de la polilinea. La polilinea a seleccionar deberá de ser una polilinea cerrada, de no serlo la rutina une el último punto del segmento con el primero, cerrando así mediante una línea imaginaria la polilinea y eliminando todo lo que este dentro o fuera de esa línea. La opción recortar como es lógico, solo funciona con objetos que pueden ser recortados de una forma manual, como por ejemplo, líneas, círculos, arcos, etc, los bloques y otros objetos compuestos no ingresan dentro de estos objetos que pueden ser recortados. Con el lisp se adjunta un archivo de ejemplo para que se hagan las pruebas correspondientes antes de usar el comando en archivos finales. Para utilizar la rutina debes de hacer lo siguiente:
|
||||
Permite seleccionar todas las entidades de la capa ingresada Se trata de una rutina lisp que te permite seleccionar todas entidades que se encuentren en la capa indicada, no hace distinción de color o de otra propiedad que pueda tener la entidad. Esta rutina no hace distinción de mayúsculas o minúsculas a la hora de ingresar el nombre de la capa, por lo que se puede ingresar de cualquier forma, basta con que este bien escrito. Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Copiar el contenido de un texto a otro texto Se trata de una rutina hecha con el lenguaje de programación autolisp, nos permite copiar el contenido de un texto seleccionado, y establecer ese valor en un segundo texto a seleccionar. Para utilizar ésta rutina, se debe de hacer lo siguiente:
Como se puede observar, la rutina es sencilla, pero es de mucha ayuda cuando se trata de edición de textos. Cabe resaltar que el lenguaje utilizado en esta rutina es netamente AutoLisp, en una nueva entrada publicaremos el mismo comando pero escrito en VisualLisp, en el cual observaremos que el tamaño de la estructura se reduce aun más. |
||||
Cambiar el número decimales de un texto sin perder el valor original Esta rutina lisp te permite cambiar el número de decimales de los textos seleccionados sin perder el número de decimales original, con eso podrás mostrar un número por ejemplo con 2 decimales, pero internamente tendrá una nueva propiedad con su valor definido originalmente. Esta nueva propiedad solo puede ser accesada mediante este comando, ya que no se lista mediante el cuadro de diálogo Propiedades. El lisp te permite cambiar el número de decimales u obtener el número original de un texto formateado anteriormente con esta rutina, así sabrás cuantos decimales tuvo originalmente si deseas restablecer los valores originales de los mismos. Es de resaltar que estos valores originales permanecen a pesar de que el archivo o AutoCAD hayan sido cerrados, por lo que tendrás la seguridad que los datos originales de tus valores siempre estarán ahí, incluso a pesar de restablecer los valores originales a los textos. Este nuevo comando se podría comparar a la acción de cambiar decimales de Excel, pero la única observación es que esta propiedad es interna y como dijimos anteriormente la ventana Propiedades no está preparada para mostrar data extendida de entidades. Se debe de tener especial consideración en que los textos seleccionados sean textos numéricos, es decir sólo contengan números, ya que de lo contrario su valor será convertido a «0.00«. Para utilizar la rutina debes de hacer lo siguiente:
|
||||
Alinear varios textos tomando como base el primero seleccionado Rutina desarrollada con AutoLisp que nos permite alinear varios textos tomando como base el primero seleccionado. el programa permite alinear los textos en forma vertical (columnas) o en forma horizontal (filas), para ello solo se deberá de seleccionar el primero, que servirá como base para alinear los demás textos. Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Copiar la altura de un texto y establecerla a otros textos seleccionados Esta rutina creada en AutoLisp copia la altura de un texto seleccionado y la establece en los textos que se seleccionan después, cambiando la altura que tenían. Por ejemplo, si tienes 3 textos, el primero tiene una altura de 3 y los dos siguientes tienen una altura de 6 y deseas que los dos segundos tengan tambien una altura de 3 en lugar de 6, basta con seleccionar primero el texto cuya altura tenga 3 y luego los textos que tienen altura 6. Haz lo siguiente para utilizar esta rutina.
|
||||
Puedes obtener estas rutinas con el autor. | ||||
Seleccionar un texto y establecer el valor obtenido en el atributo de un bloque Este programa hecho en Autolisp y Visual Lisp, permite seleccionar un texto, copiar el valor del contenido y establecerlo (actualizar) en un atributo que forma parte de un bloque. Es decir si deseamos actualizar un atributo de un bloque cualquiera, por un texto existente, basta con seleccionar primero el texto y luego el atributo y este se actualizará de acuerdo al valor del texto seleccionado. Para utilizar esta rutina debes de hacer lo siguiente:
Como podemos observar, este comando nos es bien útil si deseamos actualizar un valor de un atributo a partir de un texto en particular. |
||||
Cambia la altura de textos de acuerdo a un porcentaje ingresado Esta rutina generada en AutoLisp nos permite modificar las alturas de los textos seleccionados cambiándolas de acuerdo a un porcentaje ingresado. Por ejemplo si se tiene dos textos, uno con altura 0.5 y el otro con una altura de 1.00 y se ingresa al comando un porcentaje de 1.5, las alturas de los textos cambiaran por las siguientes: 0.75 y 1.5 respectivamente. Esta rutina es muy útil cuando se requiere hacer cambios en las alturas de muchos textos con diferentes alturas. Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
RUTINA LISP PARA ELIMINAR EL CONTENIDO DE UN ATRIBUTO DE UN BLOQUE Cuando se tiene un bloque con muchos atributos, resulta muy tedioso tener que eliminar el contenido de muchos de ellos, generalmente se debe de hacer doble clic en el atributo seleccionado, esperar a que cargue el cuadro de diálogo y proceder a borrar el contenido. ara evitar este tedioso trabajo, esta pequeña rutina te aliviará un poco el tiempo que empleabas en realizar la tarea descrita líneas arriba. Con este comando sólo deberás de seleccionar los atributos que deseas borrar el contenido. Deberás de verificar que los textos que estén en el bloque se trate de atributos (a veces se confunden entre ellos), para que la rutina funcione correctamente. Ojo, que este comando sólo borra el contenido del atributo, mas no el atributo en si del bloque. Para utilizar la rutina debes de hacer lo siguiente:
RUTINA EN VISUAL LISP QUE COPIA EL CONTENIDO DE UN TEXTO Y LO ESTABLECE A TODOS LOS TEXTOS SELECCIONADOS Hace algún tiempo compartí con ustedes una rutina que copiaba el valor de un texto y lo establecía a otro texto seleccionado, esta vez esta rutina te permitirá obtener el valor de un texto seleccionado y lo establecerá a varios textos que selecciones. La utilización de este nuevo comando es muy sencilla, basta con que selecciones el texto desde donde deseas copiar el valor y luego deberás de seleccionar todos los textos que deseas reemplazar por este nuevo valor. Para utilizar esta rutina debes de hacer lo siguiente:
RUTINA EN AUTOLISP QUE AUMENTA O REDUCE PROGRESIVAMENTE LA ALTURA DE LOS TEXTOS Se trata de un lisp que contiene dos comandos: Aumentar y Reducir, estos comandos permiten modificar la altura del texto seleccionado, aumentándolo o reduciéndolo de tamaño según el comando elegido. El cambio de tamaño se efectúa por cada clic que se haga en el texto y se realiza de acuerdo a un factor indicado en el código fuente del lisp, este factor es de 1.2. La altura inicial del texto se multiplica por 1.2 cada vez que se hace clic en el o se divide entre 1.2, dependiendo de qué comando se ha elegido. Para una mayor información de que altura es la que va teniendo el texto cada vez que se hace clic en él, la rutina muestra en la línea de comandos la altura resultante por cada cambio en la altura efectuada en el texto. Este comando es muy útil cuando se quiere aumentar o reducir alturas de los textos en proporción, sin necesidad de tener una altura final especificada, solo visual. Para utilizar esta rutina debes de hacer lo siguiente:
RUTINA LISP QUE OBTIENE LAS MEDIDAS DE LAS DIMENSIONES SELECCIONADAS La siguiente rutina te permite obtener las medidas de las dimensiones (acotados), los valores obtenidos son mostrados en pantalla, los cuales puedes copiar y pegar por ejemplo en Microsoft Excel y cada valor se pegará en una fila independiente. Para utilizar esta rutina debes de hacer lo siguiente:
RUTINA EN VISUALLISP QUE INCREMENTA EL VALOR DE LOS NÚMEROS DE ACUERDO A UN FACTOR Rutina en VisualLisp permite incrementar el valor de los números de los textos seleccionados. Esta rutina generada en VisualLisp permite incrementar el valor de los números de los textos seleccionados (uno por uno) de acuerdo a un factor de incremento indicado. Si el valor indicado es un número negativo los valores posteriores serán un decremento del valor inicial. Por ejemplo, si como valor inicial está el número 1, y se ingresa un valor de incremento de 1 unidad, los números posteriores seleccionados se irán incrementando en una unidad, el siguiente será 2, el siguiente 3, etc. Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Lisp para topografía y 3D |
||||
Convertir entidades 3DFace a Sólidos ACIS Hace algún tiempo llegó a mis manos esta interesante rutina lisp y aunque últimamente no la he usado, cada vez que la he necesitado me ha ayudado enormemente con cálculos de volumen, esto como complemento en los momentos que civil 3D no logra darme los resultados que necesito. Se trata de una rutina en la que seleccionando objetos 3Dface, los extrusiona y los une convirtiéndolos en un solo objeto 3D Solid, su uso es sencillo y solo basta con seleccionar los objetos y la rutina hará todo el trabajo. Para una mayor apreciación de los cambios que efectúa la rutina en los objetos, es necesario tener una vista 3D, de lo contrario en vista de planta no se observarán las alturas creadas en el 3D Solid, debido a que el sólido es creado por la proyección de cada cara seleccionada, verticalmente «hacia abajo» del actual eje z, a un plano y a una distancia especificada por el usuario. Para asegurar que todas las partes de la malla se generan como los sólidos, esta distancia no puede ser cero, pero el sólido puede ser cortado más adelante si fuera necesario hasta el espesor que sea necesario, con operaciones booleanas u operaciones de edición de sólidos. El sólido resultante se crea en la capa actual. Si al final de la unión de los pequeños sólidos, la operación se detiene o se cuelga debido a limitaciones de memoria, puedes intentar unirlos de forma manual. Notas a considerar: Si caras adyacentes no tienen idénticas coordenadas, habrá muy pequeñas lagunas o solapamientos entre los sólidos derivados de las mismas, lo que puede ser de causa de que AutoCAD no pueda ser capaz de unir los sólidos, mostrando los siguientes mensajes:
Para utilizar la rutina debes de hacer lo siguiente:
|
||||
Inserta cotas en curvas de nivel a partir de su elevación En varias ocasiones te habrás encontrado con que tienes curvas de nivel en un archivo, pero estas no tienen su cota, mediante esta rutina, podrás insertar cotas en la curva de nivel topográfica que desees. Las cotas que se insertarán son bloques con atributos, estos bloques están creados en un dibujo en milímetros. Para que puedas usar sin problemas este lisp, deberás mediante comando «UNITS» (Unidades) definir las unidades del contenido a insertar en «Millimeters» (Milímetros). Vale la pena poner en claro que para que esta rutina inserte la cota correcta a las curvas de nivel, estas deberán de tener una elevación (coordenada z>0), ya que la cota se obtiene a partir del punto indicado en una curva de nivel, si las curvas de nivel tienen elevación 0 (coordenada z=0), es decir no tienen elevación, la rutina insertará un texto con ese valor. La escala solicitada por la rutina se refiere a la escala en la que será ploteado el dibujo, es una valor de referencial de tamaño del texto de la cota a insertar, puedes ir probando incrementando o dismuyendo este valor hasta que la cota se inserte con el tamaño de texto que deseas. Esta rutina tiene 2 archivos adjuntos: EL_TAG.dwg y EL_TAG2.dwg, se trata de los bloques con atributos explicados anteriormente, estos archivos se podrán copiar en cualquier lugar, aunque es recomendable que se encuentren en la misma carpeta que la de la rutina. Para que AutoCAD pueda cargar estos archivos se debe de definir la ruta de la ubicación de estos en el cuadro de diálogo Opciones->Support Files Search Path. Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Dibujar las líneas de los taludes de corte o relleno Esta rutina dibuja las línea de los taludes de corte o relleno, éstas líneas de talud son necesarias para indicar ó representar los desniveles entre las plataformas. Para poder generar las línea de talud con ésta rutina, se deberán de ingresar 6 datos que permitirá que las línea de talud se generen de acuerdo a lo esperado. A continuación describimos los datos solicitados:
Puedes observar los siguientes gráficos para una mayor compresión de las definiciones:
Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Dibujar una línea con un talud indicado Esta rutina te permite dibujar una línea con el talud que le indiques, basta con indicar el punto de inserción de la línea y el talud que tendrá. El talud se indica en un valor con respecto a 1, por ejemplo: si se desea dibujar una línea con un talud de 2:1, sólo se deberá de indicar como talud para la línea el número 2, si el talud que se desea obtener es 1:1.333, se deberá de ingresar 0.75. Para una mayor aclaración, si se desea obtener taludes con el valor de 1 primero (1:x), se deberá de dividir el número 1 entre el talud complementario (x). Para utilizar esta rutina se debe de hacer lo siguiente:
|
||||
Dibujar una línea con una pendiente indicada Con esta sencilla rutina podrás dibujar una linea con la pendiente que indiques, para ello solo basta con indicar el punto de inserción de la línea y la pendiente que tendrá. La linea se genera con una longitud horizontal de 10 unidades y una longitud vertical del valor de la pendiente indicada entre 10. Para utilizar esta rutina se debe de hacer lo siguiente:
|
||||
Calcular las áreas de corte y relleno de secciones transversales Con esta rutina lisp podrás hallar las áreas de corte y relleno a partir de una sección transversal que tenga una línea de Terreno Natural y una línea de rasante (sección de la carretera final). Con esta rutina lisp podrás hallar las áreas de corte y relleno a partir de una sección transversal que tenga una línea de Terreno Natural y una línea de rasante (sección de la carretera final). Para que este lisp halle las áreas, se debe de realizar la selección de las polilineas del terreno y rasante y el comando solicitará un punto para insertar los textos de las áreas halladas correspondientes. Para utilizar esta rutina debes de hacer lo siguiente:
En el archivo .rar se adjunta también un archivo CAD de ejemplo para una mayor compresión de la rutina. |
||||
Puedes obtener estas rutinas con el autor. | ||||
Insertar las pendientes de un perfil longitudinal Esta rutina te permite insertar en la guitarra las pendientes de un perfil longitudinal (polilinea o línea), para eso sólo basta con seleccionar el perfil (la polilinea) e indicar un punto que corresponderá a la ubicación vertical de los textos que indican las pendientes. Si se trata de una línea el comando calcula solo los puntos extremos, hallando de esa manera la pendiente, en el caso de que se trate de una polilinea, la rutina obtiene cada vértice inicial y final y calcula la pendiente entre ellos de todos los segmentos de la polilinea. El texto que indica la pendiente obtenida es del tipo por ejemplo: «P=1.11% en 10.49 m» y como ya saben este formato se puede modificar para adaptar a la manera de trabajo de cada uno de ustedes. Al igual que en la rutina anterior, el estilo de texto actual no debe de contemplar una altura, de tenerla se generará un error y las pendientes no será insertadas. La escala que se indica al comienzo de la rutina, sólo es para los tamaños de los textos y no influye en las medidas obtenidas para procesar las pendientes. Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Insertar una marca en los vértices de una polilinea Esta rutina lisp es una adecuación de la anterior y te permite insertar una marca en todos los vértices de la polilinea que selecciones, para ello solo debes seleccionarla. La marca insertada es un archivo de dibujo (bloque) generado para una escala en particular, pero es totalmente personalizable, se puede editar como cualquier dibujo, solo se debe de respetar el punto centro del mismo (en este caso el centro del círculo del bloque). En el código fuente del archivo se puede optar por insertar un circulo en lugar del bloque, para eso solo se debe de quitar los comentarios de la línea que contiene este código y comentar la línea que inserta el bloque. Para utilizar esta rutina debes de hacer lo siguiente:
|
||||
Obtener el talud de una línea seleccionada Este programa desarrollado en AutoLisp, permite obtener el valor del talud de una línea seleccionada. Se debe de tener en cuenta que este comando sólo funciona con líneas, si se tiene una polilínea se debe de explotar o generar una línea encima de la polilínea. Para utilizar esta rutina se debe de hacer lo siguiente:
|
||||
PACK DE 3 RUTINAS PARA MUROS DE CONTENCIÓN – PARTE 3: CREACIÓN DEL PERFIL A PARTIR DE LAS SECCIONES DE UN MURO Mediante esta rutina podrás generar el perfil (elevación) de un muro de contención, este perfil se podrá realizar a partir de los datos de las secciones transversales de los muros, estos datos son: Progresiva, Cota de Corona y Cota de Cimentación. El dato de escala que solicita el comando, no se refiere a la escala vertical del perfil (el perfil se genera con escala vertical igual a la horizontal) sino al tamaño de escala para los textos del perfil (cotas y otros datos). Para generar el perfil basta con seleccionar primero la progresiva de la sección, luego la cota de la corona y por último la cota del fondo de la cimentación. Deberás de tener especial cuidado en la selección de los datos ya que si no seleccionas un texto y das un clic en la pantalla, el comando lo tomará como que has finalizado la selección de datos para generar el perfil. Junto con la rutina se suministra un archivo CAD, con secciones transversales de muro, como ejemplo para poner en practica la rutina lisp. Para utilizar esta rutina debes de hacer lo siguiente:
PACK DE 3 RUTINAS PARA MUROS DE CONTENCIÓN – PARTE 2: DIMENSIONAMIENTO (ACOTADO) DE LA SECCIÓN DE UN MURO Esta rutina te permite dimensionar (acotar) una sección de muro generada con la rutina publicada anteriormente (ya que posee los mismos criterios de diseño), el resultado sería como la siguiente imagen (las medidas varían de acuerdo a las dimensiones del muro). Esta rutina pregunta por la escala para los acotados que se generarán, esta escala sólo se refiere a la separación entre las líneas de los acotados, los tamaños y forma de los acotamientos dependen exclusivamente del actual estilo de dimensión y este debe de ser generado previamente por el usuario para la escala que se trabaja. Para generar los acotamientos se debe de proceder igual como en la rutina anterior para la generación del muro, se indica un punto en el hombro de la rasante de la sección de la carretera, en el lado donde se necesite el muro y se indica la altura mediante la opción de indicar un punto en el fondo de la cimentación del muro. Vale la pena aclarar que esta rutina solo acota una seccion de muro generada con la rutina del post anterior, ya que utiliza los mismos criterios de dibujo de la sección de muro, se puede modificar en el código las operaciones que calculan los puntos en el caso de que se desee aplicar para otro tipo de muro. Para utilizar esta rutina debes de hacer lo siguiente:
PACK DE 3 RUTINAS PARA MUROS DE CONTENCIÓN – PARTE 1: CREACIÓN DE LA SECCIÓN DE UN MURO Esta rutina es la primera de 3 que permiten generar muros de contención del tipo de gravedad, hace algún tiempo también compartimos con ustedes una rutina que generaba un muro de contención, esta vez la rutina genera un muro con diferente diseño (medidas). Es de recordar que las obras de arte de una carretera (muros, alcantarillas, etc), no siempre son de igual diseño para cada obra, este diseño está en función de muchos factores de la zona misma en la que las construye. Esta rutina te permite generar un muro de contención con los siguientes criterios de diseño: Para generarlo se debe de indicar el hombro de la rasante de la sección de la carretera, en el lado donde se necesite el muro, con el lisp se puede generar el muro en cualquier lado, para eso solo basta con indicar el sentido (izquierda o derecha). Con respecto a la altura, esta se define mediante 2 opciones, la primera es una altura (H) entera definida y la segunda opción es definirla mediante una cota del fondo de la cimentación del muro, esta cota se puede indicar mediante un punto en pantalla, el programa se encarga de calcular la altura y todas las demás medidas a partir de ella. EL programa está preparado para asumir los dos criterios de altura de muro: el primer criterio es un muro con altura constante, en donde la base de la cimentación no es horizontal y el segundo criterio (el más usado) es que la altura del muro sea variable, en donde la base de la cimentación es horizontal y no sigue las pendientes de la carretera. La forma de utilizar este lisp dependerá de cada usuario, y para ello lo más conveniente será que primero pueda generar planos de muros sin la ayuda de ninguna rutina, de esta manera será mucho mas fácil entender la correcta utilización de este lisp. Para utilizar esta rutina debes de hacer lo siguiente:
RUTINA AUTOLISP PARA DIBUJAR UN MURO DE CONTENCIÓN Esta rutina lisp permite dibujar un muro de contención del tipo de gravedad para carreteras, las medidas con las que se dibuja este muro en este lisp son siempre las mismas (son constantes), la única medida que cambia es la altura del muro. Los puntos con los cuales se genera este muro son generados a partir de las medidas de un diseño de muro en particular, si se desea que con este lisp se genere muros con medidas personalizadas, se deben de cambiar las medidas que están escritas dentro del programa. A continuación pueden observar el siguiente gráfico, que contiene los puntos con los cuales se genera el muro: Para utilizar esta rutina debes de hacer lo siguiente:
RUTINA LISP PARA GENERAR LAS PROGRESIVAS DE UN ALINEAMIENTO Esta útil rutina llego a mis manos hace algún tiempo y para aquellas personas que deseen generar alineamientos sencillos sin la necesidad posterior de generar secciones transversales o perfiles longitudinales del mismo, podrán aprovechar esta rutina. La rutina posee una interface de cuadros de diálogo que permiten personalizar el formato final de las progresivas insertadas en el eje. Para utilizar la rutina se deberá de contar con una polilinea (alineamiento) y seguir los siguientes pasos:
RUTINA PARA GENERAR UN PERFIL LONGITUDINAL A PARTIR DE POLILINEAS DE TERRENO Y RASANTE Esta es una de las rutinas más completas para generar el formato de un perfil longitudinal. Con sólo seleccionar dos polilineas 2D (el terreno y rasante), la rutina genera el formato de un perfil con todos los datos que se necesitan mostrar. Para que la generación de este perfil sea exitosa, las polilineas a seleccionar deberán de estar en lo posible en 2D, de lo contrario puede ocurrir un error en su funcionamiento. Para utilizar esta rutina debes de hacer lo siguiente:
RUTINA EN VISUALLISP PARA SUMAR LAS MEDIDAS DE ARCOS DEL DIBUJO Esta rutina te permite sumar las distancias de todos los arcos del dibujo o de solo aquellos que selecciones, mostrándote los resultados de la suma en la línea de comandos. Esta rutina te permite sumar las distancias de todos los arcos del dibujo o de solo aquellos que selecciones, mostrándote los resultados de la suma en la línea de comandos. Para utilizar esta rutina se debe de hacer lo siguiente:
Puedes obtener estas rutinas con el autor. OTROSRUTINA LISP PARA IMPORTAR LOS UCSS GUARDADOS EN OTROS ARCHIVOS Esta interesante rutina creada con AutoLisp y Visual Basic para Aplicaciones (vba), permite importar los UCS guardados con un nombre desde cualquier archivo secundario a nuestro dibujo. Esta herramienta es bien útil si se trabaja con planos en los que se manejan muchos UCS, generalmente creamos los UCS en un primer archivo y tenemos que hacer lo mismo para los demás archivos, con esta rutina, basta con solo crearlos en el primero y podremos importarlos luego a cualquier otro archivo. La rutina se comporta de manera parecida a la herramienta Designcenter, salvo que esta no tiene la opción de importar UCS de otros archivos. En el caso de esta rutina aunque no permite arrastrar y soltar, los resultados son los esperados. Para utilizar la rutina debes de hacer lo siguiente:
RUTINA LISP QUE ELIMINA EL VÉRTICE INDICADO DE UNA POLILINEA Te habrá sucedido que en AutoCAD tienes una polilinea y deseas eliminar uno de sus vértices y para poder lograrlo tienes que aplicar más de dos comandos. Con esta rutina sólo bastará con que indiques que vértice de la polinea deseas eliminar y asunto arreglado. Para que la rutina funcione correctamente, al momento de indicar el punto, este deberá de ser sobre el vértice a eliminar y no un punto cercano, para eso deberás de activar los modos de referencia a entidades, como Endpoint o Intersection. Para utilizar la rutina debes de hacer lo siguiente:
RUTINA QUE EXPORTA LOS PUNTOS DE COORDENADAS DE LOS VÉRTICES DE OBJETOS 3DFACE Esta rutina escrita en Autolisp, es parecida a la anterior, la diferencia está en que esta vez, exporta las coordenadas de los vértices de los objetos 3Dface de AutoCAD, estas coordenadas son almacenadas en un archivo CSV de Microsoft Excel, que se indique para ello. La exportación de puntos de los vértices te puede ayudar de sobremanera en el caso que tengas una triangulación con 3D face y desees obtener sus coordenadas para recrear tu archivo de puntos de coordenadas. Las consideraciones también son las mismas que de la rutina anterior, en el caso de que haya 3Dface unidos por los mismos vértices, también si se desea, se deberá de considerar la opción de ordenar las coordenadas y eliminar las que se encuentren duplicadas. Las coordenadas exportadas tienen el formato P,N,E,C (Punto, Norte=Y, Este=X, Cota=Z) y como se exporta a un archivo CSV (separado por comas), al abrir el archivo cada valor ocupará su celda independiente y en forma ordenada. Para utilizar la rutina debes de hacer lo siguiente:
RUTINA LISP PARA COPIAR ENTIDADES DE UN BLOQUE O REFERENCIA EXTERNA En algunas ocasiones es necesario copiar entidades, pero cuando estas se encuentran dentro de un bloque, lo que hacemos normalmente es explotar ese bloque o quizá utilizar el editor de bloques, para así poder tener el control de las entidades en forma individual, seleccionarlas y copiarlas. Con esta rutina ya no será necesario explotar ningún bloque o utilizar el editor de bloques para copiar cualquier entidad que se encuentre dentro de él, sólo bastará con cargar esta rutina y seleccionar las entidades a copiar. Los objetos nuevos creados a partir de la selección aparecen encima del original, por lo que si se desea se debe de seleccionarlos y moverlos a la posición deseada. En esta rutina se puede optar por la opción de que los nuevos objetos se puedan crear en otra capa, la que se elija porque por defecto las nuevas entidades son creadas en la capa actual. Para utilizar la rutina debes de hacer lo siguiente:
RUTINA LISP PARA TRANSFORMAR LOS ARCOS DE UNA POLILINEA EN SEGMENTOS LINEALES Esta rutina te permite transformar los arcos incluidos en una polilinea en segmentos lineales, la longitud de cada segmento será la que especifiques en las opciones del comando. El lisp toma los datos de los vértices de la polilinea seleccionada, incluyendo la geometría del arco y genera una nueva polilinea con los nuevos datos. La longitud de cada nuevo segmento en el arco depende del valor ingresado, ésta deberá de ser menor que la longitud del arco menor de la polilinea seleccionada, el lisp dividirá el arco original en «n» segmentos hasta alcanzar su longitud original. Opcionalmente se puede optar por conservar la polilinea original, -lo que hará que se cree una polilinea encima de ella- o eliminarla. Esta rutina puede ser útil por ejemplo, en el caso de que se necesite definir puntos a lo largo de una curva en un eje de un alineamiento horizontal o vertical. Para utilizar la rutina debes de hacer lo siguiente:
RUTINA AUTOLISP QUE INSERTA PUNTOS EN LAS DISTANCIAS ESPECIFICADAS EN UN EJE Con esta rutina podrás insertar en un eje seleccionado (polilinea) unos puntos con sus respectivas distancias, los datos de la inserción de estos puntos, provienen de la digitación manual de distancias o de la lectura de una archivo de distancias (se proporciona un archivo de ejemplo para una mayor comprensión). Esta rutina se podría utilizar por ejemplo en el caso del eje de una carretera, en alguna oportunidades se necesita ubicar una progresiva exacta en el eje (polilinea), como por ejemplo la progresiva 23.76, manualmente se puede hacer pero tomas más tiempo, con esta rutina solo basta con seleccionar el eje, indicar la progresiva inicial de ese eje (generalmente con valor 0), y posteriormente ingresar la distancia. Si se tienen muchas distancias a ingresar en el eje, en lugar de digitarlas el lisp brinda la opción de seleccionar un archivo de texto, dentro de este archivo de texto estarán las distancias y el lisp las leerá una por una, insertándolas mediante un punto en el eje (polilinea). El lisp también permite cambiar el inicio del eje ya que el inicio se determina de acuerdo al punto de inicio que generó la polilinea, si el lisp comienza a poner las distancias por el punto final que no es el deseado, usa la opción: «Cambiar inicio de eje«. Junto con la rutina se suministra un archivo CAD, con un eje sencillo (polilinea), como ejemplo para poner en práctica la rutina lisp. Para utilizar esta rutina debes de hacer lo siguiente:
RUTINA LISP QUE INSERTA LAS COTAS EN UN PERFIL AUTOMÁTICAMENTE SEGÚN EL ESPACIADO ESPECIFICADO Con esta rutina hecha con AutoLisp y VisualLisp, podrás insertar cada «n» metros las cotas de una polilinea seleccionada (terreno natural o rasante) en tu formato del perfil, las cotas se insertarán tomando como referencia un punto indicado en el formato. En este comando podrás definir la escala del dibujo, esta escala no se refiere a la escala vertical de un perfil, sino a la escala de los textos de las cotas que se insertarán, lo textos de cotas para una escala 1:500 serán más grandes que las de una escala 1:50. También podrás definir la escala vertical de tu perfil, este dato es importante ya que controla los valores de las cotas, en un perfil de terreno natural escalado en 10 veces su tamaño en el vertical tendrá los valores de las cotas también 10 veces más de su tamaño real, por lo que el comando deberá de realizar las operaciones correspondientes para transformar los valores de las cotas a los reales. Otro valor a ingresar y el que define a este comando, es la distancia en que se insertarán las cotas, el valor por defecto que trae esta rutina es 10, lo que quiere decir que las cotas se insertarán cada 10 metros en el horizontal a partir del punto de referencia indicado. Luego de seleccionar la polilinea que representa tu perfil (de TN, Rasante, etc), el comando te solicitará que indiques un punto de referencia en tu formato del perfil, este punto deberás de indicarlo en una progresiva entera, por ejemplo si tu perfil es de 0+000 a 100+000, deberás de indicar el punto en la progresiva 0 ó 10 ó 20, etc (de acuerdo a cada cuanto se ha indicado la distancia de inserción de las cotas). Recuerda que para que el programa obtenga las cotas correspondientes, el perfil deberá de estar ubicado correctamente, es decir que las cotas sean las correctas para el perfil. Este gráfico te ayudará a una mayor comprensión de las opciones de esta rutina: Para utilizar esta rutina debes de hacer lo siguiente: (Los valores por defecto son para seguir el ejemplo con el archivo de CAD adjunto)
RUTINA LISP QUE PERMITE OBTENER LA PROGRESIVA O LONGITUD EN UN PUNTO INDICADO Este rutina desarrollada en Autolisp y Visual Lisp, te permite obtener la longitud o progresiva de una polilinea o eje e insertarla en el dibujo mediante un punto de inserción. Para ello debes de seleccionar la polilinea e indicar que progresiva es la inicial, debes de verificar que el comando ha obtenido el punto inicial de la polilinea correcto (inicio de eje), sino es asi, puedes cambiar el inicio del eje con la opción que te presenta este comando. Puedes modificar algunos parámetros por defecto desde el código fuente del mismo, como por ejemplo la altura del texto a insertar. Para utilizar esta rutina debes de hacer lo siguiente:
RUTINA LISP QUE REALIZA DIVERSAS OPERACIONES CON LOS TEXTOS (NUMÉRICOS) SELECCIONADOS Se trata de una pequeña pero bien útil rutina lisp que te permite obtener información de operaciones con textos seleccionados, obviamente estos textos deberán tener valores numéricos para que se puedan efectuar los cálculos, por ejemplo: «2.22», «3.39» (sin las comillas), etc. Si entre todos los textos numéricos el comando hallara un texto no numérico por ejemplo la palabra «punto», tomará este texto como valor 0.00, por lo que los resultados se alterarían. La información que brinda este comando es:
Para obtener los resultados solo bastará con seleccionar uno por uno o mediante una ventana (window) los textos de los cuales se desea obtener información. Para utilizar esta rutina debes de hacer lo siguiente:
RUTINA LISP QUE RECORRE E IMPRIME TODOS LOS LAYOUTS CON SU CONFIGURACIÓN ACTUAL Esta rutina te permite recorrer todos los layouts e imprimir cada uno de ellos con la configuración de pagina actual que se tenga, vale aclarar que el layout del espacio modelo no se tomará en cuenta. El comando recorre cada uno de los layouts y si verifica que se trata del espacio modelo, éste se pasa por alto continuando con los demás, por lo tanto si se desea que también se imprima el espacio modelo, solo se debe de modificar el comando para que también se tome en cuenta y se imprima. Se puede aprovechar la funcionalidad de este comando para por ejemplo, insertar membretes, eliminar o agregar texto en cada layout, etc, el comando no imprime los trabajos en modo «Background«, a no ser que se especifique en el cuadro de diálogo Opciones en la ficha «Plot and Publish«. Si tienes muchos archivos que imprimir y cada uno de ellos tiene muchas hojas (layouts), puedes aumentar la funcionalidad de este comando mediante lo siguiente: Crea un archivo llamado Acad.lsp (si no lo tuvieras ya), en ese archivo agrega las siguientes líneas de código en cualquier parte del mismo:
No se indica la ruta porque ya está por entendido que la ruta del archivo lsp especificado, se encuentra agregada en los directorios de soporte de AutoCAD (indicados en el cuadro de diálogo opciones), de no estarlo se puede reemplazar la línea de código por la siguiente (se indica la ruta completa del archivo lsp a cargar):
Para utilizar esta rutina normalmente (sin modificaciones) debes de hacer lo siguiente:
RUTINA VISUAL LISP QUE RECORTA LOS TEXTOS A LA DERECHA O IZQUIERDA SEGÚN EL NÚMERO DE CARACTERES INDICADOS Esta rutina lisp te permite recortar los textos seleccionados, los recorta a la derecha, a la izquierda o a ambos lados, eso va a depender de lo que se le indique al comando. Por ejemplo si tienes el texto inicial «0+580.00» y le indicas al comando recortar 2 caracteres a la izquierda, el comando lo reemplazará por «580.00». Si le indicas al comando que recorte 3 caracteres a la derecha, el comando reemplazará el texto inicial por «0+580». Por último, si le indicas al comando la opción de recortar en ambos lados, 2 caracteres a la izquierda y 3 a la derecha, el texto inicial será reemplazado por «580». Como puedes ver, basta con indicar el número de caracteres a recortar y seleccionar los textos y éstos serán recortados de acuerdo a lo indicado. Para utilizar esta rutina debes de hacer lo siguiente:
|
Puedes obtener estas rutinas con el autor.
Buen dia ¿Como puedo obtener los lisp?
LIPS PARA TALADROS LARGOS, EXISTEN? Y ME LO PUEDEN COMPARTIR
Me podrias compartir tus lisp, se ven que son de gran ayuda
buenas como puedo cambiar el tipo y tamaño de letra en lips.
gracias
Gracias por su agtención
Quisiera saber como obtengo el LISP que me puede dar la suma de áreas que es «AX-LISP» por que no lo puedo encontrar para descargar y poder usar.
Gracias
Claro. Te mandaremos un correo respecto a esa funcionalidad que buscas en un lisp.
busco lisp para hacer gradiente es decir con un circulo de cierto radio se tiene que cortar una curva de nivel proxima y generar una polilinea desde el origen y asi sucesivamente a medida que se avanza hasta otro lugar es para el diseño de una carretera y es moroso copiar los circulos y trazar las polilineas gracias
No como esa. Pero le he mandado un correo s un ecperto en lusp para que te diga si la puede hacer
Tienen alguna rutina para asignar atributos a elementos básicos no bloques, y estos puedan ser visualizados en un cuadro de dialogo en la pantalla.
Hola.
¿Cómo descargo el lisp «Exportar puntos de Coordenadas a un archivo CSV»?
Gracias
BUENAS NOCHES
QUISIERA SU APOYO, TENGO UN PROBLEMA MI AUTOCAD NO CARGA EL LIPS PARA DIBUJAR CUADRO DE DATOS TECNICOS (COORDENADAS, LADOS, ANGULOS)
Hola a todos, donde encuentro más lisp
Hola a todos
esta muy bueno los list
muy buenos aportes
A
ok
holaaaaaaaaaaaaaaaaaaaaaa
Salve, vorrei la Routine nominata AREASX, se è possibile.
Grazie in anticipo
Hola me gustaria acceder a la rutina para poner progrsivas a un alineamiento.
Gracias 🙂
me gustaria enviarles una rutina lisp que en versiones recientes no funciona y en versiones antiguas si funcionaba, ojala puedan corregirla y/o mejorarla, al correo que ustedes me indiquen o cuando me contesten les enviare la rutina lisp.
Muy buenas a todos, necesito la rutina arcos_de_una_polilinea_en_segmentos_lineales.fas para poder exportar de autocad a MIDAS GEN 2015 que no importa los arcos generados en autocad y debo descomponerlos en segmentos. Muchas Gracias. Soy de Cuba
Sou português e gostava, se possível, de ter a rotina «RUTINA QUE REEMPLAZA EL CONTENIDO DE UN TEXTO POR LA COTA DEL PUNTO DE INDICADO».
Obrigado
hay una llamada
; Rutina que exporta puntos de coordenadas a un archivo CSV. Versión 1.0.
; Formato del archivo de puntos que genera: P,N,E,C (Punto, Norte=Y, Este=X, Cota=Z)
Búscala en la página de Mario Torrez
http://www.mariotorres.pe/recursos/rutina-lisp-para-exportar-puntos-de-coordenadas-a-un-archivo-csv
Por favor pudiera indicarme donde puedo descargar su rutina lisp «Exportar puntos de Coordenadas a un archivo CSV» pues tengo la topografia de un area y necesito exportarla a csv o txt los puntos estan introducidos como texto (contenido es la cota) y en la coordenada Z sale cero, entendio?
Por favor pudiera ayudarme
me gustaría el lisp con la función de «Eliminar objetos internos o externos de una polilinea seleccionada»,pues en el artículo no encuentro el link de descarga.
INTERESANTE LAS RUTINAS.
hola, quisiera saber si hay una rutina para obtener el numero de objetos y colocarlos en texto
Estimados, intento bajara alguna rutina y sale este aviso:
Not Found
The requested URL /foro/rutina-lisp-para-sumar-o-restar-valores-a-los-textos-seleccionados was not found on this server.
Additionally, a 404 Not Found error was encountered while trying to use an ErrorDocument to handle the request.
En que me estoy equivocando?, 1000 gracias Rey
Hola si alguien conoce algun lisp que permita a dibujar poligono conociendo, la longitud y ángulos, si alguien conoce, la rutina topo12 si pueden enviarme ami correo juanpaulo_100@htomail.com, muchas gracias amigos
Buen datos grax…. :p
buen día, quisiera saber rutina para autocad 2014 si lo tuvieran para generar tablas a parir de coordenadas y diseño de carreteras
gracias
saludos
muy útil para el desarrollo de proyectos de ingenieria
hola
disculpen me peuden ayudar con un lisp para acotar una polilinea con sus km, me explico si tengo una polilinea con origen Dm de incio 100 y un dm de fin 1000, poder marcar cualquiera punto dentro de la polilinea y me me arroje su dm y lo deje estipulado.
ahora los dm de incio y fin siempre seran distintos por cada proyectos
si poueden ayudarme se los agredeceria ya que trabajo con esto frecuentemente y seria de mucha utilidad en poryectos de vialidad.
saludos
saludos alguien me puede ayudar con un lisp para poder enlazar un levantamiento hecho con coordenadas arbitrias partiendo de dos puntos, despues se coloco las coordenadas originales norte y este y la cota las deje las mismas arbitarias de los dos puntos de partida por lo cual le hice con aling pero las cotas se cambian
Hola podes ver en esta página:
http://acad.fleming-group.com/index.html
te explica como acceder desde autocad a tu base de datos y hacer cosas en ella, trae un conjunto de rutinas lsp y un pdf que explica cómo usarlas.
Saludos, Lola.
buen día, quisiera saber si alguien conoce alguna pequeña rutina o tiene algun ejemplo simple de alguna pequeña rutina para crear una base de datos dbf y agregar datos a ella o borrar desde autolisp.
espero me ayuden.
gracias
Hola amigos me gustaría saber si alguien conoce de una rutina para medir los ángulos (ojala externos) de un polígono y su distancia y si no es mucho pedir los exportara a Excel.
¿cómo se escribe una rutina .lsp que se ejecute al cargar un dibujo .dwg y cuando se grabe?
gracias
necesito ayuda a ver si alguien que sepa lisp que me salve.
Quiero exportar desde civil 3d todos los perfiles transversales generados a archivos de texto, me basta con que aparezca el kilometraje, la distancia al eje, y la cota correspondiente.
Algo asi
Km,Dist al eje,Cota
Solo eso. Alguien me puede ayudar? yo no se nada de nada de programación por eso pido ayuda.
Veamos si entendí.
Dices que con tu lisp exportas las coordenadas a Excel
¿Le has puesto al distancia? eso no lo entiendo, supongo que es en AutoCAD ¿Como dimensión o como función en el lisp?
Pero si ya tienes las coordenadas en Excel, ¿porqué no haces una siguiente columna con una fórmula de pitágoras entre el punto y el siguiente?
raíz cuadrada de ((coordenada y2 -coordenada y2) al cuadrado + (coordenada x2 – coordenada x1) al cuadrado)
HOLA BUENOS DIAS, QUISIERA QUE ME AYUDEN CON UN LISP. EXPLICO, TENGO UNA PLANO DE MUESTREO, CADA PUNTO PICADO CON UN LISP EXPORTA LAS CORRDENADAS AL EXCEL, PERO AHORA ENTRE CADA PUNTO Y PUNTO, LE E PUESTO LA DISTANCIA, AHORA QUIERO PASAR ESA MEDIDA ENTRE PUNTO YPUNTO AL EXCEL, PARA NO ESTAR TECLEANDO LOS 400PUNTOS Y SUS DISTANCIAS, HAY ALGUNA FORMA? PORFAVOR, ME SERVIRIA DE MUCHO Y ASI AVANZO MAS RAPIDO CON EL TRABAJO.
GRACIAS DE ANTE MANO
Para ejecutar rutinas Lisp, GeoCivil ofrece un tutorial bastante afinado.
http://geoproceso.com/5-minutos-de-confianza-para-geocivil/
hola, me gustaria saber si existe alguna rutina que transforme un plano de autocad a otro sistema de referencia por ejemplo de wgs84 a psad56
http://www.hispacad.com/foro/viewtopic.php?p=165851#165851
Adjunto Rutinas para Dibujo de Perfiles longitudianles, transversales, Importacion y exportacion de puntos a travez de excel, utilidades varias, libreria de bloques.
Dentro de la carpeta manuales, se encuentran las ayudas para ila instalacion.
Dentro de la carpeta clave se encuentar el archivo para la activacion.
Dentro de la carpeta manuales se encuentran los archivos de ayudas para los comandos.
Nota: por cuestiones de compactacion se ha eliminado el manual actualizado y se ha suprimido varias imagenes en el manual de ayuda adjunto.
El manual actualizado lo pueden solicitar por correo a
vhcad@hotmail.com
en caso de serles util las aplicaciones, o bien analizar por cuenta propia el funcionanmiento de los comandos.
Usa el comando pedit
alli aparece una opción para insertar vértices
como puedo insertar vertices a una polilinea.
Gracias