joe
Utente Standard
professione: Disegnatore strutture reticolari spaziali
software: autocad 2015
regione: campania
Salve e buona giornata, il seguente lisp non funziona bene: mi dice "impossibile aprire il file"
(defun c
eso (/ FR Volume txt Peso)
(setq Ent (car (entsel "\nSeleziona punto interno: ")))
(command "_massprop" Ent "" "_Y" "c:/MassProp")
(setq FR (open "c:/MassProp.mpr" "r"))
(repeat 5
(setq txt (read-line FR))
)
(setq Volume (atof (substr txt 26)))
(close FR)
(setq Peso (* Volume 0.00000785))
)
Mi suggerite una soluzione?
(defun c
(setq Ent (car (entsel "\nSeleziona punto interno: ")))
(command "_massprop" Ent "" "_Y" "c:/MassProp")
(setq FR (open "c:/MassProp.mpr" "r"))
(repeat 5
(setq txt (read-line FR))
)
(setq Volume (atof (substr txt 26)))
(close FR)
(setq Peso (* Volume 0.00000785))
)
Mi suggerite una soluzione?