LISP en LT

[AndreaCZ]

Est-ce que quelqu'un sait si les LISP peuvent être utilisés sur LT.

Ou connaitre autre manip pour créer le texte des pièces avec l'aire.

J'ai telechargé la commande DDAREA et ça marche que avec AD2004mais mes collegues n'arrivent pas a la charger sur LT2004

Merci d'avanceEt bonne journée!

[Matias]

Pour utiliser du lisp sur une version LT, il faut utiliser un programme comme LT-Extender, ou LT Toolkit Max. Ces deux programmes permettent d'activer le lisp, la 3d et diverses fonctions.

[CDL]

fait "rechercher' sur les forums "LT-EXTENDER" pour plus d'infos (comparatif, aspect légal , ...)

 

[rebcao]

Bonjour,

 

Pour ma part je règle la solution avec un menu basé sur des MACROS DIESEL compatibles avec toutes les versions AutoCAD.

 

 

Christian

[Tramber]

C'est l'occasion de nous montrer,...

 

Nous sommes hyper nombreux, ici, à avoir des problèmes ou peu d'expérience avec DIESEL.

 

Si je fais très simplement :

^C^Cliste;pause;AREA;

 

Dans un bouton, il ne me renvoie pas AREA, ni ne m'attache sa valeur sous forme de texte.

 

Comment ferais-tu ?

[rebcao]

Voici pour votre réflexion :

 

il s'agit d'une macro qui permet de choisir l'objet fermé (polyligne close, cercle, ellipse, etc.) et les infos sont transcrites sous forme d'un bloc avec attributs ce qui permet de faire du quantitatif avec EXCEL...

 

Les attributs :

le nom du local ou de la zone

la hauteur (pour le calcul des volumes)

la surface au mur

la surface (AREA)

le périmètre

 

voici le bazarre :

 

*^C^Caire;o;\attdia;0;-inserer;obs6A;auc;@;$m=$(getvar,textsize);;;Longueur m=;$m=$(rtos,$(/,$(getvar,perimeter),$(getvar,useri3)),2,2);Surface m²=;$m=$(rtos,$(/,$(getvar,area),$(getvar,userr2)),2,2);Volume m³=;$m=$(rtos,$(/,$(*,$(getvar,userr3),$(getvar,area)),$(*,$(getvar,useri3),$(getvar,useri3),$(getvar,useri3))),2,2);Mur Surf m²=;$m=$(rtos,$(*,$(/,$(getvar,perimeter),$(getvar,useri3)),$(/,$(getvar,userr3),$(getvar,useri3))),2,2);Hauteur =;$m=$(rtos,$(getvar,userr3),2,2);Local =;\attdia;1;deplacer;d;;auc;@;auc;\

 

ça mérite réflexion....pour ceux qui ont un peu l'habitude ça devrait aller, pour les autres n'hésitez si vous avez des questions...

 

Bien sur ce genre de macro marche avec toutes les versions complète ou LT (et surtout LT qui sont laissé un peu pour compte...) de base sans ajout e quoi que ce soit.

 

Et ce n'est qu'un exemple parmi une multitudes de macro DIESEL. Les possibilités sont nombreuses.

 

Il faudrait que je fasse la liste de toutes les macros développées sur ce principe.

 

 

Christian

 

 

[Edité le 7/4/2005 par rebcao]

[rebcao]

un complément à mon message ci-dessus :

 

dans mes dessins j'initialise les variables USER i ou r, étant donné que LT (de BASE sans ajout) ne permet pas de créer des variables à la façon LISP les variables USER permettent de palier à ce manque.

 

Gros défaut les USER entier et réel sont limités à 5.

 

dans ma macro USERi3, USERr2 et USERr3

 

USERi3, USERr2 et USERr3 déterminent l'unité du dessin (mm, cm et m) et un coef pour les calculs. Pour cela j'ai 3 icônes mm, cm et m. Dans mon gabarit j'ai choisi une unité par défaut par exemple le mm.

 

Dans ce cas si l'on utilise la commande AIRE, option objet, c'est vachement sympa comme résultat : des million voir des milliard de MM² de MM³... !!!

 

C'est pour cela que la macro semble un peu complexe, mais elle se charge de convertir les résultats en M linéaire, en M², en M³.

 

D'autre part, à l'insertion de mon Bloc j'utilise l'échelle de TEXTSIZE, sous entendu bien sur que dans ma fenêtre de présentation j'ai choisi une échelle. Là aussi, j'ai des icônes pour me simplifier la gestion de l'échelle quelque soit les unités.

 

