Classement

Bonjour, Pour moi pas besoin de lisp. Tu peux utiliser les propriétés personnalisés du dessin. Celles-ci seront ensuite accessibles via un texte avec champs intégré dans ton bloc cartouche. Et pour ne pas avoir à créer ces propriétés à chaque nouveau fichier, tu les intègre à ton gabarit.

Bonjour à Toutes et à Tous, Tout d'abord je vous souhaite une Très Belle et Heureuse Année 2025... Et voila J+1... ça y est je fais maintenant partie du Groupe des SAGES, je suis officiellement Retraité... une nouvelle carrière commence et comme souvent les retraités n'ont plus de temps ! Bien Amicalement, Christian

. Hello Si vous desirez etre presque "Au Top" sur les Blocs dynamiques d AutoCAD !? MERCI Dominique et Salim ! Bye, lecrabe ---- ACAD : Tuto sur les Blocs dynamiques par Dominique VAQUAND https://dessein-tech.com/t/acad-tuto-sur-les-blocs-dynamiques-par-donique-vaquand/1231 ---- Webinaire : Les Blocs Dynamiques par Salim BOULGHOBRA https://dessein-tech.com/t/les-webinaires-de-la-communaute-autocad-les-blocs-dynamiques/59

Classement par thème basé sur la base de connaissance Autodesk: https://dessein-tech.com/t/les-dernieres-solutions-techniques-autocad-classees-par-themes-au-20-juillet-2024/356

@aLb1, Aucun des messages ci-dessous n'ont vocations à être méprisant, hautain ou je-ne-sais-quoi... Je trouve cela triste de voir qu'une simple remarque du genre "il faut apprendre avec notre propre cerveau" peut déclencher chez vous du dégoût. Bien que la formulation peut sembler agressive pour certaines personnes, la valeur du message est cohérente et parfaitement raisonnable. Sachez que les personnes que vous considérez "méprisantes" sont des personnes bénévoles qui, durant de nombreuses années d'expériences, n'ont jamais cessé d'apprendre, d'instruire et d'aider autrui. Donc en terme d'intelligence, je pense qu'il va de soi que ces personne savent de quoi elles parlent et sont parfaitement apte à voir d'un mauvais œil ChatGPT. Et le problème est simple : le langage AutoLISP est un langage élitiste avec bien trop peu d'exemples qui traînent sur Internet (et encore moins sans erreurs). A commencer déjà par la proportion d'utilisateurs anglophones par rapport au reste du monde, et les conséquences de cette répartition se retrouvent dans le code que ChatGPT a proposé initialement d'ailleurs : le nom des commandes/options étaient en anglais, sans considérer la langue internationale. Bref, je comprends votre désir de vous aider de ChatGPT pour apprendre l'AutoLISP et c'est normal, c'est dans l'ère du temps. Cependant ChatGPT est encore un enfant en pleine croissance, et c'est d'autant plus vrai pour le domaine de la programmation sous AutoCAD. C'est d'ailleurs pour cette raison que les utilisateurs se tournent vers des experts comme @didier ou @(gile) qui surpassent en tout point ChatGPT ! Je rejoins l'avis de ces experts, l'apprentissage via ChatGPT est une fausse bonne idée. ChatGPT peut se tromper et il VA se tromper, c'est une évidence. Le problème se pose donc "comment savoir identifier les erreurs de ChatGPT si l'on s'appuie sur lui pour apprendre ?". Car je suis certaine que la réponse que vous attendiez concernant la résolution de votre problème n'était très certainement pas "il faut rajouter un underscore" 🙂 C'est pour cela que les experts qui sont intervenus ont évoquer l'existence de leur site internet respectifs. Nullement pour faire de la promotion mais uniquement pour vous aider dans votre apprentissage avec des sources sûres, le bon vocabulaire et en français. C'est sûrement nul et outdated de penser ainsi mais... "c'est en forgeant que l'on devient forgeron", donc vui... il faut malheureusement apprendre les bases de l'AutoLISP. Je ne condamne absolument pas l'utilisation de ChatGPT, au contraire je suis sûre que l'IA est en mesure d'aider le cerveau humain à façonner un chemin mais il ne faut pas oublier que l'humain reste l'expert pour paver son chemin solide et intemporel. Si cela peut te rassurer, j'ai découvert l'existence de l'AutoLISP il y a 6 ans à peine. En 1 an seulement, les bases sont déjà acquises si on est suffisamment curieux pour apprendre comprendre (pardon, je n'aime pas le terme "apprendre", "comprendre" est bien plus complet sur le plan éducatif). Veuillez m'excuser pour ce long pavé... PS: Aucune envie de nuire, rabaisser ou insulter n'est présente dans nos message, on est juste humains avec nos problèmes et émotions. Il est parfois délicat d'être objectif et détaché. Bisous, Luna

