Question about round()

[Arnold]

Hi Charles,

for rounding a fractionial decimal number I currently use a macro:

Code: OxygenBasic

1. macro roundto(x,d) round(x*pow(10,d))\1/pow(10,d)
2.  
3. 'z=-1/6     '-0.16667
4. 'z=pi       '3.14159
5. 'z=3*4      '12
6. 'z=1        '1
7. z=10/8     '1.25
8.  
9. print roundto(z,5)
10. print roundto(1/9, 5) '0.11111
11.  

the macro does what I want but is there a better way to achieve the result or a builtin function / macro which I could use?

Roland

[Charles Pegge]

Hi Roland,

Try str( 1/9, 5 )

This will express 1/9 to 5 decimal places. Rounding rules are obeyed.

[Mike Lobanovsky]

That's a gotcha that used to drive me mad in the past as well.

[Charles Pegge]

Another similar trick to pad hexadecimals with leading zeros:

print hex(10,4) ' 000A

[Mike Lobanovsky]

Any analog to standard BASIC Print Using?

[Charles Pegge]

Hi Mike,

Not as a core function. Though I have a growing library inc/tableUtil.inc which incorporates C formats, using MSVCRT. It could be extended to accept Basic numeric formats as well.

Do you think the bean-counting professions would ever be interested in OxygenBasic?

[Arnold]

Sometimes it is a good idea to ask. I did not really notice the meaning of str. I tried: print val(str(pi,5)) * 2 and this works perfectly.
In examples\dataprocessing there is a demo format2.o2bas which does a lot of formatting, but this is more than I need in the moment.

[Aurel]

Try str( 1/9, 5 )
This will express 1/9 to 5 decimal places.

grrr i lso have problem with this....well so many  things are not documented   

[Mike Lobanovsky]

Do you think the bean-counting professions would ever be interested in OxygenBasic?

Not necessarily. But tell you what, Mr Pegge: without that important feature your OxygenBasic will not toddle for a BASIC at BP.org. The learning curve would be too prohibitive for a Beginner. Against the 8 sacred principles of BASIC. They say.

LOL