Data conversions

[Gerhardt]

Wanted to do a temp probe using the 1822 but then got into a situation. The sample code provided to me does an Lcdout command with a dec(temperature) to display. According to the manual this is a decimal conversion from ascii. Then I wanted to be able to store data. Up to here I was ok. Write to eeprom. But I decided to use a serout command instead of LCDout which totally barfed when I tried to compile. I have tried to convert the data into something more friendly like a standard string but am unable to come up with any solution. Yes, I can just use the lcdout command but now it's turned into a challenge/learning experience. Any one have an idea of how to start to convert this into a standard string or how to get this to use the serout command? Even if it's not practical to program into the chip I'm interested from a learning perspective now.

Thanks much



SerPin VAR PortA.0 ' Serial output pin
temperature VAR WORD ' Temperature storage
count_remain VAR BYTE ' Count remaining
count_per_c VAR BYTE ' Count per degree C

DQ VAR PORTC.0 ' One-wire data pin

' Define LCD registers and bits
DEFINE LCD_DREG PORTD
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTE
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTE
DEFINE LCD_EBIT 1

AA var byte
BB var byte
CC var byte
DD var byte


ADCON1 = %00000111 ' Set PORTA and PORTE to digital
Low PORTE.2 ' LCD R/W line low (W)


mainloop:
OWOUT DQ, 1, [$CC, $44] ' Start temperature conversion

pause 2000

OWOUT DQ, 1, [$CC, $BE] ' Read the temperature
OWIN DQ, 0, [temperature.LOWBYTE, temperature.HIGHBYTE]

' Calculate temperature in degrees C to 2 decimal places
' (not valid for negative temperature)
temperature = temperature */ 1600
LCDOUT $fe, 1, DEC (temperature / 100), ".", DEC2 temperature, " C"

' Calculate temperature in degrees F to 2 decimal places
' (not valid for negative temperature)
temperature = (temperature */ 461) + 3200
LCDOUT $fe, $c0, DEC (temperature / 100), ".", DEC2 temperature, " F"

serout serpin,N9600,{(temperature/100)] 'won't even compile

GoTo mainloop ' Do it forever

[Archangel]

syntax error
{ != [
check your serout line

[Gerhardt]

Wow, that sure makes me feel like a drone, I looked at that a hundred times.
Thanks

[Gerhardt]

Ok, so that makes it compile but all I get is garbage out. The data is not compatible to that command so I still need to convert the data.
Anyone have any ideas?

[HenrikOlsson]

Well, provided you've got baudrate, voltage levels and polarity all correct it looks like what's missing is the DEC modifier in serout command. Without the dEC modifier you're sending the data "as is" and not as ASCII text that you can read on a terminal.

serout serpin,N9600,[DEC (temperature/100)]


/Henrik.

[Gerhardt]

Yes, that's true, but if you add dec to the serout command it doesn't compile

[richard]

serout2 serpin,N9600,[DEC (temperature/100)] if possible

or

serout serpin,N9600,[#(temperature/100)]

or

might need to be
temp=temperature/100

serout serpin,N9600,[#temp]