Mirley - Elektronika i Programowanie

Witam
Czy może ktoś z Was obsługiwał w Bacomie cyfrowe potencjometry
DS-1803
MCP421000
PGA2311
PGA2320
Jeśli tak, to może chciałby się tym pochwalić?
Głównie są SPI chyba tylko ten jeden DS1803 jest 2Wire
Chciał bym wykorzystać właśnie I2C,ale nie wiem jak się zabrać do tego
Procesor jaki chce użyć do tego jest to Atmega8
Napisałem już kod w bascomie na potencjometr DS1803 ale nie działa
Jeśli ktoś był by w stanie pomoc z tym potencjometrem to bym bardzo prosił
DS1803 podłączyłem tak
H0 i H1 plus z CD_Playera
L0 i L1 masa z CD_Playera
W0 i W1 maja być wyjściami
Dodaje kod w bascom

$regfile = "m8def.dat"
$crystal = 10000000
$hwstack = 32
$swstack = 8
$framesize = 8

Config Sda = Portd.0
Config Scl = Portd.1

Config Pinb.0 = Input
Config Pinb.1 = Input

Config Lcd = 16 * 2

Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , Db7 = Portc.0 , E = Portc.4 , Rs = Portc.5
Dim Audio As Byte

I2cstart
I2cwbyte 80
I2cwbyte &B10101111
I2cwbyte Audio
I2cstop

S1 Alias Pinb.0

S2 Alias Pinb.1

Set Portd.0

Set Portd.1

' ustawienie pocz?tkowe ekspanderów

I2csend 118 , 0
I2csend 114 , 0

'------------------ Audio G?osniej -------

Do

Debounce S1 , 0 , Pr1 , Sub
Debounce S2 , 0 , Pr1 , Sub

I2cstart
I2cwbyte 80
I2cwbyte &B10101111
I2cwbyte Audio
I2cstop

Loop
End

Pr1:

Cursor Off

If S1 = 0 Then
Incr Audio
End If
If S2 = 0 Then
Decr Audio

End If

Return