Create clock.tcl