voila, voila...

 

à vos commentaires et suggestions,

 

Christian

 

 

 

 

[Edité le 7/4/2005 par rebcao]

[esbe]

Bonjour

 

je viens de trouver ce message pour automatiser le calcul des surfaces

 

J'ai essayée de l'nregistrer et le charger, mais en fait je n'y connais pas grand chose en programmation

 

J'ai message d'erreur commande inconnu !

Pourriez vous me detaillé la marche à suivre pour utiliser ce programme

Merci d'avance

C'est urgent en +

[rebcao]

bonjour Esbe,

 

ça faisait longtemps que je ne te retrouve sur un sujet...

 

je peux te fournir le Menu complet... si ça t'intéresse...

 

Sinon ! Si la macro ne fonctionne pas ! ça vient du fait qu'AutoCAD cherche à insérer le BLOC OBS6A

 

Particularité de ce bloc, il contient des attributs pour récupérer les différentes valeurs. Il y en a 12 en tout.Donc forcément ça ne pourra pas marcher. Sui tu fais F2 et que tu remonte un peu la fenêtre texte tu verra où se situent les erreurs...

 

Dis-moi ce que tu préfères,

 

Christian

 

[Edité le 6/4/2005 par rebcao]

[esbe]

Hello REbcao

 

 

 

C'est vrai je n'avais le temps de vs retrouver,

dommage pour le dejeuner .. que tu n'est pas pu venir nous retrouver c'était trés sympa et un peu surréaliste quand ils (les ceintures noires) parlaient de programation ou de programme

 

En bref si tu peux m'envoyer le programme et SURTOUT la manière de s'en servir ,ce serait tres cool !

 

J'ai juste besoin des surfaces des locaux.

En fait c'est la façon de l'enregistrer et de le charger qui m'echappe un peu.

 

Merci de ton aide

[rebcao]

Bonjour Esbe,

 

voici le fichier ZIP (Menu)

 

1 le décompresser dans un dossier (Menu Batiment, par exemple)

 

2 Dans AutoCAD, Menu Outils : Options, dans l'onglet Fichier ajouter dans la 1ere Rubrique "chemin de recherche fichiers support"

 

3 Menu Outils : Personnaliser > Menu Parcourir... et charger le fichier Batiment.MNS...

 

Tu obtiens de nouvelles icônes, et la barre s'appelle "Calques/Outils/Surface/Vol (Batiment)"

tu trouvera 2 icônes en particulier, une zone noire avec un ? ou une croix rouge...

 

Il faut que je fasse un petit mode d'emploi de toute ces icônes...

 

à plus

 

Christian

 

[Edité le 7/4/2005 par rebcao]

[rebcao]

petit complément Esbe,

 

voici une illustration d'une partie de mes icônes pour la gestion des échelles (XP) en fonction des unités de ton dessin (m, cm, mm)

 

http://www.cadxp.com/modules.php?op=modload&name=XForum&file=viewthread&tid=3506#pid

 

une autre illustration mais pas tout à fait complète, ni à jour...

http://perso.wanadoo.fr/rebcao/menu_info.htm

 

Je n'ai pas de manuel puisque ces icônes je les propose gratuitement, à mes stagiaires à l'issue des formations... il on donc le mode d'emploi de vive voix...

 

Une fois l'échelle de la mise en page fixée, tu obtiendra une insertion du bloc "SURFACE" avec les bonnes proportion.

 

Au moment de l'insertion, il marque une pause en bas dans la zone de commande tu peux entrer le nom, le numéro du LOCAL, du BUREAU, etc.

 

Il faudra que je t'envoie un exemple de gabarit...

 

Christian

 

[Edité le 7/4/2005 par rebcao]

[rebcao]

Re-Bonjour Esbe,

 

voici un exemple de gabarit qui fonctionne avec mes icônes...

 

http://perso.wanadoo.fr/rebcao/CADxp/_gabarit_batiment_2004-2005.dwt

 

Christian

[esbe]

Whouaou

 

Merci Rebcao

 

Je vais regarder tout cela de ce clic !!!!

 

A plus tard

[esbe]

rE BONJOUR

 

 

J'ai exploré tous tes trésors....et je ne suis pas sure de savoir gerer tout cela

1/ le zip contient plein de bipmat est-ce normal ???

2/ J'ai installé le menu batiment en suivant tes instructions et mon Autocad 2005 est devenu fou à chaque essai d'icones ( elles sont toutes pareilles d'ailleurs , c'est cela les bitmap ???) le pire fut pour creer des fenetres, là il s'est vraiment emballé !!!

Donc j'ai tout désinstallé en attendant tes infos

 

En tout les cas j'ai l'impression que c'est une mine d'or

Il suffit juste que je trouve l'entrée

Merci encore

 

@ tres vite

 

[esbe]

J'oublié

dans le gabarit je n'ai pas trouvé tes îcones !?!

 

@+

[rebcao]

On va essayer avec ce petit document PDF, tu as le détail d'INSTALL... et en partie les icônes.

 

http://perso.wanadoo.fr/rebcao/CADxp/Menu_Bat_Meca_REBCAO.pdf

 

Le gabarit ne contient pas d'icônes, il n'amène que des paramètres pour le dessin et la mise en page...

 

Mes AutoCAD LT 2000 à 2005 fonctionnent à la "vitesse de la lumière"... de la mise en page, mise à l'échelle et l'impression. En utilisant mon gabarit et en partant d'un fond de plan en XREF : moins de 30 secondes...

 

A l'issue de ces 30 secondes, j'ai l'échelle du dessin correspondant, le texte échelle pour mémoire à l'écran, l'unité de mon dessin (en m, cm, mm) la fenêtre est verrouillée...et j'imprime dans la foulée sans reprendre les réglages ils sont déjà prêts...

 

en espérant que tu puisse l'utiliser...

 

Si tu réinstalles le ZIP au même endroit, vérifies si dans le dossier tu n'as pas un fichier BATIMENT.MNR et BATIMENT.MNC, si oui ! il faut les supprimer avant de recharger le menu...

 

Bon courage, on va y arriver...

 

Christian

 

[Edité le 7/4/2005 par rebcao]

[esbe]

C'est génial tout cela

Ton pdf est tres clair

J'espère que cela va marcher lorsque j'aurai supprimer les deux fichiers en question, parce que sinon j'aurai suivi ta procedure ce matin !

 

J'y retourne et merci encore

 

Ps Pour ton gabarit j'ai compris l'intèret et c'est top :)

 

bonsoir

[esbe]

Hello

 

Non decidement cela ne fonctionne pas même en supprimant les deux fichiers...les icone sont toujours anonymes et lorsque je lance surface .... message que le chemin est introuvable !

 

Dommage

je continu a chercher

 

bonne journée

 

 

[FormaBois]

C'est l'occasion de nous montrer,...

 

Nous sommes hyper nombreux, ici, à avoir des problèmes ou peu d'expérience avec DIESEL.

 

Si je fais très simplement :

^C^Cliste;pause;AREA;

 

Dans un bouton, il ne me renvoie pas AREA, ni ne m'attache sa valeur sous forme de texte.

 

Comment ferais-tu ?

 

Comme Tramber, j'aurai voulu une macro toute simple pour coller la surface à l'intérieur

d'une polyligne fermé, un peu du même type de celle-ci qui colle le périmètre après la mesure:

 

*^C^C_lengthen;\;texteval;1;-texte;auc;@;;;Longueur=$m=$(rtos,$(getvar,perimeter),2,2);deplacer;d;;auc;@;auc;\

 

J'ai essayé en changeant Longueur= par Surface= et ensuite "perimeter" par area, mais ça n'a pas fonctionné :)

S'il y a quelqu'un connaissant le Diesel !? je suis preneur

Cordialement

 

[(gile)]

Salut,

 

tu y étais presque, sauf que la commande pour une surface c'est aire (ou _area).

 

*^C^C_area;o;\texteval;1;-texte;auc;@;;;Surface=$m=$(rtos,$(getvar,area),2,2);deplacer;d;;auc;@;auc;\ 

[FormaBois]

Salut Gile,

j'ai essayé ta macro et voilà ce que j'obtiens en résultat final : Surface= )?? :o

Pour le test je suis sur LT2007

 

[Edité le 29/6/2007 par FormaBois]

[(gile)]

La macro fonctionne chez moi, veille à ce qu'aucun espace ne se soit glissé lors des copier/coller.

 

PS : je viens d'essayer un copier/coller de cADxp vers le bloc note, un espace se glisse entre rtos et ,$.

Supprime le dans ton CUI et ça devrait marcher.

 

[Edité le 29/6/2007 par (gile)]

[FormaBois]

Effectivement il y avait un espace aprés "rtos"

Génial, ça marche, merci Gile

@+