Ok so i did it the hardway, atleast it works... DBP should really have a round function, still this is a usefull workaround if anyone needs one...
this only works for rounding 3 decimal numbers into 2 decimals but it can be adapted to other rounding needs, but i am to tired and can't be arsed to make it universal right now...
Function round(number#)
number2# = number# * 100
s$ = str$(number2#)
s2$ = right$(s$,2)
s3$ = left$(s2$,1)
if s3$="."
s2$ = right$(s$,1)
if s2$ = "5" or s2$ = "6" or s2$ = "7" or s2$ = "8" or s2$ = "9"
inc number2#
endif
endif
number# = int(number2#)
number# = number# / 100
endfunction number#
