man!

script/c51495004.lua

@@ -3,8 +3,15 @@ local m=51495004
 local cm=_G["c"..m]
 function cm.initial_effect(c)
 	--link summon
-	aux.AddLinkProcedure(c,cm.matfilter,1,1)
+	aux.AddLinkProcedure(c,cm.matfilter,1,1,cm.spchk)
 	c:EnableReviveLimit()
+	--splimit
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e0:SetValue(cm.splimit)
+	c:RegisterEffect(e0)
 	--to hand
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -28,6 +35,16 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.indop)
 	c:RegisterEffect(e2)
 end
+function cm.cfilter(c)
+	return c:IsType(TYPE_FIELD)
+end
+function cm.spchk(g,lc,tp)
+	return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_GRAVE,0,3,nil)
+end
+function cm.splimit(e,se,sp,st,pos,tp)
+	return not e:GetHandler():IsLocation(LOCATION_EXTRA)
+		or Duel.IsExistingMatchingCard(cm.cfilter,sp,LOCATION_GRAVE,0,3,nil)
+end
 function cm.matfilter(c)
 	return c:IsLinkAttribute(ATTRIBUTE_EARTH) and c:IsLinkRace(RACE_THUNDER) and not c:IsLinkType(TYPE_LINK)
 end