Zahlen runden

[WPShadow]

Hi!

Wie runde ich Zahlen am Besten? Habe diesen Weg versucht:

Code (glbasic) Select Expand

posx = 255

x_lang = LEN(posx)

DEC posx, MID$("0", x_lang, 1)Funktioniert übrigens nicht... =/

Mein Versuch war bzw. ist, die letzte Stelle auf 0 zu setzen. Danach wäre ein weiterer Schritt gewesen, die Koordinaten anzunähern, d.h. wenn näher an 240 dann 240 ansonsten 220. Ich versuche einen Raster aufzubauen, da das Problem...

Hat wer 'ne Idee? Ich gebe es für heute nämlcih auf und gehe schlafen...

GLG

W.

[Kitty Hello]

Ein Raster macht man so:

Code (glbasic) Select Expand

raster = 32
WHILE TRUE
   MOUSESTATE mx, my, b1, b2
   x = INTEGER(mx / raster)
   y = INTEGER(my / raster)
   PRINT "M", mx, my
   PRINT "R", x, y
   SHOWSCREEN
WENDRunden von Zahlen (also .5 = 1, .4445 = 0) macht man so:

Code (glbasic) Select Expand

rund = INTEGER(eckig + .5)Runden auf 2 Stellen macht man so:

Code (glbasic) Select Expand

FUNCTION Round: number, num_dec
LOCAL p
   p=POW(10, num_dec)
   RETURN INTEGER(number*p + .5) / p
ENDFUNCTIONWenn Du's nur als Text schreiben willst:

Code (glbasic) Select Expand

  text$ = FORMAT$(0, 2, number)