servus
ich muss mich kurz fassen akku wird leer
wenn ich den tda ansteuer hängt sich der mcu auf hier mein code
$regfile = "m8def.DAT"
$crystal = 8000000 '11.059 MHz Quarz
' 1200 Baud zum PC
Ddrd = 255
Portd = &B00000000
Config Lcd = 20 * 4 ' für LCD
Config Lcdbus = 4 ' LCD über 4 Datenbits
Config Lcdpin = Pin , Db4 = Portb.2 , Db5 = Portb.3 , Db6 = Portb.4 , Db7 = Portb.5 , E = Portb.0 , Rs = Portb.1
Config Scl = Portc.0 ' I2C-Port festlegen
Config Sda = Portc.1 'und hier SDA
'Dim Pcf8574_wadr As Byte
'Dim Pcf8574_radr As Byte ' Variablen
Dim Tda_adr As Byte
Tda_adr = &B01000000 ' Schreibadresse füt 8591
' Leseadresse
Cls
Locate 2 , 1
Lcd "test 1" ' zur LC-Anzeige
' zur RS232
'Ausgabe über RS232
I2cinit
Waitms 50
I2cstart
I2cwbyte Tda_adr 'Schreibadresse senden
I2cwbyte &B00100001 , Ack ' Kontrolbyte:
I2cwbyte &B110100 , Ack ' Analog out
I2cstop
Waitms 200
Cls
Locate 2 , 1
Lcd "test 2"
I2cstart
I2cwbyte Tda_adr 'Schreibadresse senden
I2cwbyte &B00100001 , Ack ' Kontrolbyte:
I2cwbyte &B101001 , Ack ' Analog out
I2cstop
der mcu kommt gar nicht mal bis zur zweiten display ausgabe
die adresspins hab ich alle auf 0V