Read DS18S20

[PICante]

Yes, my manual also says 12-bit. edited almost instantaneously! :-)

I have got the P250a patch installed, can’t seem to find any newer?

[skimask]

Yes, my manual also says 12-bit. edited almost instantaneously! :-)

I have got the P250a patch installed, can’t seem to find any newer?

There's a b patch out now.

Show the code...

[PICante]

I will try to find and run the patch to find out if that’s the culprit.

Thanks ski

[PICante]

Patch in place..... No, that did not cancel the compile error!
Here’s the code:

READTEMP:

OWOUT PORTA.5,1,[$CC, $44]                       ' SEND Start Temperature Conversion command

 
    OWOUT PORTA.5,1,[$CC, $BE]                   ' SEND Read Temperature command

 
    OWIN PORTA.5,0,[STR dq\9]                    ' Retrieve all 9 bytes of data

    RawTemp.Byte0 = dq[0]

    RawTemp.byte1 = dq[1]

    IF RawTemp.8 = 1 then                       ' Check IF temperature is a negative reading

 

        SignC = Negative

        RawTemp.lowbyte = RawTemp.lowbyte ^ 255               ' Invert data

        ELSE

        SignC = Positive

                 ENDIF

 

    dummy = RawTemp.0                                 ' Store the half degree indicator bit

 

    TempC = ((RawTemp.lowbyte) >> 1) * 100          ' Divide raw data by 2 to give real temperature

 

    TempC = TempC + (dummy * 50)                    ' Add the half degree is present

 

    IF SignC = Negative then                       ' Only proceed IF temperature is negative

 

        IF TempC => 1770 then   

            SignF = Negative

            TempF = (TempC + 5000) * 900

            TempF = div32 500

            TempF = TempF - 12200

            RETURN

 

            ELSE

            SignF = Positive

            TempF = (TempC + 5000) * 900

            TempF = div32 500

            TempF = 12200 - TempF

            RETURN

 

        ENDIF    

    ENDIF

    SignF = Positive

    TempF = TempC * 18 / 10 + 3200

    RETURN

Thanks!

[Acetronics2]

Hi,

Is not that much simpler than yout modifyer and the two following lines :

OWIN PORTA.5,0,[STR dq\9]                    ' Retrieve all 9 bytes of data

    RawTemp.Byte0 = dq[0]

    RawTemp.byte1 = dq[1]

( taken from a Malc C example )

   OWIN    Porta.5, 2, [R_Temp.Lowbyte, R_Temp.Highbyte]      ' Read two bytes / end comms

Alain

[PICante]

Hi Alain,

Your suggestion tested, does not compile due to multiple errors in the line.

Made a search in the forum but could not find anything regarding the STR macro problem.

Thanks.

[skimask]

I know that's not ALL of the code...

[Acetronics2]

does not compile due to multiple errors in the line.

Made a search in the forum but could not find anything regarding the STR macro problem.

I can't believe it ...

I can't ...

Alain

[PICante]

I know that's not ALL of the code...

You are correct; it’s not all the code. The rest of the code is working fine this is only going to be the part (subroutine) to measure temperature. And it’s also the part that does not compile.

Thanks!

[Bruce]

Looks like you have dq defined as a WORD VS BYTE.

[skimask]

You are correct; it’s not all the code. The rest of the code is working fine this is only going to be the part (subroutine) to measure temperature. And it’s also the part that does not compile.

Thanks!

The rest of the code may very well be working fine, but the rest of the code also has any setup/initialization/interrupts that you are using, therefore, is just as important as the code that's messing up.
I must be making this up as I go or something...