Math problems with div32

[srspinho]

Hello Guys !

I have a piece of code that is giving me some troubles when my program runs over several hours without stop.

Here goes what I´m doing :

Hour var Byte
Minutes var Byte
Seconds var Byte
Time var Word
TempA var word
Kilometers var word
Hundreds var word

Time = (3600 * Hours) + (60 * Minutes) + Seconds
TempA=(((Kilometers * 10) + Hundreds) * 3600)
VM=DIV32 (Time)

The problem is that the variable "Time" goes over 32767 after 9 hours (or so), and I have, frequently trips over 14 hours.

does some one have any idea o how to simplify the math ?

Thank you very much !

Sérgio Pinheiro

[HenrikOlsson]

Hi,
Try this:


Time = (3600 * Hours) + (60 * Minutes) + Seconds

IF Time > 32767 THEN
Time = Time >> 1
TempA = ((Kilometers * 10) + Hundreds) >> 1
TempA = TempA * 3600
VM=DIV32 (Time)
ELSE
TempA = (((Kilometers * 10) + Hundreds) * 3600)
VM=DIV32 (Time)
ENDIF


/Henrik.

[srspinho]

Thank you Henrik !

I´ll try this tomorrow in the morning and I´ll let you know if it worked !

regards !