lovecraft

Bonjour, La même chose que Gile (defun ilp_perso(pt_a pt_b pt_1 pt_2 pt_3) (setq xa(car pt_a)) (setq ya(cadr pt_a)) (setq za(caddr pt_a)) (setq xb(car pt_b)) (setq yb(cadr pt_b)) (setq zb(caddr pt_b)) (setq x1(car pt_1)) (setq y1(cadr pt_1)) (setq z1(caddr pt_1)) (setq x2(car pt_2)) (setq y2(cadr pt_2)) (setq z2(caddr pt_2)) (setq x3(car pt_3)) (setq y3(cadr pt_3)) (setq z3(caddr pt_3)) (setq xn(- (* (- y2 y1) (- z3 z1)) (* (- y3 y1) (- z2 z1)))) (setq yn(- (* (- z2 z1) (- x3 x1)) (* (- z3 z1) (- x2 x1)))) (setq zn(- (* (- x2 x1) (- y3 y1)) (* (- x3 x1) (- y2 y1)))) (setq s (/ (+ (* xn (- xa x1)) (* yn (- ya y1)) (* zn (- za z1))) (+ (* xn (- xb xa)) (* yn (- yb ya)) (* zn (- zb za))))) (setq x_pt (+ (* s (- xa xb)) xa)) (setq y_pt (+ (* s (- ya yb)) ya)) (setq z_pt (+ (* s (- za zb)) za)) (setq pt (list x_pt y_pt z_pt)) pt ) @plus LB

Bonjour, En ce qui me concerne lorsque je veux un certain angle entre deux lignes, j'utilise la commande DROITE puis A pour angle puis R pour référence "là tu sélectionnes ta ligne de référence" puis tu donnes ton angle. J'espère que ça pourra t'aider. @plus LB

Bonsoir Monsieur Garré ;) Voici la solution: pour cela il faut aller dans la base de registre et modifier la clé suivante: HKEY_LOCAL_MACHINE \ Software \ Autodesk \ R17.1 \ [ACAD-XXXX: XXX] \ Applications \ InfoCenterAcConn Changer la valeur de la clé “LOADCTRLS” à 0 pour désactiver le chargement. @plus LB[Edité le 25/9/2008 par lovecraft] [Edité le 25/9/2008 par lovecraft]

Re bonojour, Si vous devez effectuer des modifications dans le fichier des alias de commande, je vous recommande de tapez la commande REINIT puis de cocher fichier PGP, afin que votre modifications soit effective sans relancer autocad. Autrement vous avez aussi la possibilité de modifier ce fichier via les express tools dans EXpress => Tools => Command alias editor @plus LB

Bonjour, un alias de commande est une commande abrégée que vous entrez sur la ligne de commande (cela évite de taper le mot entier) Exemple: vous pouvez entrer C au lieu de cercle pour lancer la commande CERCLE. Pour resumer se sont des raccourcis clavier des commandes AUTOCAD. @plus LB

Bonjour, voici ma p'tite contribution. @plus http://cjoint.com/?jymGp6t4jj

Bonjour, Si j'ai bien compris tu désires inserer tes points via un bloc dont l'attribut est le matricule ? Si oui, j'ai une p'tite routine sous excel (que je peux adapter) qui te créer un script... @plus LB PS: si tu es intéressé ,donnes moi le nom de ton bloc.

Re bonjour, Je pense que ma mémoire se porte bien ;) http://images.imagehotel.net/6xdwui410e.jpg @plus

Bonjour De mémoire ALT ....0179 ou dans les textes multilignes clique droit => symbole => au Cube @plus LB

Bonjour, je ne pense pas qu'il faille une routine lisp pour faire ce que tu recherches. Tapes seulement la commande PEDIT "entrée" puis tu entres l'options M "comme multiple" tu sélectionnes toutes tes lignes puis tu valides. Voili voilou le tour est joué.... ;) @plus LB

