@Picknick nein, den fehler hab ich früher gemacht, bevor du mir gezeigt hat,wie es anders geht

Code:
If H_flag = 1 Then
   Incr H
   Incr H1
   Incr Rr
   H_flag = 0
 End If

Timer0_isr:
   Load Timer0 , Ticks0
     H_flag = 1

Return
so mache ich es jetzt und funzt super.


so, fehler eingekreist. hier ist der anker, der alles nach unten zieht:

Code:
 Ad0 = 0
      For X = 1 To 16                                      
         Mtemp = Getadc(0)
         Ad0 = Ad0 + Mtemp
      Next X
      Shift Ad0 , Right , 4
sobald ich die for-schleife weglasse flutscht es. wo ist der fehler, daß
Bascom bei einer kleinen zählschleife soextrem einstürzt?