zebulon_

regarde la commande REPERE (_plan). Elle te permet de tourner la vue selon le scu courant. (command "_plan" "_c") Regarde aussi la variable UCSFOLLOW 0 Le SCU n'a pas d'incidence sur la vue. 1Tout changement de SCU provoque le passage à une vue en plan du nouveau SCU dans la fenêtre courante. amicalement Zebulon_

C'est pour faire un copier (le lisp ww) à partir d'un fichier et un coller (le lisp ii) dans un autre fichier de manière à ce que les coordonnées générales du fichiers d'origine se retrouvent bien pile au même endroit dans le fichier de destination. L'équivalent de ce que tu fais en copiant des objets à 10m à droite (ou à gauche ou au dessus ou en dessous). Mais là, ça copie d'un fichier à l'autre en conservant les coordonnées du scu général. Tu me diras, il y a la possibilité de faire un "copier / coller vers les coordonnées d'origine" disponible dans le menu édition. Mais le "coller vers les coordonnées d'origine" le fait suivant le scu local. Cela peut être pratique dans certain cas, mais pas dans celui qui nous intéresse. Amicalement Zebulon_

Bonjour, de toute façon, tu n'as pas le choix à partir du moment où tu travailles à plusieurs sur le même projet. une affirmation qui n'engage que toi, bien entendu. Moi, j'aime bien quand les étages "plombent" bien, et j'aime bien le voir de mes yeux. Un petit cadeau pour toi, esbe, quand tu dois copier des éléments d'un étage à l'autre : (defun C:WW (/ OLDOS OBJETS NOMFIC) ; Copie (WBLOC) d'une sélection dans un fichier temporaire (setvar "cmdecho" 0) (setq OLDOS (getvar"osmode")) (setvar "osmode" 0) (if (not (setq OBJETS (cadr (ssgetfirst)))) (setq OBJETS (ssget)) ) (setq NOMFIC (strcat (getvar "TEMPPREFIX") "temp.dwg")) (command "_ucs" "_w") (if (findfile NOMFIC) (command "_wblock" NOMFIC "_y" "" '(0 0 0) OBJETS "") (command "_wblock" NOMFIC "" '(0 0 0) OBJETS "") ) (command "_oops") (command "_ucs" "_p") (setvar "osmode" OLDOS) (princ) ) ; WW (defun C:II (/ OLDOS NOMFIC) (setq NOMFIC (strcat (getvar "TEMPPREFIX") "temp.dwg")) (if (findfile NOMFIC) (progn ; Coller de la sélection dans un autre dessin (setvar "cmdecho" 0) (command "_ucs" "_w") (setq OLDOS (getvar"osmode")) (setvar "osmode" 0) ;; insérer le bloc temporaire en le décomposant (command "_insert" (strcat "*" NOMFIC) '(0 0 0) "1" "0") (command "_ucs" "_p") (setvar "osmode" OLDOS) ) (alert (strcat "Fichier temporaire\n" NOMFIC "\nnon trouvé")) ) (princ) ) ; II WW qui fait le COPIER et II qui fait le coller, mais toujours suivant le scu général (contrairement au copier/coller suivant les coordonnées d'origine qui reste dans le scu local). Avec ça, je suis sûr que ça plombe bien. NB : (strcat (getvar "TEMPPREFIX") "temp.dwg") ne fonctionnera qu'avec des version supérieure à 2004. Sinon il faut remplacer par "c:\\temp\\temp.dwg" et avoir créé c:\temp au préalable. Amicalement Zebulon_ [Edité le 26/3/2007 par zebulon_]

ils étaient peut être facile à bluffer ? :) Amicalement Zébulon_ qui s'entraine aussi dans le lancé d'esbé

pour le tram, c'était un groupement EEG - Coteba. Je faisais partie d'EEG. Maintenant, EEG s'appelle Arcadis http://www.arcadis-fr.com/About+us/ Je n'y suis plus salarié, mais je bosse toujours un peu pour eux, mais plus exclusivement. Amicalement Zebulon_

