Hier meine Uhr:
Code: Alles auswählen
Repeat
...
...
...
If StartZeitGesetzt = 0
StartZeit = ElapsedMilliseconds()
StartZeitGesetzt = 1
Minuten = 3
Sekunden = 30
EndIf
Uhrzeit = ElapsedMilliseconds() - StartZeit
StartDrawing(ScreenOutput())
Box(950, 700, 52, 22, 0)
Box(951, 701, 50, 20, RGB(255, 255, 255))
DrawingMode(3)
DrawText(957, 705, StrQ(Minuten)+" : ", 0)
DrawText(970, 705, StrQ(Sekunden), 0)
StopDrawing()
EndIf
If Not Uhrzeit%1000
Sekunden -1
EndIf
If Sekunden = 0
Minuten -1
Sekunden = 59
EndIf
...
...
...
Until Beenden = 1