Corso Autocad

Funzione repeat

(repeat numero espressione)

In questa funzione  numero è un qualsiasi numero intero positivo.

La funzione valuta ogni espressione per "numero" volte.

(defun c:ciclo()
(setq valore1 100)
(setq valore2 1000)
(repeat 5
(setq valore1 (+ valore1 100))
(setq valore2 (+ valore1 1000))
(print (+ valore1 valore2 ))
)
)

restituirà 6600


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

 

Scarica l'esempio    

R. Pucci