Corso Autocad

Substr
Questa  funzione restituisce una porzione di una stringa.

(substr stringa inizio lunghezza)

dove stringa è la stringa dalla quale vogliamo prelevare una sottostringa, inizio è la posizione del carattere iniziale della nostra sottostringa, lunghezza indica il numero di caratteri che intendiamo prelevare partendo da inizio.

Esempio:

(defun c:miastringa()
(setq stringatot "Corso Autolisp in Pillole")
(setq sottostringa (substr stringatot 7 8))
(alert sottostringa)
(princ)
)

 

salviamo il file lez18.lsp 
eseguiamo autocad e scriviamo nella linea di comando
(load "lez18")
facciamo Invio
quindi scriveremo
miastringa

Scarica l'esempio    

R. Pucci