Rutina Lisp para insertar bloques con “n” atributos desde un archivo CSV

Hace un tiempo publicamos un post en donde compartíamos una aplicación Lisp para insertar bloques con datos de señalización de una carretera, los bloques son personalizables y se pueden agregar o quitar atributos y la rutina los reconoce automáticamente.

En esta oportunidad, esta rutina es general, es decir que se puede emplear para insertar cualquier bloque (sólo 1 indicando su nombre) con cualquier número de atributos siguiendo un listado de un archivo Excel de formato CSV.

Sólo presenta 2 condiciones, la primera es que las 2 primeras columnas sean para las coordenadas del bloque a insertar en el orden X (Este) y Y (Norte).

La segunda condicón es que el orden de los atributos sea el mismo que el orden de los datos de las columnas a partir de la columna C (3ra columna):

Es recomendable que el bloque esté ya insertado en el archivo de dibujo, de lo contrario la rutina lisp no se ejecutará.

El archivo CSV (delimitado por punto y coma) visto desde un editor de texto debe de tener el siguiente formato:

Para utilizar esta rutina debes de hacer lo siguiente:

• Carga el archivo lisp en AutoCAD.
• Ingresa el nombre del comando: IBNA
• Ingresa el nombre del bloque que será insertado.
• Ingresa la escala de inserción de los bloques, por defecto es 1.00.
• Elige el archivo de CSV con los datos que la rutina Lisp debe de considerar para insertar los bloques con sus respectivos atributos.
• Es todo.

El resultado es la inserción múltiple de un bloque que está listado en el archivo CSV, los bloques se insertan en cada punto de ubicación según las coordenadas indicadas en las 2 primeras columnas del archivo CSV y con los atributos especificados a partir de la tercera columna del archivo.