Der Code ist wie folgt:
Wenn ich Portd.2 auf High ziehe bleibt Begin gleich, auf GND macht er nichts anderes als den Interrupt abzuarbeiten, sieht man daran, dass wenn man den Port wieder auf High setzt, die Zahl größer geworden ist. Was tun?Code:$regfile = "m32def.dat" $crystal = 16000000 $baud = 9600 $hwstack = 32 $framesize = 24 $swstack = 8 Config Portd.2 = Input Dim Begin as Long Config Int0 = Change On Int0 Interupt Enable Int0 Enable Interrupts Do Print Begin Print Waitms 200 Loop Interupt: Incr Begin Return







Zitieren

Lesezeichen