x_all

si non il y avait ça... j'avais fait une adaptation mais il vaut mieux commencer par l'original

les 2 fichiers pareil chez moi, ça met un temps infini à rentrer dans la fenêtre ou à repasser en EO Avez vous essayer le truc de (gile) pour virer les proxy? zombie killer je crois je l'ai plus d'installé mais j'ai souvenir que ça faisait du taff (avec RadicalPurge du même)

qui aurai pu prévoir... 🙂 moi non plus j'utilise pas trop ces réseaux nouveaux, mais au passage, on est quand même à un niveau super pointu car, si j'ai bien compris, que ces blocs soit sélect ou pas par le (strcat nombloc ",`*U*"), il sont retesté. C'est de l'optimisation fine algorithmique non? Je suis, entendons nous bien, très sensible au travail bien fait, mais je m'attendait pas à ce qu'une simple question pour récupérer ma bidouille débouche sur un truc aussi abouti et optimisé merci cadXP

pou lala je vais en avoir pour des plombes à comprendre comment ça marche mais qu'est ce que ça marche bien 🙂 il y a qqs tour de magie tout de même... je remplace et te remercie pour la leçon à un piètre programmeur,

ou ça...

il te faudra dupliquer la présentation à la main, mais c'est l'idée...

impec, ça marche 🙂 il y a tjrs une fonction qui me manque et je remercie très fort la communauté pour palier à mes carences tout plein merci

