Aleck_Ultimate

EDIT : la page sur le site francophone Da-code : Mon lien Merci. J'ais du passer trop vite sur les fonctions en get, et le pire c’est là que je suis allé vérifier en premier Pour la décomposition de blocs j'ais bien réussit à faire ton LISP, mais il me retourne toujours un nombre incohérent d'objets (plutôt beaucoup plus que la réalité). J'ais essayé d'ajouter le changement de calque et de l'appliquer sur un bloc test pour voir quels objets il lit mais j'ais juste une erreur. Décomposition, mais aucun changement de calque. Et j'ais plus que le premier élément de la liste qui apparais. Comme j'en avais un peut marre, entre les petits boulots que je reçois par-ci par-là je me suis replongé dans des LISP bien plus basiques mais tout aussi utile (mais que je réussit à finir en quelques heures tout au plus) en espérant y revenir dans pas trop longtemps si je reste dans une période calme, mais à tête reposée. Je n'envisage pas encore de demander la solution complète Merci.

Bonjour à tous. J'ais souvenir d'avoir lue il y a longtemps qu'il était possible d'ajouter des options à une commande LISP comme il y en a pour les commandes standard. J'ais souvenir de quelques détail comme de mettre des majuscules pour spécifier le raccourci ou qu'il fallait changer un paramètre pour que ça apparaisse sous forme de menu déroulant (avec DYNMODE sur 1). Sauf que j'ais farfouillé un peut partout dans l'Evan(gile) selon Chanteau, sur Da-code et sur le net, impossible de retrouver quoique ce soit là dessus. Si vous pouviez éclairer ma lanterne ? J'ais pas particulièrement envie de me retaper l’intégrale de l'Evan(gile) et de Da-code pour me rendre compte qu'en fait il va aussi falloir relire tout les postes de la section LISP depuis 2004. Aussi instructif que se serait. Merci.

Alors comme entretemps j'ais eu du boulot à faire j'ais repris que ce matin. C'est la boucle qui coince, elle me retourne "type d'argument incorrect : FILE <nom d'entité>" EDIT : Tout simple même s'il m'a fallut du temps pour trouver parce que je cherchait à tester les éléments individuellement. Il manquait bêtement un parenthèse pour fermer le princ quant je l'ais recopiée.

Salut. En faite les objets 3D sont verrouillés. C'est pas juste qu'on peut pas les modifier, c'est que AutoCAD refuse qu'on fasse de la 3D, notamment en interdisant un certain nombre de commandes. Pour faire des blocs dynamiques 3D le mieux c'est de faire des surfaces associatives et d’agir sur les polylignes, mais surtout de supprimer les surfaces des jeux de sélections. Le truc c'est qu'on ne peut placer des paramètres que sur les axes x et y, le z étant interdit par le logiciel. Comme tu doit jouer sur trois dimensions tu va être obligé de passer par un paramètre de visibilité pour l'une, ce qui va beaucoup limiter tes possibilités. Si la hauteur n'est pas la direction qui peut le mieux supporter cette contrainte tu peut tricher en inclinant ton bloc pour que la hauteur soit parallèle à l'un des axe horizontal. Dans ce cas il faudra jouer sur le SCU au moment d'insérer le bloc. Personnellement pour insérer des blocs 3D je place le SCU où je veut et j’insère au point 0,0,0 ; puis je revient au SCG (j'ais des LISP qui me permettent d'avoir en alias directement "SCU - 3 points" et "SCU - SCG". Comme beaucoup de commande 3D sont bloquées, je te conseille de créer ton objet dans un dessin neuf, de le copier le nombre de fois que tu veut l'avoir en hauteur en décalant les copies d'une longueur fixe, puis d'étirer chaque ensemble pour lui donner la hauteur que tu veut. Ensuit tu ouvre l'éditeur de bloc (BEDIT) et tu sélectionne <dessin courant>. Tu met en place tes visibilités et APPRES seulement te redéplace toute tes copies au même endroit. Ce n'est qu'a partir de là que tu peut ajouter des paramétres d'étirement pour les deux autres directions, en ne sélectionnant que les polylignes. L'astuce chez moi c'est de mettre les polylignes dans un calque à part et d'isoler ce calque au moment de déterminer les jeux de selections. Quant j’insère ces bloc dans un dessin je gèle ce calque pour pas qu'on voit les arêtes de mes objets. Dans le doute j'ais beaucoup détaillé, n'hésite pas si tu a encore besoin d'aide. Notamment si c'est trop confus. Cordialy.