Salut les commandes TOP et BOT définies ci-dessous affectent tous les espaces et tous les blocs. (mapcar (function (lambda (cde fun) (eval (list 'defun cde '(/ ent doc blocks layer sort lst var) '(vl-load-com) (list 'and '(setq ent (car (entsel "\nSélectionnez un objet sur le calque cible: ") ) ) '(setq doc (vla-get-ActiveDocument (vlax-get-acad-object)) blocks (vla-get-Blocks doc) layer (cdr (assoc 8 (entget ent))) ) '(not (vla-StartUndoMark doc)) (list 'vlax-for 'b 'blocks '(or (not (vl-catch-all-error-p (setq sort (vl-catch-all-apply 'vla-getObject (list (vla-getExtensionDictionary b ) "ACAD_SORTENTS" ) ) ) ) ) (setq sort (vla-addObject (vla-getExtensionDictionary b ) "ACAD_SORTENTS" "AcDbSortentsTable" ) ) ) '(setq lst nil) '(vlax-for obj b (if (= (vla-get-Layer obj) layer) (setq lst (cons obj lst)) ) ) (list 'if 'lst (list fun 'sort '(vlax-make-variant (vlax-safearray-fill (vlax-make-safearray vlax-vbObject (cons 0 (1- (length lst))) ) lst ) ) ) ) ) ) '(vla-EndUndoMark doc) '(vla-regen doc acActiveViewport) '(princ) ) ) ) ) '(c:top c:bot) '(vla-MoveToTop vla-MoveToBottom) )

Bonjour à tous, AutoCAD inclut de nouvelles fonctionnalités basées sur l'intelligence artificielle : Informations détaillées de l'utillisation du logiciel Proposition de macros personnalisées Positionnement guidé de blocs Détection d'entités à transformer en blocs Autodesk Assistant Pour plus d'explications sur ces fonctionnalités, je vous propose cet article sur le blog Village BIM : Village BIM - AutoCAD et l’Intelligence Artificielle Bonne lecture !

Bonjour, Je suis nouveau sur le forum, mais loin d'être nouveau dans le métier, et je voudrais pousser un coup de gueule. Suis-je le seul à en avoir marre du manque de considération des dessinateurs projeteurs dans les entreprises? J'ai quelques années d'expériences dans le métier et je commence à en être dégouté. Je trouve que le mythe du mouton à 5 pattes n'a que trop duré. Il faudrait, pour moins de 2500€ net mensuel (en 2024 ça n'a rien extraordinaire pour un profil haute compétences), être hyper polyvalent mais en même temps expert, on ne doit pas compter nos heures, c'est mal vu de rester pas plus de 2 min au café, depuis le COVID tout le monde mange devant son PC et traitant ses mails... il faut être doté d'une résilience hors pair etc etc etc mais pour qui on ne propose aucune évolution professionnelle et qui ne doit surtout pas avoir de contact avec l'extérieur. Bein oui hein, il y a des jeunes ingés pour les postes à responsabilité et si jamais le projeteur développait un réseau professionnel il pourrait aller voir si l'herbe est plus verte ailleurs. Quand à la recherche d'emploi... c'est de plus en plus le parcours du combattant avec de plus en plus d'intervenants extérieurs. Ah et dernière en date, j'ai fait deux missions intérim en début d'année, la première viré car en arrêt maladie et la deuxième parti car mis en concurrence avec un petit jeune et traité comme de la m****. Sans parler des périodes d'essai de plus en plus dure à valider. De toute façon pour les grosses entreprises du BTP nous ne sommes jamais qu'une ligne comptable trop conséquente et inutile. Pourtant j'ai 24ans d'expérience dans mon métier, dont 13 en bureau d'études. Ça a été super dur de se faire ses premières expériences et pour l'acquérir j'ai dù accepter ce qui venait et j'ai malheureusement je ne suis pas toujours tombé sur les bonnes boites (si elles existent vraiment). Les même souvent qui se plaignent d'avoir du mal à recruter. Aujourd'hui on me reproche cette période de précarité et cela me limite dans ma recherche d'emploi. De plus je suis échaudé et perdu confiance en moi, donc j'ai peur de retenter les grands groupes ou les toutes petites structures. Donc voilà, encore un talent gâché qui va très certainement se tourner vers le freelance.

Merci, Pour me mettre dans l'ambiance quand j'ouvre Mensura, et me donner l'impression que je navigue sur un site de vente comme CDiscount. Malgré tout ce n'est pas ce que je demande quand j'ouvre un logiciel sur lequel je travaille. Donc pouvez vous s'il vous plait virer toute votre équipe marketing et embaucher des développeurs à la place?

Bonjour, un minimum de formation serait vraiment nécessaire pour être efficace plus rapidement car si le principe est toujours le même, il y a pas mal de différences de méthode et pleins de subtilités pas innées du tout, notamment sur le traitement des levés topos et surtout les mises en pages qui sont un peu du genre Revit.

Tu as tout dis... Depuis la sortie de la V10, c'est bug sur bug sur bug... Nous avons été très surpris à la sortie de la V11 alors que les dernières versions de la V10 étaient catastrophiques. Les annonces et idées sont super bonnes, mais inutilisables pour la plupart. Nous avons maintenant pris le parti de ne plus faire les mises à jour afin de conserver une version "stable", du moins avec le moins de bugs possibles, pour éviter de perdre du temps à chaque fois. Par ailleurs, on ne s'embête plus à remonter les bugs et idées car nos remarques ne sont pas prises en compte... Mensura a la chance d'avoir ce monopole...

Mettre la variable QTEXTMODE à 0, puis REGEN.

Bonjour @Reyoh, Pour travailler sereinement avec AutoCAD, il faut impérativement commencer par utiliser un dessin GABARIT correct ! Voici quelques GABARITs à titre d'exemple. Pour éviter que des variables sautent !!! j'utilise ce SCRIPT (INIT_PARAM.SCR à dézipper...) qui remet en place TOUTES CES VARIABLES SYSTEMES qui sont une particularité d'AutoCAD... Ces variables sont un peu une nébuleuse, mais c'est grâce à ces variables que l'on arrive à se créer un environnement correct. Voici également mon TOP QUIZ DES GALERES qui reprend pas mal de "CONNERIE" pour ne pas parler de BUGs il y en 176 et encore je n'ai pas mis à jour ce tableau depuis longtemps ! A lire sans vraiment chercher quelque chosez de précis et on tombe souvent sur des problèmes que l'on rencontre parfois ! Tu y trouvera cette fameuse variable système à la page 15, ligne 200... As-tu suivi une formation ? Je te conseille de jeter un oeil à cette Formation AutoCAD 2017 Gratuite qui a été publiée chez ELEPHORM par mes soins... Même s'il s'git de la version 2017 ça ne change rien sur la METHODE... Et une autre Formation AutoCAD 2018 AVANCEE chez ELEPHORM... Christian PS: et moi j'ai eu la CHANCE ?! je sais pas si c'est bien le terme, 🙂 d'être formé par notre cher LE CRABE... @lecrabe dans les années 90, lorsque j'étais chez AGENA, mais j'ai commencé à jouer avec AutoCAD fin 1985... On parlait bien de PREHISTOIRE avec le super système MS-DOS !!!!!!

Bonjour @Reyoh, Si la hachure n'apparait pas sur le 2ème bloc ( @Jobar21) il faut augmenter la valeur de la variable HPMAXLINES à 2000000 Ensuite pour l'échelle des hachures, ça dépend de la variable MEASUREMENT. Si une hachure est créée avec la MEASUREMENT à 1, puis que la valeur est passée et 0 et que l'on crée une nouvelle hachure avec la même échelle, les 2 motifs ont la même échelle, mais un rapport de 25.4 en terme de taille. Dans ton cas, il suffit de modifier la valeur de MEASUREMENT puis de changer une propriété (par ex l'échelle), puis de la remettre à sa valeur initiale pour retrouver la bonne taille. https://youtu.be/v8oKIIFXboM Olivier

