Changer les faces d'angle

[Gino4732984723ç°]

Bonjour à tous, j'ai fait une macro qui exporte une partie dans différents formats, y compris pas, iges, assis et parmi eux aussi dans stl.
seulement que sur la partie stl, la macro devrait copier la partie et dans l'objet copié ajuster l'angle des faces à 2 puis exporter le fichier avec l'extension stl.
fait tout, seulement cela ne change pas l'angle des visages et laisse que défini par défaut.. .
Je vous laisse le code du lisp :

(en emballage : salve)
(emballage d'utilisation :oli)

(setq cam (format zéro "~a/salvataggi automatici annotation/cam" oli:*bizzotto-temp*)

(sd-defdialog 'salva_file_cam
:dialog-title "salva file per cam"
:bouton-boîte à outils t
:variables '(
(particolare : sélection (*sd-assembly-seltype* *sd-part-seltype*)
: éléments multiples t
:show-select-menu t
:titre "parte/gruppo"
: après entrée
(progrès (setf lista (liste))
(dolist (x particolare)
(si (string= "nil" (écriture vers chaîne (sd-inq-obj-contents-name x)))
(progn (sd-display-error "una delle parti selezionate non' codificata!")
(clear_vp (oli::sd-inq-current-vp))
(add_to_vp_drawlist (oli::sd-inq-current-vp) x)
(fit_vp (oli::sd-inq-current-vp) update_screen)
(sd-display-error "questa e' la parte non codificata!
n.b: questa parte non sara' esportata!")
(progrès (push x lista)))))

(formato)

(étape : toggle-type : large toggle
:titre "étape"
:push-action (dolist (nome lista)
(step_export :select nome :filename (format zéro "~a/~a.step" cam (sd-inq-obj-contents-name nome)) :overwrite))

(ges :toggle-type :large-toggle
:titre "iges"
:push-action (dolist (nome lista)
(native_cad_out :cad_system :igesdek :parties nome :filename (format zéro "~a/~a.igs" cam (sd-inq-obj-contents-name nome) :overwrite))

(sat :toggle-type : large-toggle
:titre "sat"
:push-action (dolist (nome lista)
(save_sat :select nome :filename (format zéro "~a/~a.sat" cam (sd-inq-obj-contents-name nome)) :overwrite))

;07/09/2022 - toniolo s. - aggienta export in formato .stl

(stl :toggle-type :large-toggle
:titre "stl"
:push-action (dolist (nome lista)
(sd-call-cmds) (create_multiple_pa :copy)
:onelevel :on
:source particolare
: propriétaire /)
)
:the_part :start (sd-inq-curr-part) :select_done
:ang_err 2
;(stl :parties_assemblages(sd-inq-curr-part) :oui :fichier (format 0.
)))
: fonctions locales '()
:ok-action '()
:aide-action'()

 

[Kaji]

Étant donné que je ressens une grande admiration pour ceux qui peuvent créer lisp, je ne peux même pas changer ceux que je trouve en ligne, je dois dire que sur la définition du format stl ne peut pas être indispensable le nombre de visages ou son angle (les anciennes variables de surftab de l'autocad); J'essaie de m'expliquer mieux: en fait, j'ai utilisé le format stl seulement pour générer des fichiers compatibles avec l'imprimante 3d bien que variant le réglage du fichier stl au moment de l'exportation et obtenant également la taille du fichier considérablement différente selon la définition plus ou moins grande, quand ils ont été commutés dans le format de l'imprimante 3d sharebot avec support logiciel simplifie3d le fichier propriétaire avait la même taille et aussi le résultat de l'impression était assez analogue bien que né de stl de différent.
Je pense donc qu'en fin de compte, si l'exportation stl sert à l'impression 3D, l'échec de cette partie de lis n'est pas fondamental.

 

[Gino4732984723ç°]

Bonjour.