bonjour, tu sélectionnes toutes tes présentations puis....... ;) => publier les présentations sélectionnées @plus LB

bonsoir, Voici un bout de code qui fonctionne chez moi... Public Sub LigneTEST() Dim LigneTEST As AcadLine Dim Pt1 As Variant Dim Pt2 As Variant Pt1 = ThisDrawing.Utility.GetPoint(, "Point de départ de la ligne : ") Pt2 = ThisDrawing.Utility.GetPoint(Pt1, "Point final de la ligne : ") Set LigneTEST = ThisDrawing.ModelSpace.AddLine(Pt1, Pt2) End Sub @plus LB

Bonjour, Travailles tu sur plusieurs écrans ? hypothèse Tu as travaillé sur deux écrans puis maintenant tu travailles sur un seul écran donc l'autre partie du paramétrage se trouve sur l'autre écran !!!! @plus LB

Bonjour, Il est vrai qu'a ce stade de developpement, il est peut etre envisageable d'investir dans un logiciel adapté (Cf ci-dessus) Si vous avez deja une licence autocad (version pleine), le prix de l'acquisition d'un tel logiciel n'est pas tres couteux par rapport à toute l'energie qu'il faudra pour developper un lisp de cette dimension. @plus LB

re Voici un exemple de l'explication ci-dessus.... http://www.yousendit.com/download/bVlDWmdqQ0NtUUZMWEE9PQ @plus LB

Bonsoir, La méthode de gile est tres bien (d'ailleurs c'est cette méthode que j'utilisais à une certaine époque) Autrement une autre méthode similaire, tu fais ton rectangle tu places ton reseau de perçage puis tu transformes tout en region, une fois que tes elements sont des regions (commande REGION) tu utilises la méthode de gile pour la soustraction (commande soustraction) puis tu finis par une extrusion. @plus LB

Bonsoir, Je ne connais pas ton domaine d'activité, mais normalement avec les appareils leica il y a un soft qui est livré avec CLOUDWORKS qui te permet dans l'environnement autocad importer un aperçu de tes points, puis avec cet outil tu peux fiare des coupes etc.... Autrement il y a un soft 3DReshaper qui te permet de faire des maillages il me semble de mémoire qu'il est gratuit 1 mois pour l'essai. @plus LB

Bonsoir, Triste sujet...... gniko pour quelqu'un qui partage je vois que tu n'as posté seulement 13 messages en 2 ans. bravo je vous félicite.... @plus LB

Bonjour, je pense qu'il n'est pas necessaire de passer par du VBA ou LISP pour ce que tu recherches. Tu trouveras sur la toile ou meme ici des tableaux excel qui te permettrons de réaliser les calculs que tu recherches. Pour ce qui est des moignons il me semble de memoire que c'est la surface x 0.05 litres seconde. @plus LB

Bonjour ce n'est pas possible avec la version 2008, mais comme le dis laud 69 tu peux utiliser les scripts, sinon il y a cette possibilité sur la vesion 2009. @plus LB

Bonjour, Les objets sont fait sous 3DSMAX mais l'animation je ne pense pas .Plutot des logiciels de maquette 3D du style: SpacEyes 3D, Terra Explorer, LandSim. Vous pouvez allez voir le site suivant: http://www.btpinformatic.fr @plus

Bonjour, peut etre un e solution essaies de purger les échelles annotative ? @plus LB

Bonjour, Je pense que tu trouveras ton bonheur avec le convertisseur de calques. Outils => Normes CAO => Converstisseur de calques. Autrement tu peux aussi le faire via un script "superautoscript d'eric fais une recherche sur le forum". @plus LB

bonsoir, Chez pas de soucis lorsque l'epaisseur est à 0 sinon même constat que vous. Pour info je suis sur MAP3D 2009 avec le service pack. @plus LB

Bonsoir, Je viens de tester pour mon pas de soucis Patrick_35. Pour info j'ai le service pack installé @plus LB