autlisp

Hello,

i implemented the folowing lines of code:

(

defun c:areas (/ ft_sqr)

(setq ft_sqr (getreal "\nenter an area in sqr feet: "))

(setq acre (/ ft_sqr 43560))

(rtos acre 2 2);

(princ " ACRES")

)

the output is ACRES" ACRES"

is there any reason why the rtos command doest not show the output of the variable, acre?

why is it outputing ACRES twice?

also, why are the quotations outputing?

Thank You!

i just noticed a typo. this code is written in autolisp

(princ (strcat (rtos acre 2 2) " ACRES"))
(princ);clean exit

Have a look, this will control against nil values from getreal, etc.

(defun c:AREAS (/ SF)
 (if (setq SF (getreal "\nSpecify area in Square Feet: "))
   (princ (strcat "\n" (rtos (/ SF 43560.) 2 2) " ACRES"))
 )
 (princ)
)

thanx guys, you really helped out alot