mikroprocesor Atmega 8A odczytuje błędne dane z czujnika temperatury MLX90614 (http://www.adafruit.com/datasheets/MLX90614.pdf)
Sprawdzone rzeczy:
-ciągłość połączeń
-napięcie pomiędzy nóżkami zasilania
-nowy mikrokontroler
-definiowanie innych wejść sda i scl w atmedze
- różne adresy zapisu i odczytu
zapisu:&B00000000, &H5A
odczytu:&B00000001 &H5B
-różne napięcia podciągające
schematy przesyłam w formie zdjęcia.
kod programu:
[syntax=basic4gl]$regfile = "m8Adef.dat"
$crystal = 1000000
$hwstack = 40
$swstack = 16
$framesize = 32
Deflcdchar 1 , 14 , 17 , 17 , 14 , 32 , 32 , 32 , 32 ' definicja znaki stopnia
'konfiguracja pinów magistrali I2C
Config Scl = Portc.5
Config Sda = Portc.4
I2cinit
Const Tempfactor = 0.02
'Deklaracja wszystkich zmiennych potrzebnych do pracy odczytu temp z promieniowania
Dim Napis2 As String * 5
Dim Highbyte2 As Byte , Lowbyte2 As Byte , Tempdata As Single , Pec As Byte
Cls
Do
Cls
Lcd "KROK1 "
Wait 1
'odczyt pomiaru z promieniowania
I2cstart 's
I2cwbyte &B00000000 'slave adress wr '
I2cwbyte &B00000111 'command
I2crepstart 'sr
I2cwbyte &B00000001 'slave adress RD
I2crbyte Lowbyte2 , Ack 'data byte low
I2crbyte Highbyte2 , Ack 'data byte high
I2crbyte Pec , Nack 'pec
I2cstop
Cls
Lcd "KROK2 "
Wait 1
'przetworzenie wyniku pomiaru na zmienna typu single
Tempdata = 0
Tempdata = Highbyte2
Shift Tempdata , Left , 8
Tempdata = Tempdata + Lowbyte2
Cls
Lcd "KROK3 "
Wait 1
'przetwarzanie wyników pomiaru na stopnie celcjusza
Tempdata = Tempdata * Tempfactor
Tempdata = Tempdata - 0.01
Tempdata = Tempdata - 273.15
Napis2 = Fusing(tempdata , "##.#")
Cls
Lcd " Temp Z Prom "
Lowerline
Lcd "Wynik:" ; Napis2 ; Chr(1) ; "C"
Wait 2
Cls
Lcd " higbyte 2" ; Highbyte2
Wait 2
Cls
Lcd " lowbyte 2" ; Lowbyte2
Wait 2
Loop
End[/syntax]
program pokazuje zawsze to samo napis2=1037.5
highbyte2=20
lowbyte= 2225
nóżki na schemacie to dwie pierwsze
Błagam Pomocy 2 dzień nad tym siedzę ;(
Statystyki: Napisane przez melexiss — 12 paź 2015, o 21:46
]]>