Hallo Liebe Forum Gemeinde und Bastler
Komme gleich mal zu meinen Proplem
ich habe eine folgende Platinen
1x Master ATmega8 mit I2CBUS
1x Platine mit PCF8574AP mit 4xRealis adresse &H7E
1x Platine mit PCF8574AP mit 4xTasten gegen GND adresse &H71
Mein Folgenes Proplem wie macht man das das ein port wie sehe im Code das ich was schalten kann....
Code
Code
$regfile "m8def.dat"
$crystal = 10000000
$hwstack = 32
$swstack = 10
$framesize = 40
Config Sda = Portc.4
Config Scl = Portc.5
Const Pcf8574_4realis = &H7E '4Fach Realis steuerung 1x Platine mit PCF8574AP
Const Pcf8574_lesen = &H71 '4Fach Taster auch auf 1x Platine mit PCF8574AP
I2cinit
Dim Realis_1 As Byte
Dim Realis_2 As Byte
Dim Pcf8574_eingabe As Byte
Realis_1 = &B00000001
Realis_2 = &B00000010
Do
If Pcf8574_eingabe.0 = 0 Then
I2csend &H7E , Realis_1
End If
If Pcf8574_eingabe.1 = 0 Then
I2csend &H7E , Realis_2
End If
Loop
Return
Alles anzeigen
zu Mein proplem:
wenn ich Taste1 von PCF8574AP Drücke soll Realis1 angehen, erneutes drücken wieder aus.......
wenn ich Taste2 von PCF8574AP Drücke soll Realis2 Angehen und beim loslassen wieder aus.....
wenn jemand mir helfen kann oder tipps geben kann dann immer her damit....
Mit Freundtlichen Grüßen
Thorsten Sch.