Надо нарисовать средствами autolisp трехмерный объект. Не знаю как создать точку с тремя координатами. Вот фрагмент кода. Не пойму в чем ошибка, работать не хочет: (setq ce_st (getpoint "\nОпределите положение объекта")) (setq x (car (ce_st))) (setq y (cdr (ce_st))) (setq z 50) (setq ce_st_h (list x y z)) Т.е. надо, чтобы пользователь ткнул мышью и в этой точке, но не на полу, а на заданой высоте нарисовался диск (как его нарисовать знаю).