Bonjour, je viens mettre mon petit grain de sel. Pour les différents niveaux, je travaille aussi comme jalna. Les xrefs, associées avec des copier/coller vers les coordonnées d'origine, c'est ce que j'utilise tout le temps, quand je fais du bâtiment. Quand je fais du génie civil, c'est pareil. Sauf qu'on ne manipule pas plusieurs étages, mais plusieurs éléments : un fond de plan topo, un projet routier, un coffrage de tablier, de culée de pile ... Chaque élément dans un fichier à part, mais comme pour chaque fichier le scu général correspond aux coordonnées lambert, on s'y retrouve facilement. Mettre tout dans le même fichier, c'est bien pour de petits projets parce qu'ils ne nécessitent peut être pas la grosse artillerie (ça c'est pour le sergent), mais si le fichier unique commence à ressembler à une grosse poubelle ventrue, il vaut peut être mieux séparer les choses. Et si tu mets 3 plombes à ouvrir un gros fichier, en priant le bon dieu que ton autocad ne te plante pas en route, ce n'est pas mieux que de devoir ouvrir plusieurs fichiers plus petits. En plus, si tu flingues ton fichier ou tout est dedans, hé bien, tu as tout perdu. Et si tu as plusieurs plans dans ton fichier (plusieurs onglets avec différents cartouches) et que tu dois en indicer un et pas les autres, quel indice tu donnes à ton fichier ? D'un autre côté, si tu travaille avec des xrefs et que tu modifies un fichier qui est appelé en xref ailleurs, il ne faut pas oublier d'indicer également tous ces plans, puisque la modification va se reporter automatiquement partout. Le tout automatique peut aussi jouer des tours. Moi, je milite pour la xref. Quand j'ai commencé à travailler, j'ai eu la chance d'apprendre à dessiner sur une planche à dessin. Et là aussi, on faisait un calque par plan et on les superposaient de temps en temps, au besoin. Ce n'est pas que pour faire des tirages que le calques étaient transparent. Et si on voulait dessiner un projet sur un fond de plan topographique (par exemple), on faisait un contre-calque. Le plan topo était imprimé sur l'arrière du calque et on dessinait le projet sur l'avant. Comme ça on ne risquait pas de gratter des éléments du plan topo en voulant gratter des éléments du projet. Le contre-calque, l'ancêtre de la xref. Comme quoi, on n'a rien inventé. Amicalement un ancien collaborateur d'une cellule de synthèse (EDI Tram ligne B - Strasbourg) Zebulon_

ou peut être un XDELIM qui ne montre qu'une partie d'une xref. relancer XDELIM pour supprimer le contour précédent. Amicalement Searchincad (and Findincad sometimes...)

Bonjour, j'ai fait une polyligne de ce style http://img175.imageshack.us/img175/4118/offset1ou2.jpg quand je fais un décaler avec cette polyligne, ça me donne http://img179.imageshack.us/img179/2995/offset2qi3.jpg c'est joli, mais j'aimerais avoir http://img151.imageshack.us/img151/4089/offset3tu5.jpg c'est possible d'expliquer à la commande _offset que je préfère la 2ème solution à la première ? Merci Amicalement Zebulon_

Bonjour, avec ma version 2007, j'ai utilisé le CUI pour réaffecter une commande à la touche F1. Et comme 99 fois sur 100, j'appuie sur F1 alors que je voulais appuyer sur esc, j'ai redéfini la touche F1 avec ^C^C. Mais tu as posté ta question dans le forum autocad 2005. Et là, je crois qu'il n'y a pas encore de CUI. Comme je suis passé directement de la 2004 à la 2007, faut que je me souvienne de la manière de le faire avec la 2004. Sur la 2005, ça doit être pareil. Donc : 1°) tu commence par chercher le fichier AutoCAD.mns que tu trouveras quelque part ici C:\Documents and Settings\nom_utilisateur\Application Data\Autodesk\AutoCAD 2005\R16.0\fra\Support\acad.mns ça ce peut que ce soit un répertoire caché. 2°) tu te fais une copie de sauvegarde de ce fichiers (juste au cas où ...) 3°) tu édites AutoCAD.mns avec Bloc-Note 3°) tu trouves la section ***ACCELERATORS 4°) tu rajoutes une ligne dans cette section (juste en dessous de ***ACCELERATORS, par exemple) ["F1"]^C^C pour avoir quelque chose du style ***ACCELERATORS ["F1"]^C^C ID_Hyperlink [CONTROL+"K"] [CONTROL+"L"]^O [CONTROL+"R"]^V ID_SelAll [CONTROL+"A"] ID_Copyclip [CONTROL+TOOLBAR+"C"] ID_New [CONTROL+"N"] ID_Open [CONTROL+TOOLBAR+"O"] ID_Print [CONTROL+TOOLBAR+"P"] 5°) tu sauvegardes et tu (re)démarre autocad. Voilà, ça devrait le faire Amicalement Zebulon_

Bonjour, je viens de m'apercevoir avec une joie indescriptible qu'on avait enfin accès à une cotation de longueur d'arc. Comme je suis passé de la version 2004 à la 2007, je ne sais pas depuis quand (la 2006 ?) D'un autre côté, on pleure tous pour nos magnifiques lisp de cotation d'arc qui deviennent caduques :calim: Comme quoi, tout finit par arriver... Bon, si ça avait été fait tout de suite, on ne se serait pas fatigué à faire un lisp, qui ne permet au mieux que d'avoir une cote angulaire éditée (donc pas associative) Amicalement Zebulon_

ça y est, j'ai compris. une cote pivotée - décimal : 0 binaire : 0 une cote alignée - décimal : 1 binaire : 1 une cote angulaire - décimal : 2 binaire : 10 une cote diamètre - décimal : 3 binaire : 11 une cote rayon - décimal : 4 binaire : 100 une cote ang. 3pts - décimal : 5 binaire : 101 une cote superposée - décimal : 6 binaire : 110 Donc le "&1" est valable pour les valeurs décimales 1, 3 et 5 d'où la nécessité du "not". Et, pour la même raison, un "&0" est valable pour les valeurs décimales 0, 2, 4 et 6. Si je veux pouvoir sélectionner uniquement les cotes pivotées (décimal 0) ou les cotes alignées (décimal 1), ça donne quelque chose comme ça : (ssget '( (0 . "DIMENSION") (-4 . "< OR") (-4 . "< AND") (-4 . "&=") (70 . 0) (-4 . "< NOT") (-4 . "< OR") (-4 . "&=") (70 . 2) (-4 . "&=") (70 . 4) (-4 . "&=") (70 . 6) (-4 . "OR>") (-4 . "NOT>") (-4 . "AND>") (-4 . "< AND") (-4 . "&=") (70 . 1) (-4 . "< NOT") (-4 . "< OR") (-4 . "&=") (70 . 3) (-4 . "&=") (70 . 5) (-4 . "OR>") (-4 . "NOT>") (-4 . "AND>") (-4 . "OR>") ) ) Vraiment ennuyeux de ne pas avoir de bit logique ;) Amicalement Zebulon_

Ce que je voulais dire, c'est que, quand on écrit (ssget (list (cons 0 "DIMENSION") (cons 100 "AcDbAlignedDimension")) le filtre ne filtre que les objets de type DIMENSION, quels qu'ils soient. Lisp ne tient pas compte de (cons 100 "AcDbAlignedDimension")), puisqu'il permet de sélectionner par exemple des cotes de rayon. Pour ce qui est de la solution de Bonuscad, je suis en train d'essayer de comprendre ... Amicalement Zebulon_

donc si j'ai bien compris, il faut que je pioche les valeurs 1 pour les cotes alignées et les valeurs 0 pour les cotes pivotées. Je vais regarder ça de plus prêt et je vous tiens au courant. Pour ce qui est du code 100, je pense que ça ne marche pas parce que ce code n'est pas unique. (ssget (list (cons 0 "DIMENSION") (cons 100 "AcDbAlignedDimension"))) doit revenir au même que d'écrire (ssget '((0 . "DIMENSION") (100 . "AcDbAlignedDimension"))) et là on constate qu'on peut sélectionner tout type de cotes (angulaires etc ...) Merci Amicalement Zebulon_

Bonjour, je souhaite filtrer avec ssget les cotes alignées. Uniquement les cotes, j'y arrive avec (ssget '(( 0 . "DIMENSION"))) Mais, des cotes, il y en a de différents type et je ne voudrais sélectionner que les AcDbAlignedDimension Je pensais m'en sortir avec (ssget '((0 . "DIMENSION") (100 . "AcDbAlignedDimension"))) mais ça ne marche pas Si quelqu'un a une idée Amicalement Zebulon_

Peut être un problème de précision ? Cela affiche 0 du fait des UNITES, mais c'est en fait 0.0001 ? Sinon, un petit lisp qui remet tout les z à 0 ; Super-simple little routine to force ; all z-coordinants in a drawing to zero ; (with thanks to Randy Richardson and ; the Autodesk NG's). ; ; From Tee Square Graphics - 01/28/2000 (defun C:SMASH ( ) (command "_.move" "_all" "" '(0 0 1e99) "" "_.move" "_p" "" '(0 0 -1e99) "") (princ) ) Amicalement Zebulon_

Bonjour, je me suis demandé à quoi pouvaient servir ces 2 fonctions. L'une qui transforme un texte en une liste de code ascii et l'autre qui fait l'inverse. Je me suis appliqué a trouver une utilisation en faisant une fonction où on donne en entrée un texte et qui renvoie le suivant (en majuscules), comme dans les exemples ci dessous (a+ "AAA") donne "AAB" (a+ "ZZZ") donne "AAAA" (a+ "AAZ") donne "ABA" (defun a+ (ALPHA / LALPHA FLAG ASC NLALPHA) (setq ALPHA (strcase ALPHA)) (setq LALPHA (vl-string->list ALPHA)) (setq LALPHA (reverse LALPHA)) (setq NLALPHA nil) (setq FLAG T) (while LALPHA (setq ASC (car LALPHA)) (setq LALPHA (cdr LALPHA)) (if FLAG (if (setq FLAG (= ASC 90)) ;; je suis arrivé au Z (setq ASC 65) ;; alors je passe au A (setq ASC (1+ ASC)) ;; sinon je passe au suivant ) ) (setq NLALPHA (cons ASC NLALPHA)) ) (if FLAG (setq NLALPHA (cons 65 NLALPHA)) ) (vl-list->string NLALPHA) ) ça a déjà dû être fait quelque part en mieux, mais là c'est plus pour tester les fonctions vl-list->string et consorts. Amicalement Zebulon_

Le riesling se marie bien avec les fruits de mer. Il n'y a qu'une seule chose qui sépare la Bretagne de l'Alsace. C'est la France :) Vive les langues régionales et les produits du terroir Amicalement Zebulon_ PS : je n'irai pas jusqu'à appeler à voter pour José Bové

"süüürrrrrrrr" avec le umlaut sur le u, sinon le u se prononce "ou". Je dirais que ça dépend du cépage. Il y en a qui sont plutôt "sies". Le sylvaner est remarquablement frais et léger, avec un fruité discret, il est agréable et désaltérant et sait montrer une belle vivacité. Le pinot blanc est tendre, délicat, alliant fraicheur et souplesse, il représente un juste milieu dans la gamme des vins d’Alsace. Le riesling est sec, racé et délicatement fruité, il offre un bouquet d’une grande finesse avec des nuances parfois minérales ou florales, qui en font un excellent vin de garde. Reconnu comme l’un des meilleurs cépages blancs au monde, c’est un vin de gastronomie par excellence. Le muscat d'Alsace est très aromatique et exprimant à merveille la saveur du fruit frais,il se distingue des muscats doux du Midi par son caractère sec. Le pinot gris est charpenté, rond et long en bouche, il présente des arômes de sous-bois parfois légèrement fumés. Il développe une opulence et une saveur très caractéristiques. Le gewürtztraminer est corsé et exubérant, puissant et séducteur, parfois légèrement moelleux, il est le plus célèbre des vins d’Alsace. Son bouquet intense développe de riches arômes de fruits (mangue, litchi) de fleurs (rose), ou d’épices (Gewürz = épice). Le Klevener est produit exclusivement à Heiligenstein et alentours, c’est une variété moins aromatique issue de l’ancien Traminer ou savagnin rose, également appréciée des gastronomes. Le pinot noir est le seul cépage en Alsace à produire un vin rouge ou rosé dont le goût fruité typique évoque la cerise, il peut être élevé en barriques de chêne, ce qui ajoute à ses arômes une structure plus charpentée et plus complexe. et pour finir Le Gentil ou l’Edelzwicker désignent des assemblages harmonieux de plusieurs cépages blancs (dont au moins 50 % de Riesling, de Gewurztraminer, de Pinot Gris ou de Muscat pour le Gentil). Il y a une petite gué guerre entre bas-rhinois et haut-rhinois pour savoir qui fait le meilleur vin. Je dirais que ça se vaut et qu'il est surtout produit en alsace centrale, autour de Colmar. La cave de Cleebourg fait figure d'exception, puisque isolée à 60 km au nord de Strasbourg. Le vignoble alsacien a disparu entre Marlenheim et Cleebourg, au profit de cultures céréalières plus rentables sur des sols riches et fertiles comme dans le Kochersberg ou l'Ackerland (littéralement Ackerland = terre de labour), ce qui explique cette "cassure". Je vous laisse à votre cidre et à vos crêpes. Peut-être que Tramber nous fera un topo sur la bière, étant à la fois chti et réfugié économique en alsace, il a süüürement matière. Amicalement Zebulon_