Bonjour, Tout à fait d'accord avec vous, inutile de vouloir du code sans connaitre le code. Par contre, voici une exemple de prompt productif à mes yeux. [autolisp] Bonjour, met toi à la place d'un expert Autocad et Autolisp et dit moi comment on se sert de la fonction vl-catch-all-error-p. Merci. Essayez.

Salut, Pour moi la question n'est pas tant de savoir si des machines peuvent être "intelligente" ou avoir une "conscience", mais plutôt : le souhaite-t-on vraiment ? Et je trouve effrayant de lire que c'est "inévitable" parce que ça signifierait que nous n'avons déjà plus de prise sur l'accélération de l'artificialisation globale de notre environnement, que la "technoscience" est le nouveau Dieu et les agents conversationnels ses prédicateurs. Je voudrais juste citer, à ce sujet, Aurélien Barrau (astrophysicien et philosophe) :

La suite ici : 😉 https://www.caderix.com/journal/spip.php?article548

Hello, Il faut faire attention quand on reprend les infos brutes d'un site généraliste comme Clubic 😉 https://www.clubic.com/actualite-556668-vous-utilisez-autocad-sur-pc-preparez-vous-a-une-bonne-nouvelle.html Déjà le correctif me paraît bizarre parce qu'AutoCAD 2022 en est déjà à la version 2022.1.5 qui date de juillet 2024. Après, on ne met pas à jour AutoCAD en allant dans le menu "A propos"

Une très intéressante discussion sur l'obsolescence des langages de programmation: https://dessein-tech.com/t/le-monde-depend-d-un-langage-informatique-que-plus-personne-ne-connait/2982

Bonjour, Ça ne me rajeunie pas, cette routine date de longtemps (Autocad 2002) Depuis j'avais réécris complètement le code et proposé celui-ci sur CadXp. Malgré qu'il s’appelle Talus3D, celui peut produire aussi des talus avec des entités en 2D. Il n'y a plus de boite de dialogue (.dcl) ni de fichier de cliché (.slb). Voici le lien sur le site TALUS3D.lsp

