man!

script/c37573001.lua

@@ -62,7 +62,7 @@ function c37573001.costfilter(c,tp)
 	if not (c:IsAbleToDeckAsCost() and c:IsType(TYPE_MONSTER)) then return false end
 	local race=c:GetRace()
 	local attr=c:GetAttribute()
-	return Duel.IsExistingMatchingCard(c37573001.costfilter2,tp,LOCATION_GRAVE,0,2,c,attr,race)
+	return Duel.IsExistingMatchingCard(c37573001.costfilter2,tp,LOCATION_GRAVE,0,1,c,attr,race)
 		and Duel.IsExistingMatchingCard(c37573001.thfilter,tp,LOCATION_DECK,0,1,nil,attr,race)
 end
 function c37573001.costfilter2(c,attr,race)
@@ -80,7 +80,7 @@ function c37573001.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local attr=c1:GetAttribute()
 	local race=c1:GetRace()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-	local g2=Duel.SelectMatchingCard(tp,c37573001.costfilter2,tp,LOCATION_GRAVE,0,2,2,c1,attr,race)
+	local g2=Duel.SelectMatchingCard(tp,c37573001.costfilter2,tp,LOCATION_GRAVE,0,1,1,c1,attr,race)
 	Duel.SendtoDeck(g1+g2,nil,2,REASON_COST)
 	race_list[e]={attr=attr,race=race}
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
@@ -92,8 +92,35 @@ function c37573001.thop(e,tp,eg,ep,ev,re,r,rp)
 	local race=record.race
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local g=Duel.SelectMatchingCard(tp,c37573001.thfilter,tp,LOCATION_DECK,0,1,1,nil,attr,race)
-	if g:GetCount()>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
+	local tc=g:GetFirst()
+	if not tc then return end
+	if Duel.SendtoHand(tc,nil,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_HAND) then
+		Duel.ConfirmCards(1-tp,tc)
+		if not e:IsHasType(EFFECT_TYPE_ACTIVATE) then return end
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_FIELD)
+		e1:SetCode(EFFECT_CANNOT_SUMMON)
+		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		e1:SetTargetRange(1,0)
+		e1:SetTarget(c37573001.sumlimit)
+		e1:SetLabel(tc:GetCode())
+		e1:SetReset(RESET_PHASE+PHASE_END)
+		Duel.RegisterEffect(e1,tp)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+		Duel.RegisterEffect(e2,tp)
+		local e3=e1:Clone()
+		e3:SetCode(EFFECT_CANNOT_MSET)
+		Duel.RegisterEffect(e3,tp)
+		local e4=e1:Clone()
+		e4:SetCode(EFFECT_CANNOT_ACTIVATE)
+		e4:SetValue(c37573001.aclimit)
+		Duel.RegisterEffect(e4,tp)
 	end
 end
+function c37573001.sumlimit(e,c)
+	return c:IsCode(e:GetLabel())
+end
+function c37573001.aclimit(e,re,tp)
+	return re:GetHandler():IsCode(e:GetLabel()) and re:IsActiveType(TYPE_MONSTER)
+end