-
Compteur de contenus
9 410 -
Inscription
-
Dernière visite
-
Jours gagnés
151
Type de contenu
Profils
Forums
Calendrier
Blogs
Tout ce qui a été posté par didier
-
Création Type de ligne avec des triangles pour un losange
didier a répondu à un(e) sujet de Eli-110 dans AutoCAD 2020-2024
Bonjour *W_Losange,---- A,12.7,-5.08,["t",Wingdings,S=5,R=0.0,X=-3.50,Y=-2.00],-5.08 Avec le caractère "t" de la police WINGDINGS on obtient un losange plein Amicalement -
Bonjour a priori le site était hors-jeu aujourd'hui, y a-t-il relation entre ces spammeurs et l'erreur reçue toute la journée ? Amicalement
-
Bonjour Je m'adresse par ce message à @Cadmin Je passe par le biais du site, car l'adresse mail qui me permettait d'échanger avec l'équipe chargée de la maintenance du site est devenue invalide, j'ai plusieurs fois reçu des notifications de non-distribution lors de mes envois à l'équipe. Aujourd'hui je parle des SPAMS, la vague risque de nous submerger, bien sûr on est là, quelques-uns, et nous effaçons ou masquons les messages indésirables, mais c'est juste un pansement sur une jambe de bois. Les mesures prises lors de la refonte du site ont eu de l'effet quelque temps, mais sont désormais contournées par ces robots, c'est ballot, car nous qui sommes inscrits on ne peut pas se connecter si le VPN est en route, et ce, sans se positionner dans des contrées trop exotiques pour l'usage d'un site francophone, j'ai même essayé de régler mon VPN sur France... et je n'arrive pas non plus à me connecter. Moralité, merci de faciliter l'usage par les membres et de durcir l'accès des "invités" qui viennent nous pourrir la vie copieusement. Amicalement
-
Représentation de la base vie
didier a répondu à un(e) sujet de Jason_Guérisseur dans Débuter en LISP
Je ne comprends plus rien, c'est quoi cet exemple de grue en réponse au positionnement des bungalows ??? -
Représentation de la base vie
didier a répondu à un(e) sujet de Jason_Guérisseur dans Débuter en LISP
Coucou Je vais vous laisser entre anciens combattants de la même guerre donc. (hihi). Si c'est noté, ce n'est plus la même chanson, et à part donner des lignes directrices, je ne vois ce qu'on peut faire de plus, pour que la pédagogie suive son cours... Si l'énoncé n'est vraiment que celui qui est décrit, c'est plus que flou... Amicalement -
Représentation de la base vie
didier a répondu à un(e) sujet de Jason_Guérisseur dans Débuter en LISP
Bonjour @jasonriri Je trouve cette question étrange, elle est émise dans quel environnement ? Scolaire ? Gestion de chantier en opérationnel ? Ce serait bien de le savoir... Pour dénombrer les bungalows de base vie, il y a tellement de paramètres que tout mettre dans un lisp me semble une gageure. En effet, il faut connaître le terrain affecté à cette base vie, en dimensions, le nombre de bungalows étant une simple division du nombre de gens à loger divisé par le nombre de places de chaque bungalow, en admettant qu'il n'y ait qu'un seul type de bungalow, ce qui est rare et va donc compliquer la tâche en affectant les bungalows à place unique à une certaine catégorie d'employés !. Pour les positionner il faut connaitre les dénivelées du terrain et les données des fosses septiques pour les relier sans créer des réseaux déconnants. Idem pour les alimentations en énergie et en réseau informatique, antenne wi-fi ? Réseau filaire ? Pour la représentation, il faut partir sur une base de blocs avec attributs, ça, c'est la partie simplissime à gérer en premier lieu. Maintenant si c'est une question scolaire, sachant que ces gens ne savent rien de la vraie vie, toutes les questions que je soulève sont sans doute superflues et il suffira de faire un bloc rectangulaire, mettre un ou deux attributs, et en faire un réseau rectangulaire. Dans la vraie vie, pour l'avoir fait des dizaines de fois, je conseille les blocs et le positionnement empirique un par un en vérifiant les prérequis susmentionnés. À suivre. Amicalement -
Déplacer des blocs sur des polylignes 3D
didier a répondu à un(e) sujet de ablue1 dans Routines LISP
Bonjour @ablue1 OK, compris je propose cette nouvelle version, j'ai redéfini le bloc pour que le point d'insertion de l'attribut soit en MILIEU CENTRE, c'est mieux quand on veut centrer une valeur dans un cercle, j'ai aussi changé en couleur DUBLOC pour la visualisation du GIF. En effet j'ai tenu compte que des blocs ne seraient peut-être pas insérés correctement en Z sur la polyligne, ils seront traités quand même. La valeur prise en compte pour l'attribut est la valeur Z su sommet de la polyligne, pas le point du bloc. À suivre si tu as des questions. Dis-moi si c'est OK et je livre le lisp... Perso je pense que ce serait mieux de faire une routine qui insère directement les blocs avec tes demandes plutôt que de modifier les blocs en place. Qu'en penses-tu ? Amicalement -
Bonjour @Netparty Je suis obligé de faire une demi-réponse, car il n'est pas expliqué si la polyligne aura plusieurs sommets Je pars sur un exemple simple d'un seul segment comme une pointe de flèche de 1 unité au départ et qui finit à 0, ça fera une base de départ. (setq p1 (getpoint "\nDépart\n") p2 (getpoint "\nArrivée\n")) (setq ep1 1 ep2 0) (command "_pline" p1 "_w" ep1 ep2 p2 "") Si c'est pour dessiner des segments avec chacun une épaisseur différente, il faudra réfléchir un tantinet plus. Amicalement
-
Déplacer des blocs sur des polylignes 3D
didier a répondu à un(e) sujet de ablue1 dans Routines LISP
Bonjour @ablue1 La question est pour le moins mal exposée !. Dans le dessin fourni (bonne idée) il n'y a rien d'explicite(mauvaise idée). Il y a un bloc avec la valeur 65.05 accroché à une extrémité à 65.75 késako ? En plus les Z d'insertion n'ont rien à voir avec le Z de la polyligne. Donc : Ce que je comprends, c'est que les blocs ne sont plus déplacés de vingt centimètres depuis l'extrémité dans la direction de la polyligne MAIS Les blocs sont composés d'une ligne et d'un cercle contenant un attribut et l'extrémité de la ligne est connectée à l'extrémité de la polyligne (je pense aussi en Z), le tout sur un angle droit du côté droit du sens de construction de la polyligne, l'attribut n'étant pas lié en direction par rapport à cette polyligne ni par rapport au sens de lecture (Sens croissant des X du SCU général). Rien à voir avec la demande initiale. Je veux bien faire ce truc, pas de souci, mais comme je déteste travailler pour rien, j'aimerais être certain d'être dans la bonne direction de compréhension. Amicalement -
Bonjour @DenisHen Es-tu ABSOLUMENT CERTAIN de ne pas avoir chargé d'autres types de lignes ? Je viens de faire un test de ton code et dès que je charge un type de ligne il apparaît bien au lancement de la routine... Attention, ça ne signifie pas pour autant qu'il est utilisé, il peut être chargé, mais non utilisé donc si je comprends bien à ne pas prendre en compte dans ta liste. Amicalement
-
Coucou Attention aux fautes de frappe (temps de la conjugaison) qui changent le sens des écrits. Je pense que tu t'exprimais au futur (sans s) pas au conditionnel (avec s). Bien sûr, je cherche aussi à progresser, je suis un humain et c'est dans nos gènes, tu n'as pas tort en un sens, car on peut citer Oscar Wilde qui écrivait : Il faut toujours viser la LUNE, car même en cas d'échec, on finit dans les ÉTOILES. Amicalement
-
Coucou Pour ce qui est de Covadis, dire que je ne suis pas au niveau est un bon exemple d'euphémisme. Tant qu'on reste dans l'insertion de points topo, de foliotage, de dessin simplifié de réseau, je pourrais parler, mais quand on gratte un peu et qu'on touche aux axes en plan dynamiques liés aux normes autoroutières, aux MNT et aux cubatures sans parler des plateformes, là on dit "respect" aux programmeurs sachant qu'on ne pourra jamais faire mieux que leur titiller la malléole et encore en empruntant un escabeau. Il ne faut pas trop se hausser du col et rester à sa place. On est d'accord que je ne parle pas du service marketing qui a d'autres buts. Nous sommes nombreux à bosser chez le même patron depuis quelque temps (traite et retraite)... Amicalement
-
Déplacer des blocs sur des polylignes 3D
didier a répondu à un(e) sujet de ablue1 dans Routines LISP
Bonjour Le bloc dont j'avais connaissance dans l'exemple ne pose pas ce genre de souci Puisque je l'ai trouvé inséré avec une valeur Z correspondant au sommet de la polyligne j'ai pensé (bêtement) qu'il fallait le déplacer en 3D suivant la pente. Ce n'est pas le cas ? Pour ce qui est étiquettes, je pense qu'on parle d'attributs, non ? Il n'y en avait pas dans l'exemple à disposition. Je veux bien en savoir plus pour corriger, mais il faut être explicite, merci. Pour ce qui est du VBA je laisse l'auteur répondre. Amicalement -
---- Message INDESIRABLES ----
didier a répondu à un(e) sujet de rebcao dans CADxp, comment ça marche?
Coucou ! Surprise ! Déception ! Je viens de recevoir une notification de non-distribution pou adresse introuvable. L'adresse qui me servait à communiquer avec CadMin est obsolète. Donc pour l'informer des attaques de spam, je n'ai pas d'autre moyen que de le HURLER sur CadXP. Amicalement -
Déplacer des blocs sur des polylignes 3D
didier a répondu à un(e) sujet de ablue1 dans Routines LISP
Bonjour @ablue1 Merci de la correction, j'ai mis à jour le code fourni, effectivement j'avais une faute dans mon code un reste de variable de compteur qui n'a pas été correctement effacé. Je suis content que ça fonctionne et que ça rende service en répondant à la demande. L'idée du bloc dynamique, faut-il travailler dessus ? L'intérêt est de garder un point d'insertion en rapport avec le sommet de la polyligne Le défaut est de ne pas pouvoir mettre à jour, car la comparaison trouvera toujours un bloc à ce point d'insertion. À réfléchir... Quant au VBA, il n'est pas disponible en AutoCAD nativement, il faut charger le module volontairement avec un lien externe suivant la version d'AutoCAD. Amicalement -
C'est ce qui me semblait le mieux à faire, comme je disais lorsqu'on parle de prix, c'est a priori confidentiel et on doit le respecter. Il est plus question d'ordre de grandeur pour comparer le rapport qualité/prix. On obtient donc un logiciel de DAO un peu évolué pour moins cher qu'AutoCAD mais par rapport à LT c'est comment ? J'ai compris que les fonctionnalités évoluées de Covadis restent inaccessibles en dehors de l'environnement AutoCAD. Amicalement
-
Bonjour Merci, je pense toutefois qu'il aurait fallu donner un ordre de grandeur Si, à la réflexion tu voulais bien éditer ton message pour supprimer la pièce jointe je pense que ce serait mieux pour la confidentialité des échanges commerciaux. Amicalement
-
Bonjour @vincentp010 Merci du retour d'expérience. Ah donc pas encore de 3D, OK. c'est quand même une belle avancée et une entaille dans le monopole. Es-tu en mesure de nous parler du prix de ces options, logiciel DAO inclus, pour se rendre compte du rapport qualité/prix ? Amicalement
-
---- Message INDESIRABLES ----
didier a répondu à un(e) sujet de rebcao dans CADxp, comment ça marche?
Coucou C'est fait, je ne sais pas si ce sont les hordes de Sauron, mais nous saurons bientôt si les hordes sont bloquées par Cadmin. Amicalement -
Déplacer des blocs sur des polylignes 3D
didier a répondu à un(e) sujet de ablue1 dans Routines LISP
Bonjour @ablue1 Ce serait utile de savoir quel est ce message, dans quel dessin il est reçu et quelle est la version d'AutoCAD? Le VBA fonctionne-t-il ? Ou seul le LSP cafouille ? Amicalement -
Bonjour à toutes et à tous Bonne nouvelle ! On dirait bien que les choses évoluent avec cette compatibilité ZWCAD Vu sur le site GÉOMÉDIA. À suivre pour connaître les avis des premiers utilisateurs. Amicalement
-
Bonjour encore un bon exemple de mon antienne : Le mieux est l'ennemi du bien... Pourquoi toujours vouloir changer quelque chose qui fonctionne bien ? Amicalement
-
Déplacer des blocs sur des polylignes 3D
didier a répondu à un(e) sujet de ablue1 dans Routines LISP
Bonjour @ablue1 Je propose une solution en Lisp. Le nom de la commande est ABLUE1 Il suffit de sélectionner les polylignes à traiter, car je n'ai pas mis de filtre de nom de calque ou autre. Ne fonctionne que sur les polylignes 3D avec un seul segment. Par contre, il n'y a pas à sélectionner les blocs, c'est automatique, seuls les blocs nommés blocC seront traités. Si un bloc est sur une des extrémités du segment il sera déplacé (en 3D) dans le sens de la polyligne conformément à la demande et Si le bloc a déjà été déplacé il ne sera pas traité. La variable dep actuellement à 0.20 est la distance de déplacement demandée, la changer dans le Lisp si elle doit évoluer. Nota : je travaille avec les blocs du dessin proposé, je n'ai pas créé de blocs dynamiques comme j'ai proposé précédemment, si l'idée plait je veux bien revoir ma copie. Amicalement ;https://cadxp.com/topic/54799-d%C3%A9placer-des-blocs-sur-des-polylignes-3d/?tab=comments#comment-312048 (defun c:ablue1 (/ blo dep ent lon n nn p1 p2 p3 p4 ss1 ss2) (setq dep 0.20 n 0 comp) (prompt "\nSélection des polylignes 3D\n") (setq ss1 (ssget (list (cons 0 "POLYLINE")))) (setq ss2 (ssget "_x" (list (cons 0 "INSERT")(cons 2 "blocC")))) (repeat (sslength ss1) (setq ent (ssname ss1 n) p1 (vlax-curve-getpointatparam ent 0) p2 (vlax-curve-getpointatparam ent 1) lon (distance p1 p2) p3 (vlax-curve-getpointatdist ent dep) p4 (vlax-curve-getpointatdist ent (- lon dep)) nn 0 ) ;_ Fin de setq (repeat (sslength ss2) (setq blo (ssname ss2 nn)) (cond ((equal p1 (cdr (assoc 10 (entget blo)))) (entmod (subst (cons 10 p3) (assoc 10 (entget blo)) (entget blo)) ) ;_ Fin de entmod ) ((equal p2 (cdr (assoc 10 (entget blo)))) (entmod (subst (cons 10 p4) (assoc 10 (entget blo)) (entget blo)) ) ;_ Fin de entmod ) ) ;_ Fin de cond (setq nn (1+ nn)) ) ;_ Fin de repeat (setq n (1+ n)) ) ;_ Fin de repeat ) ;_ Fin de defun -
Modifier le calque des étiquette d'attribut dans un bloc
didier a répondu à un(e) sujet de nen dans Débuter en LISP
Bonjour @nen Oui le F2 est l'espace "texte" de AutoCAD Le souci ne viendrait-il pas du séparateur décimal du système, en effet je vois que le facteur de largeur de l'attribut est exprimé 0,75. Avez-vous essayé avec 0.75, la virgule n'est pas le séparateur décimal qui va bien pour AutoCAD. Amicalement -
Déplacer des blocs sur des polylignes 3D
didier a répondu à un(e) sujet de ablue1 dans Routines LISP
Bonjour @ablue1 Comme vous constatez, puisque vous êtes un nouvel inscrit, il y a de la réponse sur ce site. Il faut toujours éviter que les réponses soient des questions, mais quand le problème est incomplètement exposé, c'est ce qui se passe. Donc on doit déplacer des blocs, de quel côté on en saura plus bientôt, mais du coup le rapport entre le point d'insertion et le sommet de la polyligne sera perdu. Il n'y aura plus de relation en cas d'extraction de données ce qui est une perte d'information et ce n'est pas bien les pertes.... Je propose de rendre les blocs dynamiques avec une action de déplacement basée sur un point XY et de pouvoir déplacer le "graphique" du bloc MAIS en gardant le point d'insertion sur le sommet de la polyligne. Il est possible de les mouvoir par lisp tout autant même si c'est un tantinet plus compliqué, mais quand on aime le travail bien fait on ne compte pas. Nous attendons vos remarques pour répondre. Amicalement
