Create pre.tcl