German Timer funktioniert nicht...

'Non-UI application (console / server application)
#Region Project Attributes
    #CommandLineArgs:
    #MergeLibraries: True
#End Region

Sub Process_Globals
    Public timer1 As Timer
End Sub

Sub AppStart (Args() As String)
    timer1.Initialize("Timer1", 1000)
    timer1.Enabled = True
    Log(timer1.IsInitialized)
    Private e As Int
    For m=1 To 10000000000000000
        e = e+1
        Log(e)
    Next
    
End Sub

Sub Timer1_Tick
    Log("Tick")
    'Handle tick events
End Sub

Sub Application_Error (Error As Exception, StackTrace As String) As Boolean
    Return True
End Sub