Выделение элементов массива - Lisp
Формулировка задачи:
Проблема вот в чем
у меня есть окружность - я сделала круговой массив из 6 элементов, и теперь мне надо их выдавить, но имя у меня имеет только один "родоначальник" этих кругов. и я уже не знаю что и делать
вот само создание круга:
(command "_circle" o4 (/ b7 2)) (setq circle (entlast)) (command "_rotate3d" circle "" o4 s1 "90") (command "_array" circle "" "_p" p12 "6" "360" "")
Решение задачи: «Выделение элементов массива»
textual
Листинг программы
(defun lastents ( EN / lst) ;;; --------------------------- ;;; ;;; Find List of Last Entities ;;; ;;; --------------------------- ;;; (while (setq EN (entnext EN)) (setq lst (cons EN lst)) ) ) ;; Get Last Entity (setq en (entlast)) ;; Make Make a Circle & an Array of Circles ;; ... ;; Get Circles (setq lst (lastents en)) ;; Process Circles ;; ...
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д