usegomme

si le texte est deja efface il faut activer le cadre des wipeout

>>> La matière qui est sortie de nulle part, ce n'est pas une prétention, c'est un fait, on l'utilise tous les jours Vous avez bien fait de me rappeller que la matiere est de l'energie , car là vous êtes malhonnete , car sans un gros apport d'energie et un materiel sophistique le Cern ne ferai pas grand chose , alors que le vide lui avec ses petits bras musclés nous à fait un fantastique big bang. Effectivement je suis presque k o avec avec tous ce que vous m'avez mis dans la tête , mais faites gaffe les gars ,comme a dit steven ,on est dans la matrice . Avec le peu de force qui me reste , je rajouterai que ce que peux parfois ressentir un croyant qui veut aimer Dieu ,est hors cadre scientifique . Et si cela ne transparait pas ce n'est dû qu'à nos carences (celles des croyants) ou disont manque d'amour , jusqu' a faire l'effet contraire (le départ de la discution). Autrement dit , si ce que j'apprend par les scientifiques m'intêresse vraiment , mes experiences "interieures" me suffisent pour savoir que Dieu existe même si je suis très loin du compte en ce qui concerne mon "contact avec dieu" et mon épanouissement personnel .

Bien sûr qu'on peut penser que la science n'a pas besoin de dieu, puisque celle-ci passe son temps ( je simplifie) à inventorier ,décortiquer et comprendre ce qui existent déjà. C'est pas parce que je démonte le moteur de ma bagnole et que je n'ai jamais vu l'usine où elle a été assemblée que cette dernière n'existe pas. Vous continuez à trouver intelligent de prétendre que la matière est sortie de nulle part malgré nos connaissances scientifiques , pour moi c'est aussi de l'obscurantisme . Votre approche ( !!) de Dieu est mauvaise . C'est Lui le maitre du jeu , vous ne le trouverez que s'Il le veut . C'est de l'intérieur de vous même que votre démarche doit commencer . Et si c'était vrai , pourquoi, comment , un peu de curiosité quoi ! Et de sensibilité . Il n'y a pas que des âneries dans les livres. Et ça ne vous enlève pas votre libre arbitre .

J'ai vu l'émission, et j'ai beau être "croyant" , je n'en suis pas moins tombé sur le cul . C'est bien ces sornettes qui m'avaient fait devenir athé dans ma jeunesse. C'est tout de même incroyable qu'autant de gens ne puissent réfléchir sans ces écrits soit disant saint et autres croyances farfelues, pour faire un peu tri ,sans prétension , entre le vrai du faux . Malgré l'éclairage scientifique notre monde ne sort que lentement et péniblement de l'obscurantisme . Il faut dire que la vrai intelligence va de pair avec "les bons sentiments ", on le voit bien avec le totalitarisme religieux ou non. Ceci dit , quand je lis certains de vos commentaires , je doutes fort que vous ayez ,"le camp des athés " ,le monopole de l'intelligence ou devrai-je écrire que le camp des croyants ai le monopole de la non-intelligence . Il est vrai qu'il est difficile de ne pas éprouver un profond rejet face à l'intégrisme ( entre autres ) d'oü qu'il soit.

Merci pour l'info , l'article est très intéressant.

screugneugneu! fonctionnaient . En tout cas ça me plait beaucoup et je ne vais pas tarder à virer mon vieux lisp que j'utilise dans les schémas , pour inserer les blocs et couper les lignes .

Je m'y étais peut être mal pris . Il me semble que j'avais des ennuis avec les wblocs ,en tout cas mes essais fonctionnés mieux avec la 2002. Du coup j'avais laissé tomber.

Avec Acad2006 j'étais resté sur ma faim avec le souhait de NETIK sur ce sujet . Mais à midi je me suis aperçu qu' avec Acad2007 je pouvais faire des blocs et wblocs "autocoupants" en utilisant les wipeouts contrairement à 2006 où ça merdait. Ca marche très bien ,y compris avec la palette , du moins pour les qlqs essais que j'ai fait. Pour ceux qui n'ont pas encore essayés , il faut que l'objet wipeout soit créé avant les objets du bloc. (changer l'ordre de tracé n' est pas satisfaisant). 1- menu déroulant dessin : cde Nettoyer >cadre > Actif 2- cde Nettoyer : tracez un wipeout 3- si nouveaux objets pour le bloc :tracez les sur le wipeout 3bis- si bloc existant : décomposez le , les objets résultants ne doivent pas être utilisés directement ,mais COPIER sur le wipeout et les anciens effacés. 4-Redimensionner le wipeout ( poignées) pour qu'il puisse cacher l'arrière plan du futur bloc. 5-recomposez le bloc en incluant le wipeout. 6-si dossier bibliothèque : Wbloc du bloc . 7- cde Nettoyer > Cadre > Inactif. 8- il y a plus qu' à inserer le bloc et il n' y a pas de problème avec les attributs. Avant de modifier les bibliothèques,il serait intêressant de savoir si certains ont rencontré des problèmes . Merci. Salut ,bon weekend!

