I know, I know... Ask a dumb question...

Well, this just pisses me off. Mod should return 855. Any suggestions/workarounds?

Code:

Break On
$nul=SetOption("WrapAtEOL","On")
en()

Function En()
    Dim $v
    $v=Exp(123,17)
    ? "Value1: "+$v
    ? $v mod 3233
EndFunction

function Exp($base,$power)
    dim $sub
    $base=0+$base
    $power=0+$power
    $Exp=cdbl(1)
    :exploop
    if $power>0
        $Exp=$Exp*$base
        $power=$power-1
        goto exploop
    endif
endfunction
_________________________
-Jim

...the sort of general malaise that only the genius possess and the insane lament.