Salut. Pour l'insertion de PJ et images tout est expliqué là : Mon lien Moi tout ce que je peut conseiller c'est de désactiver l'accélération matériel, le reste c'est en dehors de mes compétences. Cordialy.

j'ais peut-être un peut trop bien réussit mon texte, c'était censé être du sarcasme. Même si quant j'ais testé Revit j'ais vraiment regretté l'absence de barre de commande.

Salut. Mais non, tu comprend rien ! C'est donner la possibilité au client de faire du tunigue ! Ca nous donne la possibilité de pimper notre logiciel pour qu'il soit parfaitement adapté à notre façon de travailler. Parce que ta voiture, si tu a des pneus standards tu peut pas rouler correctement sur la glace ou les pistes caillouteuses des dessert ! Et puis comme ça c'est nickel, en plus c'est toi qui choisi les gentes qui te plaisent à toi ! Celle qui vont refléter ta personnalité ! Franchement, dans ce "nouveau monde" dans lequel nous somment de plus en plus infantilisés vous devriez être contant d'avoir enfin un éditeur de logiciel qui nous laisse la possibilité de personnaliser notre outils de travail, qui nous permet de créer par nous même ce dont nous avons besoin plutôt que de nous noyer sous les fonctionnalité toujours trop simples ou trop complexes dont on n'utilise qu'une infime fraction ! Regardez Revit, tout nouveau, et pourtant pas de LISP ! Même pas de barre de commande ! C'est une honte ! Autodesk, l'entreprise qui redonne le pouvoir à ses clients ! ... ... Non, j'ais pas (encore) pété un câble, mais j'imagine trop un jeun cadre dynamique BCBG qui ferait son spitch devant les actionnaires. Cordialy.

Contrairement à la mémoire informatique, une fois qu'un espace est libéré il n'est plus réutilisé. Il est juste nil. Le flash ! C'est pour ça que les noms d'objets changent à chaque ouverture du fichier : à chaque fois on renomme tout en ignorant les espaces vides, qui n'existent plus. Ok, merci.

Ce n'est pas ce que je veut dire : si ent a été explosé je ne comprend pas comment ont peut encore s'y référer. Vue qu'on peut par exemple purger le bloc. ... En fait c'est un peut comme d'avoir des numéros de lignes de mettons 001 à 999, et si je dit que j'ais marqué TOTO à la ligne 253 et que je stock 253 dans "der", même si j’efface TOTO de ma ligne 253 je pourrais toujours trouver 254 par rapport au numéro de ligne 253 ?

