Параметрические изображения объектов проектирования на основе использования языка АВТОЛИСП в среде АВТОКАД. Притыкин Ф.Н. - 35 стр.

UptoLike

Составители: 

35
Пример 3. (command "circle" p1 r2 "circle" р2 (/ d 2))построение ок-
ружностей, где р1 и р2 определяют центры окружностей, r2 и выраже-
ние (/ d 2) задают радиусы окружностей (рис. 3.5).
Пример 4. (command "arc" "c" p1 p2 p3)построение дуги окружности
по центру и двум точкам, где "c"задает опцию центр, р1центр дуги
окружности, р2 и р3 начальная и конечная точки дуги (рис. 3.6а).
(command "arc" p4 p5 p6) – построение дуги окружности по трем точ-
кам (рис. 3.6б).
а) б)
Пример 5. По записи команды (command "text" p1 "10" "0" "Неука-
занные радиусы – 3мм")выполняется построение изображения тек-
ста, где р1базовая точка текста, "10" – высота текста, "0" – угол на-
клона текста. Изображаемый текст "Неуказанные радиусы – 3мм"
приведен на рис. 3.7.
Рис. 3.7. Реализация команды text
р1
р2
р3
р5
р4
р6
Рис. 3.5. Реализация команды circle
Рис. 3.6. Реализация команды arc
р1
"Неуказанные радиусы – 3мм"
h
р1
r2
d
р2
• Пример 3. (command "circle" p1 r2 "circle" р2 (/ d 2)) – построение ок-
  ружностей, где р1 и р2 определяют центры окружностей, r2 и выраже-
  ние (/ d 2) задают радиусы окружностей (рис. 3.5).


                                         р2
              р1                                              d

                                        r2


                    Рис. 3.5. Реализация команды circle


• Пример 4. (command "arc" "c" p1 p2 p3) – построение дуги окружности
  по центру и двум точкам, где "c" – задает опцию центр, р1 – центр дуги
  окружности, р2 и р3 – начальная и конечная точки дуги (рис. 3.6а).
  (command "arc" p4 p5 p6) – построение дуги окружности по трем точ-
кам (рис. 3.6б).

                    р2                             р4      р5

                    р1             р3                             р6



                             а)                                 б)
                        Рис. 3.6. Реализация команды arc

• Пример 5. По записи команды (command "text" p1 "10" "0" "Неука-
  занные радиусы – 3мм") – выполняется построение изображения тек-
  ста, где р1 – базовая точка текста, "10" – высота текста, "0" – угол на-
  клона текста. Изображаемый текст "Неуказанные радиусы – 3мм"
  приведен на рис. 3.7.

                                                                       h
                         "Неуказанные радиусы – 3мм"
                   р1

                          Рис. 3.7. Реализация команды text



                                              35