Bascom i I2C



Masz problem? Zapytaj na forum elektroda.pl

Poprzedni Następny
Wiadomo¶ć
Spis tre¶ci
From: "Wit" <wit_at_nospam_kki.net.pl>
Subject: Bascom i I2C
Date: Fri, 3 Aug 2001 09:52:19 +0200


Witam!
Mam problem z pogramem obsługującym magistralę I2C do której jest podłączony
przetwornik a/c PCF8591. Aplikacja była opisana w EP 10/2000. Pretwornik ma
adres 144 przy odczycie z magistrali i 145 przy zapisie. Po podaniu adresu i
odczytaniu cały czas wyskakuje ta sama warto¶ć (procedura send2led),
niezależnie co tego co się poda na wej¶cia przetwornika. Nie wiem co jest
nie tak. Ponizej załączam fragmet programu, może ktos miał podobny problem i
jest w stanie mi cos poradzić.

Dim Channel(4) As Byte , C As Byte , Wartosc As Word , Volt As Integer
Channel(0) = &B00000000
Channel(1) = &B00000001
Channel(2) = &B00000010
Channel(3) = &B00000011
Config Scl = P3.3
Config Sda = P3.2
Do
For C = 0 To 3
I2cstart
I2cwbyte 144 '&B10010000
I2cwbyte Channel(c)
I2cstart
I2cwbyte 145 '&B10010001
I2crbyte Wartosc , 9
I2cstop
Volt = Wartosc / 0.102 'U ref: 2500; 0,102=255/Uref
Call Send2led(volt)
Next C
Loop


pozdrowienia
Witold Łuszczkiewicz