Das Open-Control-Projekt - Die Alternative zur C-Control-I


Das Forum zur C-Control-1
Welche C-Control-Varianten existieren?
Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren
INFO - FAQ - CC2-Forum - CCPro-Forum 

 Re: PCF8574 Ansteuerung Kategorie: Open-Micro/Open-Mini/Open-Midi/Open-Macro/Open-Maxi (von Klaus - 25.02.2011 10:38)
 Als Antwort auf Re: PCF8574 Ansteuerung von GerdL - 16.02.2011 20:04
Klaus nutzt:  Open-Micro, Open-Mini
Hallo Gerdl

ich habe schon wieder ein Problem
wenn ich Dein Programm alleine betreibe ist alles OK aber binde ich es in andere Programme ein
geht nichts mehr ich frage z.B. ein IC 4051 ab und will mit dem Ergebnis Ports ansteuern da geht nichs mehr.
mfg Klaus


> 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

Bisherige Antworten: