CADxp: Lisps de Patrick_35 - CADxp

Aller au contenu

  • 34 Pages +
  • 1
  • 2
  • 3
  • Dernière »
  • Vous ne pouvez pas commencer un sujet
  • Vous ne pouvez pas répondre à ce sujet

Lisps de Patrick_35

#1 L'utilisateur est hors-ligne   Patrick_35 

  • ceinture rouge et blanche 8em dan
  • Groupe : Membres
  • Messages : 6381
  • Inscrit(e) : 06-janvier 03

Posté 08 août 2006 - 22:13

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.


@+
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
4

#2 L'utilisateur est hors-ligne   x13 

  • ceinture verte
  • Groupe : Membres
  • Messages : 95
  • Inscrit(e) : 02-septembre 03
  • LocationMontmagny, Québec

Posté 08 août 2006 - 23:40

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

François.
0

#3 L'utilisateur est hors-ligne   (gile) 

  • ceinture rouge et blanche 8em dan
  • Groupe : Moderateurs
  • Messages : 11275
  • Inscrit(e) : 02-septembre 05

Posté 09 août 2006 - 06:18

Merci beaucoup,

Y'a du boulot pour éplucher tout ça :exclam:
Gilles Chanteau - gileCAD -
Développements sur mesure pour AutoCAD
Image IPB
0

#4 L'utilisateur est hors-ligne   lecrabe 

  • ceinture rouge et blanche 8em dan
  • Groupe : Moderateurs
  • Messages : 8602
  • Inscrit(e) : 10-décembre 03
  • LocationLoire (42)

Posté 09 août 2006 - 06:38


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"

0

#5 L'utilisateur est hors-ligne   lecrabe 

  • ceinture rouge et blanche 8em dan
  • Groupe : Moderateurs
  • Messages : 8602
  • Inscrit(e) : 10-décembre 03
  • LocationLoire (42)

Posté 09 août 2006 - 06:44


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

0

#6 L'utilisateur est hors-ligne   lecrabe 

  • ceinture rouge et blanche 8em dan
  • Groupe : Moderateurs
  • Messages : 8602
  • Inscrit(e) : 10-décembre 03
  • LocationLoire (42)

Posté 09 août 2006 - 07:47


Hello

Pour les développeurs du genre (Patrick_35, Gilles, etc), vous avez des trucs
intéressants ici (A mon avis):

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

C'est du Free Stuff :)

Le Decapode "farfouillant"

0

#7 L'utilisateur est hors-ligne   Cess 

  • Advanced Member
  • PipPipPip
  • Groupe : Membres
  • Messages : 45
  • Inscrit(e) : 14-septembre 04
  • LocationIle de la Réunion

Posté 09 août 2006 - 14:26

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


0

#8 L'utilisateur est hors-ligne   Bred 

  • ceinture noire 5em dan
  • Groupe : Membres
  • Messages : 2721
  • Inscrit(e) : 07-mars 06
  • LocationAntibes

Posté 09 août 2006 - 15:37

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

#9 L'utilisateur est hors-ligne   grandsteak44 

  • Advanced Member
  • PipPipPip
  • Groupe : Membres
  • Messages : 31
  • Inscrit(e) : 14-novembre 05

Posté 09 août 2006 - 16:18

Merci Patrick_35 pour ton partage.
J'etudierai ca de plus pres a mon retour de vacances...
0

#10 L'utilisateur est hors-ligne   Fraid 

  • ceinture noire 3em dan
  • Groupe : Membres
  • Messages : 1915
  • Inscrit(e) : 08-août 05
  • LocationST Malo 35

Posté 09 août 2006 - 17:26

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?
...plus je sais où je suis, moins je sais où je vais....
Extrait d'une double interview simultanée d'une particule élémentaire.
0

#11 L'utilisateur est hors-ligne   Patrick_35 

  • ceinture rouge et blanche 8em dan
  • Groupe : Membres
  • Messages : 6381
  • Inscrit(e) : 06-janvier 03

Posté 09 août 2006 - 20:24

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
0

#12 L'utilisateur est hors-ligne   Victor 

  • ceinture verte
  • Groupe : Membres
  • Messages : 82
  • Inscrit(e) : 16-octobre 03

Posté 09 août 2006 - 21:10

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

#13 L'utilisateur est hors-ligne   Victor 

  • ceinture verte
  • Groupe : Membres
  • Messages : 82
  • Inscrit(e) : 16-octobre 03

Posté 09 août 2006 - 21:17

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]
0

#14 L'utilisateur est hors-ligne   Oli553 

  • ceinture noire 2em dan
  • Groupe : Membres
  • Messages : 1479
  • Inscrit(e) : 23-juillet 03
  • LocationEtampes

Posté 10 août 2006 - 07:11

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.zip
0

#15 L'utilisateur est hors-ligne   Patrick_35 

  • ceinture rouge et blanche 8em dan
  • Groupe : Membres
  • Messages : 6381
  • Inscrit(e) : 06-janvier 03

Posté 10 août 2006 - 08:15

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
0

#16 L'utilisateur est hors-ligne   Steven 

  • ceinture rouge et blanche 7em dan
  • Groupe : Membres
  • Messages : 3648
  • Inscrit(e) : 03-mars 03
  • LocationDans le TARDIS

Posté 11 août 2006 - 22:05

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 la maison; Linux Mint et pas de problèmes. Mais pas d'AutoCAD.
En rêve; AutoCAD sous Linux.
0

#17 L'utilisateur est hors-ligne   JUJUZAZA 

  • ceinture marron
  • Groupe : Membres
  • Messages : 266
  • Inscrit(e) : 07-décembre 04

Posté 19 août 2006 - 13:54

patrick 35

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

1 grand merci
0

#18 L'utilisateur est hors-ligne   Patrick_35 

  • ceinture rouge et blanche 8em dan
  • Groupe : Membres
  • Messages : 6381
  • Inscrit(e) : 06-janvier 03

Posté 22 août 2006 - 23:30

Ajout de la fonction Ctr

@+
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
0

#19 L'utilisateur est hors-ligne   lecrabe 

  • ceinture rouge et blanche 8em dan
  • Groupe : Moderateurs
  • Messages : 8602
  • Inscrit(e) : 10-décembre 03
  • LocationLoire (42)

Posté 23 août 2006 - 13:08


Hello

Fabuleux Patrick_35 :) :D :cool:

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

Encore Merci, Le Decapode

0

#20 L'utilisateur est hors-ligne   Patrick_35 

  • ceinture rouge et blanche 8em dan
  • Groupe : Membres
  • Messages : 6381
  • Inscrit(e) : 06-janvier 03

Posté 24 août 2006 - 20:43

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
0

Partager ce sujet :


  • 34 Pages +
  • 1
  • 2
  • 3
  • Dernière »
  • Vous ne pouvez pas commencer un sujet
  • Vous ne pouvez pas répondre à ce sujet

1 utilisateur(s) en train de lire ce sujet
0 membre(s), 1 invité(s), 0 utilisateur(s) anonyme(s)