높이값을 입력받아서 벽면적을 구하는 lisp

2D로 그려진 (Z 값이 없는)
1. 평면상의 직선을 선택하면 높이값을 요구하고 치수를 입력하면
면적을 구할 수 있는 lisp
2. 폐도형을 선택하면 면적값은 자동 계산되고 높이값을 입력하면
부피를 구할 수 있는lisp
말이 좀 어색한데요. 요는 평면도만을 이용해서 페인트물량과 콘크리트 물량을 계산하려고 합니다. 지도 부탁드립니다.