| Probleme mit PCF 8574 Kategorie: I²C-Bus (von Marco - 14.08.2011 14:03) | |
|
| |
|
Hallo, also ich habe ein CC Pro Application Board Mega 32. Habe gerade erst angefangen mit dem Board und teste Jetzt alle Funktionen durch, nun wollte ich den Portexpander PFC 8574 ansprechen. Leider habe ich noch so einige Probleme. Die Pins auf dem Application board sind gesetzt und somit sollten ja die Pullups dran sein. Der 8574 hat seine versorgungsspannung und die 3 addressierungs pins liegen auf GND was dann eine 40 er adresse ergeben sollte. Ich habe erstmal 1 LED an P0 angeschlossen ca 150 Ohm an + und die LED an P0. Leider tut sich da garnichts. Ich hoffe ihr könnt mir mal auf die sprünge helfen, Ob an dem Programm was nicht stimmt oder ob ich da etwas nicht richtig verdrahtet habe. Evtl gibts auch ne möglichkeit die Kommunikation mit dem 8574 zu testen. MFG Marco Ich habe das folgende Demo Programm gefunden und getestet. ========================================== #define PCF8574_W &H40 #define PCF8574_R &H41 Dim Zeile1(9) As Char Dim Zeile2(9) As Char Dim X As Word Dim Port As Byte Sub main() 'Init I2C_Init(I2C_100kHz) 'I2C Bit Rate: 100 kHz LCD_start() 'LCD Init 'Info Zeile1 = "PCF8571T" LCD_Locate(1,1) : LCD_WriteText(Zeile1) Zeile2 = " DEMO " LCD_Locate(2,1) : LCD_WriteText(Zeile2) AbsDelay(2500) LCD_start() '----------------------------------------------------------------------- ' Lauflicht '----------------------------------------------------------------------- Lab Lauflicht Zeile1 = "Lauf- " LCD_Locate(1,1) : LCD_WriteText(Zeile1) Zeile2 = "Licht " LCD_Locate(2,1) : LCD_WriteText(Zeile2) X = &H1 Do While (1) X = X << 1 I2C_Start() I2C_Write(PCF8574_W) I2C_Write(X) I2C_Stop() AbsDelay(250) If X = &H0 Then Goto Lauflicht End If End While End Sub ==================================== | |
Antwort schreiben Antworten:  Re: Probleme mit PCF 8574 (von Jan - 15.08.2011 20:40) | |
Zur Übersicht - INFO - Neueste 50 Beiträge - Neuer Beitrag - Suchen - Zum C-Control-I-Forum - Zum C-Control-II-Forum