Verwalten von Polylinen X und Y Koordinaten

[blubossa]

bye to all,

ich muss rundungen von x und y koordinaten von pline verwalten.

unter dem code, den ich benutze:

(karte anzeigen)
(beitrag (kartenwagen 'rtos (kartenwagen 'car lst_pt))'("koordinated x"))
)

das ergebnis, das mir die folgende zeichenfolge zurückgibt, ist:
(mapcar 'rtos (mapcar 'car lst_pt) -->>
(4516.3069) "4296.1107" "0,0000" "552.7760" "2574.5771" "4276.0929" "4516.3069")

ich möchte, dass es nach dem punkt nur 3 dezimals gab, so dass von 1 bis 5 durch defekt abrollen, während von 6 bis 9 für überschuss.

wie kann ich das lösen?
danke.
b)

 

[blubossa]

bye to all,

ich muss rundungen von x und y koordinaten von pline verwalten.

unter dem code, den ich benutze:

(karte anzeigen)
(beitrag (kartenwagen 'rtos (kartenwagen 'car lst_pt))'("koordinated x"))
)

das ergebnis, das mir die folgende zeichenfolge zurückgibt, ist:
(mapcar 'rtos (mapcar 'car lst_pt) -->>
(4516.3069) "4296.1107" "0,0000" "552.7760" "2574.5771" "4276.0929" "4516.3069")

ich möchte, dass es nach dem punkt nur 3 dezimals gab, so dass von 1 bis 5 durch defekt abrollen, während von 6 bis 9 für überschuss.

wie kann ich das lösen?
danke.
b)

ich muss wirklich nur drei dezimalstellen haben, die vierte kann gekürzt werden.

danke.

 

[GP.]

rtos wird durch die luprec-variable beeinflusst, also entweder auf den wert, den sie vor dem start der funktion wünschen, oder verwenden sie die "Argumente" Funktion:

(rtos number) [modus [präzisionsgenauigkeit!

Chindi (rtos navar) 2. 3) gibt 3 dezimalziffern zurück



nb: modus = 2 pro dezimaleinheitswert


p.s.
für "das andere" problem senden sie mir die e-mail-adresse in pm.

 

[blubossa]

rtos wird durch die luprec-variable beeinflusst, also entweder auf den wert, den sie vor dem start der funktion wünschen, oder verwenden sie die "Argumente" Funktion:

(rtos number) [modus [präzisionsgenauigkeit!

Chindi (rtos navar) 2. 3) gibt 3 dezimalziffern zurück



nb: modus = 2 pro dezimaleinheitswert

ich versuchte, rtos so einzufügen, aber es geht falsch....
(append (mapcar '(rtos (mapcar 'car lst_pt))) 2 3) "("koordinated x"))

wie man rtos richtig mit mapcar verwendet?

 

[GP.]

sie müssen die funktion verwenden Lambda rtos als "anonyme funktion"

(Mapcar)
(lambda (x) (rtos x) 2. 3)
(Mapp 'car lst _ pt)
)