Bred

Salut ingoenius,je suis un gros utilisateur de 3D sous Autocad, et par intéret pourrais-tu m'expliquer que est l'utilité de ce que tu demandes ?. Merci.

(Désolé, j'ai édité mon post précedent .... j'ai eu des soucis d'utilisation de bbcode avec firefox.... il doit être plus lisible maintenant)

...... RAAAAAhhhh..... je m'étais juré à moi même de ne plus intervenir à ce post qui est la suite de l'autre mais c'est plus fort que moi (Sega ?) !!!.... Je ne peux pas laisser passer ça !..... ... et bien je suis daccord :casstet: .... Si j'étais Dieu je ne fairais certainement pas un monde parfait... ça ne fonctionnerait pas ..... Certains partis extrémiste ont essayés de faire un monde (parfait) à leur idée.... et ils se sont ramassé la gueule (tant mieux pour nous !).... Donc il est vrais que Dieu ne fairait certainement pas un monde parfait ..... moi je ne le fairait pas (une bonne claque sur les fesses et la machine repart !!! ) .... Ahhh... le "Libre arbitre", ça c'est une invention qu'elle est bonne.... le "libre arbitre"..... Je suis épaté qu'un gar est réussis à trouvé une expression comme ça..... Réussir à résumé en 2 mots le propre de l'être humain est épatant..... et complétement débile..... bien sûr que nous avons notre "libre arbitre" : je ne vois pas comment on pourrait ne pas l'avoir.... si nous étions absolument contraint à quelque chose, on aurait encore le libre arbitre de le faire ou pas... Je ne comprend vraiment pas comment on peux inventer l'évidence même..... Et donc Dieu nous a laisser notre libre arbitre... ben il aurait voulu faire quoi d'autre ???.... nous faire en légume et être le dieu d'un monde de légume ??? Si il y a bien une phrase épatante qui ne veut rien dire c'est de dire que "Dieu dans son absolue bonté nous a laissé notre libre arbitre".... En effet.... on devient de la viande morte et on reste par terre si quelqu'un ne s'occupe pas de notre corps.... je ne vois pas de rapport avec l'amour....quand une machine ne fonctionne plus on la détruit et on la jette... c'est pareil.... - Dieu est amour (ça, c'est un jolie tournure trés vendeuse qui ressort souvent).... - Il ne peut pas nous l'imposer.... libre Arbitre ..... allo?.... ah oui, tu es là, je croyais que tu étais parti !...... - Alors, le fait de nous faire à son image est une théorie encore plus farfelu... Si il nous à fait à son image, nous somme des dieux et si nous sommes avec lui, en lui, ça nous fait une boucle bizarre ça .... car si nous sommes des dieux nous pourrions le voir.... sauf si il se considère encore au-dessus de nous, ce qui fait que nous ne sommes pas vraiment à son image.... c'est assez epoustouflant ce que l'on peut dire en faisant des phrases bien tourné qui ne veulent rien dire....[Edité le 6/10/2006 par Bred][Edité le 6/10/2006 par Bred] .... j'ai les bbcodes de firefox qui ont fais des sienne....[Edité le 6/10/2006 par Bred][Edité le 6/10/2006 par Bred] [Edité le 6/10/2006 par Bred]

??? ... là je ne comprend pas .... En effet.... c'est ce que l'on appel une théorie... et que personne n'arrive à démonter.... sauf la religion.... et quel démontage : La théorie de l'évolution c'est n'importe quoi vu que c'est dieu qui à crée la vie .... Ahhhh !!! ça c'est du concret !... Je vais écrire ci-dessous une nouvelle théorie à la manière religieuse, merci de ne pas me prendre pour le nouveau messie, c'est sarcastique : Ma théorie : " La mouche à des ailes car dieu lui en a donné afin de pouvoir volé plus facilement d'excrément à excrément, et si la mouche n'avait pas d'aile elle serait obligé de mangé moins.... donc je marcherais plus souvent dedans, donc dieu à créer la mouche pour le hommes !" ....( si vous voulez m'envoyer des dons en tant que révélateur des secrets de l'univers, envoyer moi un message privé !...)

