So, das ist der aktuelle Stand meines Quellcodes:

Code:
Sub main()
    Dim wRC5_Code As Word
    'Dim bRC5_ToggleBit As Byte
    Dim wRC5_Cmd As Word


    PRO_BOT128_INIT()
    RC5_Init(26)		'PortBit TSOP1736

    Irq_SetVect(INT_TIM3CMPA, Timer3_ISR)
    Timer_T3Time(7200, PS0_1024)


    Do While True
		wRC5_Code = RC5_Read()

        If wRC5_Code = 0 Then
        	'Motoren stoppen, wenn FB-Taste losgelassen wird
            MOTOR_STOP()
            DRIVE_OFF()
        Else
        	DRIVE_ON()

            'bRC5_ToggleBit = GetRC5_ToggleBit(wRC5_Code, 0)
            wRC5_Cmd = GetRC5_Command(wRC5_Code, 0)

            Select Case wRC5_Cmd
                Case RC5_CMD_FWD
					DRIVE_FWD(180, 0)
                Case RC5_CMD_BWD
					DRIVE_BWD(180, 0)
                Case RC5_CMD_RIGHT
					TURN_RIGHT(180, 0)
                Case RC5_CMD_LEFT
					TURN_LEFT(180, 0)
            End Select

        	'If bRC5_ToggleBit = 0 Then MOTOR_STOP() : End If
		End If

    End While
End Sub

Sub Timer3_ISR()
	Port_ToggleBit(FLL)
    Port_ToggleBit(FLR)

	Irq_GetCount(INT_TIM3CMPA)
End Sub

Eigentlich müsste Timer3 doch mit

Code:
Irq_SetVect(INT_TIM3CMPA, Timer3_ISR)
    Timer_T3Time(7200, PS0_1024)
die ISR alle 500 ms einmal auslösen, oder? Warum tut sich da nichts? Die LEDs bleiben dunkel. Die ISR wird aus irgendeinem Grund gar nicht erst angesprungen.

Ich bin schier am verzweifeln. Bild  
Hier haben doch einige einen PRO-BOT128, haben die den Timer3 noch nie erfolgreich eingesetzt? Raus damit. Bild