PHILPHIL

HELLO juste un petit truc sur les portes ca sert a rien de coter la porte 93/220 ca change suivant le type de porte metal, bois, et fabricant et suivant si les champs sont droit ou a reccouvrement et l'epaisseur de la porte elle meme l'important c'est le passage libre 90 ect entre montant qui regit les portes code du travail regles handicapé j'en passe et des meilleurs ok je sors phil

hello ok bred je verrais plus tard donc merci a+ phil

hello bred voila j'ai un plan de batiment ici il est en tripode je mets 3 bloc cadre dessus 1 horizontal angle 0 1 vertical angle 90 1 oblique il peut avoir n'importe quel angle en fait pour s'adapter a tous type de batiment http://images.imagehotel.net/x33hab6ve9.jpg le cadre horizontal donne une presentation en paysage le cadre vertical donne une presentation en portrait mais l'oblique donne une presentation en portrait avec le cadre oblique dedans http://images.imagehotel.net/beeua54ewk.jpg un autre angle aurait donne une presentation en paysage avec le cadre oblique j'ai a peut pret pigé que c'est le rapport hauteur / largeur du cadre qui influe sur paysage ou portrait il serait plus sympa que l'on est plutot une presentation en paysage avec le cadre horizontale dedans que la presentation soit alignée en fait au cadre bloc suivant l'angle d'insertion de celui ci comme ca meme le bloc qui est vertical ne serait plus en portrait mais aussi en paysage voili voila merci phil

HELLO bred bon ca date un peu comme post mais voila que j'utilise le lisp a nouveau une fois tous les 5 mois le bloc cadre est un A4 ou A3 ca marche tres bien quand les cadres "blocs" ont un angle de 0 ou 90 degres ca donne des presentations en paysage ou portrait sans probleme mais quand celui ci a certains angle il y a un certains souci la presentation n'est plus aligné au bloc cadre comment modifier ton LISP de base "CEP" pour qu'il recupere l'angle du bloc pour aligner la presentation dessus ce qui devrait normalement ne donner ensuite plus que des presentations en version paysage avec un A4 ou A4 merci de ton aide BRED a+ phil

hello tu veux configurer un traceur ou une imprimante ?? sur un traceur tu peux changer le format pas vraiment sur une imprimante a4 a3 a5 d'office tu dois utiliser "assistant ajouter un traceur" que tu trouves dans un sous repertoire "plotters" en choisissant un traceur hp pas de soucis ca marche, tu as tous les formats que tu veux creer il faut choisir un pilote de traceur heidi pour avoir la possibilite de faire les format que tu veux de memoire suvant la version autocad il se peut que tu dois choisir autre chose que l'imprimante "sur mon ordinateur" pour avoir le"heidi" et choisir une imprimante systeme ou sur reseau voila une piste a+ phil [Edité le 20/3/2009 par PHILPHIL]

hello pour moi ca marche sous aa2009 alt157 reste enfonce sur "alt" en tappant 157 alt0216 reste enfonce sur "alt" en tappant 0216 meme chose %%c different suivant la typo en arial pas de souci meme chose pour les 3 mais en txt .shx non en texte ou mtext a+ phil

hello fonction "raccord" selectionner la ligne entre les deux plans entre le rayon, j'ai tappe 2 valide "c" pour chaine valide reselection de la ligne entre les deux plans la ca selectionne en fait toutes les arretes dans la continuete de la ligne valide c'est fait a+ phil

hello la raccord marche a condition de selectionner aussi le petit bout d'arc de cercle au bout de la ligne raccord de 2 ca marche a+ phil [Edité le 17/3/2009 par PHILPHIL]

hello tu es sur fond gris ?? Ctrl+O pour ouvrir un fichier c'est que tu n'as pas ouvert de fichier et seulement lancer autocad 2009 trop simple ?? je vois que ca a+ phil

hello pour ca tu fais un "wipeout" sous tes fenetres secondaires, flottantes comme ca tu ne verras pas ce qu'il y a en dessous comme tu as du faire une polyligne ou un cercle cherche sur le site chez "gile" il a fait un lisp pour faire des "wipeout" a partir de cercle, polyligne oublie pas de grouper ta fenetre et le "wipeout" ( qui peut devenir invisible mais dans ton cas ca sert a rien) pour etre sur de les deplacer en meme tps a+ phil

hello exactement QUE DALLEE !!!!! envoie une image car je vois pas ou sont les hachures la dedans et une fenetre principale ou flottante je vois aucune difference la taille peut etre pour toi ??? le fait qu'elles soient dessus pour toi elles sont flottantes ?? tu confonds pas espace papier ( fenetre principale )et espace objet ( fenetre flottantes ) par hazard ?? si c'est le cas ce qui est dans l'espace papier ne se verra jamais dans l'espace objet ( onglet objet ) sauf si tu le copies avec la fonction "CHSPACE" et encore ca risque de le mettre n'importe ou refait un carre , un rond "jaune vert bleu cyan" dans ton espace objet sur la zone ou tu fais un details a 0.00001 millimetre pret ca devrait aller cherche pas midi a 14h00 non plus pas sur d'avoir été clair dans mon explication on doit pas avoir les meme methode de boulot sous autocad a+ phil jouer avec son autocad

hello faut juste changer le type de style de cote et le nom du calque (defun C:LII () (setq CAV (getvar "clayer")) (if (= (tblsearch "layer" "H_COTE INTERIEURE") NIL) (command "-calque" "n" "H_COTE INTERIEURE" "co" "6" "H_COTE INTERIEURE" "") ) (command "-dimstyle" "R" "COTE-NORMAL-50") (command "-calque" "ch" "H_COTE INTERIEURE" "") (command "cotlin" PAUSE PAUSE) (setvar "clayer" CAV) (princ) ) phil

hello dsl moi non plus tu parles de quelles fenetres ?? dans une presentation ?? car hachurer une fenetre je vois pas comment ha moins que ce soient celles de batiment sinon si tu as plusieurs fenetres superposées les une sur les autres dans une presentations et que tu veuilles passer de l'une a l'autre, pour ca, ca doit etre Ctrl+R DE MEMOIRE sinon pour faire apparaitre un calque dans une fenetre et pas dans l'autre tu vas dans la fenetre (EO) et tu joues avec 'GEL DE LA FENETRE" dans le gestionnaire des proprietes des calques sinon je vois pas a+ phil

hello dans l'autre sens mtext to text trop simple "decomposer" trop facile fallait que je réponde dsl je sors phil

hello tous une petition pour windows 7 64 bits gratuite en remplacement de vista de M..... je signe tout de suite REBCAO et des ecrans bleus de plantage memoire tu en as souvent ??? 2 fois par semaine au moins phil

hello gile ok merci a+ phil

hello gile ton LISp c:ppl c:cpl (cleanpline) est bien utile pour les polylignes penses tu qu'il soit facilement modifiable pour ce genre d'entite ?? c'est une surface AEC de autodesk architecture avec des points formant des lignes colineaires ou un petit nettoyage serait le bien venue histoire d'aleger la gestion si possible facilement bien sur et sans trop de boulot merci phil nettoyé [Edité le 24/2/2009 par PHILPHIL]

hello je veux pas etre mechant tous ce que tu decris la ca doit etre un metier apparement ca me fait penser a une réponse de commercial "c'est pas dur tu appuis sur un bouton et ca fait tout seul" pour répondre quand meme oui il doit bien y avoir un LISP mais a ce niveau ca s'appelle un programme specifique commercial désolé je dois etre dans un mauvais jour phil

HELLO PATRICK merci ca marche mieux :) :D bon week end gooo too neigeeee phil

HELLO PATRICK est ce qu'il n'y aurait pas un petit souci avec le *.zip GEF 2.20 il manque pas le fichier *.lsp ??? a+ bon week end phil

hello j'ai modifie le code dans le message original enfin presque y'a une tite manip a faire sinon le decalage sur Y est du justement au fait que dans les propriétés des cotes déplacement du texte tu dois avoir tes cotes avec "conserver la ligne de cote avec le texte" ou inversement j'ai pas trouver la solution en LISP pour forcer une ou l'autre des ses options pour regler le probleme une fois pour toute a+ phil [Edité le 5/2/2009 par PHILPHIL]

hello c'est ce foutu code qui n'etait pas passé dans le LISp il faut enlever le blanc entre "< or" et "> or" voir LIsp à corrigé plus haut a+ phil [Edité le 5/2/2009 par PHILPHIL]

hello tous jalna ca marche a 90% suivant si la cote est force ou pas avec une ligne option dans les propriete "déplacement du texte " ; ------------------------------------------------------- ; MODIFICATION DE L EMPLACEMENT DU TEXTE DE COTE A DROITE ; ------------------------------------------------------- (defun C:CD () (setvar "cmdecho" 0) (setq OSM (getvar "osmode")) (setq DECATEXTECOTE (atof (getcfg "APPDATA/DECATEXTECOTE"))) (setq TMP (getdist (strcat "\nENTRER LE DECALAGE DE TEXTE DE COTE <" (rtos DECATEXTECOTE 2 8) ">: "))) (if TMP (setq DECATEXTECOTE TMP) ) (setvar "osmode" 0) (prompt "\nCLIQUER SUR LE(S) COTE(S) A MODIFIER :") (setq ENTX NIL) (while (null ENTX) (setq ENTX (ssget (list (cons -4 " [surligneur] < or[/surligneur]") (cons 0 "DIMENSION") (cons -4 " [surligneur] or >[/surligneur]"))))) (setq COMPT 0) (setq COM (sslength ENTX)) (while (< COMPT COM) (progn (setq SJ2 (entget (ssname ENTX COMPT))) (setq POINT10 (cdr (assoc 10 SJ2)) POINT13 (cdr (assoc 13 SJ2)) POINT14 (cdr (assoc 14 SJ2)) ANGCOTE (cdr (assoc 50 SJ2)) LONGCOTE (cdr (assoc 42 SJ2)) CODEMPLA (cdr (assoc 70 SJ2)) ) (command "scu" "z" POINT10 (polar POINT10 ANGCOTE 10)) (if (> (car (trans POINT13 0 1)) (car (trans POINT10 0 1))) (progn (setq DIST (+ LONGCOTE DECATEXTECOTE))) (progn (setq DIST DECATEXTECOTE)) ) (command "scu" "p") ) (if (or (= CODEMPLA 33) (= CODEMPLA 161)) (progn (setq ANGLECOTE2 (angle POINT13 POINT14)) (setq POINT11 (polar POINT10 ANGLECOTE2 DIST)) (setq SJ2 (subst (cons 70 160) (assoc 70 SJ2) SJ2)) (entmod SJ2) (setq SJ2 (subst (cons 11 POINT11) (assoc 11 SJ2) SJ2)) (entmod SJ2) ) ) (if (or (= CODEMPLA 32) (= CODEMPLA 160)) (progn (setq POINT11 (polar POINT10 ANGCOTE DIST)) (setq SJ2 (subst (cons 70 160) (assoc 70 SJ2) SJ2)) (entmod SJ2) (setq SJ2 (subst (cons 11 POINT11) (assoc 11 SJ2) SJ2)) (entmod SJ2) ) ) (entmod SJ2) (setq COMPT (1+ COMPT)) ) (setvar "osmode" OSM) (setcfg "APPDATA/DECATEXTECOTE" (rtos DECATEXTECOTE 2 8)) (princ) ) ; ------------------------------------------------------- ; MODIFICATION DE L EMPLACEMENT DU TEXTE DE COTE A GAUCHE ; ------------------------------------------------------- (defun C:CG () (setvar "cmdecho" 0) (setq OSM (getvar "osmode")) (setq DECATEXTECOTE (atof (getcfg "APPDATA/DECATEXTECOTE"))) (setq TMP (getdist (strcat "\nENTRER LE DECALAGE DE TEXTE DE COTE <" (rtos DECATEXTECOTE 2 8) ">: "))) (if TMP (setq DECATEXTECOTE TMP) ) (setvar "osmode" 0) (prompt "\nCLIQUER SUR LE(S) COTE(S) A MODIFIER :") (setq ENTX NIL) (while (null ENTX) (setq ENTX (ssget (list (cons -4 " [surligneur] < or[/surligneur]") (cons 0 "DIMENSION") (cons -4 " [surligneur] or >[/surligneur]"))))) (setq COMPT 0) (setq COM (sslength ENTX)) (while (< COMPT COM) (progn (setq SJ2 (entget (ssname ENTX COMPT))) (setq POINT10 (cdr (assoc 10 SJ2)) POINT13 (cdr (assoc 13 SJ2)) POINT14 (cdr (assoc 14 SJ2)) ANGCOTE (cdr (assoc 50 SJ2)) LONGCOTE (cdr (assoc 42 SJ2)) CODEMPLA (cdr (assoc 70 SJ2)) ) (command "scu" "z" POINT10 (polar POINT10 ANGCOTE 10)) (if (> (car (trans POINT13 0 1)) (car (trans POINT10 0 1))) (progn (setq DIST DECATEXTECOTE)) (progn (setq DIST (+ LONGCOTE DECATEXTECOTE))) ) (command "scu" "p") ) (if (or (= CODEMPLA 33) (= CODEMPLA 161)) (progn (setq ANGLECOTE2 (angle POINT13 POINT14)) (setq POINT11 (polar POINT10 ANGLECOTE2 (- DIST))) (setq SJ2 (subst (cons 70 160) (assoc 70 SJ2) SJ2)) (entmod SJ2) (setq SJ2 (subst (cons 11 POINT11) (assoc 11 SJ2) SJ2)) (entmod SJ2) ) ) (if (or (= CODEMPLA 32) (= CODEMPLA 160)) (progn (setq POINT11 (polar POINT10 ANGCOTE (- DIST))) (setq SJ2 (subst (cons 70 160) (assoc 70 SJ2) SJ2)) (entmod SJ2) (setq SJ2 (subst (cons 11 POINT11) (assoc 11 SJ2) SJ2)) (entmod SJ2) ) ) (entmod SJ2) (setq COMPT (1+ COMPT)) ) (setvar "osmode" OSM) (setcfg "APPDATA/DECATEXTECOTE" (rtos DECATEXTECOTE 2 8)) (princ) ) phil [Edité le 5/2/2009 par PHILPHIL]

hello +1 recu et effacer phil

HELLO TOUS ouai j'ai le meme probleme avec les miniatures c'est lenttttttt autre souci aussi quand on selectionne plusieurs onglets pour publier par exemple et que apres tu reclique sur la premiere presentation selectionnée le logiciel ne veut pas desélectionner les autres faut cliquer sur la deuxieme pour recliquer sur la une GALEREEEEE et perte de temps a+ phil