Very fast NEW division routine with string math...

[Jack]

hello Pete
something is wrong, try with the following values

Code: (Select All)

limit&& = 32: betatest% = 0
If betatest% Then Width 170, 42: _ScreenMove 0, 0
Dim Shared stringmatha$, stringmathb$, runningtotal$, operator$
a$ = "8." + String$(limit&& - 1, "8")
b$ = "9." + String$(limit&& - 1, "9")

the division routine goes into an infinite loop