[mvart]

команда _audit как сделать по умолчанию на запрос " ДА"

[Хмурый]

макрос на кнопку

Код:

[Выделить все]

^C^C_audit;_Y

будет только с кнопки запускаться

[mvart]

спс

[Кулик Алексей aka kpblc]

Как вариант. Не проверял.

Код:

[Выделить все]

(vl-load-com)
(command "_.undefine" "audit")
(defun c:audit()
  (vla-auditinfo (vla-get-activedocument (vlax-get-acad-object)) :vlax-true)
  )

Добавлено:
Для русских версий покатит такой лиспик:

Код:

[Выделить все]

(vl-load-com)

(foreach item '("audit" "_audit" "проверить")
  (eval
    (read
      (strcat
        "(command \"_.redefine\" \""
        item
        "\")"
        ) ;_ end of strcat
      ) ;_ end of read
    ) ;_ end of eval
  (eval
    (read
      (strcat
        "(command \"_.undefine\" \""
        item
        "\")"
        ) ;_ end of strcat
      ) ;_ end of read
    ) ;_ end of eval
  (eval
    (read (strcat "(defun c:"
                  item
                  " () (vla-auditinfo (vla-get-activedocument (vlax-get-acad-object)) :vlax-true))"
                  ) ;_ end of strcat
          ) ;_ end of read
    ) ;_ end of eval
  ) ;_ end of foreach

[mvart]

Вариант ^C^C_audit;_Y работает спасибо ( в корпоративном файле адаптации)

[Кулик Алексей aka kpblc]

Мой вариант сработает и при наборе из ком.строки