[mosnok]

Надергал с существующих программок следующий код, он работает и делает что должен но как его можно облагородить - заставить выделять нужные слои не методом по одному а сразу все что попало в рамку выделения? Спасибо

Код:

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

(defun c:vplf ()
  (prompt
     "\nPick Выберите часть слоя который хотите разморозить1: ")
  (setq name1 (cdr (assoc 8 (entget (car (entsel))))))
  (prompt
     "\nPick Выберите часть слоя который хотите разморозить2: ")
  (setq name2 (cdr (assoc 8 (entget (car (entsel))))))

(command "_.vplayer" "Заморозить" "*" "_CURRENT" "")
(command "_.vplayer" "Разморозить" name1 "_CURRENT" "")
(command "_.vplayer" "Разморозить" name2 "_CURRENT" "")
  (princ)
)

[gomer]

Используй ssget

[Krieger]

Может просто использовать "_layfrz"