![Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk
- od firmy ARKANCE [www.cadforum.cz]](../common/arkance_186.png "Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk
- od firmy ARKANCE [www.cadforum.cz]")
also in ENGLISH
CAD tip # 6364:
Otázka
Jednoduchým LISP výrazem si ale můžete přidat podobnou funkčnost i do holého AutoCADu. Na tlačítko panelu nástrojů nebo do místní nabídky si můžete přidat výraz:
(cadr(sssetfirst nil (ssget"_X"(list(cons 0(cdr(assoc 0(entget(car(entsel"\nVyberte objekt i jemu podobné: "))))))))))
Tuto funkci pak můžete vyvolat buď v základním režimu příkazu - kdy po výběru objektu vybere (uzlová editace) všechny entity stejného typu, anebo ji můžete použít na standardní výzvu "Vyberte objekty" - tam zahrne vybraný a jemu podobné objekty do standardní výběrové množiny editačního příkazu.
Další možností použití je výraz:
(ssget(list(cons 0(cdr(assoc 0(entget(car(entsel"\nVyberte objekt a všechny jemu podobné: "))))))))
Ten se rovněž dotáže na výběr ukázkového objektu. Pak vyzve ke standardnímu výběru objektů. Z nich však budou vybrány pouze ty objekty, které jsou podobné (stejný typ) ukázkovému objektu.
AutoCAD
Civil 3D
AutoCAD Architecture
AutoCAD/Revit MEP
