;;; ;;; ;;;> Author: Henry C. Francis ;;;> 425 N. Ashe St. ;;;> Southern Pines, NC 28387 ;;;> http://paracadd.com ;;;> All rights reserved. ;;; ;;;> COPYRIGHT: 1995 ;;;> EDITED: 08-18-1999 ;;; (DEFUN C:ELPT () (SETQ PT1 (GETPOINT "\nPick point for elevation: ")) (PRINC (STRCAT "\nELEVATION IS "(RTOS(/(CADR PT1)5.0)2 2))) (PRINC) )