Справочная система SDK КОМПАС-3D

//создать постоянную группу

//(окружности принадлежат текущему виду)

reference gr = NewGroup (0);

Circle(0, 0, 100, 1);

Circle(0, 0, 50, 1);

EndGroup();

//создать макроэлемент

Macro(1);

LineSeg (120, 100, 120, 150, 1);

reference m = EndObj();

//добавить в макро новый объект

ksOpenMacro(m);

LineSeg (100, 100, 150, 100, 1);

::EndObj();

//добавить в макроэлемент группу самостоятельных объектов.

//(объекты становятся внутренними)