Spline Méthode

[Topheur]

Bonjour,

 

J'utilise la commande EXTRIM d'autocad pour ajuster des splines qui parte du centre d'un cercle.

En clair, j'ai un cercle et je trace des splines depuis le centre du cercle vers des éléments en dehors du même cercle.

 

Lorsque j'utilise EXTRIM à l'intérieur du cercle, cela "nettoie" l'intérieur mais si je clique sur mes splines, les points de lissages ne corresponde plus à ajustement.

 

Pour palier à cela, je sélectionne toutes mes splines et je passe l'option Méthode (dans propriété) à Ajustement.

 

Je cherche la commande me permettant de le faire en ligne de commande sans succès.

J'ai essayé de sélectionner mes splines et de taper SPLMETHOD mais cela ne fonctionne pas.

 

Merci de votre aide.

[LElemurien]

Bonjour,

Peut-être possible en passant par EDITSPLINE et ensuite lisse par contre on peut choisir qu'une spline.

A vérifier

[Topheur]

Merci de ce premier élément de piste,

 

C'est se que j'aimerais obtenir mais sur toutes mes splines sélectionnée.

 

Une autre idée ?

[didier]

Coucou

 

Je viens de faire le test, effectivement les points d'ajustement et les points de lissage varient.

Est-ce important ? l'aspect visuel est identique et les splines (ni leurs points) ne se déplacent pas.

 

Si tu en as besoin de ce comportement il va falloir passer par un lisp qui va "couper" les splines à l'intersection avec le cercle, et dans ce cas tout est correct.

 

Amicalement

 

[Topheur]

Bonjour didier,

 

En terme de rendu cela n'est pas grave, mais je ne vous ai pas tous dit :P

 

En fait, je réutilise ces cercles et splines, sur différent plans, parfois je tombe bon, parfois il faut déplacer certains point des splines.

 

Pour le moment, je sélectionne toutes mes spline et dans propriété je change Méthode en Ajuster.

 

C'est pas très long mais quand on multiplie par le nombres de plans, c'est 3 secondes par plans de perdu et mis bout à bout, c'est des heures de travail perdu...

 

C'est pour cela que je cherche une commande (ou un lisp, je suis preneur) pour faire cela en une commande du genre SPAJUSTE ;)

 

Merci de ton aide

[(gile)]

Salut,

 

;; Met les splines sélectionnées en mode "sommets de contrôle"
(defun c:SPLCTRL (/ ss i elst flag)
 (if (setq ss (ssget '((0 . "SPLINE"))))
   (repeat (setq i (sslength ss))
     (setq elst (entget (ssname ss (setq i (1- i))))
           flag (assoc 70 elst)
     )
     (entmod (subst (cons 70 (logand (cdr flag) (~ 1024))) flag elst))
   )
 )
 (princ)
)

;; Met les splines sélectionnées en mode "ajustement"
(defun c:SPLFIT (/ ss i elst flag)
 (if (setq ss (ssget '((0 . "SPLINE"))))
   (repeat (setq i (sslength ss))
     (setq elst (entget (ssname ss (setq i (1- i))))
           flag (assoc 70 elst)
     )
     (entmod (subst (cons 70 (logior (cdr flag) 1024)) flag elst))
   )
 )
 (princ)
)

[Topheur]

Bonjour Gile (notre maitre à tous :P )

 

En deux coups de cuillere à pot ! Tu es trop fort, exactement ce dont j'ai besoin :)

 

Merci !