Bon, désolé, j'ais pas fait ce que t'a dit parce que quant je t'ais lue il me restait que trois-quatre lignes à faire sur ce code là : (defun c:ALK_decomposer-dernier (/ ent ;_ Entité principale (nom brute) drapeau ;_ Point de départ de la boucle principale (nom brute) sousent ;_ Sous-entité à évaluer (nom brute) entcalc ;_ Calque de l'entité (chaine) ) (setq ent (entlast)) (if (and (/= (assoc -2 (entget ent)) "nil") ;_ Test si ent est une entité complexe (/= (assoc 8 (entget ent)) '(8 . "0")) ;_ Test si ent est sur le calque 0 ) ;_ Fin de and (progn (setq entcalc (cdr (assoc 8 (entget ent)))) (if (= ent (entlast)) ;_ Vérification que drapeau est diférant de ent (setq drapeau (entlast ent)) (setq drapeau (entlast)) ) ;_ Fin de if (command "_.explode" ent) ;_ Décomposition de ent si complexe (setq sousent drapeau ;_ Aplication du drapeau à sousent drapeau nil ;_ Supression du drapeau (c'est deux lignes superflu mais sinon je m'y perd) ) (while (setq sousent (entnext sousent)) ;_ Démarage de la boucle (if (/= (assoc -2 (entget sousent)) "nil") ;_ vérification que sousent n'est pas une sous-entité de second degré (progn (while (/= (assoc -2 (entget sousent)) "nil") ;_ Démarage de la boucle secondaire (setq sousent (entnext sousent)) ;_ Tant que c'est une sous-entité elle passe au suivant ) ;_ Fin de while ) ;_ Fin de progn (progn (setq sousent (subst entcalc (assoc 8 (entget sousent)) sousent) ;_ Remplacement du calque si différent de 0 ) (entmod sousent) ;_ Remplacement des autres sous-entité ) ;_ Fin de progn ) ;_ fin de if ) ;_ FIn de while ) ;_ Fin de progn (command "_.explode" ent) ;_ Décomposition de ent si non complexe ) ;_ Fin de if ) ;_ Fin de defun Ça marche pas, mais j'ais pu isoler l'erreur : elle est dans la boucle entre espaces. Types d'argument incorrect : lentityp nil Le truc c'est que cette boucle je voie vraiment pas comment tester les morceau individuellement. Pour ton exo... je vois pas comment ent et der peuvent être les même vue que pour moi ent est sensé ne plus exister quant on l'explose, mais je te croie sur parole. Pour ce qui est de le faire pour me rendre compte de ce que donne princ je verrais ça demain. Là j'ais la tête à l'envers à cause d'autrechose. Je serais plus capable de rien.

P***** de b***** de m**** Désolé Patrick_35, j'était tellement focalisé sur les premières lignes qui répétaient les miennes que j'ais négligée la dernière "Codes dxf --> SEQEND". Je garde ma ligne de code, mais si elle est vraie je lance une autre boucle qui évalue les sous-entés sans les modifier jusqu’à atteindre un SEQEND, et là j'ais ce qu'il faut pour obtenir le nom de la dernière entité. Sachant qu'avec un nombre indéfinissable d'entités complexes imbriquées il va falloir mettre le tout dans un autre boucle. Et ba si j'arrive à coder ça sans votre aide c'est que je suis vraiment bon Alez, on se motive en on y va ! Merci.

Vous êtes vraiment gentils de prendre le temps de m'expliquer tout ça en détail, mais le problème n'est pas là. Vous remarquerez que excepté la sélection qui chez Patrick_35 est (car (entsel)) et chez moi (entlaste), j'utilise exactement les mêmes phrases dans mon code, boucles et conditions en plus. Ce qui me mettait la tête à l'envers c’était que entnexte parcoure les sous-entités, ce pourquoi je voulait changer le calque des sous-entités avant de décomposer mon bloc, sans penser que entnexte allait selon toute logique aussi me chercher les sous-entité de mes sous-entité et stopper ma boucle (car retour nill) à la dernière sous-entité SEQEND. Probablement l'erreur dans mon code, si on part du principe que j'ais pas fait de faute de syntaxe. Bref, je suis remonté à la source au cas où SACRILÈGE il y aurait eu une erreur dans l'Evan(gile) à propos de cette histoire de parcourt de sous-entité qui semble ne vous faire ni chaud ni froid et j'ais trouvé par hasard la solution dans cette note chez todesk (page "entnext (AutoLISP)", uniquement en anglais) : En anglais : En français (traduit automatiquement) Je vais donc refaire mon code de 0 en décomposant mon bloc avant de changer les calques comme proposé par Patrick_35, mais en ajoutant des sécurité pour ne pas modifier mes blocs imbriqués et ne pas laisser stopper ma boucle sur la première entité complexe qui passe. Je pense (écrit directement ici) à (if (/= (assoc -2 (entget ent)) nill) (setq ent (assoc -2 (entget ent))) (mon code de changement de calque)) Et puis on se revois pour le débogage de ce code là EDIT : Va falloir creuser un peut plus, parce que ce code là (en plus d’être faux il manque un cdr) lancerait une boucle infini.

Le problème c'est que je ne veut pas décomposer les blocs imbriqués, seulement changer leur calque. Le but pour moi c'est d'insérer un ensemble de blocs dynamique en même temps, et de pouvoir les modifier individuellement après avoir décomposé le bloc source. Sans compter l'idée de faire un quantitatif avec EXTRACTDONNEE. EDIT : D’après l'Evan(gile) selon Chanteau (16.1 entnexte) SEQEND sert de drapeau de fin de toutes liste de sous-entités, pas seulement des attributs. Si j'ais bien suivi...

Olivier Eckmann : Parfait. Cette option c'est juste ce que je cherchait à faire moi-même : Effectivement, si je l'appel avec command j'ais une erreur "commande inconnue". Je m'avoue pas vaincue, j'ais lue quelque-chose autour des commandes lambda (ou plutôt de la commande dans laquelle on les utilise) qui fait dire que y'a peut-être un moyen de l'appeler autrement. Et puis sinon je créerait une MACRO que je rentrerais tel quel avec command. Sur un malentendu ça peut passer Parce que une MACRO en tant que tel on peut pas la lier à un alia, juste à un bouton. C'est pas top. Patrick_35 : Ok, là ça devient chaud. Comme je n'ais "rien à faire" pour l'instant je vais quand même essayer de finir ce LISP pour l'xp, mais comme XPLODE résous au moins en partit mon problème je n'ais plus que la motivation de la découverte vue que je perd un bonne partie de celle de l'utilité (quoique XPLODE c'est pas gagné non plus). Dit comme ça je comprend le fonctionnement, mais il me chiffonne toujours le fait que la dernière entité crée c'est précisément le bloc que je vais exploser, donc je perd mon point de repaire dans la liste. Non, c'est bon, le cas échéant j'ajoute un entlast si ma sélection est identique à mon point de repaire. Je vais arrêter de dire que c'est simple, en LISP ça me porte malheur. Par contre je vais forcément avoir plusieurs blocs imbriqués dans ceux que je compte décomposer, et je sais pas comment empêcher que entnext scan l'intérieur du premier objet complexe qu'il croise et arrête la boucle à son drapeau SEQEND.

Ou la la... c'est pas forcément une mauvaise chose mais ça m'apporte bien plus de questions que de réponses. Je fait exprès de ne pas vérifier le type d'objet. Je préférerait faire une commande le plus universel possible, pouvant s'utiliser sur tout type d'objets comme les réseaux ou les groupes, mais aussi ceux qui n'ont pas de sous-entité. C'est peut-être pas une bonne idée ? Ou ça complexifie beaucoup le code ? Pour ce qui est de décomposer le bloc avant de changer le calque des objets, puisque l'objet est décomposé je comprend pas comment je peut les sélectionner vue que l'objet cible a disparu ? Il ne disparaît pas en faite ? Il reste une rémanence du bloc décomposé ? Surtout que j'avais dans l'idée de faire une autre version qui sélectionne manuellement l'objet à décomposer... donc entnext ne risque t-il pas de continuer à agir plus loin que les sous-entité voulues ? Parce que ce qui arrête entnexte, pour moi ça disparais aussi à la décomposition du bloc. Non-plus ? D'un autre côté je comprend bien que modifier un bloc avant de le décomposer ça va poser des problèmes à toutes les autres occurrence sauf si il est dynamique. Non, c'est même pas ça... une référence de bloc, ça n'a pas vraiment de sous-entités avant d’être décomposé ? Désolé, c'est comme en physique quantique, plus j'en apprend et moins j'en sais

Bonjour à tous. Je suis partit de ça : (command "_explode" (entlast)) Mais mes sous-entités restaient sur le calque 0, qui forcément était gelé. Je vous dit pas le temps qu'il m'a fallut pour trouver l’erreur. Du coup je me suis retroussé les manches et j'ais fini par arriver à ça : (defun c:ALK_decomposer-dernier (/ ent ;_ Entité (brute) sousent ;_ Sous-entité (brute) entcalc ;_ Calque de l'entité (paire pointée DXF 8) ) (setq ent (entlast)) (if (/= (setq entcalc (assoc 8 (entget ent))) '(8 . "0")) ;_ Vérification du calque de l'entité (progn (setq sousent (entnext ent)) ;_ Définition de la premiére sous-entité (if (/= (assoc 8 (entget sousent)) '(8 . "0")) ;_ Test premiére sous-entité (progn (setq sousent (subst entcalc (assoc 8 (entget sousent)) sousent)) ;_ Remplacement du calque si différent de 0 (entmod sousent) ;_ Remplacement de la premiére sous-entité ) ;_ Fin de progn ) ;_ Fin de if (while (setq sousent (entnext sousent)) ;_ Démarage de la boucle des autres sous-entités (if (/= (assoc 8 (entget sousent)) '(8 . "0")) ;_ Test des autres sous-entités (progn (setq sousent (subst entcalc (assoc 8 (entget sousent)) sousent)) ;_ Remplacement du calque si différent de 0 (entmod sousent) ;_ Remplacement des autres sous-entité ) ;_ Fin de progn ) ;_ Fin de if ) ;_ Fin de while ) ;_ Fin de progn ) ;_ Fin de if (command "_explode" ent) ) ;_ Fin de defun La bonne nouvelle : j'ais enfin compris comment fonctionnait if et progn, et que while avait besoin de entnext, et ca me parais bien plus simple que ce que je craignais. La mauvaise : à par rajouter des entget un peut partout là où ils manquaient (du moins j'ais crue le comprendre), je suis partit trop loin et je ne maîtrise plus suffisamment ce que j'ais codé pour déboguer le tout. Ça m’échappe complètement. Si vous pouviez au moins me donner des pistes de travail ? Si possible je préférerais corriger moi-même étant donné qu'a priori j'ais le temps... dans la mesure de mes compétences. Merci.

Oui mais, et j'avais marqué MACRO dans mon message initial en pensant alias (même si les deux sont possibles), l'abréviation de l'un ne convient pas forcément aux autres. Tout mes LISP dépassent les dix caractères, mais sont liés à des alias de un à trois caractères. A partir du moment où on sait faire un alia c'est tout aussi pratique (voir plus). Bon, là c'est comme mode classique ou ruban. Vaut mieux pas approfondir le débat ou on y sera encore dans quatre pages.

Salut. Tout est expliqué là : Mon lien Cordialy.

OK, c'est vraiment un détail mais si je pose pas la question ça va me mouliner dans la tête pendant des jours. Vous faisiez comment à l'époque pour noter R+1 ? C'est intéressant cette variable. Au moins y'a plus de risque de mettre un accent par habitude.

Bonjour à tous. Alors voila : moi je préfère largement donner des noms complets à mes LISP, et je commence toujours par ma signature ALK pour pouvoir sortir rapidement la liste de mes LISP. Mes arguments : - Il est plus facile de retrouver un LISP en particulier ou de se rappeler à quoi sert celui-ci qui traîne un peut au hasard - Il est plus facile à d'autre d'utiliser ce LISP - Si on veut l'appeler par un court ensemble de lettres on fait une alias (même de 5 ou 6 lettres) qui correspond à notre moyen mnémotechnique personnel - On limite les risques de charger deux LISP de même nom (d'où ma signature à la base) De ce que j'ais lue par-ci par-là sur le forum il y a une habitude de donner des noms bien plus concis aux LISP, souvent en abrégé. Je me demandais si c'était lié à une limite d'acad, à une ancienne limite d'acad mais l'habitude est restée, ou si c'est juste une prolongation de l'utilisation de nom courts pour les variables (qui elles peuvent êtres tapées un bon paquet de fois dans un code) et dans le codage en général. Ou tout autre raison. Merci.

