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

   При составлении программы, позволяющей наносить размеры, необ-
ходимо вначале задать значения системных размерных переменных. На-
нося размеры на чертеже, необходимо рассчитывать вспомогательные
точки, определяющие положение размерных линий и примитивов точки −
р3, р4 и р5 (рис. 3.10 а, г).
     Ниже даны примеры формирования изображений размеров на черте-
же.
• Пример 8. (command "dim" "horiz" p1 p2 p3 "" "exit") – нанесение гори-
зонтального размера. Значение размерного текста определяется длиной
между точками р1 и р2 рис. 3.10а.
                    р3
           5
           5                    d1            ∅10      р4
                                                                       30 о
   р1                                                             р6
                   р2

                                                             р5
           а                б             в                  г
     Рис. 3.10. Реализация команд нанесения размеров: а – горизонтальный
    размер, б – горизонтальный размер со значением строковой константы,
                  в – параллельный размер со знаком диаметра

• Пример 9. (command "dim" "horiz" p1 p2 p3 "d1" "exit") – нанесение
  горизонтального размера. В качестве размерного текста выступает стро-
  ковая константа "d1" рис. 3.10 б.
• Пример 10. (command "dim" "aligned " p1 p2 p3 (strcat "%%c" (rtos h
  2 0)) "exit") – нанесение параллельного размера со знаком диаметра
  рис. 3.10 в.
  Функция strcat предназначена для соединения двух строковых кон-
  стант. Описание данной функции приведено в п.4.5; "%%c" – запись
  кода знака диаметра в файле шрифта. Функция rtos позволяет выпол-
  нять преобразование переменной h, имеющей тип данных действи-
  тельного числа в значение строковой константы. Описание данной
  функции приведено в п. 4.5.



                                     37