le pb dans ton truc, c'est que ton pan change à chaque dessin... et puis dans quel sens? mais ça me rappelle un truc que j'utilise pour plomber les étages. J'ai l'habitude d'aligner mes dessin à une cote fixe et j'ai une ft pour recopier l'objet sélectionné (mes trémies ou mes chutes) vers les étages en faisant une copie X mètres plus haut puis déplacer la vue à l'étage Quand je fait mes présentations, je me sert de ça pour placer direct l'étage dans la vue (je lance ma fonction puis valide 2 fois car pas d'objet sélec) Bref, j'ai 6 fonction, 5 qui définit le pas vertical entre étage (entre phase pour toi) 55 qui définit le pas horizontal (les 2 peuvent être différents) puis 4,8,6,2 qui recopie, déplace suivant les direction des flèche du clavier ya des fonctions annexes pour rappeler des vues pour les autres touche du pavé vue à créer suivant le patern vue0 vue1 ... en espérant qua ça te soit utile même si il te faudra passer par chaque présentation (mais c'est vite fait et toujours bien callé) ;| enchaine une copie et un pan auteur joch04 5 fonctions déffinies 2 4 8 6 copie la sélection dans la direction quardinale désignée 5 invite à définir un pas hertical par défaut le pas horizontal est le même 55 permet de définir un pas horizontal diférent si rien n'est selectionné, pan seul (valider 2fois) 5 autres fonctions pour la 3d, 0 1 3 7 9 Qui restaurent des vues autocad (qu'il faut avoir créées) mais quand on fait de la 3d ça vaut le coup |; ;;;fonction de changement de pas de déplacement horizontal (defun c:5 (/ pas test) (setq test 0) (setq dir 0) (princ "\nPas du décalage vertical enregistré: ") (princ (getvar "USERR1")) (or (setq pas (getreal "\nChanger cette valeur ou entrée ")) (progn (setq pas (getvar "USERR1")) (setq test 1) (princ "\n pas de changement : ") ) ) (if (= test 0) (setvar "USERR1" pas) ) (princ "\n nouveau pas de décalage : ") (princ (getvar "USERR1")) (if (= 0.0 (getvar "USERR2")) (setvar "USERR2" pas) ) (princ "\nPas du décalage horizontal enregistré: ") (princ (getvar "USERR2")) (print "55 pour enregistrer un pas horizontal diférent") (princ) ) ;;;fonction de changement de pas de déplacement horizontal (defun c:55 (/ pas test) (setq test 0) (setq dir 0) (princ "\nPas du décalage horizontal enregistré: ") (princ (getvar "USERR2")) (or (setq pas (getreal "\nChanger cette valeur ou entrée ")) (progn (setq pas (getvar "USERR2")) (setq test 1) (princ "\n pas de changement : ") ) ) (if (= test 0) (setvar "USERR2" pas) ) (princ "\n nouveau pas horizontal : ") (princ (getvar "USERR2")) (princ) ) ;;;fonctions de Copie PAN (defun c:2 (/ tmp P1 P0) (setq tmp (getvar "USERR1")) (princ tmp) (setq *derent (pw_real_entlast)) (if (= 0.0 tmp) (princ "\nPour deffinir un décalage des déplacements tapper 5 puis entrée" ) (progn (setq P0 (list 0 0)) (setq P1 (list 0 (* -1 (getvar "USERR1")))) (setq sel (ssget)) ;;;mise en mémoire du scu courant et passer scu g (if (not (tblsearch "ucs" "scu_init")) (progn (command "_ucs" "_save" "scu_init") (command "_ucs" "_world") ) ) (command "_.copy" sel "" "_none" P0 P1) (command "-pan" P1 P0) ;;;restaure et efface le scu_ini (command "_ucs" "_restore" "scu_init") (command "_ucs" "_delete" "scu_init") ) ) (princ) ) (defun c:4 (/ tmp P1 P0) (setq tmp (getvar "USERR2")) (princ tmp) (setq *derent (pw_real_entlast)) (if (= 0.0 tmp) (princ "\nPour deffinir un décalage des déplacements tapper 55 puis entrée" ) (progn (setq P0 (list 0 0)) (setq P1 (list (* -1 (getvar "USERR2")) 0)) (setq sel (ssget)) (setq P0 (trans P0 0 1)) (setq P1 (trans P1 0 1)) (command "_.copy" sel "" "_none" P0 P1) (command "-pan" P1 P0) ) ) (princ) ) (defun c:8 (/ tmp P1 P0) (setq tmp (getvar "USERR1")) (princ tmp) (setq *derent (pw_real_entlast)) (if (= 0.0 tmp) (princ "\nPour deffinir un décalage des déplacements tapper 5 puis entrée" ) (progn (setq P0 (list 0 0)) (setq P1 (list 0 (getvar "USERR1"))) (setq sel (ssget)) (setq P0 (trans P0 0 1)) (setq P1 (trans P1 0 1)) (command "_.copy" sel "" "_none" P0 P1) (command "-pan" P1 P0) ) ) (princ) ) (defun c:6 (/ tmp P1 P0) (setq tmp (getvar "USERR2")) (princ tmp) (setq *derent (pw_real_entlast)) (if (= 0.0 tmp) (princ "\nPour deffinir un décalage des déplacements tapper 55 puis entrée" ) (progn (setq P0 (list 0 0)) (setq P1 (list (getvar "USERR2") 0)) (setq sel (ssget)) (setq P0 (trans P0 0 1)) (setq P1 (trans P1 0 1)) (command "_.copy" sel "" "_none" P0 P1) (command "-pan" P1 P0) ) ) (princ) ) ;; fonction qui renvoie la dernière entité et une autre pour récupérer les derniers objets créer par 2 4 8 ou 6 ;; voir ici pourquoi enlast ne suffit pas http://cadxp.com/topic/42928-reprendre-les-derniers-objets-copies/page__view__findpost__p__244244 ;; merci GEGEMATIC Vincent et tous les autres (defun pw_real_entlast ( / ent tmp ok eg tp) (setq ok T) (if (setq ent (entlast)) (while (and (setq tmp (entnext ent)) ok) (setq eg (entget ent)) (setq tp (cdr (assoc 0 eg))) (if (= "SEQEND" tp) (setq ok nil) ) (setq ent tmp) ) ) ent ) (defun der-ent-copie (/ ent sel) (setq ent (entnext *derent)) (setq sel (ssadd)) (while (not (null ent)) (ssadd ent sel) (setq *derent ent) (setq ent (entnext *derent)) ) sel ) ;;; Vue prédéfinies depuis le pavé numérique (gile) ;;; daptation pitoyable de vues-pave de (gile) (mapcar '(lambda (f v) (eval (list 'defun-q f nil (list 'command "_.view" "_restore" v) '(princ) ) ) ) '(c:0 c:1 c:3 c:7 c:9) '("vue0" "vue1" "vue3" "vue7" "vue9") ) ;; fonctions 22 44 88 66 ;; idem 2 4 8 6 mais en reprenant les derniers objets copié pour les placer sur un autre étage ;; faire par exemple 8 pour la 1ere puis 88 pour les autres étages (defun c:22 (/ tmp P1 P0 ent sel) (setq tmp (getvar "USERR1")) (princ tmp) (if (= 0.0 tmp) (princ "\nPour deffinir un décalage des déplacements tapper 5 puis entrée" ) (progn (setq P0 (list 0 0)) (setq P1 (list 0 (* -1 (getvar "USERR1")))) (setq sel (der-ent-copie)) (setq P0 (trans P0 0 1)) (setq P1 (trans P1 0 1)) (command "_.copy" sel "" "_none" P0 P1) (command "-pan" P1 P0) ) ) (princ) ) (defun c:44 (/ tmp P1 P0) (setq tmp (getvar "USERR2")) (princ tmp) (if (= 0.0 tmp) (princ "\nPour deffinir un décalage des déplacements tapper 5 puis entrée" ) (progn (setq P0 (list 0 0)) (setq P1 (list (* -1 (getvar "USERR2")) 0)) (setq sel (der-ent-copie)) (setq P0 (trans P0 0 1)) (setq P1 (trans P1 0 1)) (command "_.copy" sel "" "_none" P0 P1) (command "-pan" P1 P0) ) ) (princ) ) (defun c:88 (/ tmp P1 P0) (setq tmp (getvar "USERR1")) (princ tmp) (if (= 0.0 tmp) (princ "\nPour deffinir un décalage des déplacements tapper 5 puis entrée" ) (progn (setq P0 (list 0 0)) (setq P1 (list 0 (getvar "USERR1"))) (setq sel (der-ent-copie)) (setq P0 (trans P0 0 1)) (setq P1 (trans P1 0 1)) (command "_.copy" sel "" "_none" P0 P1) (command "-pan" P1 P0) ) ) (princ) ) (defun c:66 (/ tmp P1 P0) (setq tmp (getvar "USERR2")) (princ tmp) (if (= 0.0 tmp) (princ "\nPour deffinir un décalage des déplacements tapper 5 puis entrée" ) (progn (setq P0 (list 0 0)) (setq P1 (list (getvar "USERR2") 0)) (setq sel (der-ent-copie)) (setq P0 (trans P0 0 1)) (setq P1 (trans P1 0 1)) (command "_.copy" sel "" "_none" P0 P1) (command "-pan" P1 P0) ) ) (princ) )