Bonjour à tous. Petit ajout avec ma méthode que j'ais élaboré principalement après avoir lue ce poste : - Le plus important je n'utilise jamais d'abréviation autre que RDC et R+1(*) ! Je ne supporte pas quant je reçois un plan mais que je suis incapable de comprendre à quoi correspond telle ou tel calque. TXT ça passe, c'est du texte, mais des fois c'est pas évidant, surtout si ça vient d'un autre corps de métier que le miens. Les abréviations c'est bien en interne, ça l'est plus quant ça sort. Ça a aussi des défauts, notamment sur la largeur du gestionnaire des calques, mais ça se discute. - Ensuite j'écrit en minuscule. Je fait attention à ne pas mettre de caractères spéciaux et à bannie les espaces, mais PERSONNELLEMENT LE TOUT EN MAJUSCULES CA M'ARRACHE LES YEUX. Sérieux, pour moi c'est comme de se faire crier à l'oreille. - Quant j'intervient sur un plan j'utilise en préfixe l'abréviation de mon entreprise en trois lettres. Je réserve les préfixe en tiret bas à mes quelques calques génériques : ___Trais_de_construction __Axes __Espace_utile __X-ref Comme je suis en bout de chaîne personne ne réutilise mes dessins, au pire on les relis de loin avant de les archiver donc je ne m’inquiète pas de polluer le haut de la liste de calques. (*) Tant que j'y suis, le signe plus (+) est-il aussi source de problèmes comme un caractère spécial ? Cordialy.