... non... il serait buté ? ... il insiste... ou alors il a peur de se retrouver avec un stock de livre à mettre au pilon parceque la théorie qu'il avance est basé sur une imvompréhension de la théorie de l'évolution... ? Mais bien sûr qu'il a disparut... !.... La preuve en est des hominidé type néhenderthal qui ont disparus pour laisser la place au sapien (je crois que c'est dans cette ordre... si je me rappel bien...) Une mouche qui est né avec des embryons d'aile n'a pas survécu si il n'y en avait pas l'utilité... Par contre, dans l'évolution, le mamifère marin qui c'est retrouvé avec des embryons de pattes, qui ont pû lui permettre de sortir de l'eau (tant bien que mal) pour allez chercher de la nourrilture ailleur, à choisi de prévaloir les individus avec des embryons plus développé..... jusqu'à donné les "vrais" pattes .... Il ne faut pas prendre la théorie à l'envers!!!... La mouche avec des embryons d'ailes pouvait non pas volé mais peut être réalisé de saut plus imprtant que la précedente.... donc elle a pû survivre sur la mouche sans aile, comme elle n'a pas survécu sur la mouche volante... c'est pas compliqué... [Edité le 6/10/2006 par Bred]

Super! ça a l'air d'être ça !!!... mais ça m'échappe un peu en fait donc, ce qui marche : (defun c:cop () (setvar "APERTURE" 20) (setvar "OSMODE" 8) (command "_point" '(0 0.02 0)) (command "_circle" "_none"'(0 0 0) 0.05) (setq sel (ssget "L")) (setq pA '(0 0 0) pB '(1 0 0)) (command "_copy" sel "" "_none" pA ".yz" "_none" "@" pB) ) ... merci !!! ------------------------------ j'édite Et bien merci pour l'explication, maintenant je comprend... (presque ;) ) [Edité le 6/10/2006 par Bred]

... ? .... j'ai testé sur 2007, je viens de la faire sur 2006.... moi j'ai toujours la même erreur.... J'ai l'impression que ça vient de l"@" .... .... quelqu'un d'autre pourrait tester le test en réponse 2 svp ???....

... et bien non, je le répete c'est de l'ilogisme même.... comme quoi d'un texte on n'en ressort que ce que l'on aimerait comprendre... La selection naturelle est la base de l'évolution, les insectes ont leur os (carapace) à l'exterieur car c'est un principe qui à l'air de fonctionner.... nous avons nos os à l'interieur avec un corps "fragile" tourné vers l'exterieur car la selection naturelle à a juste raison (c'est prouvé jusqu'à preuve du contraire) primé sur la facilité de mouvement que sur la protection.... Donc un pommier ou une plante ont leur système de propagation parcequ'il c'est avéré qu'il fonctionne.... il ne faut pas aller chercher plus loin.... si il ne fonctionnait pas, la plante disparait.... c'est tout. Ce n'est pas compliqué quand même..... .... nous faisons partis de la nature car elle nous a fait .... c'est vrais qu'elle fait des choses extraordinaires.... et tout ça à partir d'acide aminé.... que l'on arrive à créé en laboratoire avec de l'eau et de l'electricité (éclair) il parait.... c'est Magnifique !!!.... mais "s'étonner" ??? de quoi ??? de la loi du "Cause à Effet" ???.... tu dois avoir une vie pleine d'etonnement ! (un ballon qui rebondit est un principe de "cause à Effet".... c'est éttonant ?... c'est logique, c'est tout...)

Merci mais.... non... par pour ça on dirait..... - Fait un cercle de diam 0.1 en 0 , 0 , 0 - Insert un point (setvar "PDMODE" 34)(setvar "PDSIZE" 0.15) au point 0 , 0.02 , 0 - Accrochage Nodal uniquement (setvar "OSMODE" 8) puis : (princ "\n selec cercle :") (setq sel (ssget)) (setq pA '(0 0 0) pB '(1 0 0)) (command "_copy" sel "" "_non" pA ".yz" "@" pB) .... et bien chez moi, la copie du cercle n'est pas en 1 , 0 , 0 mais en 1 , 0.02 , 0 .... c'est tordu.... où il y a queqlque chose qui m'échappe ??? hop là, j'édite : (setvar "APERTURE" 20) ... [Edité le 5/10/2006 par Bred]

Bonjour, Je suis en train d'essayer de corriger l'erreur d'une routine concernant le problème du point d'accrochage actif.... comme (initget 1) ;(setq pA (getpoint "\nSpécifiez le point de base : ")) ne fonctionnait pas (ça m'accrochait un point nodal (accro actif) trop pret de mon centre (accro "temporaire")) .... et je ne veux surtout pas annuler au moment de ma commande l'accrochage actif (le nod est prioritaire)..... donc, je pensais faire ça en vl... J'ai repiqué ça ("chez" (gile)) et transformé : (setq AcDoc (vla-get-ActiveDocument (vlax-get-acad-object)) Util (vla-get-Utility AcDoc)) (setq pA (vla-getPoint Util nil "\nSpécifiez le point de base : ")) (initget 1) (setq pA (vlax-safearray->list (vlax-variant-value pA))) .... et bien ça ne fonctionne toujour pas !!!!.... parceque je crois : .... c'est que si je fait un (Princ PA), mon pA est le bon, par contre, quand je lance la suite (command "_copy" sel "" pA ".yz" "@" pause) ....Le point selectionné n'est plus bon..... ce qui veut donc dire que c'est le "_copy" qui me fait l'erreur..... donc je pourrait désactiver l'accrochage actif juste avant le copy.....mais j'ai besoin de mon accrochage actif dans le "pause" !!!!!! ... je suis assez dégouté .... Je ne comprend pas qu'Autocad prime l'accro actif au coordonnée d'un point.... .... y aurait t'il une solution ??? .... merci

... Pour info, la théorie de l'évolution ne parle pas de "dizaines de millions d’autres essais infructueux" mais de "la sélection naturelle"... ce qui rend caduque toutes ton explication... désolé.... En effet, ce n'est pas grâce à des millions d'essais, mais grâce à un seul qui fonctionne, donc qui permet de s'étendre.... Nous, nous sommes le fruit d'une sélection naturelle de primate qui, non pas à force d'essais, mais à force de modification, à pris le meilleur....

Salut, Et si tes éléments de flèches sont des blocs que tu fais "coulissé" l'un par rapport à l'autre à partir de l'axe

En effet, tu as raison, je n'avais pas vu qu'il me faisait une rotation de 1..... Donc tu as raison, c'est bien ce que tu propose qui fonctionne.

Tu peux l'installer à partir du cd d'install....

Je ne comprend pas.... chez moi ça marche... (setq ptab '(0 0 0)) (command "_.insert" "*MonBloc" ptab 1 1 0)

Salut (command "_.insert" "*MonBloc" ptab 1 1 0)

Raaaaa... je suis allé encore trop vite.... C'est la logique même que le point d'insertion dans l'entité d'un bloc soit dans le SCO..... encore une fois merci, (gile).... La réponse 2 avec correction proposé par (gile) : (defun c:ptb (/ Q sel x ent_b) (initget 0 "T") (setq Q (getkword "\n Tous les Blocs < T > ou < Sélec >: ")) (if (= Q nil) (setq sel (ssget '((0 . "INSERT" )))) (setq sel (ssget "_X" '((0 . "INSERT" )))) ) (setq x 0) (if sel (progn (repeat (sslength sel) (setq ent_b (ssname sel x)) (command "_point" (trans (cdr (assoc 10 (entget ent_b)))[b] ent_b 1[/b] )) (setq x (+ x 1)) ) ) ) (princ) )

Re' Par respect pour ceux qui m'ont appris ici à "lisper", j'ai éditer le lisp en réponse 2 afin que les points s'insert quelque soit le SCU (la fonction "trans"). J'ai rajouté aussi la possibilité de faire un choix entre tout les blocs (T) de la collection ou faire une sélection....

Salut, un petit truc rapide : (defun c:ptb (/ Q sel x ent_b) (initget 0 "T") (setq Q (getkword "\n Tous les Blocs < T > ou < Sélec >: ")) (if (= Q nil) (setq sel (ssget '((0 . "INSERT" )))) (setq sel (ssget "_X" '((0 . "INSERT" )))) ) (setq x 0) (if sel (progn (repeat (sslength sel) (setq ent_b (ssname sel x)) (command "_point" (trans (cdr (assoc 10 (entget ent_b))) 0 1)) (setq x (+ x 1)) ) ) ) (princ) ) ... attention, les points ne sont insérer qu'à l'insert des blocs imbriqués, pas à tout les point d'insert des blocs dans le bloc imbriqué !... Si ça te va comme ça, tant mieux (parceque le coup des blocs imbriqués, (gile) m'a épuisé (amicalement) avec !!! et je n'en suis toujour pas revenu !) ------------- j'édite grillé par Tramber ! je suis encore trop lent ! [Edité le 29/9/2006 par Bred][Edité le 29/9/2006 par Bred] [Edité le 29/9/2006 par Bred]

... et ce code est sous quel format ?...

Bon, en fait il y a PLEIN de choses super intérressantes là : C:\Program Files\AutoCAD 2007\Sample\ et particulièrement en Lisp : C:\Program Files\AutoCAD 200x\Sample\VisualLISP ... comme je n'ai pas trouvé de message sur le forum qui en parle je le fait.... même si j'imagine que la plupart des lispeurs confirmé connaisse tout ça... bonne journée!

Salut, Je fait un peu joujou avec le vb.net, et je me suis mis en tête de créer une autre image (Splash Screen) de démarrage dans Autocad.... J'ai fait ça : Public Sub Info() Dim img As New Img_start() img.Show() Thread.Sleep(3000) img.Close() img.Dispose() End Sub ... ça fonctionne... mais quand je rajoute sur l'image des label... il veut pas les afficher... alors j'ai fait ça : Public Sub Main() Dim img As New Img_start() Application.ShowModalDialog(img) Thread.Sleep(3000) img.Hide() img.Dispose() End Sub ... mais elle ne se ferme plus !!! ah si j'avais une fonction Application.CloseModalDialog(img) !!!... mais non.... Pourriez-vous m'aider SVP ? ...merci

Salut, Certainement que vous connaissez, mais j'ai trouvé xdata_variants.lsp dans Autocad, et c'est assez interréssant pour le traitement des xdata. Faites une recherche dans le repertoire racine d'Autocad (Express je crois). Si vous ne le trouvez pas (ça m'étonnerait) je le posterais.

Salut, Je ne sais pas sous 2002, mais sous 2004 je faisais 2 sortes d'impressions différentes dans la même présentation (une en couleur et l'autre en noir et blanc) en choisissant pour un fenêtre les propriété de tirage "rendu" ou "gouraud, et pour l'autre en "filaire2D" ou "caché" ... avec le style en monochrome : le rendu ou le gouraud ne s'imprime qu'en couleur... ... c'est pas vraiment la réponse à ta question, mais ça peut s'en approcher ...

... Y'a des physiciens qui ont peut-être un peu trop lu du Philip K. DICK .. ... plus de réaction de usegomme ??? après toutes les réponses à son derniers message il pourrait nous remercier de lui avoir donner si grand intéret... et je trouve curieux qu'il n'ait rien à répondre.... En aurait t'il "fini" avec la religion ??? (tiens... encore un finalité ?.... oui.... ç'est bien la religion, ça permet d'éviter de se poser des questions !!!... !) [Edité le 21/9/2006 par Bred]