Création de bloc

[mateus]

Bonjour à tous, je souhaiterai créer un bloc qui comportera:

-un bloc

-deux entités (polylignes)

 

Ci-joint le schéma du candélabre(bloc) avec raccordement(polylignes)

 

Je souhaiterai savoir comment je pourrai procéder pour créer le bloc de cela avec wbloc par exemple mais sans que l'utilisateur intervienne pour selectionner les élements...

 

Merci par avance :)

[mateus]

Je pensais à utiliser la fonction "entmake" mais je ne sais pas trop comment ça fonctionne

[bonuscad]

Bonjour,

 

Je pensais à utiliser la fonction "entmake" mais je ne sais pas trop comment ça fonctionne

 

Pour la création d'un bloc par entmake, un exemple: (tu copies-colles directement en ligne de commande)

(foreach n
'(
(
(0 . "BLOCK")
(8 . "0")
(2 . "NORDLAMB")
(70 . 0)
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(10 0.0 0.0 0.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 3)
(70 . 0) 
(38 . 0.0)
(39 . 0.0)
(10 0.0140625 0.0)
(40 . 0.0)
(41 . 0.00124296) 
(42 . 0.0)
(10 0.00300077 -0.000621481)
(40 . 0.00124296)
(41 . 0.0)
(42 . 0.0)
(10 0.0 0.0)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 3)
(70 . 0) 
(38 . 0.0)
(39 . 0.0)

(10 0.00994369 -0.00994369)
(40 . 0.0)
(41 . 0.00124296) 
(42 . 0.0)
(10 0.00168241 -0.00256132)
(40 . 0.00124296)
(41 . 0.0)
(42 . 0.0) 
(10 0.0 0.0)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)

(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 2)
(70 . 0)
(43 . 0.0)
(38 . 0.0)
(39 . 0.0)
(10 0.0 -0.0140625)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(10 0.00124296 -0.00300077)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0) 
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 3)
(70 . 0)
(38 . 0.0)
(39 . 0.0)
(10 0.00994369 0.00994369)
(40 . 0.0)
(41 . 0.00124296)
(42 . 0.0)
(10 0.00256132 0.00168241)
(40 . 0.00124296)
(41 . 0.0)
(42 . 0.0)
(10 0.0 0.0)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 3)
(70 . 0)
(38 . 0.0)
(39 . 0.0)
(10 0.0 0.025)
(40 . 0.0)
(41 . 0.00124296)
(42 . 0.0)
(10 0.000621481 0.00300077)
(40 . 0.00124296)
(41 . 0.0)
(42 . 0.0)
(10 0.0 0.0)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 3)
(70 . 0)
(38 . 0.0)
(39 . 0.0)
(10 0.0 -0.0140625)
(40 . 0.0)
(41 . 0.00124296)
(42 . 0.0)
(10 -0.000621481 -0.00300077)
(40 . 0.00124296)
(41 . 0.0)
(42 . 0.0)
(10 0.0 0.0)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 3)
(70 . 0)
(38 . 0.0)
(39 . 0.0)
(10 -0.00994369 -0.00994369)
(40 . 0.0)
(41 . 0.00124296)
(42 . 0.0)
(10 -0.00256132 -0.00168241)
(40 . 0.00124296)
(41 . 0.0)
(42 . 0.0)
(10 0.0 0.0)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 2)
(70 . 0)
(43 . 0.0)
(38 . 0.0)
(39 . 0.0)
(10 -0.00994369 -0.00994369)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(10 -0.00124296 -0.00300077)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 2)
(70 . 0)
(43 . 0.0)
(38 . 0.0)
(39 . 0.0)
(10 0.0 0.025)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(10 -0.00124296 0.00300077)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 3)
(70 . 0)
(38 . 0.0)
(39 . 0.0)
(10 -0.0140625 0.0)
(40 . 0.0)
(41 . 0.00124296)
(42 . 0.0)
(10 -0.00300077 0.000621481)
(40 . 0.00124296)
(41 . 0.0)
(42 . 0.0)
(10 0.0 0.0)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 2)
(70 . 0)
(43 . 0.0)
(38 . 0.0)
(39 . 0.0)
(10 -0.0140625 0.0)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(10 -0.00300077 -0.00124296)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 3)
(70 . 0)
(38 . 0.0)
(39 . 0.0)
(10 -0.00994369 0.00994369)
(40 . 0.0)
(41 . 0.00124296)
(42 . 0.0)
(10 -0.00168241 0.00256132)
(40 . 0.00124296)
(41 . 0.0)
(42 . 0.0)
(10 0.0 0.0)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 2)
(70 . 0)
(43 . 0.0)
(38 . 0.0)
(39 . 0.0)
(10 -0.00994369 0.00994369)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(10 -0.00300077 0.00124296)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 2)
(70 . 0)
(43 . 0.0)
(38 . 0.0)
(39 . 0.0)
(10 0.00994369 -0.00994369)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(10 0.00300077 -0.00124296)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0) 
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 2)
(70 . 0)
(43 . 0.0)
(38 . 0.0)
(39 . 0.0)
(10 0.0140625 0.0)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(10 0.00300077 0.00124296)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 2)
(70 . 0)
(43 . 0.0)
(38 . 0.0)
(39 . 0.0)
(10 0.00994369 0.00994369)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(10 0.00124296 0.00300077)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(410 . "Model")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
(100 . "AcDbPolyline")
(90 . 2)
(70 . 0)
(43 . 0.0)
(38 . 0.0)
(39 . 0.0)
(10 0.00994369 0.00994369)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(10 0.00124296 0.00300077)
(40 . 0.0)
(41 . 0.0)
(42 . 0.0)
(210 0.0 0.0 1.0)
)
(
(0 . "ENDBLK")
(8 . "0")
(62 . 0)
(6 . "ByBlock")
(370 . -2)
)
)
(entmake n)
)

 

Cela va créer un bloc NORDLAMB qui a toutes les propriété "du bloc" et constitué sur le calque "0" .

[mateus]

bonuscad ya t'il un moyen plus simple et plus court pour que je puisse créer mon bloc merci :)

[-Olivier-]

Bonjour Mogo,

En cherchant un peu, il y avait ceci .

Comme je l'ai déjà dit, si tu pouvais te limiter à un seul poste sur un seul emplacement, cela deviendrait beaucoup plus facile à suivre. <_<

J'ai l'impression que tu te complique énormément la vie sur ton programme, mais avec les petits bouts éparpillés j'ai du mal à avoir une vu d'ensemble.

 

Olivier

[mateus]

Bonsoir Olivier désolé, je reviens sur mon premier post "pgn éclairage public", je dois forcément me compliquer la vie mais étant donné que je ne maîtrise pas suffisamment les fonctions j'ai un peu de mal du coup j'ai suivi le post sur lequel tu m'as envoyé je vais voir ça.

 

Merci encore

 

Mathieu