bonjour ça fait un mnt que je veux me faire une fonction qui sélectionne tous les blocs dynamique en ft de leur nom J'ai piquer des bout de code à droite et à gauche, (merci (gile) et lee mac) mais je bute sur la fin comment faire pour que quand le lisp me rend la main, les bloc soit effectivement "au bout de la souris" Naïvement je croyait que le rappel de Bsel à la fin ferai ce boulot comme il m'a sembler le voir faire dans ssd de (gile) mais apparemment, ça suffit pas... Tout tourne pas trop mal il me semble sauf que rien n'est sélect bien que bsel contienne bien les bloc que je veux à l'inspection dans l'éditeur merci de vos lumières ;; ssbn sélectionne par nom de bloc dynamique (defun C:ssbn (/ doc-vba bs sel-vba nom-ch ent-vba sbloc bl j bsel ) (print " sélectionner un bloc, retourne une sélection des blocs ayant le même non (blocdyn acceptés) " ) ; initialisation VL (vl-load-com) (setq doc-vba (vla-get-activedocument (vlax-get-acad-object))) (vla-startundomark doc-vba) ; Activer le début de l'undo (while (not bs) (setq bs (ssget '((0 . "INSERT"))))) ; seléctionne un bloc (setq sel-vba (vla-get-activeselectionset doc-vba)) ; sel-vba est le selection set courant de doc (setq ent-vba (vla-item sel-vba 0)) ;ent-vba est le 1er élément de sel-vba (setq nom-ch (LM:blockname ent-vba)) (princ nom-ch) ;; sélection de tous les blocs du dessin (astuce (gile) pour prendre que les blocdyn avec un nom *u (setq sbloc (ssget "X" (list (cons 0 "INSERT") (cons 2 (strcat nom-ch ",`*U*"))) ) sel-vba (vla-get-activeselectionset doc-vba) ; sel-vba est le selection set courant de doc-vba j 0 bsel (ssadd) ) (vlax-for bl sel-vba (if (= (LM:blockname bl) nom-ch) (progn (ssadd (vlax-vla-object->ename bl) bsel) (setq j (+ 1 j)) ) ) ;; fin de if (print j) ) (print) bsel ) ;; Block Name - Lee Mac ;; Returns the true (effective) name of a supplied block reference (defun LM:blockname (obj) (if (vlax-property-available-p obj 'effectivename) (defun LM:blockname (obj) (vla-get-effectivename obj)) (defun LM:blockname (obj) (vla-get-name obj)) ) (LM:blockname obj) )

