The original TiK messenger with fixes to make it work with modern versions of Tcl/Tk - View it on GitHub