Zaslal: čt září 10 2015, 14:35 Předmět: Atmega16 a DS18B20 neměří
Dobrý den,
jsem samouk a učím se programovat v cčku. Momentálně pracuji na teploměru s čidlem dallas 18B20. Bohužel mám napsaný program a v pořádku od simulovaný v ISIS proteus, bohužel však, když vše poskládám na nepájivém poli, tak teploměr ukazuje stále 0.0 což znamená, že je něco špatně.
Zkoušel jsem měnit spoustu věcí jako je časování sběrnice podle různých návodů a kód samotný jsem zkoušel taky asi 3x podle různých zdrojů když mi ten můj nefungoval. Výsledek byl vždy stejný, čidla jsem odzkoušel 4 různá.
Čidlo je zapojeno do normálního režimu s normálním napájením. Drátová propojení na nepájivém poli jsem propípal.
Jsem celkem zoufalý a proto bych Vás chtěl poprosit o nějakou radu, či revizi mého kódu v jazyce C. Předem děkuji.
Založen: Mar 06, 2005 Příspěvky: 787 Bydliště: Havířov
Zaslal: čt září 10 2015, 17:24 Předmět:
Při pohledu na ten program v "C" mě jímá děs a hrůza.
To je tak nepřehledné.
Jen pro porovnání jak to řeším já.
'-------------------------------------------------------------------
'konfigurace sběrnice 1wire
Config 1wire = Porta.7 'zde je připojeno čidlo
'Dim T1 As Single
'Dim T2 As Single
Defsng T
Defbyte B
Dim Tmp As String * 6
Dim Znak As String * 1
'-------------------------------------------------------------------
Sub Teplomer_ds18b20
1wreset
1wwrite &HCC 'skip ROM
1wwrite &H44 'convert T
Waitms 750
1wreset
1wwrite &HCC 'skip ROM
1wwrite &HBE 'read
B1 = 1wread() 'odečet teploměru (LSB)
B2 = 1wread() 'odečet teploměru (MSB)
1wreset
If B2 >= 248 Then 'v případě záporných teplot
B1 = 255 - B1 'Od 255 odečteme B1
B2 = 255 - B2 'Od 255 odečteme B2
Znak = "-" 'zobrazíme znak "mínus"
Else
Znak = " " ' nebo "+"
End If
T1 = B1 / 16 'Přesunutí vpravo o 4 bajty
T2 = B2 * 16 'přesunutí vlevo o 4 bajty
T1 = T1 + T2
Tmp = Fusing(t1 , "#.#") 'v "Tmp" je teplota jako "string"
End Sub _________________ http://tesinsko.cz/webcams/rondel
Je to minimalistická varianta, která neřeší více čidel na jednom drátu ani procházení dle ROM.
Pro ověření funkce HW to stačí a pak se můžeš inspirovat a zakomponovat části do svého kodu. Mě to trochu blbne s přerušením, které způsobí rozhození v časování komunikace.
Založen: Mar 06, 2005 Příspěvky: 787 Bydliště: Havířov
Zaslal: pá září 11 2015, 18:12 Předmět:
lesana87: nikoho "nevyučuju" ale uznávám, že tam je chyba, zřejmě chybný pozůstatek z pokusů. Bity a bajty si fakt nepletu. _________________ http://tesinsko.cz/webcams/rondel
Nemůžete odesílat nové téma do tohoto fóra. Nemůžete odpovídat na témata v tomto fóru. Nemůžete upravovat své příspěvky v tomto fóru. Nemůžete mazat své příspěvky v tomto fóru. Nemůžete hlasovat v tomto fóru. Nemůžete připojovat soubory k příspěvkům Můžete stahovat a prohlížet přiložené soubory
Informace na portálu Elektro bastlírny jsou prezentovány za účelem vzdělání čtenářů a rozšíření zájmu o elektroniku. Autoři článků na serveru neberou žádnou zodpovědnost za škody vzniklé těmito zapojeními. Rovněž neberou žádnou odpovědnost za případnou újmu na zdraví vzniklou úrazem elektrickým proudem. Autoři a správci těchto stránek nepřejímají záruku za správnost zveřejněných materiálů. Předkládané informace a zapojení jsou zveřejněny bez ohledu na případné patenty třetích osob. Nároky na odškodnění na základě změn, chyb nebo vynechání jsou zásadně vyloučeny. Všechny registrované nebo jiné obchodní známky zde použité jsou majetkem jejich vlastníků. Uvedením nejsou zpochybněna z toho vyplývající vlastnická práva. Použití konstrukcí v rozporu se zákonem je přísně zakázáno. Vzhledem k tomu, že původ předkládaných materiálů nelze žádným způsobem dohledat, nelze je použít pro komerční účely! Tento nekomerční server nemá z uvedených zapojení či konstrukcí žádný zisk. Nezodpovídáme za pravost předkládaných materiálů třetími osobami a jejich původ. V případě, že zjistíte porušení autorského práva či jiné nesrovnalosti, kontaktujte administrátory na diskuzním fóru EB.