Rutina Lisp que dibuja los sobreanchos de curvas de una carretera

Esta app lisp te ayuda a dibujar los bordes y la definición de los sobreanchos y sus transiciones de las curvas horizontales de una carretera, previamente definidos en un archivo CSV con los valores calculados.

Para que la rutina pueda hacer su trabajo es necesario que los cálculos por cada curva horizontal se hayan realizado previamente, estos calculos se deberán de guardar en un archivo CSV con el formato de ejemplo que se adjunta.

Esta rutina funciona seleccionando una polilinea que representa un eje de vía o un alineamiento horizontal, no es necesario que se tengan los bordes de la vía, pero si se desea observar mejor los resultados obtenidos con esta rutina es recomendable que tambien estén dibujados (se adjunta un archivo de CAD como ejemplo).

Vale la pena aclarar que esta app no realiza los cálculos de definiciones de radios de curvas, longitudes de transición o peraltes, sólo lee los datos definidos en el archivo CSV (separados por comas) y dibuja los bordes de la vía con sus respectivos sobreanchos.

Los datos del archivo CSV tiene definido el siguiente formato:

Para utilizar esta rutina debes de hacer lo siguiente:

• Carga el archivo lisp en AutoCAD.
• Ingresa el nombre del comando: BORX
• Selecciona la polilinea que representa el eje de la vía, de preferencia que la selección de la misma se encuentre cerca al inicio del eje.
• Ingresa la progresiva de inicio del eje, puede ser 0, 100 ó 125.36, pero sólo se ingresan los valores sin agregar el signo “+“.
• Ingresa el ancho del carril, esta distancia será tomada para ambos sentidos de la vía.
• Posteriormente la rutina mostrará un cuadro de diálogo con el cual debes de seleccionar el archivo CSV con los datos que deberá de leer.
•  Haz clic en Abrir y la rutina se encargará del resto.

El resultado es el dibujo de ambos bordes de la vía con sus respectivos sobreanchos y transiciones de curvas.