To 
byranЕсли Вы интересуетесь операторами LISP'а, то я могу прокомментировать
приведенный листинг по-русски, но боюсь, что Вам этого будет маловато 
(и к тому же подобный ликбез 
здесь  может быть принят за флейм 

)
(setq stars   ; 
setq  объявление переменной [stars];
  (list           ; эта переменная есть список 
list  11-ти подсписков, 
                  ; которые могут состоять как из атомов - " SUN"  "yellow",
                  ; так и из списков - '( 0.00    0.00     0.00)
    (list " SUN"          "yellow"         '( 0.00    0.00     0.00))
    (list " Proxima"     "red"             '( -1.57   -1.16    -3.74))
    (list " Barnard"      "red"             '( -0.20   -5.90     0.40))
    (list " Wolf_359"   "red"             '( -7.40    2.20     1.00))
    (list " Sirius"          "white"         '( -1.60    8.10    -2.50))
    (list " E_Eridan"     "red"             '( 6.46    8.46    -1.81))
    (list " 61_Cygnus"  "red"             '( 6.20   -6.00     6.80))
    (list " T_Cetus"      "yellow"         '( 10.10    4.80    -3.30))
    (list " Procyon"       "yellow"         '( -4.70   10.30     1.00))
    (list " Captain"        "red"             '( 1.90    8.70     8.90))
    (list " Maanen"        "white"          '( 13.30    2.70     1.20))
  )
) ; все скобки в LISP-выражении должны быть сбалансированы
(foreach attr stars       ; начало цикла для каждого 
foreach                                 ; элемента [attr] списка [stars]
                                ; при каждой итерации на место [attr] один за другим будут 
                                ; подставляться подсписки, составляющие список [stars]
  (command "_sphere" (nth 2 attr) "0.3") ; команда "сфера", тройка координат центра 
                                                          ; [2-й элемент подсписка], радиус
  (command "change" "l" "" "p" "c" (nth 1 attr) "") ; команда "изменить", последний введенный примитив,
                                                                      ; завершение выбора, свойства, цвет, 1-й элем. подсписка,
                                                                      ; завершение команды
  (command "line" "0,0,0" (nth 2 attr) "")             ; команда "линия", начало, конец [2-й элем. подсписка], 
                                                                      ; завершение команды
  (command "text" (nth 2 attr) "0.5" "0" (nth 0 attr)) ; команда "текст", точка вставки [2-й элем. подсп.],
                                                                           ; высота, угол отрисовки, сам текст [0-й элем. подсп.]
  (command "change" "l" "" "p" "c" (nth 1 attr) ""); команда "изменить", последний введенный примитив,
                                                                      ; завершение выбора, свойства, цвет, 1-й элем. подсписка,
                                                                      ; завершение команды
)
Сохраняете файл "ххх.lsp", в командную строку AutoCad вводите выражение
(load "xxx"), enter и ви'дите картинку, что приложена (снова у публики прошу
прощения за повторение, но просят же, а мне не жалко 

). 
AutoCad - это целая вселенная, и требует постепенного и вдумчивого освоения,
но Он всесилен! Походите по Инету, имеются целые сайты Его друзей, которые
Его любят за мощь и изящество, и не зря 

 ! 
P.S. site 
www.babylon5.incoma.ru на самом деле сдох, но Google-то жив.