Lisp pour tracer une polyligne au extrémité de plusieurs polyligne.

[bella.ali]

Bonjour à tous,

Je suis à la recherche d'un Lisp qui permettrait de tracé une polyligne au extrémité de plusieurs polyligne, comme l'exemple en pièce jointe.

 

 

 

Merci d'avance 

Modele_Ovalisation-M20.dwg

[La Lozère]

Bonjour,

Peut-être une réponse avec ce topic. Et le lisp de Bonuscad.

Un test rapide montre que ça marche, mais le prog s'arrête à la moitié car tes polylignes ne sont pas interrompues au point de convergence.

$

Mais après quelques petites bidouilles (suppression d'une polyligne double, suppression de la zone déjà traité et inversion du sens des polylignes), ça rentre à peu prés dans l'ordre.... En tout cas, c'est relativement rapide à faire.