Aller au contenu

Insérer automatiquement un bloc en fonction du topocod


Seb

Messages recommandés

Bonjour à tous,

 

Après avoir "écumé" divers forums et vu plusieurs soluces non-adaptées ( gile, tabloblo, etc...), je m'en remets à vous.

 

J'ai des points topo levés et je voudrais insérer un bloc sur certains points topo en fonction de leur topocod.

Pour être plus clair, j'ai besoin de trianguler des bouches à clé et sur des chantiers avec prés de 100 branchements, çà devient fastidieux de copier-coller mon bloc de 3 cotations sur chaque BAC; y'a t il une fonction covadis ou un lisp qui peut reconnaître un point topo en fonction de son nom (BAC23, BAC5, etc...) et lui coller mon bloc de cotation?

 

Merci de vos réponses.

Lien vers le commentaire
Partager sur d’autres sites

Coucou

 

Je pense la géo-codification

Mais il y a tellement longtemps que je n'ai pas fait ça que je préfère laisser la parole aux spécialistes qui ne sauraient tarder

Toutefois si le "code" est dans un attribut il n'y a rien de compliqué de faire ce que tu demandes a posteriori

Du moins pour insérer un bloc, car pour y mettre des attributs il faut savoir QUOI y mettre

 

Amicalement

Lien vers le commentaire
Partager sur d’autres sites

Bonjour,

 

1. Afficher la liste des points topo

2. trier par code et sélectionner les points concernés, puis clic-droit : Ajouter au jeu de sélection. Quitter le dialogue, les points topo sont sélectionnés

3. Cov2D / Symboles / Insérer symboles tous

4. Choisir le bloc à insérer, puis en ligne de commande au moment où Covadis demande le point d'insertion, prendre l'option POINTS qui permet de sélectionner des points topo

5. A l'invite de sélection des points topo, taper P pour rappeler la sélection précédente.

 

Olivier

Lien vers le commentaire
Partager sur d’autres sites

Salut,

mon bon vieux PowerClic fait ça en 2/2

Plug-in selectbyattrib

plug-in point2block

 

mais bon, pour trianguler des point, une commande lisp à 3 getpoint 3 vl-cmdf, ça serait eput être encore plus efficace, non ?

a+

Gégé

----------------------------------------------------------------------

Site: https://www.g-eaux.fr

Blog: http://g-eaux.over-blog.com

Lien vers le commentaire
Partager sur d’autres sites

Hello

 

Sinon sans Covadis, j ai une routine qui insere un Bloc precis en XYZ sur les Points graphiques selectionnes ...

 

D'ailleurs j'ai la "meme" routine qui insere un Bloc precis sur les Cercles ou Textes selectionnes ...

 

Bloc precis sur les Cercles : quand on fournit par exemple des cercles pour materialiser des arbres !?

 

Bloc precis sur les Textes : quand on fournit par exemple une simple lettre (ou plusieurs) pour materialiser XXXXXX !?

 

Bye, lecrabe "triste"

 

;;; 
;;; Routine pour inserer un Bloc sur des points graphiques
;;; Micro-Modif par Patrice 
;;; Commande:  P2B  -  Routine:  P2B  v1.1 
;;;
;;;--------------------------------------------------------------------;
;;; PNT2BLK.LSP -  July 2001 - Original Routine 
;;; Place a block object in the location of selected point objects.
;;;--------------------------------------------------------------------;
;;; Function: PNT2BLK --> P2B 
;;;
;;; function to convert point objects to blocks.
;;; block must be defined in the current drawing
;;; blocks including attdefs will not address the attributes
;;; if the block references attdefs with default or constant values, 
;;; these will be populated.
;;;*********************************************************************
;;; 

(defun c:p2b (/ ss ct len e eb bname pt attreqhold echohold)

;;; get command echo setting and store it
(setq echohold (getvar "CMDECHO"))

;;; set command echo off
(setvar "CMDECHO" 0)

;;; get attribute request setting and store it
(setq attreqhold (getvar "ATTREQ"))

;;; set attribute request off
(setvar "ATTREQ" 0)

;;; get name of block to insert 
;;; (setq bname (getstring "\nBlock name: "))
;;; Avec la Modif pour accepter des Blancs/Espaces dans le Nom du Bloc
(setq bname (getstring T "\nBlock name: "))

;;; check that the block is defined in the current drawing
(if (tblsearch "block" bname)
(progn

;;; prompt for point selection
(princ "\nSelect Point objects: ")

;;; --- if point objects were selected ---

(if (setq ss (ssget '((0 . "POINT"))))

(progn

;;; walk through point objects
(setq len (sslength ss))
(setq ct 0)
(while (< ct len)

;;; for each point
(setq e (ssname ss ct))
(setq ct (+ ct 1))
(setq eb (entget e))
;;; get insert point
(setq pt (cdr (assoc 10 eb)))
;;; insert block
(command "_insert" bname pt "" "" "")
)
)

(princ "\nNo point  objects selected.")

)
)
(princ "\nInvalid, block not defined in drawing.")
)

;;; restore command echo setting to stored value
(setvar "CMDECHO" echohold)

;;; restore attribute request setting to stored value
;;; (setq attreqhold (getvar "ATTREQ"))
(setvar "ATTREQ" attreqhold)

(princ)
) 

Autodesk Expert Elite Team

Lien vers le commentaire
Partager sur d’autres sites

Bonjour,

Bonjour,

 

1. Afficher la liste des points topo

2. trier par code et sélectionner les points concernés, puis clic-droit : Ajouter au jeu de sélection. Quitter le dialogue, les points topo sont sélectionnés

3. Cov2D / Symboles / Insérer symboles tous

4. Choisir le bloc à insérer, puis en ligne de commande au moment où Covadis demande le point d'insertion, prendre l'option POINTS qui permet de sélectionner des points topo

5. A l'invite de sélection des points topo, taper P pour rappeler la sélection précédente.

 

Olivier

ohmy.gif Simple, efficace, pas automatique mais super pratique et à ma portée...

 

Pour les autres réponses, je cherche, je me renseigne, j'essaie d'apprendre et de comprendre quoi...huh.gifblink.gif

Lien vers le commentaire
Partager sur d’autres sites

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité