Guigues

Bonjour, Je recherche activement un logiciel permettant de compiler une maquette 3D en 1 fichier executable. Le destinataire de ma maquette 3D (realisée sous Autocad) recevra ainsi un fichier *.exe dans lequel est incorporé ma maquette + les outils de visualisation. Les objectifs : - Livrer une maquette ne necessitant pas un viewer dwg - Livrer un fichier "allégé" ... d'une maquette de 30 mo, on peut esperer obtenir un fichier exe de 2-3 mo - Livrer une maquette 3D exploitable sans "donner" mes blocs 3D & un certain nombre de mes outils 3D perso Il existait un logiciel il y a 5-6 ans qui s'appelait AEC VIZ mais la société n'existe plus & le logiciel n'est plus distribué ... Merci de votre aide !

Bonjour Gille Est-il possible, en fin de traitement, que ce lisp incremente un attribut d'un bloc lambda de la valeur du resultat de dénombrement d'un bloc ? Si c'est possible, cela va m'enlever une épine, que dis-je, un tronc d'arbre du pied ! Cordialement !

ouch Pour la peine je vais faire penitence et recopier 10 fois le lisp sous le zenith du soleil et de la main gauche ! Merci ... ca fonctionne. La cotation automatique des isométriques fonctionne pour l'axe xx" = 30° Le projet avance !

Il me semble qu'il existait un Lisp qui permet de relier deux blocs par leur point d insertion (choix des deux blocs a l ecran par l'utilisateur) avec ligne ou polyligne 2D. J'ai cherché ce matin sur le forum mais je n'ai pas trouvé. Sinon.. courage a tous les utilsiteurs d'Autocad qui bossent pendant les vacances (comme moi!) !!

Merci... Ca marche parfaitement Je posterai un fichier .Zip du menu complet... la tu viens de decoincer la situation et de m ouvrir en grand le chemin pour que j'accomplisse ce projet (qui me trotte dans la tete depuis plus d'un an) !! Tu l'as entendu souvent.... mais bravo ! quel talent...

bonjour dplansb Tu peux contacter un projeteur (P3 30ans d'experience en traitement d'eau / petrochimie / milieu pharma) de ma part. PM moi pour avoir ses coord. Cordialement,

Je comptais utiliser x fois ce systeme avec des familles de blocs differentes pour chaque type de ligne que l'utilisateur importera ... Mais si il est possible d'identifier les ATT1 differents et de faire 1 total des ATT2 pour chaque famille de ATT1 identiques alors cela allege le systeme... Par contre il faut plusieurs fois le bloc TOTAL.dwg et il faut que le lisp renseigne de maniere dynamique les ATT1 en fonction du nombre de BLOCS.DWG ayant un ATT1 different. Si c'est impossible (mise en place d'un systeme de lecture de la chaine de caractere etc etc...) ... je pourrai sans soucis retrouver mes petits avec le schema exposé initialement... :)

Bonjour J'avance toujours sur mon projet de creation d'iso sous autocad et de nomenclatures automatiques. J'ai décidé de changer de portage sur la gestion des metrees et je voudrais savoir si un coup de pouce peut m etre donnée vis a vis de l exemple que je vais donner ci dessous : Dans mon dessin DWG j'ai plusieurs Blocs identiques appelés "BLOC.Dwg" qui contiennent 2 attributs : ATT1 = Designation (je le renseigne par du texte) ATT2 = Métrée (je le renseigne par une valeur numerique) La designation est la meme pour tous les blocs (qui portent le meme nom) et les valeurs de ATT2 different d'un bloc a l autre. Dans mon dessin DWG j'ai également un Bloc qui appartient a mon gabarit vierge et donc présent des le debut, il s'appelle TOTAL.dwg (il est present qu'une fois) et il contient 2 attributs : ATT1 = Designation ATT2 = somme Est-il possible de mettre en oeuvre un lisp qui copie la valeur de ATT1 de Bloc.dwg vers ATT1 de TOTAL.Dwg et qui recupere toutes les valeurs de ATT2 de Bloc.dwg, en fait la somme et copie cette valeur vers ATT2 de TOTAL.dwg ??? C'est la derniere piece du puzzle donc merci d'avance pour l'aide !!! :)

