Hello, Jerry:
On 22-Nov-99, [EMAIL PROTECTED] wrote:
> Try the script below. It rounds to n digits after the decimal point. n may
> even be negative. Use do read %filename to load the script.
Thanks, but it may take me a while to understand it.
> round: func [x[integer! decimal!] n[integer!]]
> [
> either x >= 0
> [
> x: (x * (10 ** n)) + 0.5
> x: x - (x // 1)
> x: x * (10 ** - n)
> ]
> [x: - round - x n]
> ]
--
---===///||| Donald Dalley |||\\\===---
The World of AmiBroker Support
http://webhome.idirect.com/~ddalley
Member: ICOA and Team AMIGA
