nicolas2

Bonjour à tous. J'avais cette routine pour dessiner des faisceaux d'échangeurs de chaleur. La routine fonctionne très bien, mais serait-il possible de créer une deuxième version en apportant les modifications suivantes ? : - Demander le "Ø des tubes" plutôt que le "petit rayon" - Limiter l'extension des tubes à leur nombre ("nombre de tubes") plutôt qu'a un "Grand rayon". http://img821.imageshack.us/img821/153/faisceauversion2.jpg (defun c:Faisceau ( / pt_c s_rad g_rad pas key js tmp_rad obj e_length t_length pt) (vl-load-com) (initget 1) (setq pt_c (getpoint "\nPoint centre: ")) (initget 7) (setq s_rad (getdist pt_c "\nPetit rayon: ") g_rad s_rad) (while (<= g_rad s_rad) (initget 7) (setq g_rad (getdist pt_c "\nGrand rayon: ")) ) (initget 1 "Triangulaire Carré _Triangular Square") (setq key (getkword "\nPas [Triangulaire/Carré]: ")) (initget 7) (setq pas (getdist (if (eq key "Triangular") "\nPas triangulaire: " "\nPas carré: ")) js (ssadd)) (setvar "cmdecho" 0) (command "_.undo" "_group") (command "_.circle" "_none" pt_c s_rad) (setq js (ssadd (entlast) js)) (command "_.circle" "_none" pt_c g_rad) (setq tmp_rad (if (eq key "Triangular") (* (sqrt 3) 0.5 pas) pas)) (while (<= (+ tmp_rad s_rad) g_rad) (command "_.polygon" (if (eq key "Triangular") "3" "4") "_none" pt_c "_circumscribed" tmp_rad) (setq obj (vlax-ename->vla-object (setq e_last (entlast))) e_length 0.0 t_length (vlax-get-property obj 'Length) ) (while (< e_length t_length) (setq pt (vlax-curve-getPointAtDist obj e_length)) (if (<= (+ (distance pt (trans pt_c 1 0)) s_rad) g_rad) (progn (command "_.circle" "_none" (trans pt 0 1) s_rad) (setq js (ssadd (entlast) js)) ) ) (setq e_length (+ e_length pas)) ) (entdel e_last) (setq tmp_rad (if (eq key "Triangular") (+ tmp_rad (* (sqrt 3) 0.5 pas)) (+ tmp_rad pas))) ) (command "_.undo" "_end") (setvar "cmdecho" 1) (command "_.rotate" js "" pt_c) (prin1) ) Merci à vous pour votre aide.

Bonjour à tous. Je voudrai créer un style de côte me permettant de désigner (mémoriser ?), une fois pour toute, un point de base et ne désigner par la suite que le second point, sans revenir cliquer le point de base. http://img706.imageshack.us/img706/4543/elvation.jpg 1- Je désigne une fois le point à "mémoriser" 2- Je clique sur la croix (300mm + haut) => écriture +300 3- Je clique sur la croix (600m + haut) => écriture +600 4- ..... Merci à tous pour votre aide.

