Cotes avec exposant

[Atomick]

Bonjour,

je cherche le moyen de mettre en exposant le 3ème chiffre derrière la virgule de mes cotes.

exemple : 2.456 > 2.45⁶

Quelqu'un a t'il une méthode ?

Merci

[VDH-Bruno]

Bonjour,

 

Trés trés rapidement, j’ai modifié pour ton besoin spécifique un code publié précédemment sur CADxp :

 

http://cadxp.com/topic/37002-cotation/page__p__202500#entry202500

Discussion que je t’invite à lire pour prendre connaissance des limites de la méthode (qui oblige à forcer le texte de cotation) et de ce que j'en pense.

 

 

Le code :

 

;; Adaptation rapide et spécifique d'un code publié précédemment:            VDH-Bruno
;; http://cadxp.com/topic/37002-cotation/page__p__202500#entry202500

(defun c:dimAtomick (/ ss i e dim exposant)
 (setq ss (cond ((ssget "_I" '((0 . "DIMENSION"))))
                (T (princ "\nSélectionnez les cotations à traiter...") (ssget '((0 . "DIMENSION"))))
          )
 )
 (repeat (setq i (if ss
                   (sslength ss)
                   0
                 )
         )
   (if (/= ""
           (setq e        (entget (ssname ss (setq i (1- i))))
                 dim      (rtos (cdr (assoc 42 e)) 2 3)
                 exposant (substr dim (+ (vl-string-position (ascii ".") dim) 4))
           )
       )
     (entmod (subst (cons 1 (strcat (substr dim 1 (1- (strlen dim))) "{\\H0.7x;\\S" exposant "^;}"))
                    (assoc 1 e)
                    e
             )
     )
   )
 )
 (princ)
)

 

A+

 

 

Edit Corrigé le code suite à une adaptation un peu trop rapide de ma part

Modifié le 2 juillet 2014 par VDH-Bruno

[nosset]

Salut,

 

Sauf erreur de ma part, l'une des nouveauté de la 2015, n'est-elle pas de pouvoir passer du texte en exposant ?

A tester sur des cotes. je ne peux pas tester en ce moment, mais je regarde dès que possible.

 

@ plus

[Atomick]

Je te remercie VDH-Bruno mais à part utiliser Autocad, je n'y connais pas grand chose en programmation.

Je crois comprendre que tu as fait un Lisp.

(j'ouvre "Bloc Note"..je copie ton Lisp...et j'enregistre sous "".Lsp)

Je charge le Fichier .LSP sur Autocad...et Après ??? :( :unsure:

Je ne suis pas vraiment doué pour ce genre de manipulation.

Merci de ton aide

[VDH-Bruno]

Re,

 

Je te remercie VDH-Bruno mais à part utiliser Autocad, je n'y connais pas grand chose en programmation.

Je crois comprendre que tu as fait un Lisp.

(j'ouvre "Bloc Note"..je copie ton Lisp...et j'enregistre sous "".Lsp)

Je charge le Fichier .LSP sur Autocad...et Après ??? :( :unsure:

Je ne suis pas vraiment doué pour ce genre de manipulation.

Merci de ton aide

 

C'est déjà très bien pour quelqu'un qui n'y connait pas grand chose, tu as fait le plus dure :)

 

Et après tu tape dimAtomick sur la ligne de commande pour lancer ton lisp...

A+ VDH

[VDH-Bruno]

Re,

 

(j'ouvre "Bloc Note"..je copie ton Lisp...et j'enregistre sous "".Lsp)

Je charges le Fichier .LSP sur Autocad...et Après ??? :( :unsure:

 

J'ai peut être lu un peu vite tu copie/colle effectivement dans le bloc note, tu nommes et enregistre ton fichier avec l'extension .lsp (ex: Atomick.lsp)

 

Puis tu le charges dans Autocad (sinon un simple glissé/déposé dans ton dessin actif depuis l'explorateur window suffit.)

 

Et tu lances au clavier la commande dimAtomick

 

Sinon je te joint le fichier à charger en PJ.

Cordialement,

Atomick.lsp

[philsogood]

hello

si tu veux tout savoir sur comment charger un lisp va sur ce lien >>> http://cadxp.com/topic/14323-charger-un-lisp/

++

Phil

[Atomick]

Bonjour,

la nuit a été fructueuse...Merci

ça fonctionne...en partie. :(

Le problème c'est qu'une fois que j'ai appliqué la commande, la cote se fige et ne varie plus si je l'étire.

 

Y a t'il un moyen pour que la cote reste active ?

 

PS: je sais , j'abuse

[VDH-Bruno]

Bonjour,

 

Le problème c'est qu'une fois que j'ai appliqué la commande, la cote se fige et ne varie plus si je l'étire.

 

Y a t'il un moyen pour que la cote reste active ?

 

PS: je sais , j'abuse

 

En l'état non, d'ailleurs c'est à cela que je faisais allusion lorsque j'invitais à consulter le lien (dans lequel la question avait été évoqué) de mon premier message.

 

Je ne connais pas AutoCAD 2015, à lire nosset tu auras peut être une solution en natif plus satisfaisante, a voir..

 

A+

[Atomick]

J'ai vérifié....

Effectivement AUTOCAD 2015 propose de mettre en exposant mais le HIC c'est qu'il ne propose pas de mettre en exposant le "n"ième chiffre derrière la virgule mais il met en exposant la totalité de la cote... :angry: :angry:

De plus, de ce fait, la cote se fige (tiens ça me rapelle quelque chose !!!) et perd ses caractéristiques dynamiques.

 

L'idéal (si un membre AUTODESK lit ceci), c'est que dans le Style de cote on puisse définir si on souhaite que le "n"ième chiffre derrière la virgule soit en exposant.

Du genre une case à cocher...(pour valider l'exposant) et une valeur à indiquer...(pour définir le rang derrière la virgule.)

 

Je sais, je suis exigeant mais au prix que ça coute, je crois qu'on peut l'être un minimum ;)