Commit d1a0ccc4 authored by mercury233's avatar mercury233

add card BODE-JP055

parent 1e75f7a9
--スプリガンズ・ブラスト!
function c10584050.initial_effect(c)
aux.AddCodeList(c,68468459)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DISABLE)
......
--天底の使徒
function c1984618.initial_effect(c)
aux.AddCodeList(c,68468459)
--activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_TOHAND+CATEGORY_SEARCH)
......
--黒衣竜アルビオン
function c25451383.initial_effect(c)
aux.AddCodeList(c,68468459)
--change name
aux.EnableChangeCode(c,68468459,LOCATION_MZONE+LOCATION_GRAVE)
--to grave
......
--ドラグマ・エンカウンター
function c29354228.initial_effect(c)
aux.AddCodeList(c,68468459)
--spsummon
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(29354228,0))
......
--烙印の気炎
function c29948294.initial_effect(c)
aux.AddCodeList(c,68468459)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(29948294,0))
e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_HANDES+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,29948294)
e1:SetTarget(c29948294.target)
e1:SetOperation(c29948294.activate)
c:RegisterEffect(e1)
--to hand
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(29948294,1))
e2:SetCategory(CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_PHASE+PHASE_END)
e2:SetCountLimit(1,29948294)
e2:SetRange(LOCATION_GRAVE)
e2:SetCondition(c29948294.thcon)
e2:SetTarget(c29948294.thtg)
e2:SetOperation(c29948294.thop)
c:RegisterEffect(e2)
if not c29948294.global_check then
c29948294.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_TO_GRAVE)
ge1:SetOperation(c29948294.checkop)
Duel.RegisterEffect(ge1,0)
end
end
function c29948294.checkfilter(c,tp)
return c:IsType(TYPE_FUSION) and c:IsControler(tp)
end
function c29948294.checkop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c29948294.checkfilter,1,nil,0) then Duel.RegisterFlagEffect(0,29948294,RESET_PHASE+PHASE_END,0,1) end
if eg:IsExists(c29948294.checkfilter,1,nil,1) then Duel.RegisterFlagEffect(1,29948294,RESET_PHASE+PHASE_END,0,1) end
end
function c29948294.cfilter(c,tp)
return c:IsType(TYPE_MONSTER) and not c:IsPublic()
and Duel.IsExistingMatchingCard(c29948294.tgfilter,tp,LOCATION_EXTRA,0,1,nil,c:GetRace())
end
function c29948294.tgfilter(c,race)
return (c:IsAttack(2500) or c:IsDefense(2500)) and c:IsRace(race)
and c:IsLevel(8) and c:IsType(TYPE_FUSION) and c:IsAbleToGrave()
end
function c29948294.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c29948294.cfilter,tp,LOCATION_HAND,0,1,nil,tp) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_EXTRA)
end
function c29948294.thfilter(c)
return (c:IsCode(68468459) or aux.IsCodeListed(c,68468459) and c:IsType(TYPE_MONSTER)) and c:IsAbleToHand()
end
function c29948294.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
local g=Duel.SelectMatchingCard(tp,c29948294.cfilter,tp,LOCATION_HAND,0,1,1,nil,tp)
local cc=g:GetFirst()
if cc then
Duel.ConfirmCards(1-tp,cc)
local race=cc:GetRace()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local tg=Duel.SelectMatchingCard(tp,c29948294.tgfilter,tp,LOCATION_EXTRA,0,1,1,nil,race)
local tc=tg:GetFirst()
if Duel.SendtoGrave(tc,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_GRAVE) then
local g=Duel.GetMatchingGroup(c29948294.thfilter,tp,LOCATION_DECK,0,nil)
if #g>0 and cc:IsDiscardable() and Duel.SelectYesNo(tp,aux.Stringid(29948294,2)) then
Duel.BreakEffect()
Duel.SendtoGrave(cc,REASON_EFFECT+REASON_DISCARD)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:Select(tp,1,1,nil)
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
end
end
end
end
function c29948294.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFlagEffect(tp,29948294)~=0
end
function c29948294.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToHand() end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
end
function c29948294.thop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) then
Duel.SendtoHand(c,nil,REASON_EFFECT)
end
end
--白の烙印
function c34995106.initial_effect(c)
aux.AddCodeList(c,68468459)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(34995106,0))
......
--スプリガンズ・メリーメイカー
function c48285768.initial_effect(c)
aux.AddCodeList(c,68468459)
--xyz summon
aux.AddXyzProcedure(c,nil,4,2)
c:EnableReviveLimit()
......
--烙印の絆
function c62022479.initial_effect(c)
aux.AddCodeList(c,68468459)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(62022479,0))
......
--烙印凶鳴
function c67100549.initial_effect(c)
aux.AddCodeList(c,68468459)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(67100549,0))
......
--デスピアン・クエリティス
function c72272462.initial_effect(c)
aux.AddCodeList(c,68468459)
--fusion summon
c:EnableReviveLimit()
aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0x164),c72272462.matfilter,true)
......
--スプリガンズ・コール!
function c83199011.initial_effect(c)
aux.AddCodeList(c,68468459)
--spsummon
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(83199011,0))
......
--烙印の裁き
function c93595154.initial_effect(c)
aux.AddCodeList(c,68468459)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(93595154,0))
......
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