Bonjour à tous. Le LISP de BONUSCAD fonctionne très bien. (defun c:ANGLE ( / js dxf_cod pt p) (while (null (setq js (ssget "_+.:E:S" '((0 . "ARC,CIRCLE")))))) (setq dxf_cod (entget (ssname js 0))) (setq pt (trans (cdr (assoc 10 dxf_cod)) 0 1)) (while (setq p (getpoint pt "\nPoint: ")) (command "_.dimangular" "" "_none" pt "_none" (polar pt (* 0.5 pi) (cdr (assoc 40 dxf_cod))) "_none" p pause) ) ) Est-il possible d'y apporter une modification au niveau du suivi de l'angle si le segment tourne, comme le propose apparement Didier (gisement ?) ? Merci à vous pour votre aide.

Bonjour à tous, bonjour Didier. Qu'entends-tu par: Est-il possible de le tester ? :unsure: Merci à tous.

Il a du fourché dans son explication, je vois plutôt ça comme cela: http://img844.imageshack.us/img844/5011/orientation9.jpg Une idée Didier pour faire suivre la cotation quand le segment tourne et pour éviter de cliquer sur le cercle + sur la base (0°) + sur l'angle à côter, en fait, uniquement un clique sur le segment à côter ? En natif, cela fonctionne bien lili, mais la démarche peut devenir lourde. Un exemple avec un colonne à distiller. Je n'ai mis que l'orientation des tubulures, j'ai encore 4 orientations pour des goussets extérieurs à différents niveaux et 6 orientations pour des supports internes. http://img811.imageshack.us/img811/5166/orientation10.jpg J'ai eu des orientations à changer (d'où ma question du suivi de la valeur de la côte) et je retrouve aussi des cotations angulaires "traditionelles" (d'où ma question sur le style). Si on peut cliquer une seule fois sur le segment, imaginez le gain de temps. Merci à vous pour votre aide.

Bonjour à tous. - Si on fait tourner un axe, la côte ne suis pas. http://img28.imageshack.us/img28/2781/orientation6.jpg Est-il possible de faire suivre la côte automatiquement (directement dans le LISP, sans intervention autre à l'écran)? - Est-il possible de faire cohabiter dans le même style de côte ceci ? http://img525.imageshack.us/img525/7204/orientation8.jpg http://img4.imageshack.us/img4/42/orientation7.jpg Merci à vous.

Comme disait formabois: .Une idée en ne captant que le segment ?

Bonjour à tous. Voici le résultat en lançant la routine : http://img804.imageshack.us/img804/8646/orientation5.jpg alors que je devrais avoir 90° à la place de 270°.... Je ne tourne pas dans le bon sens ?! :huh: Depuis ce matin je patauge..!!! Merci pour votre aide.

http://img21.imageshack.us/img21/8646/orientation5.jpg

Bonjour à vous. Une question : Ne serait-il pas possible de définir directement dans le LISP l'orientation et le sens? Comme l'a écrit Bonuscad pour l'orientation plus haut : On fait la même chose pour le sens et chacun est libre d'interchanger la ligne orientation et sens dans la routine (8 cas / 8 lignes différentes => 0°Nord/sens horaire - 0°Nord/sens trigo - 0°Est/sens horaire - .....). Dans mon domaine, je n'ai jamais de rosace en vrac (ex: le 0° au Nord-est). Tout ceci permettrait, me semble t-il, que la routine, connaisssant notre orientation et notre sens, ne nous demande qu'un seul clic en pointant le segment et en se baladant sur le segment il nous propose le 45° ou le 225° ?! :unsure: http://img163.imageshack.us/img163/8133/orientation4.jpg Je n'ai aucune commpétence en LISP :blink: , mais quand je vois les services rendus, je me dis qu'a la retraite (si retraite il ya....) je m'y mets. Merci à tous pour votre aide. ;)

Merci pour ton aide et ta proposition Didier. Ça fait plus de 16 ans que je "pose" du texte pour noter mes angles, alors prends ton temps, rien ne presse.... ;)

Merci Didier. J'avais déja "nettoyé" ma cotation angulaire (DWG joint dans un de mes messages ci-dessus) comme vous le préconisez (Lignes d'attaches - Ligne de côte - Flèches....). Le problème est qu'il tourne à l'inverse de ce que je voudrais et que le passage des 180° semble critique. En fait, je pense qu'il prend ma verticale pour 0° et n'intègre pas un 180°. http://img404.imageshack.us/img404/8133/orientation4.jpg Je suis en chaudronnerie, mais il me semble que d'autres corps de métier doivent fonctionner de la même manière au niveau des orientations. La solution du LISP est peut-être inévitable ? Dans ce cas, dois-je rediriger la discussion du coté LISP et dans l'affirmative comment le faire ? Merci.

On a toujours l'impression d'être clair :huh: Alors, je clique sur le segment à 45° et je dépose la valeur 45° en bout de mon trait d'axe. http://img651.imageshack.us/img651/6899/orientation3.jpg Le truc c'est aussi de le faire avec 0°-180°... et au dela de 180°..., comme ceci: http://img191.imageshack.us/img191/1674/orientation1.jpg Ceci tout en gardant le style de côte de mon plan (police, taille...) et si je fais tourner mon segment 45° de 2°, ma "côte" suit et passe à 47° (comme une côte). Les angles ci-dessus ne sont biensûr que des exemples. Là j'ai l'impression d'être clair :blink: ou presque... Merci pour ton aide Didier et merci à tous.

J'ai rejeté un coup d'oeil à mon style de côte, mais je pense avoir fait le tour et m'être approché le plus possible du résultat que j'envisage. Y'a t'il une autre méthode, voir un développement spécifique à envisager ?

Le Zip est passé (DWG 160Ko - ZIP 80Ko), mais comme le dit Didier, peut importe le poids du DWG, c'est bien le type de fichier (DWG) qui n'est pas pris en charge. :huh: Merci à vous

Bonjour. Voila ce que j'arrive à faire pour l'instant (image du fichier joint en DWG) http://img254.imageshack.us/img254/6134/orientation.jpg Voila ce que je voudrais en final. http://img191.imageshack.us/img191/1674/orientation1.jpg Merci pour votre aide.

Bonjour. Je n'arrive pas à joindre un DWG en réponse à un message ? Merci pour votre aide.

Juste un essai entre le LISP et LOGITRACE. - Cas 1: un tube de Ø60.3 sur un tube de Ø168.3 à 90° => OK - Cas 2: la même chose mais avec un angle de 30°: Tracé noir, le LISP - Tracé Rouge, LOGITRACE http://img27.imageshack.us/img27/7994/dvelopp.jpg OK pour la pièce femelle, mais pas pour la pièce mâle. J'ai découpé et assemblé (papier) dans les 2 cas, cela confirme un problème au niveau du LISP Ce LISP, dans le cas 1, ne fonctionne que si on utilise un gabarit papier à poser sur les 2 pièces (pas de prise en compte de l'épaisseur). En tout cas, super boulot, bravo !

Bonjour. En chaudronnerie, voici la convention. http://img843.imageshack.us/img843/6134/orientation.jpg Le Nord n'est pas forcément le Nord géographique, mais plutôt le Nord "usine". Une question: Plutôt que d'avoir ceci lors de la cotation http://img585.imageshack.us/img585/1674/orientation1.jpg Est-il possible d'avoir ceci (exemple: 1 clique sur l'axe 0°/180° - 1 clique sur l'axe 60° écriture "60°" dans la continuité de l'axe)? http://img266.imageshack.us/img266/6576/orientation2.jpg Merci à vous.

Bonjour Titi. Si tu n'as que 5 ou 6 cas, je te propose de faire tes dévelopés avec LOGITRACE. Il me faut le Ø et l'épaisseur de tes tubes (intersection à 90°).

Bryce était plutôt partit en blocs paramétriques. J'ai oublié de dire que je travaille uniqmement en 2D. Si Bryce peut donner un peu de son temps ? Merci à vous!

Bonjour. Laud69 a été plus rapide que moi sur la diffusion. Pourriez-vous prendre le temps de me donner un exemple de création de bloc pour une bride type 11B. http://img7.imageshack.us/img7/3461/bride3g.jpg. J'imagine qu'une fois que la base est faite, il ne reste "plus" qu'a modifier les valeurs pour tel ou tel DN de bride ? Merci pour votre aide.

Si la commande est effectuée 2 fois l'an, y'a pas de souci à rajouter 'CAL. Un dessinateur technique l'utilise bien plus que ça, et la démarche devient rapidement lourde (si cela prête à sourire, tant-pis). :angry: Si quelqu'un à une idée ? Merci à tous. PS : Avant d'être un grand chêne, tout le monde à commencé comme un gland..... ;)

Bonjour à vous. Vu la couleur de vos ceintures, faire le DWG de tout ça, ne devrait pas poser de problèmes.... Blague à part, j'avais chercher du côté lien EXCEL/AUTOCAD et je me disais que s'il était possible de dessiner à partir d'un fichier EXCEL, je me proposais d'entrer toutes les valeurs de la norme (me dire comment procéder) dans un tableau. Voila voila. Donnez-moi votre point de vue. Merci à tous.

Je ne suis pas contre utiliser ce que vous me dîte, mais j'ai du mal à vous comprendre. Exemple: Je trace une ligne -Je prend la Commande: _line Spécifiez le premier point: (je clique un point à l'écran) Spécifiez le point suivant ou [annUler]: (je tape 275.5/2) A quel moment je tape votre CAL ? Merci