Lisp do przepisania wartości atrybutu w tym samym bloku

[przeryba2]

Witam, 

Używam lisp ze strony: LISP to copy attribute value within a block to another attribute - help please - Autodesk Community - AutoCAD

który działa w ten sposób, że po podaniu nazwy bloku, a następnie nazwy atrybutu źródłowego i docelowego przepisuje wartość z atrybutu źródłowego do docelowego. Lisp działa w obrębie jednego bloku. Czy ktoś z Państwa byłby skłonny pomóc jak zmodyfikować kod lispa, aby zamiast podawania nazwy bloku odbywało się to przez kliknięcie (zaznaczenie) bloku dla którego mają być wykonane dalsze instrukcje?

Dalszy ciąg kodu, tj. podanie nazw atrybutów pozostałby bez zmian. Chodzi tylko o to, aby ominąć podawanie nazwy bloku z ręki, ponieważ przy korzystaniu np. z jakiś zewn. bibliotek nazwy bloków są dość skomplikowane i pisanie ich z ręki jest dość karkołomne. 

Z góry dziękuję i pozdrawiam

PR

COPYCAT2.lsp

[kruszynski]

Może tak:

COPYCAT2.lsp

[przeryba2]

Super! Dokładnie o to chodziło, bardzo dziękuję za pomoc i pozdrawiam.