-
Path: news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!news.onet.pl!new
sgate.onet.pl!niusy.onet.pl
From: "marynarz" <g...@p...onet.pl>
Newsgroups: pl.misc.elektronika
Subject: Atmega32 i ds18b20 PROBLEM
Date: Mon, 08 Mar 2010 19:51:10 +0100
Organization: Onet.pl
Lines: 52
Sender: n...@n...onet.pl
Message-ID: <3...@n...onet.pl>
NNTP-Posting-Host: newsgate.onet.pl
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-2"
Content-Transfer-Encoding: 8bit
X-Trace: newsgate.onet.pl 1268074271 4846 213.180.130.18 (8 Mar 2010 18:51:11 GMT)
X-Complaints-To: n...@o...pl
NNTP-Posting-Date: Mon, 8 Mar 2010 18:51:11 +0000 (UTC)
Content-Disposition: inline
X-Mailer: http://niusy.onet.pl
X-Forwarded-For: 153.19.227.81, 10.174.28.62
X-User-Agent: Mozilla/5.0 (Windows; U; Windows NT 6.1; pl; rv:1.9.2) Gecko/20100115
Firefox/3.6
Xref: news-archive.icm.edu.pl pl.misc.elektronika:583999
[ ukryj nagłówki ]Witam
Mam następujący problem z Atmega32 i termometrem DS18b20, mianowicie na nóżce
PD.7(poniżej wkleję kod w bascomie) mam cały czas 5V a termometry podłączane do
tej nóżki ulegają spaleniu(już spaliłem 3 układy).
Kod obsługi termometru w bascomie:
$regfile = "m32def.dat"
$crystal = 1000000 'korzysta z wbudowanego oscylatora
Config Portd = output
Config 1wire = Portd.7
Dim Odczyt(2) As Byte
Declare Sub Odcz_temp
Do
Call Odcz_temp
Loop
End
Sub Odcz_temp
Wait 5
1wreset
1wwrite &HCC
1wwrite &H44
Waitms 750
1wreset
1wwrite &HCC
1wwrite &HBE
Waitms 750
Odczyt(1) = 1wread(2)
1wreset
If Err = 1 Then
Cls
'Lcd "brak ukladu"
Portd.5 = 1
Waitms 750
Else
Portd.5 = 0
End If
Odczyt(1) = Odczyt(1) / 2
End Sub
Do PD.5 podłączona jest dioda LED.
Próbowałem nóżkę PD.7 ustawić jako wejście jednak daje to ten sam efekt.
Pomóżcie bo od 2 dni and tym siedzę i nie wiem co robić.
--
Wysłano z serwisu OnetNiusy: http://niusy.onet.pl
Następne wpisy z tego wątku
- 08.03.10 19:26 j.r.
- 08.03.10 19:57 g...@p...onet.pl
- 08.03.10 21:42 Gejzero
- 08.03.10 21:48 g...@p...onet.pl
- 08.03.10 22:40 Marcin Wasilewski
- 08.03.10 23:04 MM
- 09.03.10 10:00 Zibi-Gliwice
Najnowsze wątki z tej grupy
- "Wybitna" inteligencja AI
- test stereo
- Bluetooth stereo
- W USA budują pierwszą komercyjną elektrownię fuzji jądrowej
- Weryfikacja myjki ultradźwiękowej
- zasieg radaru
- Zmywarka Bosch SRV55T43EU - awaria
- Kod zniżkowy w TME do 26.09.2025
- SFP, 10G, simplex sc/apc
- [słabe wiatry powodują - przyp. JMJ] Energetyczny paraliż w Niemczech
- NxtPaper
- Programiści nie przestają zadziwiać świat
- Długi kabel zasilający a na końcu procek
- Dlaczego nam nie idzie
- Co czujnik to inna temperatura
Najnowsze wątki
- 2025-09-24 "Wybitna" inteligencja AI
- 2025-09-24 test stereo
- 2025-09-24 Bluetooth stereo
- 2025-09-24 Rzeszów => International Freight Forwarder <=
- 2025-09-24 Gdańsk => Delphi Programmer <=
- 2025-09-24 Warszawa => BI Developer / Analityk BI <=
- 2025-09-24 Alior zmiana logowania
- 2025-09-24 Warszawa => Senior Microsoft Dynamics 365 Business Central Consultant
- 2025-09-24 Andżelika Borys odwiedziła [WIELKIEGO PATRIOTĘ - przyp. JMJ] Andrzeja Poczobuta w [białoruskiej - przyp. JMJ] kolonii karnej
- 2025-09-24 W USA budują pierwszą komercyjną elektrownię fuzji jądrowej
- 2025-09-24 W USA budują pierwszą komercyjną elektrownię fuzji jądrowej
- 2025-09-24 W USA budują pierwszą komercyjną elektrownię fuzji jądrowej
- 2025-09-24 W USA budują pierwszą komercyjną elektrownię fuzji jądrowej
- 2025-09-23 Re: Kolory już są
- 2025-09-23 paragony grozy