Create ureversi.tcl