Hallo
ich will folgendes erreichen:
der controller soll ständig kontrollieren ob er rc5 empfangen hat und auf tastendruck der auf int1 geht soll er rc5 senden. funktioniert auch fast alles ausser, dass er nach dem interrupt leider nicht mehr richtig empfängt. das lcd zeigt dann immer 32" an.
für hilfen wäre ich sehr dankbar
Code:$regfile = "attiny2313.dat" $crystal = 1000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.3 , Db6 = Portb.2 , Db7 = Portb.1 , E = Portd.1 , Rs = Portd.0 Config Lcdbus = 4 'init interrupts und deklaration der var Enable Interrupts Enable Int1 Config Int1 = Falling Disable Int0 Cls Config Rc5 = Portd.2 Config Portb.3 = Output Config Pind.4 = Input Portb.4 = 1 Dim T As Byte , A As Byte , C As Byte , Reload As Long , Asend As Byte , Csend As Byte Asend = 10 Csend = 10 T = 0 Set Portb.3 On Int1 Send Nosave Do Getrc5(a , C) If C <> 255 Then Lcd C Lcd " " End If Loop Send: Rc5send T , Asend , Csend Return







Zitieren

Lesezeichen