Create TopClient.tcl