screen.resolution.set (512,384)
text.display ("Press a key to exit.",CENTER,350)
repeat ()
%second=time.second.get ()
%minute=time.minute.get ()
%hour=time.hour.get ()
$second=str(%second,"00")
$minute=str(%minute,"00")
$hour=str(%hour,"00")
text.display ($hour+":"+$minute+":"+$second,CENTER,CENTER)
until (keyboard.get())
script.stop ()