Ajout manuellement de cotations sur des PT

[Deschiron]

Bonjour,

 

Je suis à la recherche d'un LISP ou de quelque chose du même type, qui me permettrait de coté des lignes que j'ai rajouté sur un profil en travers. Je souhaiterai que les cotations Dist axe et Altitudes soient écrient à coté de la ligne rajoutée (pas dans un bandeau).

 

Merci

 

[thierry.garré]

la commande existe dans Covadis

 

Tout d'abords si tu as dessiné une simple polyligne sur un profil (en travers ou en long c'est pareil)

 

Covadis 3D/traitement des profils/ajout d'une courbe dans un groupe

 

puis pour coter

 

Covadis 3D/traitement des profils/cotation d'une courbe ( tu peut mettre la cotation librement au dessus des bandeaux comme dans les prt d'ailleurs)

[x_all]

je bricole pas mal les pt, mais je me sert pas de lisp...

 

juste que dans leurs paramètres du PT dans l'arbre divers, j'utilise le 100 pour le coef de dessin (je travaille en m) ce qui me permet d'avoir mes coupes en vrai grandeur pour cucher ou annoter dessus...

 

 

[Deschiron]

Je travail sur des profils non dessinés avec covadis,

généralement je les mets à l'échelle 1, et je les cote manuellement.

 

Sous la version 14, j'avais un LISP (que j'ai perdu) qui me permettait de coté plus rapidement, Il suffisait de définir l'axe du PT et la valeur du plan de comparaison

 

[lili2006]

Bonjour à toutes et tous,

 

Bienvenue Deschiron,

 

Ne serais-ce pas un lisp de Bonuscad ?

[x_all]

ha?

 

comme tu pestais dans le forum covadis, je croayais que tes PT vannaient de covadis...

 

le truc que je te donne, c'est le paramétrage pour les avoir a l'echelle 1 du dessin en objet et pas à l'echelle 1 de l'espace papier..

et puis mon "astuce" ne marche que si tu bosse avec l'echelle y au 1/100 (ce qui est pas forcément adapté à ce que tu fait....

 

une fois de plus, la méthode de thierry est plus propre...

[lovecraft]

Bonjour,

 

voici ce que tu recherhces:

 

 ;PROGRAMME POUR INSERER DES FLECHES DE RAPPEL
;AVEC LA DISTANCE A L'AXE ET LE Z D'UN POINT
;SUR LA BASE DE PROFILS EN TRAVERS AU 1/200
;Fait par L.barraud le 26/01/2007
;********************************************

(defun c:COTDZ ()
(setq echptrz (getreal "\nEntrez l'echelle du profils en travers :"))
(setq echptr (/ echptrz 100))
(setq ptbase (getpoint "\nCliquez le point d'instersection du plan de comparaison et de l'axe:"))
(setq valpc  (getreal "\nEntrez la valeur du plan de comparaison :"))

(while (/= (setq ptclique (getpoint "\Cliquez un point a coter sur le profil en travers :")) nil)
      (setq deltax (* (- (car ptclique) (car ptbase)) echptr))
      (setq deltay (* (- (cadr ptclique) (cadr ptbase)) echptr))
      (setq valx   (rtos deltax 2 2))
      (setq valy   (rtos (+ valpc deltay) 2 3))
      ;ecriture du resultat
      (setq txtx (strcat "D/Axe=" valx "m"))
      (setq txty (strcat "Z=" valy))
      (command "lrepere" ptclique (list (- (car ptclique) 0.5) (+ (cadr ptclique) 1.3)) "" txtx txty"")
);fin du while

);fin du defun c:COTDZ

 

Attention il faut que ton profil soit à l'echelle 1. c'est à dire qu'1 metres = 1metres sur ton dessin.

 

Pour lancer le lisp: commande COTDZ

Ensuite on te demande l'echelle de ton profil donc 100 200 etc...

Ensuite on te demande de cliquer l'intersection entre l'axe et le plande comparaison

Puis on te demande donner rentrer la valeur du plan de comparaison

et maintenant c'est parti....

 

Bonne utilisation

 

@plus

 

 

LB

 

[Deschiron]

Merci lovecraft, c'est nickel, c'est ce que je cherchai.

Juste un truc es ce qu'on peu paramétrer la hauteur du texte ?

 

Merci lli2006, je vais regarder de plus près Bonuscad y'a l'aire d'avoir des commande sympa..

 

[lovecraft]

Bonjour,

 

Le lisp utilise le style de cote courant donc il faut que tu parametres celui-ci.

 

@plus

 

LB

[dilack]

salut à tous,

tiens deschiron me fais penser a un nom d'une entreprise de tp

[lili2006]

Re,

 

tiens deschiron me fais penser a un nom d'une entreprise de tp

 

Ben moi aussi ! Et ils bossent parfois avec Valérian (déviation de Pyreirohade dans les landes, par exemple,...)

[dilack]

c'est normal deshiron est une filliale de valerian tout comme socafl, et valerian est une société du groupe spie batignolles