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

- Routines LISP

# Lisps de Patrick_35

Par Patrick_35
le 8 août 2006 dans Routines LISP

Partager
Abonnés 4

- Précédent
- 1
- 2
- 3
- 4
- 5
- 6
- Suivant
- Page 1 sur 28

## Messages recommandés

### Patrick_35

Posté(e) le 8 août 2006

### Patrick_35

- Membres
- - 6,4 k

Posté(e) le 8 août 2006

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.

@+

- 1
- 5

Les Lisps de Patrick

Le but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.

Joseph Joubert, 1754-1824

- Réponses 693
- Créé 18 a
- Dernière réponse 3 a

#### Meilleurs contributeurs dans ce sujet

- 214

- 45

- 39

- 34

#### Jours populaires

- le 23 janv.

  14

- le 7 févr.

  12

- le 9 août

  12

- le 10 juil.

  11

#### Meilleurs contributeurs dans ce sujet

- Patrick_35 214 messages

- PHILPHIL 45 messages

- lili2006 39 messages

- lecrabe 34 messages

#### Jours populaires

- le 23 janv. 2007

  14 messages

- le 7 févr. 2022

  12 messages

- le 9 août 2006

  12 messages

- le 10 juil. 2008

  11 messages

#### Messages populaires

##### Patrick_35

le 8 août 2006

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

##### JUJUZAZA

le 19 août 2006

patrick 35 tu as eu 1 superbe idée de tout regrouper et encore + fort de partager tes lisp . 1 grand merci

##### Patrick_35

le 22 août 2006

Ajout de la fonction Ctr @+

#### Images postées

### x13

Posté(e) le 8 août 2006

### x13

- Membres
- - 96
- Location Montmagny, Québec

Posté(e) le 8 août 2006

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

François.

### (gile)

Posté(e) le 9 août 2006

### (gile)

- Moderateurs
- - 12,2 k

Posté(e) le 9 août 2006

Merci beaucoup,

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

Gilles Chanteau - gileCAD - GitHub
Développements sur mesure pour AutoCAD

### lecrabe

Posté(e) le 9 août 2006

### lecrabe

- Moderateurs
- - 10,7 k
- Location Loire (42) Forez

Posté(e) le 9 août 2006

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"

Autodesk Expert Elite Team

### lecrabe

Posté(e) le 9 août 2006

### lecrabe

- Moderateurs
- - 10,7 k
- Location Loire (42) Forez

Posté(e) le 9 août 2006

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é"

Autodesk Expert Elite Team

### lecrabe

Posté(e) le 9 août 2006

### lecrabe

- Moderateurs
- - 10,7 k
- Location Loire (42) Forez

Posté(e) le 9 août 2006

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"

Autodesk Expert Elite Team

### Cess

Posté(e) le 9 août 2006

### Cess

- Membres
- - 44
- Location Ile de la Réunion

Posté(e) le 9 août 2006

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

Posté(e) le 9 août 2006

### Bred

- Membres
- - 2,8 k
- Location Antibes

Posté(e) le 9 août 2006

Allez... un de plus...

merci

:D :D :D

Si vous êtes persuadés de tout savoir sur un sujet, c''est que vous en ignorez quelque chose...

### grandsteak44

Posté(e) le 9 août 2006

### grandsteak44

- Membres
- - 31

Posté(e) le 9 août 2006

Merci Patrick_35 pour ton partage.

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

### Fraid

Posté(e) le 9 août 2006

### Fraid

- Membres
- - 2,5 k
- Location_ ST Malo 35

Posté(e) le 9 août 2006

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?

https://github.com/Fraiddd

### Patrick_35

Posté(e) le 9 août 2006

### Patrick_35

- Membres
- - 6,4 k

- Auteur

Posté(e) le 9 août 2006

Merci à vous tous :cool:

> Citation
> 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é

@+

Les Lisps de Patrick

Le but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.

Joseph Joubert, 1754-1824

### Victor

Posté(e) le 9 août 2006

### Victor

- Membres
- - 83

Posté(e) le 9 août 2006

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

### Victor

Posté(e) le 9 août 2006

### Victor

- Membres
- - 83

Posté(e) le 9 août 2006

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

Posté(e) le 10 août 2006

### Oli553

- Membres
- - 1,5 k
- Location Etampes

Posté(e) le 10 août 2006

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

L'urgent est fait, l'impossible est en cours. Pour les miracles, prévoir un délai.
"Il vaut mieux mobiliser son intelligence sur des conneries, que sa connerie sur des choses intelligentes" - Devise Shadok.
"ceux qui ne se souviennent pas du passé sont condamnés à le revivre" George Santayana
Ma bibliothèque de blocs électrique :symbole elec.dwg

### Patrick_35

Posté(e) le 10 août 2006

### Patrick_35

- Membres
- - 6,4 k

- Auteur

Posté(e) le 10 août 2006

Ajout dans la liste de la fonction UNVERR

@+

Les Lisps de Patrick

Le but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.

Joseph Joubert, 1754-1824

### Steven

Posté(e) le 11 août 2006

### Steven

- Membres
- - 4,4 k
- Location Dans le TARDIS

Posté(e) le 11 août 2006

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 ;)

Steven________________________________________

Pour le taf; Windows (et ses emmerdes) sinon pas d'AutoCAD.

Pour le perso Linux Mint et pas de problèmes. Mais pas d'AutoCAD.

En rêve; AutoCAD sous Linux.

### JUJUZAZA

Posté(e) le 19 août 2006

### JUJUZAZA

- Membres
- - 258

Posté(e) le 19 août 2006

patrick 35

tu as eu 1 superbe idée de tout regrouper

et encore + fort de partager tes lisp .

1 grand merci

- 1

### Patrick_35

Posté(e) le 22 août 2006

### Patrick_35

- Membres
- - 6,4 k

- Auteur

Posté(e) le 22 août 2006

Ajout de la fonction Ctr

@+

- 1

Les Lisps de Patrick

Le but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.

Joseph Joubert, 1754-1824

### lecrabe

Posté(e) le 23 août 2006

### lecrabe

- Moderateurs
- - 10,7 k
- Location Loire (42) Forez

Posté(e) le 23 août 2006

Hello

Fabuleux Patrick_35 :) :D :cool:

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

Encore Merci, Le Decapode

- 1

Autodesk Expert Elite Team

### Patrick_35

Posté(e) le 24 août 2006

### Patrick_35

- Membres
- - 6,4 k

- Auteur

Posté(e) le 24 août 2006

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

@+

Les Lisps de Patrick

Le but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.

Joseph Joubert, 1754-1824

### Tramber

Posté(e) le 25 août 2006

### Tramber

- Moderateurs
- - 8,5 k
- Location Strasbourg

Posté(e) le 25 août 2006

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.

Bureau d'études dessin.

Spécialiste Escaliers

Développement - Formation

./__\.
(.°=°.)

- 2 semaines après...

### Patrick_35

Posté(e) le 4 septembre 2006

### Patrick_35

- Membres
- - 6,4 k

- Auteur

Posté(e) le 4 septembre 2006

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 :(

@+

Les Lisps de Patrick

Le but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.

Joseph Joubert, 1754-1824

### dilack

Posté(e) le 4 septembre 2006

### dilack

- Membres
- - 516

Posté(e) le 4 septembre 2006

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

Posté(e) le 4 septembre 2006

### dilack

- Membres
- - 516

Posté(e) le 4 septembre 2006

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

Posté(e) le 5 septembre 2006

### Patrick_35

- Membres
- - 6,4 k

- Auteur

Posté(e) le 5 septembre 2006

> Citation
> 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.

@+

Les Lisps de Patrick

Le but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.

Joseph Joubert, 1754-1824

- Précédent
- 1
- 2
- 3
- 4
- 5
- 6
- Suivant
- Page 1 sur 28

## Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

## Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

## Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
Partager
Abonnés 4
Aller sur la liste des sujets

## 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é