Star Protector Recapture

• Card ID: 120306063
• Format: Rush Duel
• Script: Rush/Scripts/c120306063.lua

Stats

Field	Value
Type	0x4
ATK	0
DEF	0
Level/Rank/Link	0x0
Race	0x0
Attribute	0x0
Category	0x240002

Card Text

[REQUIREMENT]	
When your opponent Normal Summons a monster, send 1 face-up WATER Attribute monster with 0 or 1500 DEF from your field to the Graveyard.	
[EFFECT]	
Destroy 1 card on your opponent's field. Then, if you destroyed a Fusion Monster by this effect, you can Special Summon 1 "The Imprisoned Dragon Princess" from your Graveyard face-up to your field. This turn, the monster Special Summoned by this effect cannot be destroyed by battle.

Detected API Calls

• Auxiliary.NecroValleyFilter
• Auxiliary.Stringid
• Card.GetSummonPlayer
• Card.IsAbleToGraveAsCost
• Card.IsAttribute
• Card.IsCode
• Card.IsFaceup
• Card.RegisterEffect
• Duel.Destroy
• Duel.GetMatchingGroup
• Duel.GetOperatedGroup
• Duel.IsExistingMatchingCard
• Duel.SetOperationInfo
• Effect.CreateEffect
• Effect.SetCategory
• Effect.SetCode
• Effect.SetCondition
• Effect.SetCost
• Effect.SetOperation
• Effect.SetTarget
• Effect.SetType
• Group.IsExists
• RushDuel.AddCodeList
• RushDuel.AttachBattleIndes
• RushDuel.CanSelectAndSpecialSummon
• RushDuel.CostSendMZoneToGrave
• RushDuel.IsCanBeSpecialSummoned
• RushDuel.IsDefense
• RushDuel.IsOperatedGroupExists
• RushDuel.IsPreviousType
• RushDuel.SelectAndDoAction

Script

local cm,m=GetID()
local list={120306009}
cm.name="救惺夺还"
function cm.initial_effect(c)
	RD.AddCodeList(c,list)
	--Activate
	local e1=Effect.CreateEffect(c)
	e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
	e1:SetType(EFFECT_TYPE_ACTIVATE)
	e1:SetCode(EVENT_SUMMON_SUCCESS)
	e1:SetCondition(cm.condition)
	e1:SetCost(cm.cost)
	e1:SetTarget(cm.target)
	e1:SetOperation(cm.activate)
	c:RegisterEffect(e1)
end
--Activate
function cm.confilter(c,tp)
	return c:GetSummonPlayer()==tp
end
function cm.costfilter(c)
	return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_WATER) and (RD.IsDefense(c,0) or RD.IsDefense(c,1500))
		and c:IsAbleToGraveAsCost()
end
function cm.exfilter(c)
	return RD.IsPreviousType(c,TYPE_FUSION)
end
function cm.spfilter(c,e,tp)
	return c:IsCode(list[1]) and RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEUP)
end
function cm.condition(e,tp,eg,ep,ev,re,r,rp)
	return eg:IsExists(cm.confilter,1,nil,1-tp)
end
cm.cost=RD.CostSendMZoneToGrave(cm.costfilter,1,1,false)
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
	if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_ONFIELD,1,nil) end
	local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil)
	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
	RD.SelectAndDoAction(HINTMSG_DESTROY,nil,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
		if Duel.Destroy(g,REASON_EFFECT)~=0
			and RD.IsOperatedGroupExists(cm.exfilter,1,nil)
			and RD.CanSelectAndSpecialSummon(aux.Stringid(m,1),aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP)~=0 then
			local tc=Duel.GetOperatedGroup():GetFirst()
			RD.AttachBattleIndes(e,tc,1,aux.Stringid(m,2),RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
		end
	end)
end