Comandos de AutoCad para generar ficheros .DAT...

Esta serie de comandos que he programado para Autocad tiene como objetivo el poder generar ficheros .dat para que sean procesados por el programa CENECE de corte de foam.

La filosofia de la utilidad es el de usar como herramienta de base el objeto de autocad llamado LWPOLILINEA, que no es mas que el dibujar una polilinea que representaria la trayectoria del hilo que deseamos. Para hacer esto debemos tener conocimientos del manejo de Autocad a un nivel muy basico, pero si el suficiente como para saber generar una forma que deseamos con una polilinea continua.
Yo no voy a entrar en la explicacion sobre como dibujar con la orden POL por lo que paso directamente a detallar el conjunto de ordenes creadas...

Pues, esta serie de ordenes se han programado en AutoLisp para AutoCad 2000 en Español. Esto queire decir que no se si funcionan en otras versiones de Autocad.

Yo no he probado la orden, pero Juanchi si, y parece que funciona bien. Para mas dudas os remito a la pagina del programa...

Este prograrma ha sido creado por el binomio Juanchi-Javier Lopez para controlar una maquina de corte de foam por hilo caliente. Para mas detalles, os remito a su pagina.
Pues sucede que el software de corte es muy sofisticado permitiendo hacer casi de todo, pero solo con ficheros .dat de perfiles de alas.

En colaboracion con sus creadores me ofreci para crear una orden para autocad que pudiese generar ficheros .dat pero de forma libre, asi conseguiriamos "engañar al programa" para que cortara cualquier otra forma...

 

El conjunto de ordenes son 5:

 

El fichero Autlisp con las ordenes lo teneis aqui: cenecejp.lsp

 

 

Los pasos para cargar la orden y utilizarla son:

	Para cargar la aplicacion AutoLisp debemos ir al menu Herramientas, al apartado de Cargar Aplicacion...
	Cuando nos salga esta ventana le damos al boton Archivo...
	Seleccionamos el fichero donde lo hayamos guardado en el dico duro del ordenador...
	Seleccionamos el fichero de la lista que aparece en la zona blanca de la ventana y le damos al boton Cargar...
	Si todo ha salido bien, saldra una pantalla confirmando la carga correcta de la orden...
	Para empezar desde cero, usamos las orden POL que es la encargada de dibujar el objeto LWPOLILINEA que es con el que trabaja este paquete de ordenes...
	La orden POL nos ira preguntando, punto a punto, por donde queremos que pase la polilinea...
	A modo de ejemplo, esto es una polilinea...
	Si queremos comprobar que es un objeto LWPOLILINEA, tecleamos la orden LIST...
	Seleccionamos la polilinea de la que queremos tener la informacion...
	Y nos sale una ventana con todos los datos de la polilinea. comprobamos que es una LWPOLILINEA para sequir con los siguientes pasos. Si no fuese una polilinea LWPLOLILINEA, las ordenes fallarian...
	Tambien podemos crear la polilinea con el menu DIBUJO, apartado POLILINEA...
	Una vez hayamos creado la polilinea deseada, Tecleamos la orden PONSINCPTO para insertar los puntos de sincronismos. El principio y final no hacen falta ya que la orden los toma por defecto. Estos puntos sirven como referencia al programa CENECE para sincronizar los movimientos de los carros para que pasen ambos por el mismo punto de sincronismo a la vez...
	Tambien hay que tener como referencia la linea de la mesa de corte y el punto de inicio de movimiento del hilo para poder generar las coordenadas de la polilinea en relacion a la posicion inicial de los carros de la cortadora...
	Por ultimo, tecleamos la orden ACAD2DAT para generar el fichero .dat. Lo primero que nos pide es el punto de inicio de la maquina. Seleccionamos el que nosotros deseemos. Si no sabemos muy bien cual es, seleccionamos el primer punto de la polilinea para que el inicio de los carros los controle directamente el programa CENECE... Cuidado, debemos tener cuidado con el sentido de la polilinea ya que tenemos que saber bien cual es su principio y final. Para comprobarlo usar la orden GETPOLORIG y si esta invertida, usar la orden INVERTPOL...
	Luego nos pedira donde queremos guardar el fichero .dat y con que nombre...
	Y por ultimo nos indica el proceso que esta realizando. Primero graba las coordenadas de la polilinea y luego escribe la lista de los puntos de sincronismos...
	Asi queda el fichero .dat... Lo que ha cambiado en el fichero es que ahora el ancho de las filas es de 42 caracteres. Esto por exigencia de Javier Lopez. Una unica advertencia. Las ordenes se han programado sin ningun tipo de control de "burradas" por lo que si no quereis tener problemas, debeis tratarlas con mucho mimo para que sean de vuestro agrado...
	Y para que no os creais que solo dibuja lineas, aqui teneis un ejemplo de lo que hace. esto no es mas que una polilinea con 5000 segmentos... Para conseguir esto, he escrito las letras en CorelDraw y he salvado el dibujo como DXF al que luego lo he abierto con AtuoCad y he ido uniendo todas las letras por su parte inferior con la orden recorta intentando conseguir una polilinea continua. Luego he tenido que juntar todas las polilineas con la orden EDITPOL. Esta orden, entre otras cosas, junta multiples objetos 2d en una unica polilinea, asi conseguimos la polilinea a exportar...
	Y bueno, si sabemos usar lo necesario de AutoCad, conseguiremos dibujar lo que necesitemos sin muchos problemas...

 

