eGospodarka.pl
eGospodarka.pl poleca

eGospodarka.plGrupypl.misc.elektronikaAtmega32 i ds18b20 PROBLEM › Atmega32 i ds18b20 PROBLEM
  • 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

Podziel się

Poleć ten post znajomemu poleć

Wydrukuj ten post drukuj


Następne wpisy z tego wątku

Najnowsze wątki z tej grupy


Najnowsze wątki

Szukaj w grupach

Eksperci egospodarka.pl

1 1 1

Wpisz nazwę miasta, dla którego chcesz znaleźć jednostkę ZUS.

Wzory dokumentów

Bezpłatne wzory dokumentów i formularzy.
Wyszukaj i pobierz za darmo: