Problems with "Life and Limb" [transorm saproling in forest]

Ok guys I'm getting stucked with coding "Life and Limb" (http://magiccards.info/pc/en/133.html)...
I succeeded in transforming all the Forest in Saproling and I also transformed the Saproling in Land and in Forest, but I can't now use them to add mana. So I tried to add all the Saprolings the ability to tap and add
, but it makes my game crash... I though "Maybe I created a vicious cicle, adding infinite times the ability to add mana" so I tried to add the ability only to the non-basic land (Saproling are not Basic Land), and it still makes it crash.
Maybe it's just the ability to add mana is the problem... I don't know :s
Here's the code
I succeeded in transforming all the Forest in Saproling and I also transformed the Saproling in Land and in Forest, but I can't now use them to add mana. So I tried to add all the Saprolings the ability to tap and add

Maybe it's just the ability to add mana is the problem... I don't know :s
Here's the code
- Code: Select all
<?xml version='1.0'?>
<CARD_V2>
<FILENAME text="LIFE_AND_LIMB_28336" />
<CARDNAME text="LIFE_AND_LIMB" />
<TITLE>
<LOCALISED_TEXT LanguageCode="en-US"><![CDATA[Life and Limb]]></LOCALISED_TEXT>
<LOCALISED_TEXT LanguageCode="it-IT"><![CDATA[Verde Linfa Vitale]]></LOCALISED_TEXT>
</TITLE>
<MULTIVERSEID value="197865" />
<ARTID value="28336" />
<ARTIST name="Jim Nelson" />
<CASTING_COST cost="{G}" />
<FLAVOURTEXT>
<LOCALISED_TEXT LanguageCode="en-US"><![CDATA["It was a sight of pain and awe—a twisted forest, migrating across the salt plain in search of richer soil."
—Edahlis, greenseeker]]></LOCALISED_TEXT>
<LOCALISED_TEXT LanguageCode="it-IT"><![CDATA["Era una visione dolorosa e solenne: una foresta contorta che migra attraverso la pianura salata in cerca di terreno fertile."
—Edahlis, cercatrice verde]]></LOCALISED_TEXT>
</FLAVOURTEXT>
<TYPE metaname="Enchantment" />
<EXPANSION value="WWK" />
<RARITY metaname="R" />
<STATIC_ABILITY filter_zone="ZONE_IN_PLAY">
<LOCALISED_TEXT LanguageCode="en-US"><![CDATA[All Forests and all Saprolings are 1/1 green Saproling creatures and Forest lands in addition to their other types.]]></LOCALISED_TEXT>
<LOCALISED_TEXT LanguageCode="it-IT"><![CDATA[Tutte le Foreste e tutti i Saprolingi sono creature Saprolingio 1/1 verdi e terre Foresta in aggiunta ai loro altri tipi.]]></LOCALISED_TEXT>
<FILTER>
return not InPlay() or FilteredCard():GetSubType():Test( LAND_TYPE_FOREST ) ~= 0
</FILTER>
<CONTINUOUS_ACTION layer="3">
if FilteredCard() ~= nil then
FilteredCard():GetCurrentCharacteristics():CardType_GetWritable(FilteredCard()):Add( CARD_TYPE_CREATURE, FilteredCard() )
end
</CONTINUOUS_ACTION>
<CONTINUOUS_ACTION layer="7B">
if FilteredCard() ~= nil then
local characteristics = FilteredCard():GetCurrentCharacteristics()
characteristics:Power_Set( 1 )
characteristics:Toughness_Set( 1 )
end
</CONTINUOUS_ACTION>
<CONTINUOUS_ACTION layer="4">
if FilteredCard() ~= nil then
FilteredCard():GetCurrentCharacteristics():SubType_GetWritable(FilteredCard()):Add( CREATURE_TYPE_SAPROLING, FilteredCard() )
end
</CONTINUOUS_ACTION>
<CONTINUOUS_ACTION layer="5">
if FilteredCard() ~= nil then
FilteredCard():GetCurrentCharacteristics():Colour_Get():Add( COLOUR_GREEN )
end
</CONTINUOUS_ACTION>
</STATIC_ABILITY>
<STATIC_ABILITY filter_zone="ZONE_IN_PLAY">
<FILTER>
return not InPlay() or FilteredCard():GetSubType():Test( CREATURE_TYPE_SAPROLING ) ~= 0
</FILTER>
<CONTINUOUS_ACTION layer="3">
if FilteredCard() ~= nil then
FilteredCard():GetCurrentCharacteristics():CardType_GetWritable(FilteredCard()):Add( CARD_TYPE_LAND, FilteredCard() )
end
</CONTINUOUS_ACTION>
<CONTINUOUS_ACTION layer="4">
if FilteredCard() ~= nil then
FilteredCard():GetCurrentCharacteristics():SubType_GetWritable(FilteredCard()):Add( LAND_TYPE_FOREST, FilteredCard() )
end
</CONTINUOUS_ACTION>
</STATIC_ABILITY>
<STATIC_ABILITY filter_zone="ZONE_IN_PLAY">
<FILTER>
return not InPlay() or (FilteredCard():GetSubType():Test( CREATURE_TYPE_SAPROLING ) ~= 0 and FilteredCard():GetSupertype:Test( SUPERTYPE_BASIC ) == 0)
</FILTER>
<CONTINUOUS_ACTION layer="6">
if FilteredCard() ~= nil then
FilteredCard():GetCurrentCharacteristics():GrantAbility(1)
end
</CONTINUOUS_ACTION>
</STATIC_ABILITY>
<MANA_ABILITY resource_id="1" filter_zone="ZONE_IN_PLAY">
<COST type="TapSelf" />
<PRODUCES amount="{G}" />
</MANA_ABILITY>
<HELP title="MORE_INFO_BADGE_TITLE_10" body="MORE_INFO_BADGE_BODY_10" zone="ZONE_ANY" />
<AI_BASE_SCORE score="900" zone="ZONE_IN_PLAY" />
<AI_BASE_SCORE score="900" zone="ZONE_HAND" />
</CARD_V2>