Continue to Site

Eng-Tips is the largest engineering community on the Internet

Intelligent Work Forums for Engineering Professionals

  • Congratulations IDS on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

area

Status
Not open for further replies.

johnhan76

Civil/Environmental
May 16, 2002
123
Is there a way to use the inqire area and get the results in acres instead of feet sq.
 
Replies continue below

Recommended for you

The only way I know of is to draw in units of acres instead of feet. Then use decimal units (ddunits).

Alternately, you can use a lisp function to do the conversion.
 
You could scale a copy of your drawing by 1/(43560)^0.5, or about 1/208.71, and areas reported by AREA or LIST will effectively be in acre units.
 
Try this:

Code:
; AAREA.LSP
(DEFUN c:aarea ()
  (SETQ	oc (GETVAR "cmdecho")
	nc (SETVAR "cmdecho" 0)
  )
  (SETQ getobj (ENTSEL "Select object to get area of:"))
  (COMMAND "AREA" "o" getobj)
  (SETQ	sqft  (/ (GETVAR "AREA") 144)
	sqyds (/ sqft 9)
	acres (/ sqft 43560)
  )
  (ALERT
    (STRCAT "\nSquare Feet = "
	    (RTOS sqft 2 3)
	    "\nSquare Yards = "
	    (RTOS sqyds 2 3)
	    "\nAcres = "
	    (RTOS acres 2 3)
    )
  )
  (SETVAR "cmdecho" oc)
)
(PROMPT "To use, enter aarea at the command line.")
(PRINC)

Flores
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor