hi,
so das mit dem Interrupt funktioniert jetzt, es lag nur an ein paar Schreibfehlern im Code.
Aber wie messe ich nun die Zeit, wie lange PIND.3 auf Masse gezogen wird. Ich nehme mal stark an mit einem Timer aber wie?
vielen dank : )
Code:
$regfile = "attiny2313.dat"
$crystal = 1000000
$hwstack = 64
$swstack = 30
$framesize = 120
Config Pind.2 = Input
Config Portd.1 = Output
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portb.3 , Db5 = Portb.2 , Db6 = Portb.1 , Db7 = Portb.0 , E = Portb.5 , Rs = Portb.4
Config Lcdbus = 4
'springe Zu Isr_von _int0
Portd.3 = 1
Config Int1 = Falling 'fallende Flanke
'INT0 einschalten
Enable Int1
'Interrupts global einschalten. Das ist der Hauptschalter für alle Interrupts
Enable Interrupts
On Int1 On_int0
Cls
Do
Toggle Portd.1
Waitms 200
Locate 1 , 1
Lcd "Test"
Loop
On_int0:
Cls
Locate 1 , 1
Lcd "Hallo Ari"
Wait 1
Cls
Return
Lesezeichen