Moin
Ich habe in Bascom einen code für einen DS1624 gefunden.
Code:
$regfile = "m8def.dat" 'Define the chip you use
$baud = 19200 'Define UART BAUD rate
'Declare RAM for temperature storage
Dim I2ctemp As Byte 'Storage for the temperature
'Configure pins we want to use for the I²C bus
Config Scl = Portd.1 'Is serial clock SCL
Config Sda = Portd.3 'Is serial data SDA
'Declare constants - I2C chip addresses
Const Ds1721wr = &B10010000 'DS1624 Sensor write
Const Ds1721rd = &B10010001 'DS1624 Sensor read
'This section initializes the DS1624
I2cstart 'Sends start condition
I2cwbyte Ds1721wr 'Sends the address
'byte with r/w 0
'Access the CONFIG register (&HAC address byte)
I2cwbyte &HAC
'Set continuous conversion (&H00 command byte)
I2cwbyte &H00
I2cstop 'Sends stop condition
Waitms 25 'We have to wait some time after a stop
I2cstart
I2cwbyte Ds1721wr
'Start conversion (&HEE command byte)
I2cwbyte &HEE
I2cstop
Waitms 25
'End of initialization
Print 'Print empty line
Do
'Get the current temperature
I2cstart
I2cwbyte Ds1721wr
I2cwbyte &HAA 'Read temperature (&HAA command byte)
I2cstart
I2cwbyte Ds1721rd 'The chip will give register contents
'Temperature is stored as 12,5 but the ,5 first
I2crbyte I2ctemp
'So you'll have to read twice... first the ,5
I2crbyte I2ctemp , Nack
'And then the 12... we don't store the ,5
I2cstop
'That's why we read twice.
'We give NACK if the last byte is read
'Finally we print
Print "Temperature: " ; Str(i2ctemp) ; " degrees" ; Chr(13);
Waitms 25
Loop
End
wenn ich meinen Atmega8 damit beschrieben habe, dann bekomme ich im Terminal emulator so Zeichen:
Code:
xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€x
þ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxx
øxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà
€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€
xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€
x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxx
øxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€
xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€x
þ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxx
øxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà
€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€
xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€
x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxx
øxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€
xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€x
þ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxx
øxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà
€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€
xà€xüxxøxà€x€xàø€€€€€x€xþ€xà€x€x€xþ€xxxøxøxx€xà€xüxxøxà€x€xàø€€€€€
x€xþ€xà€x€x€xþ€xxx
woran kann das liegen ? ich weiß echt nicht weiter.
Vielen Dank, Lg 2A
Lesezeichen