Bonjour à Tous, La mise à jour est faite. Merci Brice. Je me suis créé un petit raccourci pour récupérer la mise à jour : Uniquement le .EXE à remplacer (ça suffit) L'ensemble SCANDXF : https://app.box.com/s/15d6fd514e7599864834 Christian

Bonsoir, Voici un exemple vite fait sur qgis, une couche geopackage (gpkg) de type linéaires avec champs. La case de dialogue pour interroger les attributs du fourreau. L'étiquetage issu des valeurs attributaires est automatique en post édition-création de linéaires car cet étiquetage est ajouté dans les propriétés de la couche connectée. Par la suite, si le fourreau à un identifiant unique on peut faire une jointure avec un fichier excel/calc de données (liaison entre un linéaire sig et un enregistrement issu du tableur. Autocadien sur AutoCAD et AutoCAD MAP depuis 30 ans, je trouve que de créer ce genre de données sig avec un logiciel SIG est plus facile. Qgis fourni un système de mise en page très poussé avec la création possible d'un atlas, des géo-traitements etc. Fabcad, Le Rennais Métropolitain.

Bonjour @metacilla Il y a un souci dans la chronologie. Tout va dépendre des options choisies et des données existantes dans le dessin. Si des polylignes 2D existent ET, qu'elles ont été utilisées comme lignes de ruptures, alors la projection de ces polylignes donnera un résultat correct. Si le dessin des polylignes n'existe pas, OU que ces dernières n'ont pas été utilisées comme lignes de ruptures, la projection de ces polylignes ne donnera rien de concret. Sinon la transformation de polylignes 2D passant par des points est possible via le menu : Covadis3D->Gestion des polylignes2D->Convertir en polylignes3D en choisissant l'option Point Topo (pas MNT) Amicalement

Hello, Je pense que tu peux passer sur QGIs (logiciel opensource), car ta demande correspond au domaine du SIG. Fabcad, Le Rennais Métropolitain.

