RUTINAS LISP PARA AutoCAD (1) 
 
 Rutinas/SumaText.lsp              Rutina en Autolisp para AutoCad 2000 que obtiene la suma de los textos seleccionados que contengan 
                                               números. Admite decimales. La rutina se ejecuta tecleando <<st>> , sin corchetes, y pide seleccionar 
                                               las entidades con números. (pueden tener texto al final, habitualmente m2. ó m.). No admite textos 
                                               delante del número. 
                                               Util para sumar un conjunto de areas, distancias ó simples números ya rotulados. 
 Rutinas/IgualQue.lsp               Rutina en Autolisp para AutoCad 2000 que ejecuta el comando de dibujo que se indique. Una vez 
                                               ejecutada la orden tecleando <<21>> , sin corchetes, pide señalar una entidad. Si se señala un círculo 
                                               es como ejecutar la orden círculo, si se señala linea, linea... 
                                               Util para acceder rápidamente a los comandos de dibujo. 

 Rutinas/Num.lsp                      Rutina en Autolisp para AutoCad 2000 que rotula una numeración consecutiva.. 
                                               Se llama tecleando <<nm>>, sin corchetes, y pide el número a partir del cual se quiere numerar. 
                                               Una vez introducido, basta pinchar, y automáticamente irá numerando consecutivamente. 
                                               Con una sencilla modificación del código, se puede anteponer el texto deseado, tal como P- ó Num. 
                                               Util para numeración de objetos consecutivos, como planos, parcelas, inventarios gráficos.. 

 Rutinas/CPolares.lsp              Rutina en Autolisp para AutoCad 2000 que obtiene y rotula las coordenadas polares de un punto. 
                                               Se llama tecleando <<cp>>, sin corchetes, y pide el punto ó puntos de los cuales se quiere obtener su 
                                               coordenada polar. 
                                               Esta rutina puede ser util para realizar plano de replanteo de proyecto de urbanización. 
  
  Rutinas/Parabola.lsp              Rutina en Autolisp para AutoCad 2000 que dibuja parábolas. Pide 3 puntos, que definen una 
                                               polilinea. El programa obtiene una parábola editandola y conviertiendola en spline de valor 5. 
                                                Se llama tecleando <<pa>>.

RUTINAS LISP PARA AutoCAD  (2) 
 
 Rutinas/CCartes.lsp                Rutina en Autolisp para AutoCad 2000 que obtiene y rotula las coordenadas cartesianas de un punto. 
                                               Se llama tecleando <<co>>, sin corchetes, y pide el punto ó puntos de los cuales se quiere obtener su 
                                               coordenada cartesiana y la rotulación de ella. 
                                               Esta rutina no me ha sido util para nada. 
Rutinas/CotaC.lsp                   Rutina en Autolisp para AutoCad 2000 que dado un punto, realiza la acotación continua. 
                                               Se llama tecleando <<hh>>, sin corchetes, y pide el punto por donde pasa toda la linea de acotación, 
                                               posteriormente el punto inicial de la  primera cota, el punto final de ella, el punto final de la siguiente... 
                                               Esta rutina agiliza el acotado de planos. 

 Rutinas/proyectaL.lsp             Seleccionando lineas de "z" dispares, las borra y las dibuja con la misma orientación pero con "z =0" 
                                               Bastaria cambiar (setq z1 3) y (setq z2 3) para que las lineas se situaran a "z" 3. 
                                               Atención: solo seleccionar lineas. Si se hace con otro tipo de entidad lo borra. En el caso de polilineas 
                                               se pueden explotar previamente , y aplicar la función. 
                                               Se llama tecleando <<zx>>, sin corchetes, y pide seleccionar las lineas a proyectar en un mismo plano. 
                                               Util para "aplanar" un objeto 3D, como una cubierta... previamente explotada si fuera solida. 

Rutinas/Replanteo.lsp              Rutina para numerar y rotular puntos, obtener sus coordenadas y realizar una tabla de replanteo con 
                                              ellos.  Se llama tecleando <<mp>>, sin corchetes. 
                                              Util para realizar rápido el plano de  replanteo.


Rutinas/ESCA.lsp              Rutina para crear escaleras en corte.


Rutinas/gracad04.lsp              Inserción automática de números consecutivos siguiendo un patrón pre-definido.




Rutinas/sumarea.lsp              Suma las areas y perimetros totales de todas las polilineas