Espero que os valga. No es mucho pero si nos ponemos cabezones con el tema seguro que podremos hacer algo util con todo esto...

---

Aqui pondre una lista de FAQs a medida que vayan surgiendo (Son mensajes extraidos del foro CENECE. Muchas gracias a todos)...

 

---

Mensaje Nº1, Tema: Orden CORRPOLTRAP


Hola Eduardo:

Si, si que he cortado un par de cosas y me han salido fenomenal. No te puedo
mandar ahora ningún archivo de los que he cortado por que los desarrollo en
el taller (donde no tengo internet).
No se donde puedes cometer el error, pero un par de cosas:
    No tiene nada que ver los puntos de sincronismo con los vértices de las
polilineas, con permiso de opiniones más autorizadas que la mía, el
requisito de la orden corrpoltrap de tener el mismo punto de vértices en las
dos figuras es por que la orden lo que hace es calcular las trayectorias de
los carros por medio de la intersección de las generatrices de la figura con
los planos verticales definidos por los ejes X e Y de cada carro, ósea que
cada generatriz queda definida por dos puntos homólogos en cada figura.
Hasta aquí lo único que hemos hecho es calcular las trayectorias de los
carros, Pero a la hora de cortar las figuras no tienen el por qué ser todos
puntos de sincronismo, la figura puede quedar correcta con unos pocos puntos
de sincronismo bien escogidos, para colocar los puntos de sincronismo lo
mejor es hacer un esfuerzo de visión espacial y tener claro cuales son las
generatrices que nos definen la figura antes de cortarla.
    Si tienes alguna figura que no te funciona mándamela que pruebe yo.

Saludos//Alberto

---

Mensaje N2, Tema: Orden CORRPOLTRAP

Hola Eduardo:

Efectivamente, esta tarde he cortado los perfiles que dibujé ayer y todo ha
salido bien, espero no liarte con la explicación y posiblemente no sea
perfecta la forma de hacerlo.
Lo principal es controlar bien algunas ordenes de Autocad, yo utilizo las
ordenes de dibujo POL, EDITPOL Y PARTE:
POL para dibujar las polilineas
PARTE para partirlas por donde me interesa
EDITPOL con la opción JUNTAR para unirlas según interese.
Es importante que para manejar estas historias, tanto las órdenes de F.
Pantano como el Creadat de Dani, que se sepa manejar básicamente Autocad o
similar programa de diseño (ósea que el que se de por aludido y le interese
aprender un buen método es comprarse un manual)
Pues bien:
    Partimos de las dos figuras a cortar dibujadas con cualquier entidad de
dibujo (líneas, polilineas, círculos, elipses, splines, etc.)
    Seleccionamos los puntos de sincronismo que interesen en cada figura, es
importante entender bien el sentido geométrico de los puntos de sincronismo.
    Partiremos (orden PARTE) las entidades en todos y cada uno de los puntos
de sincronismo.
    Lo que queda entre dos puntos de sincronismo lo transformamos a
polilinea (orden EDITPOL) y si es preciso juntamos varias entidades que
queden entre los dos puntos de sincronismo (opción JUNTAR  de la orden
EDITPOL), de esta manera obtendremos una sola entidad (polilinea) entre cada
dos puntos de sincronismo la cual tendrá su homologa en la otra figura.
Estas entidades tendrán un número de vértices indeterminado, pero lo
solucionamos con la orden TRANSF2POL dando el número de vértices que nos
interese, lo importante será dar el mismo número de puntos en la entidad
homóloga de la otra figura.
    Entidades distintas y contiguas no tienen el por qué tener el mismo
número de puntos pero sí entre homólogas.
    Terminada la operación tendremos 2 figuras divididas en entidades por
los puntos de sincronismo y cada entidad (polilinea con un determinado nº de
vértices) entonces se unen todas (EDITPOL - JUNTAR) en una sola polilinea,
ojo que quede abierta.
    Se aplica la orden CORRPOLTRAP, te santiguas y.... si todo ha ido bien
obtenemos las trayectorias de ambos carros.
    Ojo con tener activada la referencia a objetos al aplicar la orden
CORRPOLTRAP, pues da errores al llevarse los vértices a las líneas
contiguas.

    Adjunto va una sección del fuselaje del avión que estoy proyectando



Si has llegado leyendo hasta aquí es que tienes mucho interés o mucho
aguante.

Saludos//Alberto