Interrupt und PCF8574

[RHS]

Hallo,

ich habe den Interrupt-Ausgang eines PCF 8574 mit INT5 (PE.5)
eines Mega128 verbunden. Am PCF 8574 sind Taster gegen
Masse angeschlossen.

Ich möchte nun in Bascom eine Interrupt-Routine anspringen und
dort abfragen, welche Taster gedrückt sind.

Config Int5 = FALLING
On Int5 PCF_Key

Enable Interrupts
Enable Int5                                                 

Do
 'irgendwas
Loop

PCF_Key:
  Print "Taster gedrückt"
Return

Mein Problem ist, dass das Interrupt-Label immer/ständig
angesprungen wird. Wie macht man das richtig?

Danke: - Reinhard -

[linux_80]

Hallo,
hast Du überall Pullup Widerstände drin (bei INT und Tastern), damit keine Signale ins flattern kommen?

[RHS]

@linux_80

PullUp's sind bei den Tastern dran. Wie soll ich das beim INT
machen?

Ich habe gerade noch mal gemessen: wenn ich einen Taster
drücke, wird der INT-Ausgang vom PCF auf low (0) gezogen.
Ich kann das Signal aber beim M128 nicht auswerten ...

Gruß: - Reinhard -

[linux_80]

im DB unter 7.2 ist es auch dargestellt, Fig.12
Die Tasten werden dann auch noch prellen,
wenn nix gedrückt wird sollte zumindest kein INT ausgelöst werden.

Wenn der M128 beim INT auf falling reagiert, sollte das schon mal dir richtige Richtung sein.

[PicNick]

der INT -ausgang ist open-drain, verständlicherweise. Hast du das berücksichtigt ?

[RHS]

@PicNick

was sagt mir das genau?

Ich habe jetzt den PullUp beim INT installiert (10K gegen VCC) und
es läuft immer noch nicht ...

Was muss ich noch einstellen, damit der M128 das Signal auswerten
kann?

Gruß: - Reinhard -

[PicNick]

Ist der INT-Pin am 128-er als Input definiert ? Ich kann in den diversen Beschreibungen nicht entnehmen, ob das automatisch mit der Interrupt-definition geschieht.

was sagt mir das genau?

--> Pullup. Hat sich aber eledigt, seh ich.

[RHS]

@PicNick

Den INT-Pin am M128 habe ich nicht explizit als Eingang definiert.

Der folgende Code läuft fast richtig:

' TestInt5.bas
' ------------
' PCF 8574 : P0 <- Taster gegen GND
'            P4 -> grüne LED -> R -> VCC
'            P5 -> gelbe LED -> R -> VCC
'            P5 -> rote LED -> R -> VCC
'           INT -> 10K -> VCC
'
' M128     :PE5 (INT5) <- CD4050 <- INT von PCF8574


$regfile = "m128def.dat"

$hwstack = 64
$framesize = 64
$swstack = 64
$crystal = 16000000                          'Quarzfrequenz 16 MHz

$baud = 19200                                'Baudrate COM1
$baud1 = 19200                               'Baudrate COM2

Const PCF_Adr = &H40

Dim PCF_Port As Byte
Dim B As Byte


Dim i As Integer

Config Sda = Portd.1
Config Scl = Portd.0


I2cinit                                      'I2C-Bus initialisieren
Waitms 250


'1.Hardware UART
'keine Definition notwendig (Ausgaben mit einfachem Print möglich)

'2.Hardware UART
Open "Com2:" For Binary As #1


'alle LED's aus (invertiertes Schalten)
PCF_Port = &B11111111
I2CSend PCF_Adr , PCF_Port


Config Int5 = Rising
On Int5 INT5_ISR
Enable Interrupts
Enable Int5


i = 0


Print #1 , "Start ..."


Do

   Print #1 , i ; "->" ; Bin(PCF_Port)

   'Tastenstatus lesen
   I2CReceive PCF_Adr , PCF_Port

   'gelbe LED an Port P5 einschalten
   PCF_Port.5 = 0
   I2CSend PCF_Adr , PCF_Port

   Waitms 250

   'grüne LED an Port P4 einschalten
   PCF_Port.4 = 0
   I2CSend PCF_Adr , PCF_Port

   Waitms 250

   'gelbe & grüne LED aus
   PCF_Port.5 = 1
   PCF_Port.4 = 1
   I2CSend PCF_Adr , PCF_Port

   Waitms 500

Loop


Close #1


End


'Service-Routine für INT5
INT5_ISR:

   Incr i

   'Tastenstatus lesen, mit entprellen
   I2CReceive PCF_Adr , PCF_Port
   Waitms 50
   I2CReceive PCF_Adr , B

   If PCF_Port.0 = B.0 then
      'rote LED an Port P6 umschalten
      Toggle PCF_Port.6
      I2CSend PCF_Adr , PCF_Port
   End if

Return

Fast deshalb, weil nach ein paar Tastendrücken der Port 0 des
PCF8574 (also der Port, wo der Taster angeschlossen ist) immer
auf 0 stehen bleibt ... also kein Interrupt mehr ausgelöst wird.

Grundsätzlich kann' s doch nicht so schwer sein ... . Kann jemand
vielleicht noch mal über den Code schauen?

Gruß: - Reinhard -

[PicNick]

Was den INT betrifft, seh ich da nix Böses.

Äh, mir fällt ein, daß Bascom in der 1.117.4 Version Probleme mit den Interrupts hatte. Du hast ja wenigstens 1.11.7.8 oder 9 ?

[linux_80]

und sollte der INT nicht auf falling reagieren !?
Wir wärs, als hätte ich in so'nem Datenblatt was davon gelesen !