A high-level widget set for Tcl/Tk