Bonjour à tous. Tout est dans le titre : j'aimerais supprimer l'ajustement automatique des extrémités des lignes pointillée. Ces ajustement font varier la longueur des segment aux extrémité des lignes pour garantir qu'elle ne tombe pas sur du vide. C'est généralement souhaitable, sauf que dans le cas d'un droite ou d'une demi-droite au lieux de négliger d'ajuster en raison de l'absence d’extrémité AutoCAD calcule l'ajustement en temps réelle en prenant comme extrémité le bord de l'écran. La moindre modification de la vue crée un effet stroboscopique (ce n'est pas exactement le bon terme mais j'ais pas mieux) vraiment très désagréable. Après je peut aussi remplacer mes demi-droites par des lignes de très grande longueur donc c'est pas important si c'est impossible, ce qui me parais le plus probable. C'est juste que ça fait pas vraiment "propre". Merci.

15mn plus tard : En faite, j'ais une bonne capacité de résilience Il est pas si mal foutu que ça, le cerveau EDIT : Pour approfondire la question : Hygiène mentale, une chêne YouTube d’intérêt publique.

Bha... J'aurais préféré servir d'exemple pour quelque-chose d'un peut plus gratifiant, mais c'est un bon argument On va dire qu'une foie ma phase de déprime passée je modifierais ce poste pour le rendre utile. Sachant que mes vacances c'est ce soir 17h, ça risque de prendre un peut de temps

