drafting write mode for tcl