2025/7/13 新增：KP22新卡

script/c120277064.lua

@@ -3,7 +3,7 @@ cm.name="骨脊鞭"
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION+CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
 	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
@@ -38,7 +38,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
-	local res=RD.SelectAndToHandOrSpecialSummon(aux.Stringid(m,1),aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,0,nil,e,POS_FACEUP)~=0
+	local res=RD.SelectAndToHandOrSpecialSummon(aux.Stringid(m,1),aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,0,nil,e,POS_FACEUP)
 	if res==false or res==0 then return end
 	if Duel.IsExistingMatchingCard(cm.exfilter,tp,LOCATION_MZONE,0,1,nil) then
 		RD.CanSelectAndDoAction(aux.Stringid(m,2),HINTMSG_RTOHAND,cm.thfilter,tp,0,LOCATION_MZONE,1,1,nil,function(sg)

script/c120287066.lua

@@ -14,7 +14,7 @@ function cm.initial_effect(c)
 	e1:SetOperation(cm.operation)
 	c:RegisterEffect(e1)
 end
---Discard Deck
+--To Hand
 function cm.filter(c)
 	return ((c:IsType(TYPE_NORMAL) and c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_WARRIOR))
 		or c:IsCode(list[1])) and c:IsAbleToHand()

script/c120290012.lua

+local cm,m=GetID()
+local list={120183013}
+cm.name="多面手少女"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--To Hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION+CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--To Hand
+function cm.thfilter(c)
+	return c:IsCode(list[1]) and c:IsAbleToHand()
+end
+function cm.exfilter(c)
+	return c:IsFaceup() and c:IsType(TYPE_FUSION) and c:IsLevel(8)
+end
+function cm.matfilter(c)
+	return not RD.IsMaximumMode(c) and c:GetBaseDefense()==1200 and c:IsFusionAttribute(ATTRIBUTE_WIND)
+end
+function cm.matcheck(g)
+	return g:GetCount()==2
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return (RD.IsSummonTurn(c) or RD.IsSpecialSummonTurn(c))
+end
+cm.cost=RD.CostSendHandToDeckBottom(Card.IsAbleToDeckAsCost,1,1,false)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
+		if not Duel.IsExistingMatchingCard(cm.exfilter,tp,LOCATION_MZONE,0,1,nil) then
+			RD.CanFusionSummon(aux.Stringid(m,1),cm.matfilter,nil,nil,0,0,cm.matcheck,RD.FusionToGrave,e,tp)
+		end
+	end)
+end
\ No newline at end of file

script/c120290013.lua

+local cm,m=GetID()
+cm.name="宝宝无人机"
+function cm.initial_effect(c)
+	--To Grave
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_DECKDES)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--To Grave
+function cm.filter(c)
+	return ((c:IsAttribute(ATTRIBUTE_WIND) and RD.IsDefense(c,1200)) or c:IsType(TYPE_TRAP))
+		and c:IsAbleToGrave()
+end
+cm.cost=RD.CostSendDeckTopToGrave(1)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>4 end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<3 then return end
+	local sg,g=RD.RevealDeckTopAndCanSelect(tp,3,aux.Stringid(m,1),HINTMSG_TOGRAVE,cm.filter,1,2)
+	if sg:GetCount()>0 then
+		Duel.DisableShuffleCheck()
+		Duel.SendtoGrave(sg,REASON_EFFECT+REASON_REVEAL)
+	end
+	local ct=g:GetCount()
+	if ct>0 then
+		Duel.SortDecktop(tp,tp,ct)
+		RD.SendDeckTopToBottom(tp,ct)
+	end
+end
\ No newline at end of file

script/c120290014.lua

+local cm,m=GetID()
+cm.name="光子浮游"
+function cm.initial_effect(c)
+	--Atk Down
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_ATKCHANGE)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Atk Down
+function cm.costfilter(c)
+	return c:IsAttribute(ATTRIBUTE_WIND) and RD.IsDefense(c,1200) and c:IsAbleToDeckOrExtraAsCost()
+end
+function cm.filter(c)
+	return c:IsType(TYPE_TRAP)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return RD.IsSummonTurn(e:GetHandler())
+end
+cm.cost=RD.CostSendGraveToDeck(cm.costfilter,2,2)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil)
+		and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,1,nil) end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local atk=Duel.GetMatchingGroupCount(cm.filter,tp,LOCATION_GRAVE,0,nil)*-500
+	if atk==0 then return end
+	RD.SelectAndDoAction(aux.Stringid(m,1),Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil,function(g)
+		RD.AttachAtkDef(e,g:GetFirst(),atk,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	end)
+end
\ No newline at end of file

script/c120290016.lua

+local cm,m=GetID()
+cm.name="开朗的女服务员"
+function cm.initial_effect(c)
+	--Atk Up
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetTargetRange(LOCATION_MZONE,0)
+	e1:SetTarget(cm.target)
+	e1:SetValue(400)
+	c:RegisterEffect(e1)
+	--No Damage
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
+	e2:SetValue(1)
+	c:RegisterEffect(e2)
+	--Continuous Effect
+	RD.AddContinuousEffect(c,e1,e2)
+end
+--Pierce
+function cm.target(e,c)
+	return c:IsFaceup() and not RD.IsMaximumMode(c) and c:GetBaseDefense()==1200
+		and c:IsLevelAbove(7) and c:IsAttribute(ATTRIBUTE_WIND)
+end
\ No newline at end of file

script/c120290017.lua

+local cm,m=GetID()
+local list={120183013,120290012}
+cm.name="自由之风"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Summon Procedure
+	RD.AddSummonProcedureOne(c,aux.Stringid(m,0),nil,cm.sumfilter)
+	--To Hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,1))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Summon Procedure
+function cm.sumfilter(c,e,tp)
+	return c:IsAttribute(ATTRIBUTE_WIND) and RD.IsDefense(c,1200)
+end
+--To Hand
+function cm.thfilter(c)
+	return c:IsCode(list[1],list[2]) and c:IsAbleToHand()
+end
+function cm.exfilter(c)
+	return c:IsType(TYPE_TRAP)
+end
+function cm.posfilter(c,e,tp)
+	return RD.IsCanChangePosition(c,e,tp,REASON_EFFECT)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return (RD.IsSummonTurn(c) or RD.IsSpecialSummonTurn(c))
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
+		if Duel.IsExistingMatchingCard(cm.exfilter,tp,LOCATION_GRAVE,0,2,nil) then
+			local filter=RD.Filter(cm.posfilter,e,tp)
+			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_POSCHANGE,filter,tp,0,LOCATION_MZONE,1,1,nil,function(sg)
+				RD.ChangePosition(sg,e,tp,REASON_EFFECT)
+			end)
+		end
+	end)
+end
\ No newline at end of file

script/c120290024.lua

+local cm,m=GetID()
+local list={120125001,120274012,120274028}
+cm.name="真红眼冥飞龙"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Change Code
+	RD.EnableChangeCode(c,list[1],LOCATION_HAND+LOCATION_GRAVE)
+	--Atk Down
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_ATKCHANGE)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Atk Down
+function cm.filter(c)
+	return c:IsFaceup() and c:IsType(TYPE_EFFECT)
+end
+function cm.thfilter(c)
+	return c:IsCode(list[2],list[3]) and c:IsAbleToHand()
+end
+cm.cost=RD.CostSendHandToGrave(Card.IsAbleToGraveAsCost,1,1)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,0,LOCATION_MZONE,1,nil) end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(aux.Stringid(m,1),cm.filter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
+		RD.AttachAtkDef(e,g:GetFirst(),-300,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		RD.CanSelectAndDoAction(aux.Stringid(m,2),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
+			Duel.BreakEffect()
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
+		end)
+	end)
+end
\ No newline at end of file

script/c120290027.lua

+local cm,m=GetID()
+cm.name="巧阵的奇迹魔"
+function cm.initial_effect(c)
+	--To Hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--To Hand
+function cm.thfilter(c)
+	return c:IsLevel(9) and c:IsRace(RACE_FIEND) and RD.IsDefense(c,2000) and c:IsAbleToHand()
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return RD.IsSummonTurn(e:GetHandler())
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>4 end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>4 then
+		local sg,lg=RD.RevealDeckTopAndCanSelect(tp,5,aux.Stringid(m,1),HINTMSG_ATOHAND,cm.thfilter,1,1)
+		if sg:GetCount()>0 then
+			Duel.DisableShuffleCheck()
+			RD.SendToHandAndExists(sg,e,tp,REASON_EFFECT)
+			Duel.ShuffleHand(tp)
+		end
+		local ct=lg:GetCount()
+		if ct>0 then
+			Duel.SortDecktop(tp,tp,ct)
+			RD.SendDeckTopToBottom(tp,ct)
+		end
+	end
+end
\ No newline at end of file

script/c120290032.lua

+local cm,m=GetID()
+local list={120183013,120290012,120203024,120277061}
+cm.name="多面手搭档"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Fusion Material
+	RD.AddFusionProcedure(c,list[1],list[2])
+	--Discard Deck
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_DECKDES+CATEGORY_GRAVE_ACTION)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Discard Deck
+function cm.setfilter(c,g)
+	return (g:IsContains(c) or c:IsCode(list[3],list[4])) and c:IsSSetable()
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsSummonType(SUMMON_TYPE_FUSION) and RD.IsSpecialSummonTurn(c)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDiscardDeck(tp,2) end
+	Duel.SetOperationInfo(0,CATEGORY_DECKDES,nil,0,tp,2)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.DiscardDeck(tp,2,REASON_EFFECT)~=0 then
+		local g=Duel.GetOperatedGroup():Filter(Card.IsType,nil,TYPE_TRAP)
+		local filter=RD.Filter(cm.setfilter,g)
+		RD.CanSelectAndSet(aux.Stringid(m,1),aux.NecroValleyFilter(filter),tp,LOCATION_GRAVE,0,1,1,nil,e,true)
+	end
+end
\ No newline at end of file

