I did a TCL version of this script, which is run on an eggdrop. This is NOT a mIRC Script. For those that may want to use it, you can find it Here