Bonjour, moi je vois ça plutôt du côté "donnant donnant" ou mieux "gagnant gagnant". Le but n'est pas de répondre gratuitement mais de partager. Ceux qui ne font que poser des questions sont soit des débutants, que je respecte en tant que tel (je l'ai bien été un jour aussi :), soit des méchants profiteurs qui ne pensent à la communauté que lorsqu'ils sont dans le pétrin. Pétrin... Boulanger... Pain que le boulanger de mon quartier ne slice que contre de la monnaie sonnante et trébuchante ;) Encore un profiteur :casstet: Amicalement Zebulon_

Bonjour, les handles sont aussi utilisé par certaines applications pour sauvegarder, par exemple, une relation entre un objet et un repère via les xdata. Les logiciels de ferraillage par exemple. L'objet acier (une polyligne) contient le handle du repère (un bloc avec attributs) et inversement. La finalité est d'obtenir une génération automatique de nomenclature. La mésaventure qui est arrivée à un copain utilisant un tel logiciel ( Armacad ), c'est qu'il a copié tous ses objets et a effacé les originaux. Tous les objets ont donc changé de handle et les relations entre objet et repère se sont volatilisés. Depuis, il ne fait plus que des "déplacer", qui ont l'avantage de maintenir les handle. Je ne lui ai pas demandé, mais quand il fait des copier/coller entre fichiers, je pense (je suis même sûr) que les liens entre objet repéré et repère se perdent dans la nature également. Les handle, ça n'a pas l'air simple. Je ne préfère pas les utiliser. Amicalement Zebulon_ Prudent comme un crabe [Edité le 8/2/2007 par zebulon_]

Ouaip, là ça marche. Mais si tu n'as pas d'Autodesk Architectural Desktop sous la main, t'es marron ? Amicalement Zebulon_ [Edité le 7/2/2007 par zebulon_]

Bonjour, j'ai essayé, mais il faut croire que cela ne suffit pas. A mon avis, il doit rester des styles standards qui ne se purgent pas. Bon, c'est pas dramatique... Amicalement Zebulon_

Bienvenu au club Amicalement Zebulon_

(defun c:MyAbs (/ PT X) (setq PT (getpoint "\nIndiquer la position : ")) (if PT (progn (setq X (car PT)) (cond ((zerop X) (setvar "DIMPOST" "%%p<>")) ((< X 0) (setvar "DIMPOST" "-<>")) ((> X 0) (setvar "DIMPOST" "+<>")) ) (command "_DIMORDINATE" "_non" PT "_X") (while (not (zerop (getvar "cmdactive"))) (command pause) ) ) ) (princ) ) Quelque chose comme ça ? Amicalement Zebulon_ PS : je n'ai pas testé.

Bonjour, Je me suis également toujours posé la question de savoir pourquoi une COTORD était toujours positive, même quand on clique un point dans un secteur négatif. On m'a répondu qu'une cote donnait toujours une distance et qu'une distance est, par nature, toujours positive. J'ai trouvé ça plus que dommage, puisqu'une cote ordonnée est parfaite pour niveler une élévation. Je te propose donc de "bricoler" la variable DIMPOST en fonction de l'ordonnée Y d'un point saisi, comme ci-dessous. (defun c:MyOrd (/ PT Y) (setq PT (getpoint "\nIndiquer la position : ")) (if PT (progn (setq Y (cadr PT)) (cond ((zerop Y) (setvar "DIMPOST" "%%p<>")) ((< Y 0) (setvar "DIMPOST" "-<>")) ((> Y 0) (setvar "DIMPOST" "+<>")) ) (command "_DIMORDINATE" "_non" PT "_Y") (while (not (zerop (getvar "cmdactive"))) (command pause) ) ) ) (princ) ) Bien entendu, cela devient une cote avec un préfixe invariable et si tu étires une cote négative pour la ramener dans une zone positive (ou l'inverse), le préfixe devra être modifié manuellement. D'un autre côté, je n'ai pas souvent ce problème de cote ordonnée négative puisque je travaille presque toujours en NGF (le reste du temps je travaille en Normal Null pour la ville de Strasbourg qui a conservé ce système d'origine allemande) et il y a très peu de dépressions d'altitude inférieure à 0 aux endroits où j'interviens. Amicalement Zebulon_ [Edité le 6/2/2007 par zebulon_]