@linux_80
vielen dank das du als einziger hier mir vernünftig weitergeholfen hast. Aber ich habe es nun ander gelöst Bild   und nun geht es!

Uhr / Uhrzeit im richtigem Format: 00:00:00

für alle die das selbe Problem haben:
man braucht kein BCD format oder mit Stellen basteln - es geht ganz einfach!

mit dem Time Befehl:
Code:
Dim Sekunden As Byte , Minuten As Byte , Stunden As Byte   
Dim Uhr As String * 8                                       'zum konvertieren in 00:00:00
Config Clock = Soft   
                                  
Do
Uhr = Time(sekunden)                                        'konvertierung der Uhrzeit
Loop

'Uhr routiene über timer oder so abrufen
'oder für Spezies nur wenn sich der wert der Sekunde geändert hat
Print "Uhrzeit" ; Uhr
Cls                                                         'Display löschen (IMMER ERST LCD LÖSCHEN UND DANN POSITION ANGEBEN!!!)
Locate 1 , 1
Lcd "Uhrzeit: " ; Uhr
Alle anderen können gerne mal suchen z.B.

www.google.de
oder in der Bascomhilfe
oder...