Magento display top level categories and subcategories

<?php

/*

 * http://www.magentobooker.com

 *

 * Display top level categories and subcategories

 *

 * This code is compatible with Magento CE 1.3 and up

 *

**/

?>

<?php $_helper = Mage::helper('catalog/category') ?>

<?php $_categories = $_helper->getStoreCategories() ?>

<?php if (count($_categories) > 0): ?>

    <ul class="category">

        <?php foreach($_categories as $_category): ?>

            <li>

                <a href="<?php echo $_helper->getCategoryUrl($_category) ?>">

                    <?php echo $_category->getName() ?>

                </a>

                <?php $_category = Mage::getModel('catalog/category')->load($_category->getId()) ?>

                <?php $_subcategories = $_category->getChildrenCategories() ?>

                <?php if (count($_subcategories) > 0): ?>

                    <ul class="subcategory">

                        <?php foreach($_subcategories as $_subcategory): ?>

                            <li>

                                <a href="<?php echo $_helper->getCategoryUrl($_subcategory) ?>">

                                    <?php echo $_subcategory->getName() ?>

                                </a>

                            </li>

                        <?php endforeach; ?>

                    </ul>

                <?php endif; ?>

            </li>

        <?php endforeach; ?>

    </ul>

<?php endif;

?>