Changement de calques de polylignes suivant elevations

[cricripom]

Bonjour,

Je travaille sur Autocad Map et Covadis et je cherche une solution pour trier automatiquement des polylignes qui ont une elevation differentes pour les changer de calque.

Je possede des fichiers en 3D (de courbes de niveaux) avec beaucoup de polylignes qui ont des elevations differentes mais qui sont dans le même calque et je dois 

separer les courbes maitresses, les courbes secondaires et les intermediaires dans des calques differents.

Exemple:

courbes maitresses ->elevation finissant 0 ou 5

courbes secondaires ->elevation finissant 1,2,3, ou 4

courbes intermediaires ->elevation finissant 0.2,0.4,0.6,0.8

Je cherche donc une solution, LISP, Script et autre que la commande FILTRE avec laquelle on ne peux selection qu'une seule elevation à la fois ( sauf si j'ai encore rien compris !).

Merci d'avance si vous avez des solutions.

 

Etant nouveau sur ce site, j'en profite pour remercier grandement ceux qui prennent du temps pour repondre aux differents forums car le partage du savoir et formidable pour ceux qui sont passionnés de technologies. Malgré un monde qui reste incertain on vit quand même une époque formidable.

 

 

 

[JPhil]

Bonjour,
Est-ce que tu veux apprendre ou avoir une solution Plug & Play ?

Dans tous les cas, il y aura des questions :
- nom du calque de base
- noms des calques de destination (Est-ce que les calques de destination existent ou faudra-t-il les créer ? )

Voici un début de code qui affiche l'élévation d'une polyligne :

(cdr (assoc 38 (entget (car (entsel)))))

 

[bonuscad]

Bonjour,

Un sujet similaire.

Le code proposé dans ce lien peut être facilement adaptable selon tes besoins mais il faut en savoir un peu plus...

[lecrabe]

Hello @bonuscad @Olivier Eckmann

J esperais pouvoir faire une Requete sur le Groupe de dessins AutoCAD MAP en Mode "Modification des Proprietes"

en changeant la Propriete CALQUE par l expression Lisp : 

(rtos(cdr(assoc 38(entget(car(entsel)))))2 0)    ou   (cdr(assoc 38(entget(car(entsel)))))

MAIS ca ne passe pas !! ... Pourquoi ?

Pourtant on peut avoir des noms de calque comme :  9.50 , 39.00 , 39.50 , etc

Voir mon DWG de Test ...

Bye, lecrabe

4LOTIS2_CN_1.7z

[cricripom]

Bonjour à tous,

Je voulais surtout une réponse pratique vu la quantité de données et le manque de temps, mais j'ai pu me débrouillé autrement. Je pensais qu'avec Covadis je trouverai une solution pratique, mais sans succès. En ce qui concerne le LISP j'aimerai bien m'y mettre mais après 41ans de topo, photogrammetrie, drone, GPS en tout genres, SIG, Python, Arduino, France et étranger pour mon boulot, et à 18mois de la retraite je commence en avoir un peu ...

Maintenant si vous connaissez un bon tuto, je suis preneur.

Merci à ceux qui on répondu. Ce que vous faite est très bien.

Bien à vous. 

[didier]

Bonjour @cricripom

mais j'ai pu me débrouiller autrement...
Le but du forum est l'échange de savoirs, alors il serait sympa d'en faire profiter la communauté, peut-être que quelqu'un rencontre le même souci et sera content de lire une solution alternative.

Maintenant si vous connaissez un bon tuto, je suis preneur.
Si c'est pour l'apprentissage de l'Autolisp, je fais de l'auto-promo en vous proposant de suivre le lien présent dans ma signature.
Je ne sais pas s'il est bon, mais j'ai fait de mon mieux pour le partage.

Amicalement