wir grenzen den Fehler mal ein.

Folgende Zeilen mal auskommentieren:
Code:
'==============================================================================
'  M A I N    L O O P
'==============================================================================
Do
      If Irptflag = 1 Then
         Irptflag = 0                             ' 1 mS Event
      '----------check servo-------------
         Decr Servo_count
         If Servo_count = 0 Then
            Servo_count = Servo_c_count
             '   Gosub Servo_refresh   ****KOMMENTAR*******
         End If
      '----------check ADC-------------
         Decr Adc_count
         If Adc_count = 0 Then
            Adc_count = Adc_c_count
            For Adc_chn = 0 To 1
              ' Gosub Adc_get_val     ****KOMMENTAR*******
            Next
         End If
      '----------check Clock-------------
         Decr Second_count
         If Second_count = 0 Then
            Second_count = Second_c_count
'==============================================================================
'                      ONE SECOND SEQUENCE
'==============================================================================
            Gosub Tick_clock
            Gosub Show_clock

            Servo_t_1 = Servo_t_1 + 100
            If Servo_t_1 > Servo_c_max Then
               Servo_t_1 = Servo_c_min
            End If
            ' Gosub Set_servo_1               ****KOMMENTAR*******
            ' Gosub Show_servo_1            ****KOMMENTAR*******

            Servo_t_2 = Servo_t_1

            ' Gosub Set_servo_2                ****KOMMENTAR*******
            ' Gosub Show_servo_2             ****KOMMENTAR*******

'==============================================================================
         End If
      End If
      Gosub Rxreceive
  Loop
End
(Nix anschliessen)

Jetzt sollte sich mal nur die Uhr rechts oben bewegen

Don't panic, da kommen wir schon hin