Commit a3f9e193 authored by 聖園ミカ's avatar 聖園ミカ 🐟

byd

parent 8fe4a447
...@@ -3,7 +3,6 @@ function c12400075.initial_effect(c) ...@@ -3,7 +3,6 @@ function c12400075.initial_effect(c)
aux.IsCodeListed(12400075) aux.IsCodeListed(12400075)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddFusionProcFunRep(c,c12400075.mfilter,2,true) aux.AddFusionProcFunRep(c,c12400075.mfilter,2,true)
aux.AddContactFusionProcedure(c,c12400075.cfilter,LOCATION_MZONE+LOCATION_HAND,0,Duel.SendtoGrave,REASON_COST)
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
...@@ -38,13 +37,21 @@ function c12400075.initial_effect(c) ...@@ -38,13 +37,21 @@ function c12400075.initial_effect(c)
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SPSUMMON_COST) e3:SetCode(EFFECT_SPSUMMON_COST)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetCost(c12400075.spcost) e3:SetCost(c12400075.spcost)
e3:SetOperation(c12400075.spcop) e3:SetOperation(c12400075.spcop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD)
e5:SetCode(EFFECT_SPSUMMON_PROC)
e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e5:SetRange(LOCATION_EXTRA)
e5:SetCondition(c12400075.con5)
e5:SetOperation(c12400075.op5)
c:RegisterEffect(e5)
end end
function c12400075.ssplimit(e,se,sp,st) function c12400075.ssplimit(e,se,sp,st)
return bit.band(st,SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION return bit.band(st,SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
end end
function c12400075.mfilter(c) function c12400075.mfilter(c)
return c:IsRace(RACE_MACHINE) return c:IsRace(RACE_MACHINE)
...@@ -102,4 +109,18 @@ function c12400075.con2(e,c) ...@@ -102,4 +109,18 @@ function c12400075.con2(e,c)
if c==nil then return true end if c==nil then return true end
local tp=c:GetControler() local tp=c:GetControler()
return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c12400075.spfilter,tp,LOCATION_MZONE,0,1,nil) and c:IsStatus(STATUS_PROC_COMPLETE) return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c12400075.spfilter,tp,LOCATION_MZONE,0,1,nil) and c:IsStatus(STATUS_PROC_COMPLETE)
end
function c12400075.sp5(c,sc,p)
return Duel.GetLocationCountFromEx(p,p,c,sc) and not c:IsFacedown() and c:IsAbleToGraveAsCost() and c:IsRace(RACE_MACHINE)
end
function c12400075.con5(e,c)
if c==nil then return true end
local tp=c:GetControler()
return Duel.IsExistingMatchingCard(c12400075.sp5,tp,LOCATION_MZONE+LOCATION_HAND,0,2,nil,c,tp)
end
function c12400075.op5(e,tp,eg,ep,ev,re,r,rp,c)
local p=c:GetControler()
Duel.Hint(3,p,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(p,c12400075.sp5,p,LOCATION_MZONE+LOCATION_HAND,0,2,2,nil,c,p)
Duel.SendtoGrave(g,REASON_COST)
end end
\ No newline at end of file
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment