Erstellung von Sprengsteinen

[Angelo2449]

Hallo alle,
Mit dieser im Web heruntergeladenen Software kann ich einen anonymen Block erstellen:

 (defun creablocofr (/ sset tell ent_get ent_getu blk)

(princ "\n seleziona gli oggetti da animare: ")
(setq sset (ssget))
(falls sset)
(Anhang)
'(0 . "Block")
"(2. "*u")
70. 1)
„(10 0,0 0,0 0,0)
(setq tell 0)
(setq ent)
(while int
(setq ent_get (entget ent))
(falls (/= (cdr (assoc 0 ent_get)) "Polyline")(progn
(setq ent_getu)
(endel ent)
(entmake ent_getu)
(Prog.)
(setq Sie eingeben
enter_getu (cdr ent_get)
(while (/= (cdr (assoc 0 ent_getu)) "seqend")
(setq ent_getu (cdr (entget entu))
(entmake ent_getu)
(setq entu (entnext entu))
),
(endel ent)
)
), wenn
(setq tell (+ tell 1))
(setq ent)
)
(setq blk (entmake)
(entmake)
(cons 2 blk)
„(10 0,0 0,0 0,0)
);
), wenn
(Prinzip "\n il gruppo è stato creato")
(principal)

(Setq Identifiercativo "000000000")[CODE]der erstellte Block ist nicht explodieren, wie können Sie es explodieren lassen?
Danke.







); Ende des Befehls createblock
(princ)

 

[giulio1962]

Hallo alle,
Mit dieser im Web heruntergeladenen Software kann ich einen anonymen Block erstellen:

 (defun creablocofr (/ sset tell ent_get ent_getu blk)

(princ "\n seleziona gli oggetti da animare: ")
(setq sset (ssget))
(falls sset)
(Anhang)
'(0 . "Block")
"(2. "*u")
70. 1)
„(10 0,0 0,0 0,0)
(setq tell 0)
(setq ent)
(while int
(setq ent_get (entget ent))
(falls (/= (cdr (assoc 0 ent_get)) "Polyline")(progn
(setq ent_getu)
(endel ent)
(entmake ent_getu)
(Prog.)
(setq Sie eingeben
enter_getu (cdr ent_get)
(while (/= (cdr (assoc 0 ent_getu)) "seqend")
(setq ent_getu (cdr (entget entu))
(entmake ent_getu)
(setq entu (entnext entu))
),
(endel ent)
)
), wenn
(setq tell (+ tell 1))
(setq ent)
)
(setq blk (entmake)
(entmake)
(cons 2 blk)
„(10 0,0 0,0 0,0)
);
), wenn
(Prinzip "\n il gruppo è stato creato")
(principal)

(Setq Identifiercativo "000000000")[CODE]der erstellte Block ist nicht explodieren, wie können Sie es explodieren lassen?
Danke.







); Ende des Befehls createblock
(princ)

 

[giulio1962]

Aber wenn Sie einen Block erstellen, setzen Sie die Prüfung auf "Explosions-Einwilligungen"?

Ich denke, Sie können auch mit der explmode Variable einrichten? )

 

[MassiVonWeizen]

anonyme Blöcke wurden bereits im Forum angesprochenhttp://www.cad3d.it/forum1/threads/creare-blocchi-anonimi.50541/
http://www.cad3d.it/forum1/threads/rendere-un-blocco-non-modificabile.894/