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

Original author: Robert Hogan <robert@roberthogan.net>