pas évident tout de même de faire qq chose avec ces .asc sans Qjis J'avais pris qqs notes quand j'ai du faire avec ça, mais ça remonte à qqs années et il y a sans doute eu des amélioration dans Qjis ou d'autres techniques le gros soucis, c'est qu'on doit trier une zone de points raisonnable pour le moteur graphique d'autocad et que taper dans une fichier texte brut c'est un peu relou... http://joch04.free.fr/achtml/QTP-3D-22.html

ça ressemble effectivement à un pb de rendu du moteur d'impression as tu essayé de passer directement avec des images? Pdfcréator imprimer et sauver en JPG (ou autre solution de conversion ou tu peux maitriser la résolution de sortie) Perso, je trouve que les pdf ralentissent beaucoup trop tocad. Pour les pdf en vectoriel (contrairement à tes copie d'écran) je passe par illustrator pour en faire du dwg, les résultats demandent du trie, mais pour récupérer des morceaux, c'est propre

si c'est une étude théorique, ok, on extrude et on fait des soustractions ou des additions en gros, _loft _sweep _revolve EXTRUSION Soustraction Intersection pour la modélisation maitriser REPERE et placement du SCU (pour les extrusions il faut une poly perpendiculaire à l'axe d'extrusion révolution) On fait à peut près tout avec ces qqs commandes. Pas hésiter à faire des poly 3D de construction sur les quelles on pourra s'accrocher Par contre AutoCAD n a pas évolué en 3D depuis 20 ans, donc pas de coupes, (sauf tout en calque 0 et en lignes) pas de formes moles, et très difficile de faire des objets dynamiques. Si tu veux de former en modélisation 3D regarde plutôt des logiciels comme Solidworks ou Inventor chez Autodesk (3D paramétrique) Perso, je fait encore des modélisations sous AutoCAD que je maitrise plus puis les importe dans des famille Insitu Revit pour faire les coupes et l'intégration au Bat, mais pour les rendus, je passe sous Blender bref AutoCAD pour la formation et la compréhension de la logique de construction, c'est pas mal, mais il y a plus efficace au regard de l'évolution des soft, au final il faut pas mal jongler avec les logiciels que tu maitrises le plus La 3D paramétrique suis d'autres logiques et utilise d'autres outils

super cool merci, je regarde ça...

et toujours pas de gentil contributeur pour partager une famille de résa?

je suis un barbare.. je fais une canalisation de type cadre de la hauteur de mon complexe et de la largeur souhaitée...pour la longueur c'est la vue en plan (dans 99% de mes affaires les bassins sont rectangulaire) Le nid d'abeille chez nous est interdit - J'ai 3 largeurs "standard" pour une ou 2 couche de caissons modulaire pas de bricolage pour les PL PT ça marche direct il faut que je regarde cette histoire bloc à créer dans la bibliothèque, mais pas sur que ça fasse mieux

en tout cad, c'est joli 🙂

