Ported to TDE by Michele Calgaro <michele.calgaro@yahoo.it>

Original author: Daniel Stöckel <the_docter@gmx.net>