Re bonjour Je n'arrive a obtenir l'extraction désirée... je m'explique : Sur un plan existant contenant x fois le bloc A.dwg. ------------------------------------------------------------------------------------------- Je lance LXL et je selectionne le fichier XLS, l'onglet et la case de depart pour l'extraction des attributs de A.dwg (j'active insertion/copie). > LXL ne fait l'extraction que du bloc selectionné manuellement. Je fais donc "selection" et je valide le Bloc A.dwg mais ce sont seulement les futurs blocs A qui seront ajoutés a la liste d'extraction. Ceci me pose un premier probleme car l'extraction des futurs fichiers de mon projet se fera a la fin de la saisie et devra prendre en compte tous les blocs A.DWG du plan sans avoir a les selectionner puis traitement des données avec (si LXL peut etre utilisé) un onglet par bloc different.... (il y aura plusieurs blocs differents et chaque bloc sera present X fois sur un plan) Deuxieme probleme : ------------------------------------- L'ajout de nouveaux blocs dans la liste d'extraction fait apparaitre une boite de dialogue que les futurs utilisateurs ne pourront pas renseigner car le traitement du fichier XLS sera invisible pour eux ... Le but est : 1) d'appuyer sur un bouton sous autocad (routine lancant extraction) 2) Macro de traitement en VBA qui exploite les données du fichier d'extraction XLS brut 3) La Macro renseigne une feuille XLS pré-formatée, la sauve et la ferme puis ferme le fichier d'extraction brut. 4) l'utilisateur recupere sa nomenclature sous Excel. .... Le schéma : Bloc1.dwg Attribut masqué = Texte1 Attribut masqué = 10 Bloc 1.dwg Attribut masqué = Texte2 Attribut masqué = 12 Bloc 2.dwg Attribut masqué = Texte 1 Attribut masqué = 500 Bloc 2.dwg Attribut masqué = Texte 2 Attribut masqué = 600 Sous Excel ------------------- Case A1 : Texte1 Case A2 : 510 (addition des attributs masqués ayant le meme texte en premier attribut) Case A2 : Texte2 Case B2 : 612 (addition des attributs masqués ayant le meme texte en second attribut) est le plus compatible a mon sens avec mon projet... LXL n'apportera pas la solution a moins que ???? [Edité le 23/6/2010 par Guigues]

J'ai testé LXL mais je n'arrive pas a additionner 2 attributs sur la meme case Excel.... Comment proceder ? Deuxieme point.... Sous IXL est-il obligatoire de selectionner manuellement tous les blocs portant le meme nom pour les integrer a l extraction ou est-ce possible de maniere automatique apres selection d'un seul d'entre eux ? CDT

Bonjour Je souhaiterais mettre en place un systeme de gestion de blocs entre Autocad et Excel avec addition des valeurs d'attributs du meme bloc inséré plusieurs fois sur 1 seule case sous excel. Exemple : Sous autocad ----------------------- Bloc1.dwg Attribut masqué = Texte1 Attribut masqué = 10 Bloc 1.dwg Attribut masqué = Texte1 Attribut masqué = 12 Bloc 2.dwg Attribut masqué = Texte 2 Attribut masqué = 500 Bloc 2.dwg Attribut masqué = Texte 2 Attribut masqué = 600 Sous Excel ------------------- Case A1 : Texte1 Case A2 : 22 (addition des attributs masqués des bloc1.dwg) Case A2 : Texte2 Case B2 : 1100 (addition des attributs masqués des bloc2.dwg) Est-ce realisable ??? Sinon La cerise sur le gateau (encore plus fort) ---------------------------------------------------------------------- Bloc1.dwg Attribut masqué = Texte1 Attribut masqué = 10 Bloc 1.dwg Attribut masqué = Texte2 Attribut masqué = 12 Bloc 2.dwg Attribut masqué = Texte 1 Attribut masqué = 500 Bloc 2.dwg Attribut masqué = Texte 2 Attribut masqué = 600 Sous Excel ------------------- Case A1 : Texte1 Case A2 : 510 (addition des attributs masqués ayant le meme texte en premier attribut) Case A2 : Texte2 Case B2 : 612 (addition des attributs masqués ayant le meme texte en second attribut) J'ai pour projet de faire un menu de creation d'isometriques qui genere des nomenclatures automatiques ! Merci du coup de pouce !

