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

    • (ssadd [<имя примитива>] [<набор>]) дополняет заданный <на-
бор> новым примитивом с указанным именем и возвращает измененный
набор. Если эта функция записана без аргументов, то создается нулевой
набор. При вызове функции с одним аргументом <имя примитива> соз-
дается новый набор с одним примитивом. Примеры:
    (setq nabor1 (ssadd)) − создается нулевой набор,
    (setq prim1 (ssget "П")) − из рисунка выделяется последний при-
митив и его имя устанавливается в переменную prim1.
    (setq nabor2 (ssadd prim1 nabor1)) − возвращает набор nabor2, со-
стоящий из примитива с именем prim1.
    • (ssdel <имя примитива> <набор>) удаляет из <набора> <имя
примитива> и возвращает имя с набором. Если в этом наборе нет зада-
ваемого примитива, то функция возвращает nil. Примеры: пусть в наборе
naborl существует примитив с именем prim1. Тогда:
   (ssdel prim1 naborl) − возвращает набор naborl без примитива prim1,
    (ssdel prim2 naborl) − возвращает nil.
    • (ssmemb <имя примитива» <набор>) С помощью данной функ-
ции осуществляется проверка на принадлежность примитива с заданным
именем указанному <набоpy>. Если этот примитив содержится в наборе,
то функция возвращает его имя, в противном случае − nil.
    Примеры: пусть в наборе naborl существует примитив с именем
prim1. Тогда (ssmemb prim1 naborl) − возвращает имя примитива priml,
(ssmemb prim2 naborl) − возвращает nil.
    • (entnext [<имя примитива>]) возвращает имя первого, имевшего-
ся в рисунке примитива, следующего в базе данных за примитивом с ука-
занным именем. Если функция вызывается без аргумента, то будет воз-
вращено имя первого не удаленного в базе данных примитива.
    • (entlast) возвращает из базы данных имя последнего примитива.
    Пример: (setq prim (entlast)) − присваивает переменной prim имя по-
следнего примитива, добавленного в рисунок, и возвращает его имя.



                                    53