pour la modélisation, révit fait pas trop mal le taff pour le gros œuvre, mais effectivement pour modéliser des "trucs" c'est tellement plus permissif et intuitif sur autocad, je je fait souvent pareil, l'astuce, c'est d'insérer le dwg dans un composant pour qu'il soit pas ignoré par les plans de coupes de révit car sortir un projet 3d sur autocad c'est vraiment pas adapté (pas de coupes dynamiques les vue en plan d'étage je vois même pas comment c'est possible...). 3DS c'est le 1er soft de 3d que j'ai utilisé. J'ai essayé de m'y remettre, mais à part le fait qu'il fait partie du pack AEC je n'y ai pas trouvé de vrai avantage et j'ai pas beaucoup fouillé, mais en dehors de l'interface, j'ai pas trouvé que ce logiciel que j'utilisait il y a 20 ans avait beaucoup changé. blender demande pas mal de formation (auto) mais c'est surtout une question d'approche de l'interface et de "look and feel" à comprendre... et des raccourcis clavier à noter (<acronym class=dict title=). J'avoue que je faisait ça à titre perso, mais quand tu dois refaire des insers pour le taff et qu'on te demande un béton matricé t'as pas trop le choix. l'astuce pour le passage Revit blender, c'est de passé par autocad et une transformation en .igs, ya des soft pour le passer en .obj ( https://www.opencascade.com/products/cad-assistant/ ) et là on se retrouve avec un seul objet par matériaux, Le texturing devient un jeu d'enfant... Bien sur ça s'arrête pas là et on peu aller jusqu'à un tracking vidéo de qualité acceptable c'est pas la demande, mais c'est rassurant d'en avoir sous le pied... Ils sortent une version 3.5 en ce mnt, ça vaut le coup d'y jeter un oeil

plop... on est tous d'accord pour dire que revit est une bouse en rendu, et, pour les projets archi modélisé sur révit l'insertion dans le site passe par d'autres outils. On trouve nombre d'éléments techniques avec des modélisations plus ou moins sympa, mais pour habiller un intérieur... l'entré RVT ou RFA est pas des plus toujours la plus fournie quelles solutions utilisez vous, et y a t il du monde qui passe par blender? je trouve même curieux vu la nature du site qu'il n'y ait pas de forum dédié à ce couteau suisse

https://www.caderix.com/journal/spip.php?article419 je traine plus sur le forum, peut être le projet et il encore maintenu? l'idée c'est de faire un script qui lance ton list, superautoscript te lance le script et sauve le dessin

la fusion de calque supprime les calques en plaçant tous les éléments dans un autre... ça dépane parfois...

listing indiquant la "distance" de chaque bloc présent dans le dessin ça doit pouvoir se faire avec l'extraction de données j'ai un Lisp qui fait le cumul de tous les paramètre dyn d'un nom donné, voir ici

Je fais des gaines de ventil sur Revit depuis peu. Quand je place des raccords en T pour me piquer sur le collecteur, parfois, j'arrive à les tourner, et parfois non, est ce que qq un sait pourquoi? ( il s'agit bien sur de la même famille dans les 2 cas pour précision, on est dans une élévation ) Je m'approche avec la bonne orientation, et quand je veux me raccorder, cata...

des fois, faut pas trop chercher à comprendre, si ton bloc est redéfini, ya de bonne chance pour qu'il garde sa place dans une extraction donc, tu exportes les valeurs des attributs qui te posent pb, mets à jour ton bloc, et re importes les valeurs, les champs calculés devraient suivre après un régen si j'ai bien compris ton pb je te renvois vers ce sujet ou ya des passerelles

mise à jour avec des outils trouvé chez Lee Mac pour trier les états de visibilité et un truc bricolé pour les longueurs d'une propriété particulière des blocs dyn mes adaptations sont des insultes pour les codes originaux, j'en présente toutes mes excuses aux auteurs, mais ça va me faire du taff 🙂 et je partage... il y aura sans doute des trucs à améliorer mais ça me semble opérationnel http://joch04.free.fr/achtml/Metres.html

je plussoits... tu es dans quel coin? parce que par chez moi, ça cherche... surtout si tu as une expérience avec les CG, CD et autres tracasseries administratives...