Modifier le nbre de décimales d\'un texte.

[guerin]

Bonjour à tous,

 

je cherche à modifier le nbre de décimales d'un texte brut.

En fait j'ai reçu un fichier de levé de points sans attributs avec l'altitude connue mais avec 5 décimales.

EXEMPLE 31.52464 je souhaite le transformer en 31.52

J'avais auparavant une commande sous l'applicatif TOPOLISP qui le permettai mais, depuis ma migration sous covadis aucune idée même dans l'aide.

Merci d'avance

 

 

:)

[thierry.garré]

Dans le menu Covadis 2D

 

Choisir chargement de semis

 

Choisir configuration des listing - paramétres généraux - fichier texte en mode listing + coordonnées 2 unités derrieres la virgule

 

choisir listing de points

 

 

et voila....................

 

Sinon sans COVADIS avec excel

 

ouvrir le fichier brut, le tabuler en

colonne 1 Numéro

colone 2 X

colone 3 y

 

réduire le nombre de chiffres après la virgule sur les coordonnées

 

enrgister le fichiers en extention *.prn

avec le nom "tartanpion.xyz".prn

 

 

et voila je pense que la solution 2 est plus simple et plus rapide

 

 

Par ailleurs

 

Dans Covadis, au moment du chargement du semis , tu peux sélectionner le nombre de décimale pour l'attribut Altitude. ( ton points d'insertion lui gardera toute la précision du calcul), à voir si tu en as l'intérêt

 

[Edité le 9/1/2006 par thierry.garré]

[guerin]

Désolé mais je me suis mal exprimé.

Je n'ai pas reçu un fichier de points, mais directement un fichier autocad donc impossible de charger le fichier en changeant le nbre de décimales.

Merci quand même.

[thierry.garré]

Dans ce cas utilise la solution 1 pour créer un fichier de points avec le bon nombre de décimales et ré-importe le dans un autre fichier vierge, avec la commande chargement de semis

 

 

(tu peux également le recharger dans le même dessin en ayant au préalable vidé la calque contenant tes points, puis en recréant la liste de tous les points...

 

 

n'hesites pas si tu as besoin de plus d'aide......

[bonuscad]

Si c'est vraiment du texte brut, essaie d'appliquer ceci.

Si c'est des attributs ça ne fonctionneras pas, il faudra adapter.

 

(defun c:format_numeric_text ( / js text-ent v-txt)
(princ "\nSélectionner les textes à formater")
(setq js (ssget '((0 . "TEXT"))) n 0)
(cond
	(js
		(repeat (sslength js)
			(setq text-ent (entget (ssname js n)))
			(setq v-txt (cdr (assoc 1 text-ent)))
			(cond
				((or (eq (type (read v-txt)) 'REAL) (eq (type (read v-txt)) 'INT))
					(entmod
						(subst
							(cons 1 (rtos (read v-txt) 2 2))
							(assoc 1 text-ent)
							text-ent
						)
					)
				)
				(T (princ "\nLe texte n'est pas numérique"))
			)
			(setq n (1+ n))
		)
	)
	(T (princ "\nSélection vide!"))
)
(princ)
) 

[guerin]

C'est tout à fait ce que je recherchais.

Merci BONUSCAD.

 

:)

 

[didier]

bonjour,

 

rappel :

si les blocs sont des points avec attributs.

points topographiques,

modification des altitudes,

ne pas répondre de constante, ou plutôt répondre "0.00"

choisir le nombre de "des six mâles"

lancer la commande et les points

se verront tronqués de leurs décimales superfétatoires...

 

amicalement

[didier]

re bonjour,

 

si c'est du texte, voir BONUSCAD...

[guerin]

MERCI A TOI DIDIER "MAITRE DU LISP",

QU'IL EST BON DE VOIR L'APPUI D'UN ANCIEN COLLEGUE.

AMICALEMENT

 

Arnaud

[didier]

coucou,

 

ça fait plaisir de te retrouver,

n'hésite pas à t'arrêter si tu passes devant le bureau,

 

tu connais mes horaires ;)

 

amitiés à Toi, et ton Alain de père

 

excusez moi, vous qui lisez ce message,

mais c'est pas la première fois que je retrouve quelqu'un via CadXp.

ça prouve deux choses,

CadXp est connu,

et moi je deviens vieux