AutoCAD plus fort en 3D qu\'en 2D !!!!!!

[Eric]

Non je n'ai rien inversé dans le titre, je m'explique.

 

Enfin je vais essayer (sans image c'est pas si facile que ca, Patrick si tu comprend mon charabia, pourrais tu mettre une image pour éclaircir le sujet STP)

 

Je vais essayer de vous démontrer qu'AutoCAD est parfois plus fort en 3D qu'en 2D

 

Dessinez un rectangle, remplacez un coté du rectangle par une spline.

 

Essayez ensuite d'utiliser la commande raccord entre ce qui reste du rectangle et la spline

 

Résultat : AutoCAD est incapable de le faire...

 

 

Maintenant recommençons mais en 3D

 

On dessine un rectangle, on remplace un coté par une spline

 

On transforme le tout en région et on extrude la région (peu importe la hauteur)

 

Maintenant utiliser la commande raccord sur l'arête qui sépare la spline du reste du rectangle

 

Résultat : AutoCAD vous réalise le raccord

 

Bon après analyse on s'apercoit que le raccord crée est aussi une spline, mais si il le fait en 3D pourquoi pas en 2D

 

Alors qui a dit qu'AutoCAD était nul en 3D ? ;)

 

Convaincu ??????????

 

Eric

 

images/articles/XForum-3834.gif

 

[Invité Patrick]

Alors qui a dit qu'AutoCAD était nul en 3D ? ;)

 

C'est pô moi! :P

Pour l'image, si tu veux m'en envoyer une...

[Eric]

Bon j'ai dit une betise, il sait le faire en 2D aussi mais pas si c'est entre une polyligne et une spline mais si on décompose la polyligne, ca marche.

 

C'était la betise de la semaine par Eric

 

 

[lecrabe]

 

Bonsoir Eric

 

Si tous les utilisateurs d'AutoCAD faisaient autant de bêtises que toi !!!

Il n'y aurait plus besoin de formateur / dépanneur / bidouilleur ...

 

Il est vrai que l'objet SPLINE (implanté depuis la R14) manque un peu de souplesse :exclam:

 

Nous avons le PEDIT sur les polylignes classiques

et le SPLINEDIT sur les splines comme tout le monde le sait.

 

Mais le traitement des Splines a été (A mon gout) un peu baclé par Autodesk :o

 

Par exemple sur les raccords entre les splines, il serait bien

d'obtenir (Eventuellement) un spline de raccord et non pas un arc.

 

Sans parler du fait que j'aimerais bien exploser mes splines parfois en polylignes.

(Enregistrer en R12 pour les récupérer en polylignes, c'est du délire)

 

Je ne suis pas dans la mécanique donc je dis peut être des bêtises :(

 

Qu'en penses tu ?

 

Bye

 

[Eric]

Hello le Crabe

 

Ben dans ma connerie du début on aura quand même réussi à voir que comme tu le dis si tu fais un raccord entre 2 splines (en 2D) tu obtiens un arc de cercle.

 

Par contre si tu fais le raccord sur la même forme en 3D puis que tu décomposes le solide ou que tu copies une face voir même que tu utilise Soldraw tu obtiens une spline au lieu de l'arc.

 

Mieux pas mieux, pas facile à dire, certains vont trouver ca ennuyeux de ne pouvoir coter le soi disant rayon qui est en fait une spline, mais d'un autre coté quand on tuilise des formes comme la spline on passse souvent par une autre technique que la cotation simple.

 

Géométriquement lequel est le plus juste........?

 

Pourquoi 2 méthodes de créations différentes entre le 2D et le 3D ?

 

Sinon transformer une spline en poly autrement que par le DXF 12....

Peut être un jour

 

Qui dit mieux ?

 

[Eric]

Ah si c'est vrai on peut utiliser la commande flatten des express.

 

Si on utilise cette commande sur les splines ca les transforme en polyligne.

 

Ca peut être plus cool que le passage en dxf 12

 

A plus

 

Eric

 

[extrusion]

Pour ma part, je n'utilise pas trop les splines ... ce ne sont que des [blink] lignes esthétiques [/blink]! On ne peut rien en tirer du point de vue topographique car seul le lissage conserve les points d'accrochage. Et puis pour les projets de voirie ou de parcellaire on préfère quand meme les lignes, arcs, cercles et clotoides ... qui sont des [blink] lignes mathématiques[/blink].

 

Qui se sert des splines ?

[lecrabe]

 

Bonsoir Eric

 

Merci pour le FLATTEN sur les splines :) :D :cool:

 

J'utilise les routines Bonus / Express depuis la version R14

(c'est à dire environ 1997) et je ne connaissais pas cette astuce !!!

 

Malgré bientôt 20 ans d'AutoCAD, j'apprends encore des trucs ...

 

Le bon vieux Crabe salue bien bas le Grand Mécanicien ERIC :P

 

Bye

 

[didier]

hello,

ben figure toi, LeCrabe,

que je peux me mettre à tes côtes sur les rangs

de ceux qui apprennent tous les jours.

et le coup du FLATTEN d'Eric est malin comme tout,

je l'ignorais.

 

Merci Eric.

bonne nuit à toutes et à tous,

 

[Concombre_masque]

Qui se sert des splines ?

 

Moi pour faire mes corrigés de cours de traçage. Par exemple pour la courbe d'un cylindre tronqué par un plan développé

 

[Edité le 9/11/2004 par Concombre_masque]

[Eric]

Qui se sert des splines ?

 

Ah ben c'est sur que ca dépend du métier.

 

Mais on peut la retrouver dans pas mal d'endroit et comme tu le dis c'est souvent utiliser de manière estétique.

 

Plan d'eau, gaine éléctrique, délimitation de dessin, et pourquoi pas courbe de niveau...

 

Mais aussi pour créer des formes d'objet courant mais dans ce cas AutoCAD est un peu léger pour ca (carrosserie, souris, boitier de cafetiere, télévision....)

 

On pourrais aussi s'en servir pour créer des ressort 3D propre si AutoCAD acceptait d'extruder le long d'une spline 3D

 

Mais bon c'est vrai qu'elle n'est pas forcément utile à tout le monde, mais c'est quand même bien qu'elle soit la

 

 

 

[nemosand]

Qui se sert des splines ?

 

On pourrais aussi s'en servir pour créer des ressort 3D propre si AutoCAD acceptait d'extruder le long d'une spline 3D

 

 

Bonjour,

Je viens de finir une formation sur Autocad 2004 et ai demandé au formateur au cours de celle-ci comment réaliser un ressort. Il m'a été répondu qu'il existait une application à télécharger pour réaliser un ressort en 3D suivant une spline.

Je possède cette application (malheureusement, je n'ai pas de lien à vous communiquer). Je peux vous l'envoyer par mail : nemosand@wanadoo.fr .

Une fois installée, il faut aller dans le menu "outils", "charger une application", puis rechercher le chemin du fichier (prendre le fichier "3DSIRAL.LSP"). Une fois chargée, il faut noter dans la ligne de commande 3DSPIRAL (en majuscules ou miniscules, cela n'aura pas d'incidence). Par contre, il faut que le SCU soit en général et les accrochages doivent être désactivées.

Par défaut, je choisis C pour circle (un cercle). Eh oui, c'est en anglais...

Res : résolution de rotation

Overall hgt : hauteur totale de la spirale

#: nombre de spires

Normal/Reverse : sens de rotation : normal ou inversé

 

Je viens de trouver ceci : http://www.web2cad.fr/news/Forum2/HTML/000030.html , il y est question de l'application pré-cité mais aussi d'une autre : SpiRevol.LSP (voir le post de Vincent du 14 mai 2001).

 

En espérant avoir été utile. Bonne journée.

 

Sandrine

 

[lecrabe]

 

Bonsoir

 

Peut être suis je indiscret Mr Nemosand, masi c'était qui le formateur / société ?

 

Il me semble avoir DEJA fourni sur ce forum CADXP cette fameuse routine "3dspiral.lsp"

qui permet de créer des spirales 2D et 3D :)

 

Sa 1ère version date de 1985/1986, et elle fonctionnait avec AutoCAD R2.5/R2.6 !!!

Puis elle a été améliorée ultérieurement par Autodesk pour être pleinement fonctionnelle

tant en 2D qu'en 3D avec AutoCAD R11 (1991), R12 (1993), R13 ( 1995).

 

Elle permet de générer des spirales 2D (en fait des polylignes 2D,

qu'il faudra après Spliner) et aussi des 3D Polylignes qu'il faudra aussi Spliner

puis utiliser l'extrusion d'un profil en suivant cette 3D POLY.

 

Je vous la redonne avec plaisir :P

 

Bye

 

;;; --------------------------------------------------------------------------;

;;; SPIRAL.LSP

;;; Copyright © 1992 by Autodesk, Inc.

;;;

;;; Permission to use, copy, modify, and distribute this software

;;; for any purpose and without fee is hereby granted, provided

;;; that the above copyright notice appears in all copies and that

;;; both that copyright notice and this permission notice appear in

;;; all supporting documentation.

;;;

;;; THIS SOFTWARE IS PROVIDED "AS IS" WITHOUT EXPRESS OR IMPLIED

;;; WARRANTY. ALL IMPLIED WARRANTIES OF FITNESS FOR ANY PARTICULAR

;;; PURPOSE AND OF MERCHANTABILITY ARE HEREBY DISCLAIMED.

;;; --------------------------------------------------------------------------;

;;;

;;; DESCRIPTION

;;; -----------

;;;

;;; This is a programming example.

;;;

;;; Designed and implemented by Kelvin R. Throop in January 1985

;;;

;;; This program constructs a spiral. It can be loaded and called

;;; by typing either "spiral", "3dspiral" or the following:

;;; (cspiral

;;;

;;; ).

;;;

;;; --------------------------------------------------------------------------;

 

(defun myerror (s) ; If an error (such as CTRL-C) occurs

; while this command is active...

(if (/= s "Function cancelled")

(princ (strcat "\nErreur : " s))

)

(setvar "cmdecho" ocmd) ; Restore saved modes

(setvar "blipmode" oblp)

(setq *error* olderr) ; Restore old *error* handler

(princ)

)

 

(defun cspiral (ntimes bpoint hfac lppass strad vfac

/ ang dist tp ainc dhinc dvinc circle dv)

 

(setvar "blipmode" 0) ; turn blipmode off

(setvar "cmdecho" 0) ; turn cmdecho off

(setq circle (* 3.141596235 2))

(setq ainc (/ circle lppass))

(setq dhinc (/ hfac lppass))

(if vfac (setq dvinc (/ vfac lppass)))

(setq ang 0.0)

(if vfac

(setq dist strad dv 0.0)

(setq dist 0.0)

)

(if vfac

(command "_3dpoly") ; start spiral ...

(command "_pline" bpoint) ; start spiral from base point and...

)

(repeat ntimes

(repeat lppass

(setq tp (polar bpoint (setq ang (+ ang ainc))

(setq dist (+ dist dhinc))

)

)

(if vfac

(setq tp (list (car tp) (cadr tp) (+ dv (caddr tp)))

dv (+ dv dvinc)

)

)

(command tp) ; continue to the next point...

)

)

(command "") ; until done.

(princ)

)

 

;;;

;;; Interactive spiral generation

;;;

 

(defun C:SPIRAL (/ olderr ocmd oblp nt bp cf lp)

(setq olderr *error*

*error* myerror)

(setq ocmd (getvar "cmdecho"))

(setq oblp (getvar "blipmode"))

(setvar "cmdecho" 0)

(initget 1) ; bp must not be null

(setq bp (getpoint "\nCentre de la spirale : "))

(initget 7) ; nt must not be zero, neg, or null

(setq nt (getint "\nNombre de rotations : "))

(initget 3) ; cf must not be zero, or null

(setq cf (getdist "\nCroissance par tour : "))

(initget 6) ; lp must not be zero or neg

(setq lp (getint "\nNombre de Points par tour : "))

(cond ((null lp) (setq lp 30)))

(cspiral nt bp cf lp nil nil)

(setvar "cmdecho" ocmd)

(setvar "blipmode" oblp)

(setq *error* olderr) ; Restore old *error* handler

(princ)

 

)

 

;;;

;;; Interactive spiral generation

;;;

 

(defun C:3DSPIRAL (/ olderr ocmd oblp nt bp hg vg sr lp)

(setq olderr *error*

*error* myerror)

(setq ocmd (getvar "cmdecho"))

(setq oblp (getvar "blipmode"))

(setvar "cmdecho" 0)

(initget 1) ; bp must not be null

(setq bp (getpoint "\nCentre de la spirale : "))

(initget 7) ; nt must not be zero, neg, or null

(setq nt (getint "\nNombre de rotations : "))

(initget 7) ; sr must not be zero, neg, or null

(setq sr (getdist bp "\nRayon de depart : "))

(initget 1) ; cf must not be zero, or null

(setq hg (getdist "\nCroissance horizontale par tour : "))

(initget 3) ; cf must not be zero, or null

(setq vg (getdist "\nCroissance verticale par tour : "))

(initget 6) ; lp must not be zero or neg

(setq lp (getint "\nNombre de Points par rotation : "))

(cond ((null lp) (setq lp 30)))

(cspiral nt bp hg lp sr vg)

(setvar "cmdecho" ocmd)

(setvar "blipmode" oblp)

(setq *error* olderr) ; Restore old *error* handler

(princ)

 

)

 

;;; --------------------------------------------------------------------------;

(princ "\n\tC:SPIRAL et C:3DSPIRAL chargees. ")

(princ "\n\tPour executer, taper : SPIRAL ou 3DSPIRAL.")

(princ)

 

 

[Eric]

Effectivement le programme 3dspiral permet de réaliser un ressort 3D sur AutoCAD

 

Mais pourquoi j'ai parlé de ressort propre, parce que 3dspiral n'extrude pas le long d'une spline 3D mais d'une polyligne 3D.

 

Et la polyligne 3D n'accepte pas les courbes, donc on triche un peu en utilisant des segments de ligne

 

On en met plein et tout petit et on a l'illusion d'avoir un ressrot en courbe, mais c'est en fait une succession de plats.

 

Bon ca marche très bien, pour représenter un ressort ca va mais du coup on augmente aussi le nombre de facêtes et on alourdit le dessin.

 

Voila, donc pour résumer ca fait un ressort mais le long d'une poly3D et non d'une spline 3D

 

[Eric]

Effectivement le programme 3dspiral permet de réaliser un ressort 3D sur AutoCAD

 

Mais pourquoi j'ai parlé de ressort propre, parce que 3dspiral n'extrude pas le long d'une spline 3D mais d'une polyligne 3D.

 

Et la polyligne 3D n'accepte pas les courbes, donc on triche un peu en utilisant des segments de ligne

 

On en met plein et tout petit et on a l'illusion d'avoir un ressrot en courbe, mais c'est en fait une succession de plats.

 

Bon ca marche très bien, pour représenter un ressort ca va mais du coup on augmente aussi le nombre de facêtes et on alourdit le dessin.

 

Voila, donc pour résumer ca fait un ressort mais le long d'une poly3D et non d'une spline 3D

 

[lecrabe]

 

Bonsoir Eric

 

Je suis 100% d'accord avec toi mais cette routine "3dspiral.lsp" que

j'utilise de temps en temps depuis 15 ans m'a rendu bien des services :) :D :cool:

 

Tiens d'aiileurs quand je la visualise dans CADXP, il manque plein de lignes au départ

dans les blablas de commentaires d'Autodesk :o

 

Mais si je passe en modification de mon message, elle semble parfaite :exclam:

 

Curieux n'est il pas ???

 

Bye

 

[Concombre_masque]

Mais si je passe en modification de mon message, elle semble parfaite :exclam:

 

 

Hé hé, et la fonction code, elle sert à quoi ?

 

../..

setvar "blipmode" 0) ; turn blipmode off

(setvar "cmdecho" 0) ; turn cmdecho off

(setq circle (* 3.141596235 2))

(setq ainc (/ circle lppass))

(setq dhinc (/ hfac lppass))

(if vfac (setq dvinc (/ vfac lppass)))

(setq ang 0.0)

(if vfac

(setq dist strad dv 0.0)

(setq dist 0.0)

 

Hum ? Ca c'est du boulot.

 

[nemosand]

Bonsoir

 

Peut être suis je indiscret Mr Nemosand, masi c'était qui le formateur / société ?

 

Il me semble avoir DEJA fourni sur ce forum CADXP cette fameuse routine "3dspiral.lsp"

qui permet de créer des spirales 2D et 3D :)

 

Sa 1ère version date de 1985/1986, et elle fonctionnait avec AutoCAD R2.5/R2.6 !!!

Puis elle a été améliorée ultérieurement par Autodesk pour être pleinement fonctionnelle

tant en 2D qu'en 3D avec AutoCAD R11 (1991), R12 (1993), R13 ( 1995).

 

Elle permet de générer des spirales 2D (en fait des polylignes 2D,

qu'il faudra après Spliner) et aussi des 3D Polylignes qu'il faudra aussi Spliner

puis utiliser l'extrusion d'un profil en suivant cette 3D POLY.

 

 

Bonsoir,

En effet, en relisant mes notes, je me suis aperçu de mon erreur : merci à vous M. LeCrabe et Eric d'avoir rectifier.

J'ai suivi cette formation par l'intermédiaire de l'ANPE au sein de la société AS Formation de Strasbourg (67).

 

Pour la petite information, M. LeCrabe, ce n'est pas Mr. Nemosand mais Mlle Nemosand. Il est vrai que mon pseudo n'est pas explicite... en fait il s'agit d'un amalgame entre "nemo" qui signifie "personne" en latin et Sandrine, mon prénom...

 

Sandrine

[didier]

Bonsoir à Toutes et à tous,

 

j'interviens pour m'étonner de voir dans la routine "LeCrabesque"

l'affectation d'une valeur numérique à PI

 

diantre, damned, fichtre, ventrebleu, saperlipopette et autres

 

dans leur grande mansuétude, les Dévellopeurs d'AutoLisp

lui ont déjà assigné une valeur, qui aura plus de fiabilité,

et elle s'appelle pi, étonnant non ?

on peut la diviser, la multiplier ...

(setq PisurDeux ( / pi 2))

(setq DeuxPi ( * pi 2))

 

ami calmant

 

[lecrabe]

 

Ami Médisant sur PI

 

Je n'ai pas touché à une ligne de ce programme Lisp depuis l'origine !!!

 

La seule chose que j'ai réalisée (si on peut dire), c'est mettre les messages en FR ;)

 

Pas trop difficile, n'est ce pas ...

 

Rendons à César (Euh Non à Autodesk) ce qui à oto :P

 

Bye