Hallo Wasi.

Versuch doch mal folgendes:
Code:
SECTIC:
  timeoutput=1 'timeoutput ist eine Variable, die Du im Hauptprogramm als Byte dimensionierst
  RETURN
In Deinem Hauptprogramm überprüfst Du dann, ob die Variable timeoutput eine 1 enthält und gibst dann die Zeit aus.
Das ganze sollte dann so ähnlich aussehen.
Code:
...
...
DIM timeoutput AS BYTE

DO
  if 1=timeoutput then
    Printtext(1,1,TIME$)
    timeoutput=0
  End if
LOOP

SECTIC:
  timeoutput = 1
RETURN

END 'Programmende
Ich nehme mal an, daß Du ´ne Subroutine Printtext hast, mit der Du Strings ans Display ausgibst.

So müßte es eigentlich funktionieren.

Gruß Ralf