Aller au contenu

lecrabe

Moderateurs
  • Compteur de contenus

    10 665
  • Inscription

  • Dernière visite

  • Jours gagnés

    101

Tout ce qui a été posté par lecrabe

  1. Hello Les Jeunes Padawans Dans un genre un peu different, je vous redonne une Superbe Routine Lisp de notre regrette Patrick_35 ! Patrick l'avait developpe suite a ma demande ... Cette Routine TRI "eclate / separe" TOUTES les entites du DWG sur N calques par le Type d'Entite ! C Tip-Top pour avoir UN SEUL Type d'Entite PAR CALQUE !! Pas besoin d'une Requete sur le Groupe de Dessins avec MAP (ou CIVIL) ! La Routine TRI fonctionne sur AutoCAD, ACAD Archi, etc ... Au fait SVP ce QUOI serait la Micro-Modif Ultra-Simple pour pouvoir selectionner QUE une partie du DWG afin que la routine ne traite pas TOUT le DWG !? ... (if (ssget "x") ... Merci d'avance, LA SANTE, Bonne Annee, Bye, lecrabe "triste" Que la Force soit avec Vous et Vos Proches ! ;; ;; Tri des entites par calque et transfert dans des sous-calques ;; ;; Si Calque nomme A alors --> A__TEXT, A__2LINE, A__HATCH, A__POLYLINE, etc ;; ;; Par Patrick_35 le 23/03/2009 pour Patrice B. ;; ;; Nouvelle version 1.1 qui separe XREF & BLOC et fonctionne sur AutoCAD >= 2000 ;; (defun c:TRI (/ doc ent lay lck nom ori pro sel tot txt) (vl-load-com) (setq doc (vla-get-activedocument (vlax-get-acad-object))) (vla-startundomark doc) (if (ssget "x") (progn (vlax-for ent (setq sel (vla-get-activeselectionset doc)) (cond ((and (eq (vla-get-objectname ent) "AcDbBlockReference") (vlax-property-available-p ent 'path) ) (setq nom "Xref") ) (T (setq txt (substr (vla-get-objectname ent) 5) tot 2 ) (while (and (> (vl-string-elt txt tot) 90) (< tot (1- (strlen txt))) ) (setq tot (1+ tot)) ) (and (eq (1- (strlen txt)) tot) (setq tot (1+ tot)) ) (setq nom (substr txt 1 tot)) ) ) (setq ori (vla-item (vla-get-layers doc) (vla-get-layer ent)) lck (vla-get-lock ori) ) ;; (or (wcmatch (vla-get-layer ent) (strcat "* - " nom)) ;; (and (vl-catch-all-error-p (setq lay (vl-catch-all-apply 'vla-item (list ;; (vla-get-layers doc) (setq txt (strcat (vla-get-layer ent) " - " nom)))))) (or (wcmatch (vla-get-layer ent) (strcat "*__" nom)) (and (vl-catch-all-error-p (setq lay (vl-catch-all-apply 'vla-item (list (vla-get-layers doc) (setq txt (strcat (vla-get-layer ent) "__" nom)))))) (setq lay (vla-add (vla-get-layers doc) txt)) (foreach pro '('color 'freeze 'layeron 'linetype 'lineweight 'material 'plottable 'viewportdefault) (and (vlax-property-available-p lay (eval pro)) (vlax-put lay (eval pro) (vlax-get ori (eval pro))) ) ) ) (vla-put-lock lay :vlax-false) (vla-put-lock ori :vlax-false) (vla-put-layer ent txt) (vla-put-lock lay lck) (vla-put-lock ori lck) ) ) (princ (strcat "\nTravail sur " (itoa (vla-get-count sel)) " objet(s). ")) (vla-delete sel) ) (princ "\nDessin vide! ") ) (vla-endundomark doc) (princ) )
  2. lecrabe

    BIM 360

    Hello Parfait tu as la bonne version 2019.x (ou 2020) pour enregistrer dans le Cloud Autodesk BIM360 ... LA SANTE, Bonne Annee, lecrabe "triste" Que la Force soit avec Toi et Tes Proches !
  3. lecrabe

    BIM 360

    Hello Juste une petite verification ! SVP tu as quelle version de REVIT exactement ? Le APROPOS / ABOUT donne quoi ?? LA SANTE, Bonne Annee, lecrabe "triste" Que la Force soit avec Toi et Tes Proches !
  4. Hello Je viens de m'apercevoir que vous parlez de GEF en version 3.11 dans vos Liens Web !! Normalement GEF est en version 3.22 !! SVP et si vous utilisiez les bonnes versions des fabuleuses routines de notre regrette Patrick_35, franchement ca serait tellement mieux !!!! LA TOTALE est presente ici : https://forums.autodesk.com/t5/autocad-tous-produits-francais/lisp-les-lisp-de-patrick-35/td-p/8884693 Qu'on se le dise ! LA SANTE, Bonne Annee, lecrabe "triste" Que la Force soit avec Vous et vos Proches !
  5. Hello Quand tu rentres pour la 1 ere fois dans une Presentation / Layout, c la vitesse de ton processeur (et son Mode Turbo) qui est l Element VITAL ! Après la Presentation / Layout est stockee en Mémoire RAM et ca peut etre GROS !! J ai des DWGs qui necessitent plus de 1 Go par Presentation / Layout ... ATTENTION: SVP surveiller l occupation Memoire RAM de la tache AutoCAD.exe !! Donc AutoCAD pourra revenir VITE dans ta Presentation / Layout depuis une autre... J ai des DWGs qui necessitent plusieurs minutes pour "attaquer" la 1 ere fois une Presentation / Layout ... Si manque de Memoire RAM alors SVP travailler avec LAYOUTREGENCTL = 1 (et non pas 2) Ainsi AutoCAD.exe ne garde en Memoire RAM que l Onglet objet ET la Presentation COURANTE ! LA SANTE, Bonne Annee, lecrabe "triste" Que la Force soit avec Vous et vos Proches !
  6. lecrabe

    Hachures sans grip

    Hello Desole mais je pense comme Christian ! Ne pas avoir le Menu Contextuel sur le Bouton droit, fait "manquer" des fonctionnalités et surtout accessibles rapidement... Je travaille 2/3 du temps en Classic et 1/3 en Ruban ... En 2020, j ai 36 ans d experience AutoCAD ! LA SANTE, Bonne Annee, Bye, lecrabe "triste" Que la Force soit avec Tous !
  7. lecrabe

    grand ménage

    Hello As tu utilise le UnInstall Autodesk dans le groupe de programme Autodesk ?? LA SANTE, Bye, lecrabe "triste" Que la Force soit avec Vous ! Bonne Annee !!
  8. Hello Ou les MPolygons de MAP/CIVIL !? LA SANTE, Bye, lecrabe "triste" Que La Force soit avec Vous !
  9. Hello Willy95 Merci pour tes explications beaucoup "plus limpides" ! Et BRAVO pour ta routine ... LA SANTE, Joyeuses Fetes, Bye, lecrabe "triste" Que la Force soit avec Vous !
  10. Hello Didier +1 avec Toi ! C facile de dire que mes demandes (CDC/CCTP) de routines Lisp sont claires et explicites ! Car durant 20 ans (1980-2000), j ai développé en assembleur, fortran, cobol, gap/rpg, pascal, c, basic, lisp, etc ... C pourquoi "Je sais" !! Un NON Programmeur / Developpeur a beaucoup de mal à expliciter ! LA SANTE, Joyeuses Fetes, Bye, lecrabe "triste" (Que la Force soit avec Vous !)
  11. Hello Donc tu nous offres l Apero ! LA SANTE, Bye, lecrabe "triste" (Que la Force soit avec Vous !)
  12. Hello SVP toujours UCSDETECT = 0 N'as tu pas des dizaines de Types de ligne "curieux" dans le DWG Principal ou XREFs ?! Et/ou des Entités PROXYs ?! LA SANTE, Bye, lecrabe, "triste" (que la Force soit avec Vous !)
  13. Hello Je l ai vu et franchement il est assez bien ! Mais il faut ignorer ses incohérences ! Et se laisser porter ... Le SW 7 était "moyen", le SW 8 "Bof" ! Et donc le 9 fait un peu retour aux sources Jedi / Sabre Laser ... Visuellement (les Decors) sont Super ! Merci J J Abrams ... LA SANTE, Bye, lecrabe "triste" (Que la Force soit avec Vous !) PS1: La Saga Skywalker, Palpatine, Jedi, Sith, me semble BOUCLEE mais tout est possible !? PS2: les SW 1-6 avaient une certaine cohérence ! Ce qui n est pas du tout le cas pour les SW 7-8-9 !! DISNEY a "casse" l univers Lucas !! PS3: pour moi le Must est toujours "L Empire contre-attaque" PS4: et le SW 3.5 "Rogue One" est Bien ! Et particulièrement sombre ...
  14. Hello Bruno BRAVO et MERCI ! LA SANTE, Bye, lecrabe "triste" (Que la Force soit avec Vous !)
  15. Hello SNAPMODE = 0 / 1 = F9 LA SANTE, Joyeuses Fetes, Bye, lecrabe "triste"
  16. Hello YES ! UCSDETECT = 0 ET aucun problème de SNAPMODE & SNAPGRIDLEGACY & TEMPOVERRIDES ?! LA SANTE, Joyeuses Fetes, Bye, lecrabe "triste"
  17. Hello A priori, en effet il semblerait que ce "dernier" Episode soit "relativement satisfaisant" !? Que la Force soit avec vous !! LA SANTE, Bye, lecrabe "triste" PS1: j'ai honte mais par moment je suis "un peu Dark Side" ! PS2: et mon Episode prefere est "bien sur" ... L'Empire contre-attaque" !! Et VIVE AutoCAD 2021 ... PS3: pour ceux qui ont vu ce "dernier" Episode IX, vos remarques / critiques sont les bienvenues ... SVP sans devoiler le Film ...
  18. Hello La Saga StarWars a berce ma jeunesse et je suis "un peu fou" de cet univers ! SNIFF, SNIFF, c la fin des 3 Trilogies ! Que la Force soit avec vous !! La Sante, Bye, lecrabe "triste" PS1: j'ai honte mais par moment je suis "un peu Dark Side" ! PS2: et mon Episode prefere est "bien sur" ... L'Empire contre-attaque" !! Et VIVE AutoCAD 2021 ... PS3: pour ceux qui ont vu ce "dernier" Episode IX, vos remarques / critiques sont les bienvenues ... SVP sans devoiler le Film ...
  19. Hello 1) Quand j'ai lu CE sujet, j'ai vu cela ... Donc j'en ai deduis (A tort semble t-il) qu'il s'agissait de probleme de Cotes INCLUSES dans un Bloc ! 2) Pourquoi lecrabe est "triste" ! Car Patrick_35 nous a quitte au Printemps ! ... Et en plus il avait environ 10 ans de moins de moi ... https://forums.autodesk.com/t5/autocad-tous-produits-francais/lisp-les-lisp-de-patrick-35/td-p/8884693 LA SANTE, Bye, lecrabe "triste"
  20. Hello As tu bien un AutoCAD 2020.1.2 ?? Bye, lecrabe "triste"
  21. Hello Je vais eventuellmenet paraitre "vieux jeu" !? mais je ne dessine jamais des cotes DANS un Bloc/Symbole Ou alors c explose / decompose ... LA SANTE, Bye, lecrabe "triste"
  22. lecrabe

    Z=0

    Hello La manipulation classique ci-apres ne resoud pas TOUT ! LA SANTE, Bye, lecrabe "triste" ^C^C_move;_all;;0,0,0;0,0,1e99;_move;_p;;0,0,0;0,0,-1e99; DEPLACER selectionner TOUT 0,0,0 0,0,1e99 DEPLACER selectionner TOUT 0,0,0 0,0,-1e99
  23. Hello Vil Choucroute EastMan SUPER ton histoire de Photocopieur ! DONC j'ai enfin compris un truc delirant de Couleur que m'avait raconte un client sous AutoCAD 201X et son photocopieur / scanner A3/A4 Couleur ... Certaines Couleurs sortaient ANORMALES sous AutoCAD 201X, sauf au debut ou tout allait bien ! Lors d'une visite du technicien, le BE a exige le Reset General du Photocopieur et alors LA MIRACLE, les couleurs AutoCAD sont redevenus OK !! MERCI le Dieu du Photocopieur, Bye, lecrabe "triste"
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité