Curso Topografos-Autolisp

Descargar como ppt, pdf o txt
Descargar como ppt, pdf o txt
Está en la página 1de 17

FORMATO DXF Y/O TTM

AUTOLISTP
LENGUAJE DE PROGRAMACION QUE TIENE COMO
PLATAFORMA AL SISTEMA OPERATIVO.

ENCABEZAMIENTO DE UN LISP
; NUMERA.LSP
; Rotula automticamente nmeros consecutivos en el dibujo.

; Versin 1.2: febrero de 2001: Acepta incremento y origen en nmeros no
enteros. Gestiona nmero de decimales
;
; Versin 2.0: Acepta prefijos y sofijos
; Versin 2.1: Permite que los prefijos y sufijos contengan espacios en
blanco
;
; Futuras versiones:
; - Seleccionando un texto ya existente en el dibujo que contenga un
nmero,
; rotula a partir del siguiente valor.
; - Permite rotular automticamente en forma de matriz o lnea
;;
; Julio Pablo
; Visita Las Quimbambas en http://pagina.de/lasquimbambas

SECUENCIAS DE UN LISP
; (princ "\nnumera 2.1: Introduce automticamente nmeros consecutivos en el dibujo, en los puntos que
indiquemos\n")

(defun c:numera(/ contador incremento frasecitainformativa opciondeturno)

(setq contador 1.00)
(setq incremento 1.00)
(setq opciondeturno "")
(if (null alturatexto) (setq alturatexto (getvar "TEXTSIZE")))
(if (null prefijo) (setq prefijo ""))
(if (null sufijo) (setq sufijo ""))
(if (null ndecimales) (setq ndecimales 0))
(setq opciondeturno "")

(while opciondeturno
(initget "Altura Origen Incremento Prefijo Sufijo Decimales")
(setq rotulodeturno (strcat prefijo (rtos contador 2 ndecimales) sufijo))
(setq
frasecitainformativa (strcat "\nAltura/Origen/Incremento/Prefijo/Sufijo/Decimales/<punto \"" rotulodeturno
"\">:")
)
(setq puntodeturno (getpoint frasecitainformativa))
(setq opciondeturno

COMO CARGAR UN LISP EN EL CAD
EN LA BARRA DE COMANDOS SE DIGITA:
APPLOAD
APPLOAD
COMO CARGAR UN LISP EN EL CAD
BUSCAMOS LA RUTA DONDE SE ENCUENTRA EL LISP
COMO CARGAR UN LISP EN EL CAD
ESCOGEMOS EL ARCHIVO LISP QUE NECESITAMOS
COMO CARGAR UN LISP EN EL CAD
CLICK EN LOAD Y LUEGO EN CLOSE
COMO CARGAR UN LISP EN EL CAD
EN LA BARRA DE COMANDOS SE DIGITA EL
NOMBRE DEL LISP
NUMERA
COMO USAR UN LISP EN EL CAD
EN LA BARRA DE COMANDOS SE DIGITA EL
NOMBRE DEL LISP
NUMERA
COMO USAR UN LISP EN EL CAD
OPCI ONES
COMO USAR UN LISP EN EL CAD
SE HACE CLICK DONDE QUEREMOS EJECUTAR
SEGN SEA EL LISP, SE INDICARA O
COMPLEMENTARA LA INFORMACION
SOLICITADA, COMO TAMAO DE
LETRA, NUMERO DE DECIMALES,
PREFIJOS, SUFIJOS, ENTRO OTROS.
COMO USAR UN LISP EN EL CAD
SI QUEREMOS QUE EL LISP SE
CARGUE CONJUNTAMENTE CUANDO
SE INICIALIZA UNA SECION DEL CAD
SE PROCEDE DE LA SIENTE MANERA:
SE DIGITA APPLOAD EN LA BARRA DE
COMANDOS, LUEGO ENTER.

APARECE:
COMO USAR UN LISP EN EL CAD
COMO USAR UN LISP EN EL CAD
COMO USAR UN LISP EN EL CAD
COMO USAR UN LISP EN EL CAD
ESCOGEMOS EL ARCHIVO A USAR

También podría gustarte