neue Folder LAYOUT MENU und MODULE dazu

2025-04-14 16:56:58 +02:00
parent e6e1705f0d
commit 35f7b2d75e
935 changed files with 803964 additions and 0 deletions
@@ -0,0 +1,13 @@
+(Defun C:LSETZEN ()
+  (Setvar "Cmdecho" 0)
+  (Setq A (Entsel "\nPick Objekt on the desired Layer: "))
+  (If
+    A
+      (Progn
+        (Setq A (Cdr (Assoc 8 (Entget (Car A)))))
+        (Command "_Layer" "_SE" _A "")
+      )
+  )
+  (Princ)
+)
+