Bonjour Je souhaiterais mettre en place un systeme de gestion de blocs entre Autocad et Excel avec addition des valeurs d'attributs du meme bloc inséré plusieurs fois sur 1 seule case sous excel. Exemple : Sous autocad ----------------------- Bloc1.dwg Attribut masqué = Texte1 Attribut masqué = 10 Bloc 1.dwg Attribut masqué = Texte1 Attribut masqué = 12 Bloc 2.dwg Attribut masqué = Texte 2 Attribut masqué = 500 Bloc 2.dwg Attribut masqué = Texte 2 Attribut masqué = 600 Sous Excel ------------------- Case A1 : Texte1 Case A2 : 22 (addition des attributs masqués des bloc1.dwg) Case A2 : Texte2 Case B2 : 1100 (addition des attributs masqués des bloc2.dwg) Est-ce realisable ??? Sinon La cerise sur le gateau (encore plus fort) ---------------------------------------------------------------------- Bloc1.dwg Attribut masqué = Texte1 Attribut masqué = 10 Bloc 1.dwg Attribut masqué = Texte2 Attribut masqué = 12 Bloc 2.dwg Attribut masqué = Texte 1 Attribut masqué = 500 Bloc 2.dwg Attribut masqué = Texte 2 Attribut masqué = 600 Sous Excel ------------------- Case A1 : Texte1 Case A2 : 510 (addition des attributs masqués ayant le meme texte en premier attribut) Case A2 : Texte2 Case B2 : 612 (addition des attributs masqués ayant le meme texte en second attribut) J'ai pour projet de faire un menu de creation d'isometriques qui genere des nomenclatures automatiques ! Merci du coup de pouce !

Bonjour Je souhaiterais mettre en place un systeme de gestion de blocs entre Autocad et Excel avec addition des valeurs d'attributs du meme bloc inséré plusieurs fois sur 1 seule case sous excel. Exemple : Sous autocad ----------------------- Bloc1.dwg Attribut masqué = Texte1 Attribut masqué = 10 Bloc 1.dwg Attribut masqué = Texte1 Attribut masqué = 12 Bloc 2.dwg Attribut masqué = Texte 2 Attribut masqué = 500 Bloc 2.dwg Attribut masqué = Texte 2 Attribut masqué = 600 Sous Excel ------------------- Case A1 : Texte1 Case A2 : 22 (addition des attributs masqués des bloc1.dwg) Case A2 : Texte2 Case B2 : 1100 (addition des attributs masqués des bloc2.dwg) Est-ce realisable ??? Sinon La cerise sur le gateau (encore plus fort) ---------------------------------------------------------------------- Bloc1.dwg Attribut masqué = Texte1 Attribut masqué = 10 Bloc 1.dwg Attribut masqué = Texte2 Attribut masqué = 12 Bloc 2.dwg Attribut masqué = Texte 1 Attribut masqué = 500 Bloc 2.dwg Attribut masqué = Texte 2 Attribut masqué = 600 Sous Excel ------------------- Case A1 : Texte1 Case A2 : 510 (addition des attributs masqués ayant le meme texte en premier attribut) Case A2 : Texte2 Case B2 : 612 (addition des attributs masqués ayant le meme texte en second attribut) J'ai pour projet de faire un menu de creation d'isometriques qui genere des nomenclatures automatiques ! Merci du coup de pouce !

