Lisps de Patrick_35

[Patrick_35]

Bonjour à vous tous

 

Cela fait un moment que je fais des lisp et que je les publie sur ce forum

 

On en trouve un peu partout et j'ai donc décidé de les regrouper dans ce post

 

 

Les Lisps de Patrick

 

AST

Afficher le dessin selon le style de tracé.

CAT

Recopier les valeurs d’attributs d’un bloc vers un/des autres bloc(s), même si on n’a pas le même nombre d’attributs entre les blocs.

CHAT

Créer un champ dynamique à un attribut pour lui indiquer la hauteur Z de l’objet.

COUP

Couper des intersections de lignes par une distance donnée.

CPL

Importer des calques depuis un dessin Autocad pas forcement ouvert.

CPS

Importer des styles de côtes depuis un dessin Autocad pas forcement ouvert.

CPSCU

Importer des scu depuis un dessin Autocad pas forcement ouvert.

DEF

Définir comme paramètres par défaut selon les caractéristiques d’un objet sélectionné (calque, couleur, épaisseur, etc…)

DUC

Mettre tous objets de tous les dessins d’un répertoire complet en couleur ducalque.

EPO

Geler des calques apparents dans les fenêtres de présentations et plus en espace objet.

EXL v1.11

Exporter les présentations d’un dessin.

L’idée est de créer un nouveau dwg par onglet mais en ne conservant que ce qui est affiché dans la présentation.

Le dessin exporté se nomme en reprenant le nom du dessin actuel et en y ajoutant le nom de l’onglet.

Fonctionne avec une seule fenêtre par présentations

EXL V3.02

Exporter les présentations d’un dessin.

L’idée est de créer un nouveau dwg par onglet mais en ne conservant que ce qui est affiché dans la présentation.

Le dessin exporté se nomme en reprenant le nom du dessin actuel et en y ajoutant le nom de l’onglet.

Fonctionne avec plusieurs fenêtres par présentations.

Nécessite d’utiliser GEXL (fournit avec EXL) pour geler les calques dans les fenêtres des présentations exportées.

EXP

Décomposer complètement une sélection, même les objets imbriqués.

FOG

Changer facilement et rapidement de présentation.

Quand on a plusieurs présentations, rien de plus fastidieux que de faire un clic sur le bouton de défilement et plusieurs fois de suite tout en faisant une petite pause afin que l’onglet suivant s’affiche.

On choisit directement sa présentation.

GEF

Gérer les différents calques dans les différentes fenêtres des présentations.

Par exemple, si on a ajouté un calque dans notre dessin et que l’on ne souhaite pas le voir apparaître dans plusieurs présentations sur plusieurs fenêtres, GEF le gèle facilement.

GRF

Importer plusieurs folios (fichiers) depuis un répertoire dans un dessin unique. Ces folios seront insérés dans les présentations.

IAT

Incrémenter des attributs.

Permet d’avoir une chaine de caractères avec une numérotation qui se suit.

Par exemple : B008-006, B008-007,B008-008

Par exemple : 001AA, 001AB, 001AC

INC

Incrémenter des textes. Un tri est possible avec les coordonnées des textes afin d’obtenir une suite logique.

IND

Incrémenter les indices des cartouches.

INSEDIT

InsEdit (gile)

Redéfinir le point d'insertion des blocs.

IXL

Insérer des blocs dans Autocad depuis une feuille Excel.

JAV

Nettoyer un dessin en profondeur, des objets difficilement effaçables autrement qu’en programmation.

JSD

Créer un jeu de sélection de ce qui a été dupliqué.

LATT simplifié

Lier des attributs de manière croissante. Les attributs de mettent à jour de manière dynamiques. Par exemple, si on efface un attribut lié, alors les autres se renumérotent afin que la suite logique reste la même.

LATT

Lier des attributs de manière Identique, Croissante ou encore de faire une Somme. Les attributs de mettent à jour de manière dynamiques. Par exemple, si on efface un attribut lié, alors les autres se renumérotent afin que la suite logique reste la même.

LSTATT

Décompte des blocs, mêmes les dynamiques avec la possibilité de distinguer les blocs avec attributs (sur autant d’attributs possible).

Possibilité aussi d’exporter les résultats dans un fichier texte.

Ce fichier, s’il est renommé en .xls sera ouvert sans problème avec Excel.

LXL

Lier des Attributs, Textes, Mtexts ou des Rtexts avec Excel.

Le principe est de lier à une cellule Excel une valeur.

Les données peuvent être transmises depuis Autocad vers Excel, ou dans le sens inverse.

On peut travailler avec plusieurs fichiers, feuilles Excel dans plusieurs dessins Autocad

Le lisp inclus :

EXPLXL : Exporter des données de LXL dans un fichier texte afin de conserver une sauvegarde de ses données créé avec LXL.

IMPLXL : Récupérer la sauvegarde préalable de Explxl pour remettre à jour ses données.

XL->ATT: Mise à jour pour les scripts, d'Excel vers Autocad

ATT->XL: Mise à jour pour les scripts, d'Autocad vers Excel.

MAT

Propager la valeur d'un attribut.

MES

Mesurer en continu et avec cumul des distances directement dans le dessin.

MIM

En cas de changement d’imprimante réseau ou tout simplement parce que le service informatique à redéfinit ses serveurs, MIM permet de réaffecter une nouvelle imprimante pour toutes les présentations choisies tout en conservant les paramètres d’impression.

MPL

On configure correctement la mise en page d’une présentation. MPL permet la recopie de cette mise en page sur les présentations choisies.

ONG

Gérer ses présentations. Reprends tous ce qui est sous le clic droit mais d’une manière plus ergonomique.

OOG

Réorganiser les onglets d'une manière simple.

OU

Localiser facilement des blocs. Quand on a un grand dessin et qu'on arrive pas à localiser ses blocs, OU dessine un trait de 0,0 au point d'insertion du bloc, ce qui permet d'enfin le localiser.

OUA

La même chose que le lisp Ou, sauf qu'on peut différencier les blocs avec une valeur d'attribut.

PAT

Changer la valeur d'un attribut dans plusieurs fichiers. Même principe de fonctionnement que MAT.

RA

Faire un raccord sans joindre.

RB

Refait tous les blocs de la couleur dubloc et sur le calque 0. (gile) à fait un super lisp avec edit_bloc, mais ayant déjà celui-là et qu'il ne pose pas de question...

RBLOC

Remplacer un/des bloc(s) par un autre en conservant ou pas ses attributs, son échelle, ses propriétés dynamiques.

RECD

Rechercher des blocs superposés.

RET

Renommer des étiquettes des blocs.

RINS

Redéfinir le point d'insertion d'un bloc simplement.

RON

Renuméroter les onglets de 01 à ..

ROT_0

Laisser l'angle constamment à 0 de tous les attributs.

ROT

Laisser l'angle de rotation constamment à 0 de certains attributs définit dans ces deux variables (setq Nom_bloc "UN_BLOC" Eti_Bloc '("ETI1" "ETI2" "ETI3")).

RXR

Remplacer un xref en déchargeant l'ancien et en conservant les calques qui étaient gelés auparavant.

RXREF

Donner un chemin relatif aux xrefs par rapport au dessin courant (s'ils sont sur le même lecteur).

SCRIPTOR

Lisp qui créé et lance un script ou un lisp (depuis un lisp/script source) pour traiter tous les fichiers d'un répertoire et de ses sous-répertoires.

STRIPMTEXT

Lisp de Steve Doman et Joe Burke.

Permet d'enlever au choix, les formats d'un texte.

SYN

Synchroniser les attributs tout en conservant (ou pas), la valeur, position, angle et style de texte.

TOT

Affiche le résultat du cumul de différentes longueurs (lignes, polylignes, arc, etc…)

UNVERR

Déverrouiller toutes les fenêtres des présentations.

VERR

Verrouiller toutes les fenêtres de toutes les présentations.

 

Vous trouverez ci-après d'autres lisps des plus intéressants.

 

Les Lisps de Bonuscad

 

Les Lisps de (gile) sur Cadxp ou sur sa page perso

 

Vous trouverez d'autres lisps dans ce blog.

 

 

@+

[x13]

Un gros Merçi de partager ton travail et tes connaissances, cela est grandement apprécié.

 

François.

[(gile)]

Merci beaucoup,

 

Y'a du boulot pour éplucher tout ça :exclam:

[lecrabe]

 

Bon Matin

 

Qq mots : Merci, Tip-top, Excellent, Beau Boulot, etc :) :D :cool:

 

Le Decapode "faisant son marché mais mon caddie est déjà bien rempli"

 

[lecrabe]

 

Re Bon Matin

 

J'avais seulement environ 1/3 de tes routines Patrick_35

 

Encore BRAVO BRAVO ! :D

 

Par contre, j'ai pas trouvé la routine qui fait le CAFE !!! :o :(

 

Le Decapode "matinal au café"

 

[lecrabe]

 

Hello

 

Pour les développeurs du genre (Patrick_35, Gilles, etc), vous avez des trucs

intéressants ici (A mon avis):

 

http://www.4d-technologies.com/techcenter/

 

C'est du Free Stuff :)

 

Le Decapode "farfouillant"

 

[Cess]

sALUT pATRICK

Je tiens à mon tour à te remercier de nous faire profiter de tout ça.

Pour ma part, j'ai récupérer rea qui maintenant fonctionne nickel et qui va me faire gagner un temps fou .

Merçi encore

 

 

[Bred]

Allez... un de plus...

merci

 

:D :D :D

 

 

[grandsteak44]

Merci Patrick_35 pour ton partage.

J'etudierai ca de plus pres a mon retour de vacances...

[Fraid]

Bonne idée Patrick

 

dailleurs j'en utlise pas mal, y en a meme que je peux plus m'en passer comme RA

 

sinon, il y verr qui ne marche que dans la presentation active c'est normal?

[Patrick_35]

Merci à vous tous :cool:

 

sinon, il y verr qui ne marche que dans la presentation active c'est normal?

Non et je viens de m'apercevoir que j'ai mis une ancienne version. C'est corrigé

 

@+

[Victor]

Joli travail Patrick, on reconnait la un homme avec une longue expérience d'AutoCAD.

[Victor]

Joli travail Patrick, on reconnait la un homme avec une longue expérience d'AutoCAD.

 

EDIT: Oups , double post mais le travail de Patrick merite ca : :D

 

[Edité le 9/8/2006 par Victor]

[Oli553]

Et pour Patrick_35, hip hip hip...

Bon c'est pas tous mais merci beaucoup.

MIM va me faire gagné un temps fou fou fou :D

[Patrick_35]

Ajout dans la liste de la fonction UNVERR

 

@+

[Steven]

Je ne dirais qu'une chose. Merci beaucoup :D

 

En parcourant la liste, j'ai pu trouver certains lips qui pourrait justement me servir dans mon taf.

 

Encore Bravo ;)

[JUJUZAZA]

patrick 35

 

tu as eu 1 superbe idée de tout regrouper

et encore + fort de partager tes lisp .

 

1 grand merci

[Patrick_35]

Ajout de la fonction Ctr

 

@+

[lecrabe]

 

Hello

 

Fabuleux Patrick_35 :) :D :cool:

 

Mon chariot va être bientôt plein et donc j'envisage maintenant la BENNE ! ;)

 

Encore Merci, Le Decapode

 

[Patrick_35]

Merci lecrabe c'est gentil :)

Bon, je viens de faire évoluer Ctr en V1.01 afin qu'un copier avec point de base soit lui aussi ignoré et une meilleur gestion des réacteurs, notamment si la variable SDI n'est pas à zéro et qu'on ouvre un autre dessin

 

@+

[Tramber]

J'ai des problèmes ("index non valide") avec la routine EXP.

 

Y-a-t-il un autre lieu pour en discuter ? En attendna tque je regarde par moi-même + en avant.

[Patrick_35]

Correction d'un bug sur la vérification de la base de données de LATT qui passe donc en version 6.31

 

Tramber, je t'ai envoyé un MP à propos de ta question et pas de réponse depuis une semaine :(

 

@+

[dilack]

SALUT

petite question est-il possible d'additionner une constante à un attribut.

comme par exemple faire un delta z sur des points topo.

Je pense Ho! grand maitre patrick la réponse est oui

[dilack]

suite au message.

je suis admiratif devant tant de travail, chapeau bas.

moi qui commence seulement à me mettre aux codes, j'ai un long, long, long chemin à parcourir encore.

[Patrick_35]

est-il possible d'additionner une constante à un attribut.

Salut, je pense que oui mais je n'ai jamais testé.

Je trouve que ça perd un peu de son intérêt car si tu changes la valeur d’un attribut dans la chaîne de type Somme, le total est réactif. De plus, si des points topo devaient changer pour une raison ou une autre, tu risques du coup d’être embêté avec des attributs constants.

 

@+