[Torino]

На это раз просьба помочь в написании следующего лиспа:
выделяем объекты (либо до запуска, либо после запуска лиспа)
и наша программа выделяет все объекты чертежа, исключая из выделения выбранные нами в начале объекты.

[AY]

Если по простому то можно так:
http://www.autocad.ru/cgi-bin/f1/board.cgi?t=16799AB

[{Smirnoff}]

А не проще выделить все и с зажатым Shift отменять выделение нужных объектов? Или речь идет об инвертированнм фильтре выбирающем все кроме объектов имеющих определенные признаки?

[Torino]

>>AY
Да это то, что нужно. Спасибо!

>>Fantomas
Все же проще выделить объекты и нажать кнопку, чем выделить все объекты, а потом shift'om удалить ненужные.

Еще более универсальный вариант от Эдуарда:

Код:

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

(defun ssgetinvert (/ ss-all ss-del)
  (if
    (and
      (setq ss-all (ssget "_x" (list (cons 410 (getvar "ctab")))))
      (setq ss-del (ssget))
    )
     (progn
       (setq ss-del (vl-remove-if
			 'listp
			 (mapcar 'cadr
				 (ssnamex ss-del)
			 )
		       )
       )
       (foreach	i ss-del
	 (ssdel i ss-all)
       )
     )
  )
)

[{Smirnoff}]

>Torino

Лисп то написать 5 минут. Вопрос сколько времени уйдет на поиск лиспа когда он понадобится

[Torino]

Все нужные мне лиспы повешены на кнопочки и добавлены в автозагрузку.
Так что искать их не приходится.
А вообще я с ужасом думаю, что вдруг окажусь за чужим компьютером.
Я просто не смогу работать.

[{Smirnoff}]

>Torino

Знаешь, это и мой кошмар... А кошмар ещё страшнее - AutoCAD LT.

Ты уже начал испытывать ледянящий ужас? [sm1505]

[Torino]

LT в этом случае - это не кошмар - это муки данные нам во искупление грехов [sm3229]

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

Некоторым с этим кошмаром приходится жить... Для LT есть спец.прога, называется LT Extender (www.lt-extender.com, кажется, так). Позволяет под LT запускать лиспы и еще до дури всего делает. В общем, преобразовывает LT в более-менее терпимую систему.