salut x_all Je te conseille, si tu ne l'utilises pas déja, GBEPad qui remplace le bon vieux notepad de windows. Il marche sans s'installer (simple copier du repertoire) et il integre le surlignage des parentheses pour se verifier... Cerise sur le gateau c'est un gratuiciel Lien : http://www.gratuiciel.com/gratuiciel/?editeur-de-texte

merci à vous. Tout fonctionne parfaitement ! J'en avais marre de toujours éditer mes styles de cotes et faire les memes manip pour préparer un plan. Maintenant ca marche tout seul !!! Prochain projet : le verrouillage d'un plan dwg avec impossibilité d'éditer l'existant !

donc je rajoute donedialog en fin de commande action_tile ?

bonjour, J'ai fabriqué une série de lisp pour formatter un fichier vierge en gabarit A0, A1, 12, 13 ou A4. J'en profite pour initialiser des variables, pour importer des styles de cotes etc etc... >> Ces lisps fonctionnent trés bien ! Afin de lancer mes lisps j'ai décidé d'utiliser un fichier DCL + Lisp et la boite DCL + Le lisp fonctionnent trés bien ! Mais.... dés que j'ordonne le lancement du lisp GA0 ou GA1 etc etc via le lisp qui commande la boite DCL ca plante.... J'ai essayé de : - intégrer le contenu du lisp GA1 au lisp Gabarit >> même erreur - supprimer GA1 et integrer les commandes dans (defun (dobutton (a) .. >> même erreur - tester les lisps sur un autre poste équipé de autocad 09 version pleine >> même erreur voici les codes : LISP GA1 (defun c:GA1() (command "tilemode" "0") (command "_erase" "to" "") (command "tilemode" "1") (command "_erase" "to" "") (command "Purger" "to" "*" "N") (command "Purger" "to" "*" "N") (command "Purger" "to" "*" "N") (command "Purger" "to" "*" "N") (command "-inserer" "Cotation" "0,0" "1" "1" "0") (command "_erase" "to" "") (command "ATTDia" "1") (command "INSUNITS" "4") (command "RESVUE" "o" "20000") (command "ortho" AC) (command "Mirrtext" "0") (command "LUNITS" "2") (command "LUPREC" "2") (command "MEASUREINIT" "1") (command "MEASUREMENT" "1") (command "-unites" "2" "2" "1" "2" "0" "n") (command "ECRANGRA") (command "-style" "standard" "Simplex.shx" "0" "1" "0" "non" "non" "non") (command "-inserer" "FANTOMEA1" "0,0" "1" "1" "0") (command "_zoom" "_e") (command "-calque" "N" "Neuf,Depose,Existant,Texte,Instrum,Liaison_Instrum" "TL" "CACHE" "Liaison_Instrum" "CO" "Rouge" "Neuf" "CO" "Vert" "Instrum,Liaison_Instrum,Depose" "CH" "Texte" "") (command "ECRANGRA") (command "tilemode" "0") (command "_erase" "to" "") (command "-inserer" "CA1" "0,0" "1" "1" "0") (command "_zoom" "_e") (command "_-vports" "836,5" "5,589") (command "_.MSPACE") (command "_zoom" "_w" "0,0" "831,584") (command "_.PSPACE") (command "-inserer" "CART" "836,5" "1" "1" "0") (command "tilemode" "1") (command "_zoom" "_e") ) DCL GABARIT GABARIT : dialog { label = "GENERATEUR DE GABARITS ver.1.0"; : column { : boxed_column { : button { key = "but1"; label = "GABARIT A4"; is_default = false; } : button { key = "but2"; label = "GABARIT A3"; is_default = false; } : button { key = "but3"; label = "GABARIT A2"; is_default = false; } : button { key = "but4"; label = "GABARIT A1"; is_default = false; } : button { key = "but5"; label = "GABARIT A0"; is_default = false; } } : boxed_row { : button { key = "cancel"; label = "Close"; is_default = true; is_cancel = true; } } } } LISP GABARIT (defun doButton(a) (cond ((= a 1)(c:GA4)) ((= a 2)(c:GA3) ((= a 3)(c:GA2) ((= a 4)(c:GA1)) ((= a 5)(c:GA0)) ) ) (defun C:Gabarit() (setq dcl_id (load_dialog "GABARIT.dcl")) (if (not (new_dialog "GABARIT" dcl_id)) (progn (alert "GABARIT.DCL ne peut pas être chargé!") (exit) ) ) (action_tile "but1" "(doButton 1)") (action_tile "but2" "(doButton 2)") (action_tile "but3" "(doButton 3)") (action_tile "but4" "(doButton 4)") (action_tile "but5" "(doButton 5)") (action_tile "cancel" "(done_dialog)") (start_dialog) (unload_dialog dcl_id) (princ) ) merci du coup de pouce :P

Bonjour Je reviens juste d'un déplacement donc une réponse un peu tardive aprés la résolution du probleme par (Gile). Je t'adresse un grand MERCI car primo la démarche est trés simplifiée et du coup beaucoup plus efficace ! et secondo je vais pouvoir coder et finaliser mes petits projets sous autocad

Nous avons testé avec la variable entre guillemets .... on reste toujours bloqué sur l'insertion du bloc B qque soit notre choix dans le DCL :(

Un pas en avant ! Il dépasse la fermeture du DCL mais qque soit mon choix dans le DCL il veut insérer le bloc B.dwg :o

je teste immediatement !

Même topo ... l'execution ne dépasse pas la fermeture du DCL et la boucle (cond n'est pas lancée.

Réponses en même temps >.< .... je teste ta solution immédiatement !

J'ai "fabriqué" un lisp de "formatage" de plan avec initialisation de variables et insertion de blocs il y a pas mal de temps et j'utilisai la même construction sans probleme ! Je reviens sur le soucis de mon lisp ... le chargement du lisp et du DCL se font sans probleme mais lors de l'execution je ne dépasse pas la fermeture du DCL .... la boucle IF > Action = inserer un bloc ne se lance pas.... Si la commande "insérer" se lancait, je pense qu'un message d'erreur interviendrait dans le processus.

Bonjour tout le monde. Je profite de mes congés pour me lancer dans l'apprentissage de la programmation en Lisp + interface avec fichiers DCL. Si qqun peut prendre 2 minutes pour m'expliquer ce qui cloche dans mes tentatives je pourrai continuer l'exercice ! Mon but était de lier une boite dcl à un choix entre différents blocs à insérer. Le codage du fichier DCL semble ok mais je bloque dans le fichier Lisp après l'attribution d'une valeur à la variable "choix". Le but est d'insérer le bloc "blocA.dwg" si je choisis le bloc A ou le "blocB.dwg" si je choisis le bloc B.... Je débute et je pense que cela se voit ! Fichier DCL (B2D.DCL) : B2D : dialog { label = "MENU PERSO" ; : boxed_radio_column { label = "Blocs" ; : radio_button { key = "BA" ; label = "Bloc A" ; value = "1" ; } : radio_button { key = "BB" ; label = "Bloc B" ; } } ok_cancel ; : paragraph { : text_part { label = "GUIGUES ENVT" ; } } } Fichier LISP (B2D.Lsp) : (defun C:B2D () (setq dcl_id (load_dialog "B2D.dcl")) (if (not (new_dialog "B2D" dcl_id))(exit)) (action_tile "BA" "(setq Choix \"1\")") (action_tile "BB" "(setq Choix \"2\")") (action_tile "accept" "(done_dialog) (setq userclik T)") (action_tile "cancel" "(done_dialog) (setq userclik nil)") (start_dialog) (unload_dialog dcl_id) (If userclick (progn (If (= choix 1) (progn (command "-inserer" "BlocA" "1" "1" "0") ) ) (If (= choix 2) (progn (command "-inserer" "BlocB" "1" "1" "0") ) ) ) ) (princ) ) Merci beaucoup (d'avance) à celui qui aura la patience de répondre ! P.S : coucou usegomme ! [Edité le 14/8/2009 par Guigues]