if {[catch {package present Tcl 8.6.4}]} { return }
package ifneeded Tk 8.6.4 [list load [file join $dir .. tk86.dll] Tk]