
|
INFO - FAQ - CC2-Forum - CCPro-Forum |
|
||
|
Hallo gerdl! Vielen Dank für das Programm läuft prima noch eine frage wie kann ich die Ports einzeln ansprechen mit on und off mfg Klaus > Hallo Klaus! > Hier ein Ausschnitt meines Prog. zum schreiben > > mfg gerdl > > > Define SCL port[5] > Define SDA port[6] > Define ports byte[1] > Define data byte[2] > Define i byte[3] > > #loop > ports=&b00001101 ' Port 1,3,4 auf on setzen > goto pcf_Schr > > #pcf_Schr > print " PCF-schreiben" > data = &h40 'Schreiben eines Bytes an einen PCF8574 an Adr. 0.0.0: > gosub i2c_start > data=ports > gosub i2c_write > gosub i2c_stop > goto loop > > #pcf_lesen > data = &h41 'Lesen eines Bytes von einen PCF8574 an 0.0.0: > gosub i2c_start > gosub i2c_readlast > gosub i2c_stop > goto loop > > ' I2C Steuerung > #i2c_stop > SDA = 0 > DEACT SCL > DEACT SDA > return > > #i2c_start 'returns Ack in i > SDA = 1 > SCL = 1 > SDA = 0 > SCL = 0 > #i2c_write 'returns Ack in i > for i=0 to 7 > SDA = data AND (&h80 SHR i) > TOG SCL > TOG SCL > next i > DEACT SDA > TOG SCL > i = NOT SDA > TOG SCL > return > > #i2c_read > gosub i2c_sub_read > SDA = 0 > TOG SCL > TOG SCL > return > > #i2c_readlast > gosub i2c_sub_read > TOG SCL > TOG SCL > return > > #i2c_sub_read > DEACT SDA > data = 0 > for i=0 to 7 > TOG SCL > data = (data shl 1) or (SDA and 1) > TOG SCL > next > return > > > > > Hallo > > ich suche ein Programm wo ich ein PCF 8574 mit der Open Micro ansteuern kann nur als Ausgänge. > > Ich brauche die Zusatz-Ports für LEDs und Relais. > > mfg Klaus |
| Antwort schreiben |