Bonjour Personnellement quand j'ai besoin de créer un objet (Polyligne, cercle, etc ...) j'utilise la fonction ADDSELECT (Dernier bouton de la barre d'outils dessin) Il suffit de cliquer sur une polyligne (ou autre cercle, hachures, etc...) d'un calque pour refaire le même objet. Si ça peut aider

Une autre version avec un argument supplémentaire : le rapport entre le décalage en X et en Y (fixé à 10 dans le code ci dessus) pour permettre de jouer sur le rapport entre le segment long et le segment court (chanfrein). ;; Décrit un motif de hachueres "ardoises losange" ;; ;; Arguments ;; d : longueur des segments longs (REAL) ;; r : rapport entre le décalage en X et en Y du segment long (INT) ;| Commande: (ardoisepat 0.32 20) 0, -0.023818333682,0, 0.250092503662,0.22627416998, 0.047636667364,-0.452548339959 225, 0,0, 0.336842105263,-0.016842105263, 0.32,-6.4 315, 0,0, 0.336842105263,0.016842105263, 0.32,-6.4 |; (defun ardoisePat (d r / z a b c) (setq z (getvar 'dimzin) a (/ d (- r 1.)) b (* a (sqrt 2.)) c (* d (sqrt 0.5)) ) (setvar 'dimzin 8) (princ (strcat "0, " (rtos (* -1 b) 2 12) ",0, " (rtos (+ c b) 2 12) "," (rtos c 2 12) ", " (rtos (* 2 b) 2 12) "," (rtos (* -2 c) 2 12) "\n225, 0,0, " (rtos (* r a) 2 12) "," (rtos (- a) 2 12) ", " (rtos d 2 12) "," (rtos (* (- r) d) 2 12) "\n315, 0,0, " (rtos (* r a) 2 12) "," (rtos a 2 12) ", " (rtos d 2 12) "," (rtos (* (- r) d) 2 12) ) ) (setvar 'dimzin z) (princ) )

Bonjour, Voici ton bloc modifié avec le calcul automatique. Christian

Bonjour, si ça peu aidez j'ai ce tableau de liens de l'ign qui fonctionne sous autocad map 2024 : (J'utilise seulement le 1er , sans login et sans password) Service URL définitives Géoplateforme URL Géoplateforme avec contrôle d'accès WMTS https://data.geopf.fr/wmts?SERVICE=WMTS&VERSION=1.0.0&REQUEST=GetCapabilities https://data.geopf.fr/private/wmts?SERVICE=WMTS&VERSION=1.0.0&REQUEST=GetCapabilities TMS https://data.geopf.fr/tms/1.0.0 https://data.geopf.fr/private/tms/1.0.0 WMS Raster https://data.geopf.fr/wms-r/wms?SERVICE=WMS&VERSION=1.3.0&REQUEST=GetCapabilities https://data.geopf.fr/private/wms-r/wms?SERVICE=WMS&VERSION=1.3.0&REQUEST=GetCapabilities WMS Vecteur https://data.geopf.fr/wms-v/ows?service=wms&version=1.3.0&request=GetCapabilities https://data.geopf.fr/private/wms-v/ows?service=wms&version=1.3.0&request=GetCapabilities WFS https://data.geopf.fr/wfs/ows?SERVICE=WFS&VERSION=2.0.0&REQUEST=GetCapabilities https://data.geopf.fr/private/wfs/ows?SERVICE=WFS&VERSION=2.0.0&REQUEST=GetCapabilities WMS INSPIRE Raster https://data.geopf.fr/wms-r/wms?SERVICE=WMS&VERSION=1.3.0&REQUEST=GetCapabilities WMS INSPIRE Vecteur https://data.geopf.fr/wms-v/ows?service=wms&version=1.3.0&request=GetCapabilities WFS INSPIRE https://data.geopf.fr/wfs/ows?SERVICE=WFS&VERSION=2.0.0&REQUEST=GetCapabilities Métadonnées https://data.geopf.fr/csw?SERVICE=CSW&REQUEST=GetCapabilities&VERSION=2.0.2 Métadonnées INSPIRE https://data.geopf.fr/csw?SERVICE=CSW&REQUEST=GetCapabilities&VERSION=2.0.2 Téléchargement https://data.geopf.fr/telechargement/capabilities https://data.geopf.fr/private/telechargement/capabilities Géocodage https://data.geopf.fr/geocodage/getCapabilities https://data.geopf.fr/private/geocodage/getCapabilities Autocomplétion https://data.geopf.fr/geocodage/completion/getCapabilities https://data.geopf.fr/private/geocodage/completion/getCapabilities Calcul altimétrique https://data.geopf.fr/altimetrie/resources https://data.geopf.fr/private/altimetrie/resources Calcul d'itinéraire et d'isochrone/isodistance https://data.geopf.fr/navigation/getcapabilities https://data.geopf.fr/private/navigation/getcapabilities Recherche https://data.geopf.fr/recherche/api/indexes https://data.geopf.fr/private/recherche/api/indexes

Ca ne coutera que 2 kgs de carotte pour mon cheval 😉

Bonjour, Effectivement les Blocs dynamiques et les Flexiblocs ont des différences, à cause d'un brevet actif aux Etats-Unis. Les Blocs dynamiques créer sous Autocad peuvent être convertis en Flexiblocs dans ZWCAD 2025 (à l'exception de certaines contraintes et jeux de paramètres) en revanche les Flexiblocs créer dans ZWCAD 2025 perdront leurs propriétés dynamiques dans Autocad. Cependant il y a un moyen de récupérer ces propriétés dynamiques grâce à un object enabler (ObjectARX) qui peut être chargé en tapant la commande APPLOAD dans Autocad. Vous trouverez l'ARX à charger en pièce jointe ou bien en cliquant sur ce lien Flexiblock Interpreter 20240709.zip

Je ne sais pas si en faisant un flexibloc dans ZWCAD 2024 ou 2025, il pourra être "dynamique" dans ZWCAD 2023. A tester. Par contre, je pense que faire un bloc dynamique sur AutoCAD pourra être utilisé dans ZWCAD 2023. De mémoire, mais c'est à vérifier, dans ZWCAD 2023, on ne peut pas créer un bloc dynamique, mais on peut l'utiliser.

Bonjour C'est devenu une mode, une tocade, une épidémie de ne pas "pouvoir" diffuser un DWG sur le forum. J'aimerais bien qu'on m'explique le côté "confidentiel" dans le genre de dessin qu'on voit sur les images fournies. C'est dingue le nombre de personnes qui travaillent à la NASA sur CadXP ! et le nombre d'espions qui cherchent à pomper des informations. Sans compter que si on veut cacher les deux/trois trucs "confidentiels" (nom de société, objet du plan, adresses…) c'est assez aisé. Pardon pour le coup de gueule, mais c'est lassant ces comportements prétentieux.

Bonjour à tous, étant passé à la 18.3a je vois, dans les options Covadis (/Options générales/environnement utilisateur) une case à cocher : "Collecte d'usage : J'accepte l'envoi de données anonymes pour contribuer à l'amélioration du logiciel conformément aux conditions d'utilisation." Je ne trouve rien dans mes recherches sur cadxp, ni sur l'aide covadis. Savez-vous de quoi il s'agit ? Je veux bien "aider" mais si c'est une collecte du temps d'utilisation, système exploitation, configuration matérielle... je dis non. Il y a plus intelligent à faire : un forum, un coup de téléphone puis un correctif. Cordialement.

Bonjour Merci à @Luna pour la détection d'erreur d'attribution. Je pense que ce sera corrigé, dans tous les cas, je ne m'offusque pas. Penser à remercier est déjà une bonne chose. ════════════════════════════════════════════════════════════ @yusukens82 Je comprends que ça fonctionne selon la demande, merci de vérifier tous les cas de figure, avec suffixe, avec préfixe, avec remplacement de texte avant, avec remplacement de texte après, sans rien du tout… J'ai testé, mais d'une machine à l'autre, on a quelquefois des surprises à cause de certaines variables. Amicalement

Bonjour @yusukens82 Voici une nouvelle version qui tient compte des possibilités de texte de remplacement en début OU en fin et même en début ET en fin. Par ailleurs, si un préfixe ou un suffixe ou encore les deux sont prévus dans le STYLE de cotation, ces valeurs sont insérées dans la copie. Merci de me tenir au courant. Amicalement . CadXP-Yusukens82-Copy-Cot-vers-Text-02.lsp

Coucou, Pour le coup, j'ai un peu la même vision que toi sur ce point. Une IA est peut-être en mesure de pondre des programmes LISP à peu près corrects (tout dépend de la personne qui a fait la demande à l'IA et de la pertinence des questions ayant servies à l'élaboration du code) mais cela répondra uniquement à un besoin à un instant T. Le programme ne sera, je pense, jamais réfléchi de manière à faciliter les évolutions futures en ajoutant/regroupant un ensemble de paramètres permettant d'adapter le programme aux différentes pratiques et/ou utilisateurs. C'est d'ailleurs pour cette raison que je considère que l'IA peut éventuellement aider les développeurs en manque d'imagination et de logique, mais l'IA (à ce jour) ne pourra jamais à elle seule avoir un rendu professionnel et fonctionnel dans le temps. Il y a beaucoup de travail à fournir en amont ET en aval du résultat fourni par l'IA et j'ai peur que la majorité des utilisateurs de l'IA aujourd'hui n'ont pas notion du boulot nécessaire pour retravailler les programmes proposés par l'IA. La plupart des utilisateurs sont des novices de la programmation qui font confiance à 100% dans l'efficacité de l'IA. Ce qui me terrifie d'ailleurs c'est qu'avec ce nouveau genre d'utilisateurs, les demandes du genre "ChatGPT m'a fourni ce programme mais il ne marche pas et je ne sais pas pourquoi, vous pouvez m'aider" seront de plus en plus nombreuses et les rares bénévoles sur les forums vont bientôt uniquement faire du SAV des erreurs de l'IA. En clair, l'humain va finir par travailler pour l'IA et non l'inverse. D'autant plus qu'avec ces messages (bien que je ne maîtrise pas du tout le sujet sur le fonctionnement d'une IA), je suppose que tous ces programmes "incomplets" et "erronés" vont finir par se rajouter à la base de données que l'IA utilisera pour développer de nouveaux programmes. Peut-être que les experts de l'IA pourront répondre à cette question mais "est-ce possible que l'IA utilise ses propres erreurs pour se développer et étoffer sa base de données ?". Car si c'est le cas, je crains que l'IA ne s'abrutisse de plus en plus au lieu de s'élever vers le haut. Bref, je pense que l'apparition de l'IA est en soit une bonne nouvelle et une excellente avancée technologique, mais personnellement ce n'est pas l'IA qui me fait peur mais plus la masse de personnes incompétentes qui ne sont pas formées pour dialoguer avec une IA et avoir un esprit critique sur les résultats obtenus. "Le savoir est une arme", j'espère juste que l'on sera en mesure de démêler le vrai du faux car sinon cela risque de se retourner contre nous. Pour en revenir au sujet, cela peut s'avérer un bon outil pour les développeurs expérimentés ou bien pour les novices (qui posent les bonnes questions) qui souhaiteraient savoir si oui ou non un programme existe déjà. D'ailleurs question : que répond l'IA lorsque l'on décrit un besoin et que l'on demande à ce qu'elle cherche des programmes existants pouvant s'en rapprocher le plus ? Car j'ai l'impression que les débutants en programmation n'ont jamais essayé de vérifier si un programme n'avait pas déjà été programmé par un vrai développeur, ils préfèrent demander à l'IA un truc sur mesure à chaque fois... Bisous, Luna

Bonjour, pas de solution tres rapide mais avec le calcul de MNT différentiel entre votre MNT TN et MNT projet de vos PFM vous aurez en résultat un MNT avec les hauteurs de terrassement. Ensuite fonction coloriage par tranche altimétrique VMNTALTI en demandant FACE3D en résultat vous aurez alors des faces 3D en couleur en fonction de l'épaisseur fonction FILTER pour faire une sélection d'une couleur et en faire un MNT objet opération à répéter autant de fois que de tranche de couleur de votre dégradé.

Salut, L'installeur (LayLockSelSetup.msi) a été mis à jour pour fonctionner aussi avec AutoCAD 2025.

Bonjour Didier, bonne chance... déjà un topo de base sensé, consciencieux et pas faignant c'est très difficile a trouver désormais, mais un chef topo c'est une quête du graal...

Bonjour, On doit parfois convertir des entiers (N° de quelque chose) en texte mais en ajoutant des 0 en début pour conserver un tri correct sur des textes. Par exemple 1 devient 0001 24 devient 0024 145 devient 0145 En cherchant à droite et à gauche, je suis tombé sur une solution assez originale, en tout cas je n'y aurais jamais pensé. Si on veut convertir un entier sur 4 caractères, il suffit de le diviser par 10 puissance 4, le convertir en texte avec 4 décimales, puis supprimer les 2 premiers caractères. Ainsi, si on prend 12 et que l'on veut le mettre sur 4 caractères, on le divise par 10^4, on obtient 0.0012, puis on retire les 2 premiers caractères et il reste 0012. Voilà ce que ça peut donner en lisp (defun Int2Str (iNumber iNbZero) (substr (rtos (/ (float iNumber) (expt 10 iNbZero)) 2 iNbZero) 3 iNbZero) ) Je travaille toujours avec DIMZIN à 0, donc pas de souci de suppression des 0 de début ou de fin dans la conversion. Je pense qu'il faudrait l'intégrer. Olivier

Bonjour, Cov 3D / MNT Objet / Autres méthodes / Calques de faces => MNT Olivier

Bonjour, Les textes sont erronés, il n'y a pas de style de texte associé. Lancer la commande CONTROLER pour corriger les 13 erreurs, dès lors la sélection fonctionne. Olivier

Bonjour, Un petit challenge. Voici une solution qui en traite 13004. On peut ajouter des positions relatives dans la liste aux milieux du code. (vl-load-com) ; txt2z, Eleve un bloc selon le texte situé à une position relative au bloc. ; Le dessin ne doit contenir que les textes et les blocs concernés. (defun c:txt2Z ( / acobj acdc model ltext pt ld ind pos z cpt d pr) (prompt "\n Traitement en cours ...") (setq acobj (vlax-get-acad-object) acdc (vla-get-activedocument acobj) model (vla-get-modelspace acdc) ltext '() cpt 0) ; Création de la liste d'association ltext '((position_relative . z) ...) (vlax-for obj model (if (= (vla-get-ObjectName obj) "AcDbText") (setq pos (vlax-safearray->list (vlax-variant-value (vla-get-InsertionPoint obj))) ltext (append ltext (list (cons (strcat (rtos (car pos)) "," (rtos (cadr pos))); Position plus pratique en texte. (vla-get-textstring obj))))); Z ) ) ; Pour chaque bloc on cherche si il a une association avec la liste ltext. (vlax-for obj model (if (= (vla-get-ObjectName obj) "AcDbBlockReference") (progn (setq pt (vlax-safearray->list (vlax-variant-value (vla-get-InsertionPoint obj))) ; Liste des positions observées. ld '((0.5 0.15) (0.501 0.15) (0.5 0.151) (0.501 0.151) (0.499 0.15) (0.5 0.149) (0.499 0.149) (0.497 0.101) (0.496 0.105) ) ind 0 z nil) ; Tant qu'une position ne soit trouvée ou aucune. (while (not z) (setq d (nth ind ld) pr (strcat (rtos (+ (car pt) (car d))) "," (rtos (+ (cadr pt) (cadr d))))) (if (setq z (cdr (assoc pr ltext))) (progn ; Elévation du bloc (vla-put-InsertionPoint obj (vlax-3d-point (list (car pt) (cadr pt) (atof z)))) ; Suppression de la position dans la liste. (vl-remove pr ltext) (setq cpt (1+ cpt)) ) ) (setq ind (1+ ind)) (if (= ind (length ld)) (setq z T)) ) ) ) ) (princ (strcat "\n Nombre de blocs traités -> " (itoa cpt))) ) Taper txt2z attendre un peux ...

Thème foncé, Ruban et palettes noirs. Un chapeau, noir, un costume, noir, une paire de lunettes, noires. Puis mon frère vient me chercher dans une voiture de flic, le jour de ma sortie de prison ...

Bonjour, Je te propose un code qui va modifier tes attributs concernés et placer un MTEXT avec le diamètre du tuyau au milieu de la polyligne 3D. Je ne modifie pas la polyligne3D mais lui ajoute une XDATA qui lui attribue le diamètre du tuyau en mm en tant que réel. A toi de faire ce que tu veux de cette donnée XData (modifier ta polyligne, ou exporter la donnée ou encore autre chose) Sur ton dessin cela à l'air de fonctionner, mais le traitement peut être long (forcément, tu as énormément de blocs dans ton dessin et de polylignes3D) Pour info sur ma machine cela dure environ 4mn avec le processeur qui s’emballe à 20%), mais si tu es patient cela fait le job: Autocad n'es pas planté mais il bosse... A la fin toutes tes polylignes3D concernées sont sélectionnées, tu peux donc les changer de couleur, de calque ou autre propriétés pour mieux les repérer. Cela va t-il t'avancer? (defun l-coor2l-pt (obj lst / ) (if lst (cons (list (car lst) (cadr lst) (caddr lst) ) (l-coor2l-pt obj (cdddr lst)) ) ) ) (defun make_mtext (pt rot txt lay / ) (setq nw_obj (vla-addMtext Space (vlax-3d-point pt) 0.0 txt ) ) (mapcar '(lambda (pr val) (vlax-put nw_obj pr val) ) (list 'AttachmentPoint 'Height 'DrawingDirection 'StyleName 'Layer 'Rotation 'BackgroundFill) (list 5 0.3 5 "Réseaux_Arial" lay rot -1) ) ) (defun c:test ( / js dfzz AcDoc Space n ss ent obj_vla l_coor l_diam atts dlt_z) (while (null (setq js (ssget "_X" (list '(0 . "POLYLINE") '(-4 . "&") '(70 . 8) (cons 67 (if (eq (getvar "CVPORT") 1) 1 0)) (cons 410 (if (eq (getvar "CVPORT") 1) (getvar "CTAB") "Model")) ) ) ) ) ) (if (not dfzz) (setvar "USERR1" 1E-02)) (initget 4) (if (not (setq dfzz (getdist (strcat "\nRayon de recherche? <" (rtos (getvar "USERR1") 2 2) "> : ")))) (setq dfzz (getvar "USERR1")) (setvar "USERR1" dfzz) ) (if (null (tblsearch "appid" "RESEAU_TUYAUX")) (regapp "RESEAU_TUYAUX") ) (setq AcDoc (vla-get-ActiveDocument (vlax-get-acad-object)) Space (if (= 1 (getvar "CVPORT")) (vla-get-PaperSpace AcDoc) (vla-get-ModelSpace AcDoc) ) ) (repeat (setq n (sslength js)) (setq ss (ssadd) ent (ssname js (setq n (1- n))) obj_vla (vlax-ename->vla-object ent) l_coor (l-coor2l-pt obj_vla (vlax-get obj_vla 'Coordinates)) l_diam nil ) (mapcar '(lambda (x) (cond ( (ssget "_X" (list '(0 . "INSERT") '(2 . "IC_11_*") '(66 . 1) (cons 67 (if (eq (getvar "CVPORT") 1) 1 0)) (cons 410 (if (eq (getvar "CVPORT") 1) (getvar "CTAB") "Model")) '(-4 . "<AND") '(-4 . ">=,>=") (cons 10 (mapcar '- (list (car x) (cadr x)) (list dfzz dfzz))) '(-4 . "<=,<=") (cons 10 (mapcar '+ (list (car x) (cadr x)) (list dfzz dfzz))) '(-4 . "AND>") ) ) (setq ss (vla-get-activeselectionset (vla-get-activedocument (vlax-get-acad-object) ) ) ) (vlax-for blk ss (setq atts (vlax-invoke blk 'getattributes)) (foreach att atts (if (and (eq (vla-get-tagstring att) "DIAM") (/= (vla-get-textstring att) "")) (setq l_diam (vla-get-textstring att)) ) ) ) (cond (l_diam (setq dlt_z (read (substr l_diam 4))) (vlax-for blk ss (setq atts (vlax-invoke blk 'getattributes)) (foreach att atts (if (eq (vla-get-tagstring att) "Altitude_GS") (vla-put-textstring att (rtos (- (read (vla-get-textstring att)) (* 1E-3 dlt_z)) 2 2)) ) ) ) (entmod (append (entget ent) (list (list -3 (list "RESEAU_TUYAUX" (cons 1002 "{") (cons 1000 "DIAM") (cons 1040 dlt_z) (cons 1002 "}") ) ) ) ) ) (make_mtext (vlax-curve-getPointAtParam obj_vla (* 0.5 (vlax-curve-getEndParam obj_vla))) (angle '(0. 0. 0.) (vlax-curve-getfirstderiv obj_vla (* 0.5 (vlax-curve-getEndParam obj_vla)))) l_diam (vla-get-layer obj_vla) ) ) ) ) ) ) l_coor ) ) (sssetfirst nil (ssget "_X" (list '(0 . "POLYLINE") '(-4 . "&") '(70 . 8) (cons 67 (if (eq (getvar "CVPORT") 1) 1 0)) (cons 410 (if (eq (getvar "CVPORT") 1) (getvar "CTAB") "Model")) '(-3 ("RESEAU_TUYAUX")) ) ) ) (prin1) ) NB: Fait un _AUDIT de ton dessin avant car tu as beaucoup d'erreur sur tes POLY3D (option corriger les erreurs)

C=Bonjour @KevM, Est-ce que c'est ce genre de chose que tu souhaiterais pouvoir faire ?

Bonjour, Je pense qu'avec le nouveau module "zone de structures de la V18.1" il y a quelque chose a faire. Je reviens vers vous très vite avec une petite vidéo

Hello Le Jeune Australopitheque Alumini Autodeskien BRAVO tu etais un Precurseur ! La Sante, Bye, lecrabe

Bonjour à toutes et tous, Suivant le besoin (Relatif ou absolu), je joue avec le bouton bascule "F12",..