
|
INFO - FAQ - CC2-Forum - CCPro-Forum |
|
||
|
Hallo Klaus! Einzeln die bits setzen Define x1 bit[1] Define x2 bit[2] Define x3 bit[3] Define x4 bit[4] Define x5 bit[5] Define x6 bit[6] Define x7 bit[7] Define x8 bit[8] Bit 1-8 ist Byte1, jetzt kannst Du die bits x1-x8 einzeln mit on und off setzen. diese Zeile natürlich vorher löschen ports=&b00001101 ' Port 1,3,4 auf on setzen mfg gerdl > 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 |