reclean

expansions/script/c16232011.lua

@@ -28,20 +28,6 @@ end
 function cm.counterfilter(c)
 	return not c:IsSummonLocation(LOCATION_EXTRA) or c:IsRace(RACE_REPTILE)
 end
-function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
-	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	e1:SetTargetRange(1,0)
-	e1:SetTarget(cm.splimit)
-	Duel.RegisterEffect(e1,tp)
-end
-function cm.splimit(e,c)
-	return c:IsLocation(LOCATION_EXTRA) and not c:IsRace(RACE_REPTILE)
-end
 function cm.costfilter(c)
 	return c:IsRace(RACE_REPTILE) and c:IsAbleToGraveAsCost()
 end
@@ -51,17 +37,27 @@ function cm.fselect(g,tp)
 	for c in aux.Next(sg) do
 		res=res and not sg:IsExists(Card.IsAttribute,1,c,c:GetAttribute())
 	end
-	return g:GetClassCount(Card.GetLocation)==g:GetCount() and res and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,g)
+	return g:GetClassCount(Card.GetLocation)==g:GetCount() and res
 end
-function cm.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
+function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local g=Duel.GetMatchingGroup(cm.costfilter,tp,LOCATION_HAND+LOCATION_DECK,0,nil)
-	if chk==0 then return cm.cost(e,tp,eg,ep,ev,re,r,rp,0)
+	if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0
 		and g:CheckSubGroup(cm.fselect,2,2,tp) end
-	cm.cost(e,tp,eg,ep,ev,re,r,rp,1)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(cm.splimit)
+	Duel.RegisterEffect(e1,tp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
 	local sg=g:SelectSubGroup(tp,cm.fselect,false,2,2,tp)
 	Duel.SendtoGrave(sg,REASON_COST)
 end
+function cm.splimit(e,c)
+	return c:IsLocation(LOCATION_EXTRA) and not c:IsRace(RACE_REPTILE)
+end
 function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local g=Duel.GetMatchingGroup(Card.IsAbleToGrave,tp,0,LOCATION_ONFIELD,nil)
 	if chk==0 then return #g>0 end