Immissione di una distanza
In questa lezione vedremo come effettuare una richiesta di immissione di una distanza, e così come abbiamo fatto per le funzioni precedenti, il suo valore verrà archiviato in una variabile
Il comando che useremo è:
(getdist "richiesta")
così come avviene sia per le funzioni getstring e getpoint, la funzione genera una pausa ed attende che l'utente inserisca un numero reale o specifichi 2 punti.
anche in questo caso richiesta è ciò che apparirà nella riga di comando.
facciamo un esempio:
(defun c:pdist()
(setq miodist (getdist "scrivi una distanza o indicami 2 punti "))
(princ "\n la distanza è ")
(princ miodist)
(princ)
)
salviamo il file lez8.lsp
eseguiamo autocad e scriviamo nella linea di comando
(load "lez8")
facciamo Invio
quindi scriveremo
pdist
Scarica l'esempio
R. Pucci