Kilian336 Posté(e) il y a 14 heures Posté(e) il y a 14 heures Bonjour à tous, J'essaie de développer de mon côté un lisp extrêmement basique comprenant uniquement des raccourcis vers des commandes déjà existantes dans mon AutoCAD 19 / Covadis. Ce lisp à pour vocation de "formater" un plan foncier, dans un plan très simplifié, à destination du cadastre pour un document d'arpentage. Ce lisp doit pouvoir : - Supprimer une liste de calques et donc tous les objets contenus, définis à l'avance (SUPCALQUE) - Mettre en forme tous les blocs points de mon dessin (tcpoint et Repere), les fusionner dans un même bloc (Repere vers tcpoint), unifier aussi tous les blocs points dans un même calque (Topojis), changer leurs orientations à 100gr, changer la couleur de l'attribut MAT en rouge, et changer la hauteur de l'attribut MAT à 1.5mm (lié à l'échelle du dessin défini par Covadis, je ne pense pas que ça fonctionne sur un AutoCAD seul) - Supprimer toutes les présentations existantes - Fusionner certains calques dans d'autres - Lancer un PURGER "tout" + un CONTROLE. Jusque la, j'arrive à faire pas mal de choses, mais je bute sur la rotation de tous les blocs points à 100gr, et pour la fusion du bloc Repere vers tcpoint. Est-ce que quelqu'un pourrait m'aider sur ce point ? Le but serait d'avoir une commande ultra simplifié, que je puisse comprendre, adapter et modifier au besoin. Vous allez voir mon niveau en lisp en regardant le bout de lisp que j'ai commencé... Je joins également un plan foncier type, et le plan que je souhaite obtenir après ce lisp. Je n'ai pas encore codé toutes les fonctions que je détaille plus haut, mais je devrais m'en sortir, pas la peine d'écrire tout le lisp en question :) Merci d'avance :) PlanCadastre.dwg PlanFoncier.dwg PLC.lsp Citer
Messages recommandés