cdi

Salut 1975 d'une part il te faut te procurer une version Acrobat 3d et convertir ton dwg en véritable fichier CAO 3d sinon Acrobat ne le prendra pas. BON COURAGE Mais un viewer suffit

Salut L'astuce... Alors si même en mode filaire ça rame il faut passer ton ouvrage, sur une équipement dédié au graphisme ou au travail cao en 64bits pour le finir.. Ensuite tu pourras plus ou moins difficilement l'ouvrir avec ton pc de bureau, cela reste du bricolage provisoire[Edité le 27/10/2008 par cdi] [Edité le 27/10/2008 par cdi]

Bonjour yw22 J'avais parcouru votre cours Autocad et là Inventor c'est tout simplement prodigieux , félicitations

Bonjour lili Ah,....... Je reconnais mais je voulais simplement dire : mission impossible, enfin pour moi.

Bonjour Bonus C'est exactement ça . Alors aprés avoir regardé il me manquait .......du copier colle sans doute enfin ok ça marche. IL faut que je recherche car ce n'ai pas l'original celui-ci

Bonjour ci-joint une routine sans grand intérêt sauf: la commande % de pente pour le tracé Mais voila toute ces commandes marchent, sauf elle ....en fin je crois. Si une personne compétente pouvait me donner son avis ;;; Commande : %valeur permet de changer d'altitude suivant la valeure en pourcentage donnée jusqu'à un point donné. ;;; Commande : >angle permet de changer d'altitude en suivant un angle spécifié (en degrés) par rapport au plan (0XY). ;; trace de la ligne (defun c:do_line ( / osm pt0 pt1 pt2 pt_last inc tincz tciny decz decaz ang aa ab ac ba bb bc) (setq olderr *error* *error* do_err_line) (setq li_ent nil) ;; liste des entitees crees (setq li_pt nil) ;; liste des points crees (setq pt0 nil) ;; point precedent du point precedent (setq pt2 T) ;; point courant (setq rotucs 0) ;; angle de rotation d'ucs (command "_ucs" "_w") (setq osm (getvar "OSMODE")) (setvar "OSMODE" 0) ;; attente du premier point (while (not pt1) (progn (setq pt1 (getpoint (strcat "\n" "First point : "))) (setq li_pt (cons pt1 li_pt)) ) ) (setvar "LASTPOINT" pt1) ;; attente des autres points (while pt2 (initget 128) (setq pt2 (getpoint (strcat " \n" "Next point : ") (getvar "lastpoint"))) (cond ( (= 'LIST (type pt2)) ;; entree d'un point ;; differents decalages en altitude (if tincz (progn (entdel (entlast)) (setq tincz nil) ) ) (if decz (progn (setq pt2 (append (list (car pt2)) (list (cadr pt2)) (list (+ (caddr pt1) (* (distance (restli 1 pt1) (restli 1 pt2)) (/ decz 100)) )))) (setq decz nil) ) ) (if decaz (progn (setq pt2 (append (list (car pt2)) (list (cadr pt2)) (list (+ (caddr pt1) (* (distance (restli 1 pt1) (restli 1 pt2)) (tand decaz)) )))) (setq decaz nil) ) ) ;; changement d'ucs ;;(command "_ucs" "_z" rotucs) ;;(setq pt1 (trans pt1 0 1)) ;;(setvar "lastpoint" pt1) ;; test si les points sont alignes (if pt0 (progn (setq aa (- (car pt1) (car pt0))) (setq ba (-(car pt2) (car pt1))) (setq ab (- (cadr pt1) (cadr pt0))) (setq bb (- (cadr pt2) (cadr pt1))) (setq ac (- (caddr pt1) (caddr pt0))) (setq bc (- (caddr pt2) (caddr pt1))) (if (and (= 0 (- (* ab bc) (* bb ac))) (= 0 (- (* ac ba) (* aa bc))) (= 0 (- (* aa bb) (* ab ba)))) (progn ;; lignes colineaires (setq pt1 pt0) ;; retire l'encienne entite (setq li_pt (cdr li_pt)) (entdel (car li_ent)) (setq li_ent (cdr li_ent)) ) ) ) ) ;; trace de la ligne (command "_line" pt1 pt2 "") ;; ajout du dernier point et de la derniere entitee (setq li_pt (cons pt2 li_pt)) (setq li_ent (cons (entlast) li_ent)) ;; conditions d'avancement (setq pt0 pt1) (setq pt1 pt2) ) ( (= 'STR (type pt2)) ;; si l'utilisateur entre une commande (cond ((= "u" pt2) (if (car li_ent) (progn (entdel (car li_ent)) (setvar "lastpoint" pt0) ;; mise a jour des points courants (setq pt1 (cadr li_pt)) (setq pt2 (car li_pt)) (setq pt0 (caddr li_pt)) ;; supprime la derniere entitee (setq li_pt (cdr li_pt)) (setq li_ent (cdr li_ent)) ) ) ) ;;((= "r" (substr pt2 1 1)) ;; (setq rotucs (+ rotucs (substr pt2 2))) ;; ) ((= "a" (substr pt2 1 1)) (setq ang (- 180 (atof (substr pt2 2)))) (setq pt2 (getpoint (strcat " \n" "Second point : ") (getvar "lastpoint"))) (if pt0 (progn (setq aa (- (car pt1) (car pt0))) (setq ba (-(car pt2) (car pt1))) (setq ab (- (cadr pt1) (cadr pt0))) (setq bb (- (cadr pt2) (cadr pt1))) (setq ac (- (caddr pt1) (caddr pt0))) (setq bc (- (caddr pt2) (caddr pt1))) (if (or (/= 0 (- (* ab bc) (* bb ac))) (/= 0 (- (* ac ba) (* aa bc))) (/= 0 (- (* aa bb) (* ab ba)))) (progn ;; positionnement dans le scu objet + point de raccrochage (command "_ucs" "_3" pt1 pt0 pt2) ;; calcul du decalage sur y dans le scu courant (setq pt2 (trans pt2 0 1)) (setq tincy (cadr pt2)) (setvar "lastpoint" pt1) (command "_line" "0,0,0" (strcat "@" (ftoa (/ tincy (sin (/ (* ang PI) 180)))) "<" (ftoa ang)) "") (setq pt2 (cdr (assoc 11 (entget (entlast))))) (setq tincy nil) (command "_ucs" "_p") (setq li_ent (cons (entlast) li_ent)) (setq li_pt (cons pt2 li_pt)) (setq pt0 pt1) (setq pt1 pt2) ) ) ) ) ) ((= "+" (substr pt2 1 1)) ;; incremant sur Z (setq inc (atof (substr pt2 2))) (setq pt2 (getvar "lastpoint")) (setvar "lastpoint" (list (car pt2) (cadr pt2) (+ (caddr pt2) inc)) ) (setq pt2 (getvar "lastpoint")) ;; verification de l'alignement (if pt0 (progn (setq aa (- (car pt1) (car pt0))) (setq ba (-(car pt2) (car pt1))) (setq ab (- (cadr pt1) (cadr pt0))) (setq bb (- (cadr pt2) (cadr pt1))) (setq ac (- (caddr pt1) (caddr pt0))) (setq bc (- (caddr pt2) (caddr pt1))) (if (and (= 0 (- (* ab bc) (* bb ac))) (= 0 (- (* ac ba) (* aa bc))) (= 0 (- (* aa bb) (* ab ba)))) (progn (setq pt1 pt0) ;; retire l'encienne entite (setq li_pt (cdr li_pt)) (entdel (car li_ent)) (setq li_ent (cdr li_ent)) ) ) ) ) (command "_line" pt1 pt2 "") (setq li_ent (cons (entlast) li_ent)) (setq li_pt (cons pt2 li_pt)) (setq pt0 pt1) (setq pt1 pt2) ) ((= "-" (substr pt2 1 1)) ;; incremant sur Z (negatif) (setq inc (atof (substr pt2 2))) (setq pt2 (getvar "lastpoint")) (setvar "lastpoint" (list (car pt2) (cadr pt2) (- (caddr pt2) inc)) ) (setq pt2 (getvar "lastpoint")) ;; verification de l'alignement (if pt0 (progn (setq aa (- (car pt1) (car pt0))) (setq ba (-(car pt2) (car pt1))) (setq ab (- (cadr pt1) (cadr pt0))) (setq bb (- (cadr pt2) (cadr pt1))) (setq ac (- (caddr pt1) (caddr pt0))) (setq bc (- (caddr pt2) (caddr pt1))) (if (and (= 0 (- (* ab bc) (* bb ac))) (= 0 (- (* ac ba) (* aa bc))) (= 0 (- (* aa bb) (* ab ba)))) (progn (setq pt1 pt0) ;; retire l'encienne entite (setq li_pt (cdr li_pt)) (entdel (car li_ent)) (setq li_ent (cdr li_ent)) ) ) ) ) (command "_line" pt1 pt2 "") (setq li_ent (cons (entlast) li_ent)) (setq li_pt (cons pt2 li_pt)) (setq pt0 pt1) (setq pt1 pt2) ) ((= "x" (substr pt2 1 1)) (setq inc (atof (substr pt2 2))) (setq pt2 (getvar "lastpoint")) (setvar "lastpoint" (list (+ (car pt2) inc) (cadr pt2) (caddr pt2))) (setq pt2 (getvar "lastpoint")) ;; verification de l'alignement (if pt0 (progn (setq aa (- (car pt1) (car pt0))) (setq ba (-(car pt2) (car pt1))) (setq ab (- (cadr pt1) (cadr pt0))) (setq bb (- (cadr pt2) (cadr pt1))) (setq ac (- (caddr pt1) (caddr pt0))) (setq bc (- (caddr pt2) (caddr pt1))) (if (and (= 0 (- (* ab bc) (* bb ac))) (= 0 (- (* ac ba) (* aa bc))) (= 0 (- (* aa bb) (* ab ba)))) (progn (setq pt1 pt0) ;; retire l'encienne entite (setq li_pt (cdr li_pt)) (entdel (car li_ent)) (setq li_ent (cdr li_ent)) ) ) ) ) (command "_line" pt1 pt2 "") (setq li_ent (cons (entlast) li_ent)) (setq li_pt (cons pt2 li_pt)) (setq pt0 pt1) (setq pt1 pt2) ) ((= "y" (substr pt2 1 1)) (setq inc (atof (substr pt2 2))) (setq pt2 (getvar "lastpoint")) (setvar "lastpoint" (list (car pt2) (+ (cadr pt2) inc) (caddr pt2))) (setq pt2 (getvar "lastpoint")) ;; verification de l'alignement (if pt0 (progn (setq aa (- (car pt1) (car pt0))) (setq ba (-(car pt2) (car pt1))) (setq ab (- (cadr pt1) (cadr pt0))) (setq bb (- (cadr pt2) (cadr pt1))) (setq ac (- (caddr pt1) (caddr pt0))) (setq bc (- (caddr pt2) (caddr pt1))) (if (and (= 0 (- (* ab bc) (* bb ac))) (= 0 (- (* ac ba) (* aa bc))) (= 0 (- (* aa bb) (* ab ba)))) (progn (setq pt1 pt0) ;; retire l'encienne entite (setq li_pt (cdr li_pt)) (entdel (car li_ent)) (setq li_ent (cdr li_ent)) ) ) ) ) (command "_line" pt1 pt2 "") (setq li_ent (cons (entlast) li_ent)) (setq li_pt (cons pt2 li_pt)) (setq pt0 pt1) (setq pt1 pt2) ) ((= "%" (substr pt2 1 1)) (setq decz (atof (substr pt2 2))) ) ((= ">" (substr pt2 1 1)) (setq decaz (atof (substr pt2 2))) ) ((= "p" (substr pt2 1 1)) ;; incremant sur Z (setq inc (atof (substr pt2 2))) (setq pt_last (getvar "lastpoint")) (setq pt2 (list (car pt_last) (cadr pt_last) (+ (caddr pt_last) inc)) ) (command "_line" pt1 pt2 "") (redraw (entlast) 3) (setq tincz (entlast)) ) ((= "m" (substr pt2 1 1)) ;; incremant sur Z (setq inc (atof (substr pt2 2))) (setq pt_last (getvar "lastpoint")) (setq pt2 (list (car pt_last) (cadr pt_last) (- (caddr pt_last) inc)) ) (command "_line" pt1 pt2 "") (redraw (entlast) 3) (setq tincz (entlast)) ) ( T (princ "\nInvalid command")) ;; commande non valide ) ) ( T (setq pt2 nil) ) ;; sortie de la fonction do_line ) ;; fin cond ) ;; fin while pt2 (command "_ucs" "_p") (setvar "OSMODE" osm) (setq li_ent (reverse li_ent) li_ent nil li_pt nil) (setq *error* olderr) (graphscr) (princ) ) ) ;; 0 a nb premiers elements d'une liste (defun restli (nb liste) (if (< nb 0) nil (reverse (member (nth nb liste) (reverse liste))) ) ) (princ "\nPlease see source file for more infos about use of 3D_Line.mns.") (princ "\nc:do_line loaded - type do_line to use.") (princ)

Désolé, on n'a pas en magazin Humour..........faut bien, non [Edité le 1/8/2008 par cdi]

Re je ne l'utiliserais peut être pas non plus... Il empêche que EDITLEN n'est pas un gadget, et loin de là,il peut rendre un sacré service pour les domaines du procédé en pharmacopée "les points sensibles règle des 3D"........ tuyauterie en tout genre.... Alors pour eux je dis merci

N'exagérons rien, on est loin du compte ! Salut gile Ah Probablement mais déjà ça rivalise sérieusement avec Mechanical Alors oui,........ la cote ne pilote pas le modèle, pour certaines choses, ce n'est pas indispensable

Les logiciels de CAO paramétrables n'ont qu'on bien se tenir ! Salut Parfait..........nickel j'adhère totalement à ce que dit bred

un truc que j'avais en tête. ....... Bonjour Ouf ......Pas mal, pas mal.

Bonjour BRAVO DIDIER..... Je vais vers mes 60 printemps et je ne supporte pas ce genre ce genre d'imbécilité., je ne supporte pas non plus le coté bling bling de nos dirigeants, ou va-ton...... Bravo à toi lili2006, tu t'en sors bien en tant que modérateur .

Salut Peps Dans un poste précédent revu par Patrick_35 ceci à essayer (acad-push-dbmod) ;;met à jour la liste des échelles (command "-scalelistedit" "R" "O" "Q") ;;;;enlève la notification des calques (setvar "LAYERNOTIFY" 0) (command "_.LAYEREVAL" 0) (acad-pop-dbmod)

Quand c'est bon c'est très bien..................... salut

Re peps Merci de ta réponse de mon coté j'ai le même réglage à un poile près Mais de mon coté également je n'ai pas de pb, à voir si notre ami Barbichette est très éloigné de ces réglages,mais il se peut que cela n'a rien à voir. Car cet été j'ai vue ce pb chez un client et c'était bel et bien le fichier qui posait pb.

Salut peps OK........ OUTILS=>OPTION Mais sur quoi as-tu personnellement agit, peux-tu être plus précis svp

oui c'est exacte! aussi je ne pense pas que ce soit coté mise à jour de driver qu'il faut chercher. Cependant il faut être très prudent avant de ce prononcer, as-tu remarqué pendant la construction de ton projet un moment précis ou le défaut apparaissait. ex: après insertion d'un bloc ou quelque chose de ce genre.... bonne journée

Re Et cela avec combien de Go de mémoire..... [Edité le 3/3/2008 par cdi]

Re Elle t'as toujours fait ça...... peux tu mettre un dwg 3d à disposition pour essayer de trouver une piste.......

Salut C'EST quoi: ta carte graphique svp

Te tracasse pas et laisse tomber c'est bon. bonne continuation. @+

salut gile je peux comprendre ta demande donc en faisant au plus simple enfin j'espère.... commande 1 1-a à partir du calque courant repérer les objets présents par une ligne de repère multiple qui s'incrémente "numéro inscrit dans un bullage" à positionner manuellement par un pt à définir. 1-b Simultanément une petite emprunte graphique visible "invisible à l'impression sur le calque nomclature du calque courant" un cercle plein sera déposée au même pt. Cette emprunte un bloc que je bâtisse: "réf d'objet" sera liée à la ligne de repère 1-b ouvre une boite de dialogue d'un gabarit de nomenclature qui renseignera les attributs de l'emprunte"réf d'objet" par une ligne gabarit standard de réf d'objet ====================================== repère, quantité,nom, description,norme, matière ====================================== ligne " " " " " " ====================================== commande 2 2-a lister les objets ou les "réf d'objets" présents toujours sur le calque courant par une boite de dialogue en regroupant par ordre "les lignes références d'objets" tous ou par sélection "si ceux-ci ne sont pas renseignés totalement en attribut" permettre manuellement une modification par la boite de dialogue et la mise à jour des "réf d'objet". permettre de comptabiliser les doublons 2-b Ces différente lignes constituent un tableau que l'on pourra crée dans autocad en un pt à définir et voila notre nomenclature. Sous mechanical les six commandes interfèrent les unes sur les autres avec des paramétrages dans tout les sens: "une usine à gaz" une gestion de base de donnée voir même extérieure. Mais pour faire simple cette démarche çi me convient. Alors est- elle claire, est-elle faisable à toi de me le dire ...... option: la possibilité de placer des ref d'objet sans ligne repère multiple serait également intéressante à voir @+[Edité le 22/2/2008 par cdi][Edité le 22/2/2008 par cdi] [Edité le 22/2/2008 par cdi]

gile je viens de recevoir 6 pdf des 6 commandes dans leur totalité. ils sont à ta disposition si tu le souhaites. @+

Désolé du retard mais faire un résumé de mémoire je me noyai........ Alors pour faire simple j'ai récupèré les info: commandes nomenclature concerne six commandes. Voici un pti récap de l'aide pour deux entre-elles car les autres ne font que gérer les deux premières bonne réception ====================================================================== Utilisez la commande AMBOM pour créer, modifier et supprimer une base de données de nomenclature. BOUTON Base de données de nomenclature MENU Annotation > Outils de liste de pièces > Base de données de nomenclature (AutoCAD Mechanical) Annotation > Liste de pièces > Base de données de nomenclature (Mechanical Desktop) COMMANDE AMBOM OPTIONS DE LA LIGNE DE COMMANDE Uniquement avec AutoCAD Mechanical : Spécifiez la nomenclature à créer ou à activer [Global/?] : Pour sélectionner ou créer la base de données de nomenclature principale, entrez g et appuyez sur ENTREE. Pour sélectionner ou créer une base de données de nomenclature du cadre, cliquez sur le cadre correspondant dans l'espace objet. Pour afficher une liste des bases de données de nomenclature, tapez ? et appuyez sur ENTREE. Pour créer ou activer l'une des bases de données de nomenclature répertoriées, tapez le nom de la base de données de nomenclature et appuyez sur ENTREE. Uniquement avec Mechanical Desktop : Une base de données de nomenclature portant le même nom que le dessin est créée automatiquement s'il n'en existe aucune et la boîte de dialogue Nomenclature s'affiche. S'il existe déjà une base de données de nomenclature dans le dessin, l'invite suivante s'affiche : Tableau de nomenclature [supprimer/Modifier] : Appuyez sur ENTREE pour modifier la base de données de nomenclature ou entrez S pour supprimer la base de données de nomenclature. ====================================================================== Utilisez la commande AMBALLOON pour créer, renuméroter et réorganiser les repères du dessin. BOUTON Repère MENU Annotation > Outils de liste de pièces > Repères (AutoCAD Mechanical) Annotation > Liste de pièces > Repères (Mechanical Desktop) COMMANDE AMBALLOON OPTIONS DE LA LIGNE DE COMMANDE Nomenclature active = Global Sélectionnez une pièce/un ensemble ou [Auto/Toutauto/Définir la nomenclature/Collecter/Flèche enchâssée/Manuel/Unique/Renuméroter/rEorganiser] La ligne de commande affiche la base de données de nomenclature actuelle avant de présenter cette invite. Sélectionnez une pièce ou un sous-ensemble du dessin ou sélectionnez une option de la liste. Les invites qui s'affichent ensuite dépendent de la sélection que vous avez effectuée.

Salut gile Je relance ce poste de nomenclature automatique de etude0 . En lisant vos derniers échanges avec gégématic j'ai compris que tu souhaitais également faire du développement professionnel lips ================================================================= poste de nomenclature automatique du 14 2 08. "Je ne comprends pas bien la deuxième question, mais regarde le LISP tabloblo sur cette page" Je pense que etude0 recherche un outil de nomenclature automatique équivalent à celui de méchanical. Si c'est le cas, c'est un vaste programme pourrais-tu regarder de ton coté pour svp une rapide étude chiffrée pour un tel développement. Merci d'avance, en message privé pour la suite si tu le souhaites ou pas , bonne journée ce message s'adresse a gile si il le souhaite ou à d'autres magiciens du lips [Edité le 22/2/2008 par cdi]