DAY 020: MOD

[mnrvovrfc]

If one needs positive values as a result from MOD, simply write a small function to get the answer in a format which you can work with:

Code: (Select All)

FUNCTION ModPositive&& (number as _INTEGER64, number2 AS LONG)
    temp&& = number MOD number2 
    IF temp&& < 0 THEN temp&& = temp&& + number
    ModPositive = temp&&
END FUNCTION

Disclaimer: in case one wants to blame the forum moderators for "it crashed and I lost my data", there should be a check for "number2" to be zero. Or just let it at the first function line, errrr...