Aller au contenu
Problème de lien d'inscription (résolu ?) ×

Routines LISP

Postez ici vos routines LISP. Une routine est du code court destiné à être réutilisé. Par exemple, un programme mettant à jour la valeur d'un attribut de bloc est une routine. Ne postez pas d'applications ici!

1 370 sujets dans ce forum

  1. Erreur au lancement d\'un LISP

    Par tilte,
    • 0 réponse
    • 1,7 k vues

  2. Cotation ts les 20m

    Par chris_mtp,
    • 0 réponse
    • 1,8 k vues

  3. Fond GRC en 2 D

    Par usegomme,
    • 0 réponse
    • 1,4 k vues

  4. Fond Elliptique en 2D

    Par usegomme,
    • 0 réponse
    • 1,5 k vues

  5. Ouvrir une polyligne sur le segment sélectionné

    Par (gile),
    • 0 réponse
    • 1,8 k vues

  6. Analyse \"pointue\" sur 2 Polylignes 2D

    Par lecrabe,
    • 0 réponse
    • 1,1 k vues

  7. Bandes d\'un levé topo

    Par chris_mtp,
    • 0 réponse
    • 1,7 k vues

  8. permutter des textes avec textes repere

    Par zin29,
    • 0 réponse
    • 1,6 k vues

  9. Incsuff+

    Par (gile),
    • 0 réponse
    • 1 k vues

  10. LATT question

    Par shergy,
    • 0 réponse
    • 1,3 k vues

  11. Evolution DS2

    Par Magdi95,
    • 0 réponse
    • 1,8 k vues

  12. Renommer bloc par un nom d\'attribut

    Par arroo,
    • 0 réponse
    • 1,9 k vues

  13. calcul de pente à partir de points altimétriques

    Par kclement,
    • 0 réponse
    • 1,8 k vues

  14. Bibliothèque Xdata

    Par zebulon_,
    • 0 réponse
    • 1,8 k vues

  15. Lisp pour raccord automatique

    Par caojesig,
    • 0 réponse
    • 1,8 k vues

  16. Travail sur MNT

    Par RhymOne,
    • 0 réponse
    • 2 k vues

  17. Travail sur MNT

    Par RhymOne,
    • 0 réponse
    • 1,3 k vues

  18. Travail sur MNT

    Par RhymOne,
    • 0 réponse
    • 1,5 k vues

  19. Décalage 2 distances

    Par leocad,
    • 0 réponse
    • 1,4 k vues

  20. renommer et incrémentation les tables

    Par jacobs33,
    • 0 réponse
    • 1,6 k vues

  21. Request rewritten program room size

    Par sachindkini,
    • 0 réponse
    • 1,4 k vues

  22. gestion d\'attributs

    Par Guigues,
    • 0 réponse
    • 1,7 k vues

  23. gestion d\'attributs

    Par Guigues,
    • 0 réponse
    • 1,3 k vues

  24. XREF-miroir text ?

    Par marief,
    • 0 réponse
    • 1,5 k vues

  25. Etat de claque des fenêtres du dessin

    Par RhymOne,
    • 0 réponse
    • 1,5 k vues


  • Statistiques des forums

    • Total des sujets
      49,5 k
    • Total des messages
      300,2 k

  • Sujets

  • Messages

    • Invité mostbet_efOn
      Probl qualite d impression en PDF

      Par Invité mostbet_efOn · Posté(e)

      mostbet app login [url=mostbet11004.ru]mostbet11004.ru[/url]
    • Didj05
      Affichage image arrière plan

      Par Didj05 · Posté(e)

      Euh... désolé mais je viens de me rendre compte que j'avais déjà ouvert un post sur ce sujet....
    • Didj05
      Affichage image arrière plan

      Par Didj05 · Posté(e)

      Carrément pénible !!! C'est systématique quand tu veux éditer tes mises en plan. 1 coup tu as tes courbes de niveau qui se retrouvent derrière, ou tes projets, ou... Alors tu retournes dan ton espace objet et tu refais pour la Xème fois la manip ! Et 2 minutes après rebelote ... En SIG c'est vrai qu'il n'y a pas ce problème mais ce n'est pas le même usage non plus 😉
    • fabcad
      Affichage image arrière plan

      Par fabcad · Posté(e)

      Bonjour, Il est vrai que c’est frustrant ce problème d'arrière-plan qui se modifie souvent. Quand tu passes d'AutoCAD à un vrai logiciel de cartographie (Qgis) où l'ordre d'affichage est toujours respecté, c'est compliqué de revenir sur un logiciel de DAO. Fabcad Le Rennais Métropolitain
    • Didj05
      3DSolid - Soustraction impossible.....

      Par Didj05 · Posté(e)

      Moi j'utilise ce lisp dans certaines conditions et ça marche pas mal. Je ne sais plus où je l'ai récupéré 😉 ;; SOUSTRAC (gile) ;; Effectue une soustraction de régions ou solides 3d sans faire d'union ;; Propose de supprimer ou de conserver les objets soustraits (defun c:soustrac (/ *error* ss1 ss2 n lst)   (vl-load-com)   (or *acdoc*       (setq *acdoc* (vla-get-activeDocument (vlax-get-acad-object)))   )   (defun *error* (msg)     (and       msg       (/= msg "Fonction annulée")       (princ (strcat "\nErreur: " msg))     )     (vla-EndUndoMark *acdoc*)     (princ)   )   (princ     "\nSélectionnez les solides et les régions à enlever de .."   )   (if     (setq ss1 (ssget '((0 . "REGION,3DSOLID"))))      (if (and        (princ          "\nSélectionnez les solides et les régions à soustraire .."        )        (setq ss2 (ssget '((0 . "REGION,3DSOLID"))))      )        (progn      (vla-StartUndoMark *acdoc*)      (repeat (setq n (sslength ss2))        (setq          lst           (cons         (vlax-ename->vla-object (ssname ss2 (setq n (1- n))))         lst           )        )      )      (repeat (setq n (sslength ss1))        (setq          obj (vlax-ename->vla-object (ssname ss1 (setq n (1- n))))        )        (foreach o lst          (and (= (vla-get-ObjectName obj) (vla-get-ObjectName o))           (vla-Boolean obj acSubtraction (vla-copy o))          )        )      )      (initget "Oui Non")      (if (= "Oui" (getkword "\nSupprimer les objets soustraits [Oui/Non] <N>: "))           (mapcar 'vla-delete lst)      )      (*error* nil)        )      )   ) )

  • Sujets

×
×
  • 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é