division problem 500000 / 133

[Dave]

Here is a snipit form a program I use and it works great:
'************************************************* *******************
CALCF_C: 'CALCULATE DEG.F and DEG.C for LM 95231 TEMPERATURE SENSOR READING
'************************************************* *******************
CALCF:
SCRATCH = TEMPREAD * 1000
TEMPF = DIV32 17777
TEMPF = TEMPF * 10
TEMPF = TEMPF + OFFSET
CALCC:
SCRATCH = TEMPREAD * 10
TEMPC = DIV32 32
RETURN

Just make sure you don't have any interrupts going on when using DIV32.
I also think your problem may be that you are using a variable after the DIV32 keyword. Try entering the constant value and see if that doesn't work.

[lerameur]

Dummy = 500*1000 ' Produce intermediate result of 500000
Result = DIV32 133

lcdout $FE,2, "Duty:", dec Result

... still getting 65535 as output

Thats all I have in the program, no interrupt nothing else !

then I initialized my parameters this way:
a var word
b var word
a= 500
b = 1000
Dummy VAR word
Result VAR WORD
Divider con 145

Dummy = a * b ' Produce intermediate result of 500000
Result = DIV32 133

and its now working.. Dummy doesnt like numbers