script/c120290045.lua

+local cm,m=GetID()
+local list={120290012,120290016}
+cm.name="热呼呼配送"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DRAW+CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.activate)
+	c:RegisterEffect(e1)
+end
+--Activate
+function cm.spfilter(c,e,tp)
+	return c:IsCode(list[1],list[2]) and RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEUP)
+end
+cm.cost=RD.CostSendHandOrFieldToGrave(Card.IsAbleToGraveAsCost,1,1,true)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	RD.TargetDraw(tp,1)
+end
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+	if RD.Draw()~=0 then
+		RD.CanSelectAndSpecialSummon(aux.Stringid(m,1),aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP,true)
+	end
+	if Duel.GetFlagEffect(tp,m)~=0 then return end
+	RD.CreateAttackLimitEffect(e,cm.atktg,tp,LOCATION_MZONE,0,RESET_PHASE+PHASE_END)
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+end
+function cm.atktg(e,c)
+	return not (not RD.IsMaximumMode(c) and c:GetBaseDefense()==1200 and c:IsAttribute(ATTRIBUTE_WIND))
+end
\ No newline at end of file

script/c120290046.lua

+local cm,m=GetID()
+local list={120203024,120217048,120249056,120277061}
+cm.name="最初的找猫"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DECKDES+CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.activate)
+	c:RegisterEffect(e1)
+end
+--Activate
+function cm.thfilter(c)
+	return c:IsCode(list[1],list[2],list[3],list[4]) and c:IsAbleToHand()
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>9
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDiscardDeck(tp,2) end
+	Duel.SetOperationInfo(0,CATEGORY_DECKDES,nil,0,tp,2)
+end
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+	if RD.SendDeckTopToGraveAndExists(tp,2) then
+		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
+			Duel.BreakEffect()
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
+		end)
+	end
+	if Duel.GetFlagEffect(tp,m)~=0 then return end
+	RD.CreateAttackLimitEffect(e,cm.atktg,tp,LOCATION_MZONE,0,RESET_PHASE+PHASE_END)
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+end
+function cm.atktg(e,c)
+	return not (not RD.IsMaximumMode(c) and c:GetBaseDefense()==1200 and c:IsAttribute(ATTRIBUTE_WIND))
+end
\ No newline at end of file

script/c120290059.lua

+local cm,m=GetID()
+local list={120203024,120183013}
+cm.name="疑念的社交场"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Change Code
+	RD.EnableChangeCode(c,list[1],LOCATION_GRAVE)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION+CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_DRAW)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.activate)
+	c:RegisterEffect(e1)
+end
+--Activate
+function cm.filter(c,e,tp)
+	return c:IsAttribute(ATTRIBUTE_WIND) and RD.IsDefense(c,1200)
+		and RD.IsAbleToHandOrSpecialSummon(c,e,tp,POS_FACEUP)
+end
+function cm.exfilter(c)
+	return c:IsFaceup() and c:IsCode(list[2])
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return ep~=tp and r==REASON_RULE
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
+end
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+	local res=RD.SelectAndToHandOrSpecialSummon(aux.Stringid(m,1),aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,0,nil,e,POS_FACEUP)
+	if res==false or res==0 then return end
+	if Duel.IsExistingMatchingCard(cm.exfilter,tp,LOCATION_MZONE,0,1,nil)
+		and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
+		Duel.BreakEffect()
+		RD.SendOpponentHandToGrave(tp,aux.Stringid(m,2),1,1)
+	end
+end
\ No newline at end of file

script/c120290100.lua

+local cm,m=GetID()
+local list={120290100}
+cm.name="暗狱皇 阿巴德"
+function cm.initial_effect(c)
+	--Multiple Attack
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Multiple Attack
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return (RD.IsSummonTurn(c) or RD.IsSpecialSummonTurn(c))
+		and Duel.IsAbleToEnterBP() and RD.IsCanAttachExtraAttack(c,1)
+end
+cm.cost=RD.CostPayLP(500)
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		RD.AttachExtraAttack(e,c,1,aux.Stringid(m,1),RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	end
+	if Duel.GetFlagEffect(tp,m)~=0 then return end
+	RD.CreateCannotActivateEffect(e,aux.Stringid(m,2),cm.aclimit,tp,1,0,RESET_PHASE+PHASE_END)
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+end
+function cm.aclimit(e,re,tp)
+	local tc=re:GetHandler()
+	return tc:IsCode(list[1])
+end
\ No newline at end of file