I don't believe it! I finally did it!!!
Because this forum doesn't support tagging I can't show it in all its beauty.

(?xml version='1.0' encoding='windows-1252'?)
(xsl:stylesheet xmlns:xsl='http://www.w3.org/TR/WD-xsl' xmlns='http://www.w3.org/TR/REC-html40')
(xsl:template match='*')
(xsl:apply-templates/)
(/xsl:template)
(xsl:template match='text()')
(xsl:apply-templates/)
(/xsl:template)
(xsl:template match='/')
(HTML)
(BODY)
(xsl:for-each select='*/*')
(xsl:apply-templates/)
(/xsl:for-each)
(/BODY)
(/HTML)
(/xsl:template)
(xsl:template match='text()')
(p)
(xsl:value-of/)
(/p)
(/xsl:template)
(/xsl:stylesheet)