I pour Inserer existe déjà ,à moins que tu veuilles insérer un bloc en particulier ? :casstet:

Stretch comme mstretch 2006 2007 ne permettent pas d' etirer simultanement 2 ou + sommets d'une même entité , contrairement au mstretch antérieur . Mstretch est donc obsolete , je pense. Le "problème" ne vient pas du lisp car il n'a pas l'air d' avoir changer et en tout cas le lisp 2002 ne fonctionne pas d' avantage sous 2007.

Si ,je regrette egalement que mstretch n'est plus d'utilite , mais je n'ai pas de solution .

Bien que le gestionnaire des etats de calques soient integres , layer manager fonctionne toujours pour reutiliser les filtres crees avec lui . commande : LMAN. Malheureusement je ne crois pas que l'on puisse les exporter de l'un vers l'autre .

Si tu precises comme sont des blocs , point d'insertion et orientation , je peux te faire qlq chose à partir d'un de mes lisp. Par exemple pt insertion a gauche et bloc oriente a droite ( 0°) ,ce qui permet de definir facilement les deux points de coupure . En souhaitant que ce ne soit pas le bordel de bloc.

Si tu as pu mettre à l'écran (en bordure) une barre d'outil autocad , clique ,avec bouton droit dans l'espace gris juste à coté et normalement la liste des menus chargés doit apparaitre ,et s'ils ont des barres d'outils ,on peut les activer.

Effectivement , et quant a mon petit mot plus haut , l'ordre n'a rien à voir dans l'affaire.Grosse fatigue !

Juste une remarque (tardive) , avec dans l'ordre Cde et select objet ,il n'y a pas de difficulté à avoir le centroîde d'un rectangle avec REPEROBJ ,en désignant les milieux de deux cotés adjacents.

Je suis content qu'il vous convienne ,et qu'il fonctionne .Aussi je lui ai fait un brin de toilette. ;ECR Etire Coté Rectangle ou polyligne 21-2-2006 (defun err-ecr (msg) (if ent (progn (redraw ent 4) (setq ent nil))) (setvar "snapang" snpg) (setvar "orthomode" orthm) (setvar "snapstyl" snpstyl) (setvar "autosnap" otosnap) (setq *error* m:err-ecr m:err-ecr nil) (princ ) ) (defun mod_s ( ent lent typent pd pf / l1 s xs ys xp yp i ) (setq pd (trans pd 1 0)) (setq ok nil) (if (= typent "POLYLINE") (progn (setq l1 (entget (entnext (cdr (assoc -1 lent))))) ;analyse sommets (while (and (= ok nil) (/= "SEQEND" (cdr (assoc 0 l1)))) (setq s (cdr (assoc 10 l1))) (setq xs (fix (car s))) (setq ys (fix (cadr s))) (setq xp (fix (car pd))) (setq yp (fix (cadr pd))) (if (and (equal xs xp)(equal ys yp)) ;modif sommet (progn (setq ok T) (setq pf (trans pf 1 0)) (setq l1 (subst (cons 10 pf) (assoc 10 l1) l1)) (entmod l1) (entupd ent) ) (setq l1 (entget (entnext (cdr (assoc -1 l1))))) ) ) ;fin while ) ;fin progn (progn ;; pour LWPOLYLINE (setq i 9) (while (and (= ok nil) (nth (setq i (+ i 1)) lent)) (if (= 10 (car (nth i lent))) (progn (setq s (cdr (nth i lent))) (setq xs (fix (car s))) (setq ys (fix (cadr s))) (setq xp (fix (car pd))) (setq yp (fix (cadr pd))) (if (and (equal xs xp)(equal ys yp)) ;modif sommet (progn (setq ok T) (setq pf (trans pf 1 0)) (setq lent (subst (cons 10 pf) (nth i lent) lent)) (entmod lent) (entupd ent) ) ;fin progn ) ; fin if ) ;fin progn ) ; fin if ) ;fin while ) ;fin progn ) ) (defun c:ECR (/ sel lent typent p0 p1 p2 p3 p4 p5 p6 snpg orthm otosnap snpstyl disetir angetir) (setq m:err-ecr *error* *error* err-ecr) (setq otosnap (getvar "autosnap")) (setq snpstyl (getvar "snapstyl")) (setvar "snapstyl" 0) (setq snpg (getvar "snapang")) (setq orthm (getvar "orthomode")) (setq sel (entsel "\n Choix Polyligne à Modifier :")) (setq ent (car sel)) (setq lent (entget ent)) (setq typent (cdr (assoc 0 lent))) (cond ((or (= typent "POLYLINE")(= typent "LWPOLYLINE")) (redraw ent 3) (setq p0 (cadr sel)) (setq p1 (osnap p0 "_endp")) (setq p2 (osnap p0 "_mid")) (setq ang (angle p1 p2)) (setq dis (distance p1 p2)) (setq p3 (polar p2 ang dis)) (setvar "snapang" ang) (setvar "orthomode" 1) (setq p4 (getpoint "\n nouvelle extremite:" p2)) (setq angetir (angle p2 p4)) (setq disetir (distance p2 p4)) (setq p5 (polar p1 angetir disetir)) (setq p6 (polar p3 angetir disetir)) (mod_s ent lent typent p1 p5) ;modif 1 er sommet ; mise a jour de la liste necessaire pour LWPOLYLIGNE avant modif 2 eme sommet (setq lent (entget ent)) (mod_s ent lent typent p3 p6) ; modif 2 eme sommet (setq ent nil) (setvar "snapang" snpg) (setvar "orthomode" orthm) (setvar "snapstyl" snpstyl) (setvar "autosnap" otosnap) (setq *error* m:err-ecr m:err-ecr nil) (princ) ) (T (setq ent nil) (prompt "CE N'EST PAS UNE POLYLIGNE ") (princ)) ) )

Est -ce que "Non parallèle au scu " signifie que c'est en 3D ?

:) Je t'ai construit un lisp rapidement à partir de mes vieilleries ,il manque la gestion des erreurs mais ça marche même sur un segment de polyligne ,en deux clics l'affaire est réglée ,du moins sous autocad 2002 , pour 2005 ? Si un objet reste en surbrillance suite arret manip, il suffit de le reselectionner avec les poignée puis faire échap. ECR Etire Coté Rectangle 17-2-2006 avec autocad 2002 (defun mod_s ( ent lent typent pd pf / l1 s xs ys xp yp i) (setq pd (trans pd 1 0)) (setq ok nil) (if (= typent "POLYLINE") (progn (setq l1 (entget (entnext (cdr (assoc -1 lent))))) ;analyse sommets (while (and (= ok nil) (/= "SEQEND" (cdr (assoc 0 l1)))) (setq s (cdr (assoc 10 l1))) (setq xs (fix (car s))) (setq ys (fix (cadr s))) (setq xp (fix (car pd))) (setq yp (fix (cadr pd))) (if (and (equal xs xp)(equal ys yp)) ;modif sommet (progn (setq ok T) (setq pf (trans pf 1 0)) (setq l1 (subst (cons 10 pf) (assoc 10 l1) l1)) (entmod l1) (entupd ent) ) (setq l1 (entget (entnext (cdr (assoc -1 l1))))) ) ) ;fin while ) ;fin progn (progn ;; pour LWPOLYLINE (setq i 9) (while (and (= ok nil) (nth (setq i (+ i 1)) lent)) (if (= 10 (car (nth i lent))) (progn (setq s (cdr (nth i lent))) (setq xs (fix (car s))) (setq ys (fix (cadr s))) (setq xp (fix (car pd))) (setq yp (fix (cadr pd))) (if (and (equal xs xp)(equal ys yp)) ;modif sommet (progn (setq ok T) (setq pf (trans pf 1 0)) (setq lent (subst (cons 10 pf) (nth i lent) lent)) (entmod lent) (entupd ent) ) ;fin progn ) ; fin if ) ;fin progn ) ; fin if ) ;fin while ) ;fin progn ) ) (defun c:ECR (/ sel ent lent typent p0 p1 p2 p3 p4 snpg orthm otosnap snpstyl) (setq otosnap (getvar "autosnap")) (setq snpstyl (getvar "snapstyl")) (setvar "snapstyl" 0) (setq snpg (getvar "snapang")) (setq orthm (getvar "orthomode")) (setq sel (entsel "\n Choix Objet a Modifier :")) (setq ent (car sel)) (setq lent (entget ent)) (setq typent (cdr (assoc 0 lent))) (cond ((or (= typent "POLYLINE")(= typent "LWPOLYLINE")) (redraw ent 3) (setq p0 (cadr sel)) (setq p1 (osnap p0 "_endp")) (setq p2 (osnap p0 "_mid")) (setq ang (angle p1 p2)) (setq dis (distance p1 p2)) (setq p3 (polar p2 ang dis)) (setvar "snapang" ang) (setvar "orthomode" 1) (setq p4 (getpoint "\n nouvelle extremite:" p2)) (setq angetir (angle p2 p4)) (setq disetir (distance p2 p4)) (setq p5 (polar p1 angetir disetir)) (setq p6 (polar p3 angetir disetir)) (mod_s ent lent typent p1 p5) ;modif 1 er sommet ; mise a jour de la liste necessaire pour LWPOLYLIGNE avant modif 2 eme sommet (setq ent (car sel)) (setq lent (entget ent)) (mod_s ent lent typent p3 p6) ; modif 2 eme sommet (setvar "snapang" snpg) (setvar "orthomode" orthm) (setvar "snapstyl" snpstyl) (setvar "autosnap" otosnap) ) ) )

Rectification ,sous 2002 avec les poignées ,je n'ai pas reproduit le problème ,par contre avec un de mes lisp, je gagne à tous les coups.

Pour ce que j'ai pu constater , ce phénomène vient de l'associativité de la cote avec le(s) objet(s).lorsqu'une attache est déplacée ,avecles poignées par exemple, d'un objet à un autre , si ensuite on modifie le premier objet , la cote qui a gardée la mémoire de ses origines se met à jour avec ce dernier sans prévenir . Pour utiliser l'associativité cote/objet , il faut mieux être méthodique .