Crétin de cerveau. Mais vraiment, comment ce planter en beauté de A à Z. Je sais qu'il faut faire attention aux biais cognitifs. Je le sais, c'est pourquoi j'essais toujours d'appliquer la méthode scientifique. J'essais toujours de vérifier mes hypothèse, et de revérifier après rédaction d'un article avant de le poster, et je me suis quand-même laissé entraîner dans un biais de confirmation. Pire, le fait d'effectivement vérifier mes hypothèse de cause externe m'a fait complètement négliger les causes internes en me confortant sur une mauvaise voie. Dans ce cas précis, je me suis tout simplement planté en adaptant mes blocs. Le seul truc qui est réellement un bug, c'est que le modèle 3D constructeur semble effectivement avoir des problème quant je décompose un bloc, car il disparais, mais pas les blocs que j'ais modélisé moi. Le seul truc que j'ais volontairement négligé parce que j'était à 20mn de finir ma journée et que j'était dans l'euphorie d'avoir fait une découverte importante. Si un modo pouvait avoir la bonté de supprimer ce poste ? S'il vous plais, vraiment. J'ais juste envie d'aller me rouler en boule dans un terrier et de dormir. Rêver peut-être ? C'est à cause de ce genre de truc que je suis plus compréhensif que la moyenne avec les complotistes de la terre plate, des invasions reptiliennes ou des Iluminatits-nazis-sionistes, si on excepte ceux qui diffusent sciament des fausses nouvelles. C'est très facile de tomber dedans, et ça fait très très mal à l’orgueil d'en sortir. Tchao, je vais hiberner quelques jours. Merci.