Skip to content

Y
ygopro-222DIY-cards
Commit 702653bd authored by nanahira's avatar nanahira
Browse files
Options

filelist

parent 56b9136a
Hide whitespace changes
Inline Side-by-side
Showing with 559 additions and 441 deletions
expansions/script/c12006009.lua
View file @ 702653bd
--失落王国 王国的尚达凤 --失落王国 王国的尚达凤
function c12006009.initial_effect(c) function c12006009.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(12006009,0)) e1:SetDescription(aux.Stringid(12006009,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP) e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e1:SetCode(EVENT_TO_GRAVE) e1:SetCode(EVENT_TO_GRAVE)
e1:SetCountLimit(1,12006009) e1:SetCountLimit(1,12006009)
e1:SetCondition(c12006009.condition) e1:SetCondition(c12006009.condition)
e1:SetTarget(c12006009.target) e1:SetTarget(c12006009.target)
e1:SetOperation(c12006009.operation) e1:SetOperation(c12006009.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(12006009,3)) e1:SetDescription(aux.Stringid(12006009,3))
e1:SetCategory(CATEGORY_ATKCHANGE) e1:SetCategory(CATEGORY_ATKCHANGE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,12006109) e1:SetCountLimit(1,12006109)
e1:SetOperation(c12006009.ttop) e1:SetOperation(c12006009.ttop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--special summon rule --special summon rule
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(12006009,5)) e1:SetDescription(aux.Stringid(12006009,5))
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC) e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetRange(LOCATION_HAND) e1:SetRange(LOCATION_HAND)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM)
e1:SetTargetRange(POS_FACEUP_ATTACK,1) e1:SetTargetRange(POS_FACEUP_ATTACK,1)
e1:SetCountLimit(1,12006109) e1:SetCountLimit(1,12006109)
e1:SetCondition(c12006009.spcon) e1:SetCondition(c12006009.spcon)
e1:SetOperation(c12006009.spop) e1:SetOperation(c12006009.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
if not c12006009.global_check then if not c12006009.global_check then
c12006009.global_check=true c12006009.global_check=true
local ge1=Effect.CreateEffect(c) local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_CHAINING) ge1:SetCode(EVENT_CHAINING)
ge1:SetOperation(c12006009.checkop) ge1:SetOperation(c12006009.checkop)
Duel.RegisterEffect(ge1,0) Duel.RegisterEffect(ge1,0)
end end
end end
function c12006009.cfilter(c,tp) function c12006009.cfilter(c,tp)
return c:IsType(TYPE_MONSTER) return c:IsType(TYPE_MONSTER)
end end
function c12006009.checkop(e,tp,eg,ep,ev,re,r,rp) function c12006009.checkop(e,tp,eg,ep,ev,re,r,rp)
if not eg then return end if not eg then return end
local sg=eg:Filter(c12006009.cfilter,nil,tp) local sg=eg:Filter(c12006009.cfilter,nil,tp)
local tc=sg:GetFirst() local tc=sg:GetFirst()
while tc do while tc do
tc:RegisterFlagEffect(12006009,RESET_EVENT+0x1fe0000-RESET_TOGRAVE,0,1) tc:RegisterFlagEffect(12006009,RESET_EVENT+0x1fe0000-RESET_TOGRAVE,0,1)
tc=sg:GetNext() tc=sg:GetNext()
end end
end end
function c12006009.spfilter(c,ft) function c12006009.spfilter(c,ft)
return c:GetFlagEffect(12006009)~=0 and c:IsReleasable() and (ft>0 or c:GetSequence()<5) return c:GetFlagEffect(12006009)~=0 and c:IsReleasable() and (ft>0 or c:GetSequence()<5)
end end
function c12006009.spcon(e,c) function c12006009.spcon(e,c)
if c==nil then return true end if c==nil then return true end
local tp=c:GetControler() local tp=c:GetControler()
local ft=Duel.GetLocationCount(1-tp,LOCATION_MZONE) local ft=Duel.GetLocationCount(1-tp,LOCATION_MZONE)
return ft>-1 and Duel.IsExistingMatchingCard(c12006009.spfilter,tp,0,LOCATION_MZONE,1,nil,ft) return ft>-1 and Duel.IsExistingMatchingCard(c12006009.spfilter,tp,0,LOCATION_MZONE,1,nil,ft)
end end
function c12006009.spop(e,tp,eg,ep,ev,re,r,rp,c) function c12006009.spop(e,tp,eg,ep,ev,re,r,rp,c)
local ft=Duel.GetLocationCount(1-tp,LOCATION_MZONE) local ft=Duel.GetLocationCount(1-tp,LOCATION_MZONE)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local g=Duel.SelectMatchingCard(tp,c12006009.spfilter,tp,0,LOCATION_MZONE,1,1,nil,ft) local g=Duel.SelectMatchingCard(tp,c12006009.spfilter,tp,0,LOCATION_MZONE,1,1,nil,ft)
Duel.Release(g,REASON_COST) Duel.Release(g,REASON_COST)
end end
function c12006009.condition(e,tp,eg,ep,ev,re,r,rp) function c12006009.condition(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return (c:IsReason(REASON_BATTLE) return (c:IsReason(REASON_BATTLE)
or rp==1-tp and c:IsReason(REASON_DESTROY)) or rp==1-tp and c:IsReason(REASON_DESTROY))
and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousLocation(LOCATION_ONFIELD)
end end
function c12006009.filter3(c,e,tp) function c12006009.filter3(c,e,tp)
return c:IsSetCard(0x8fbd) and not c:IsCode(12006009) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x8fbd) and not c:IsCode(12006009) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c12006009.target(e,tp,eg,ep,ev,re,r,rp,chk) function c12006009.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c12006009.filter3,tp,LOCATION_DECK,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c12006009.filter3,tp,LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end end
function c12006009.operation(e,tp,eg,ep,ev,re,r,rp) function c12006009.operation(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c12006009.filter3,tp,LOCATION_DECK,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c12006009.filter3,tp,LOCATION_DECK,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end end
end end
function c12006009.filter(c,e,tp) function c12006009.filter(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c12006009.ttop(e,tp,eg,ep,ev,re,r,rp) function c12006009.ttop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)==0 then return end if Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)==0 then return end
if Duel.GetLocationCount(tp,LOCATION_MZONE)==0 if Duel.GetLocationCount(tp,LOCATION_MZONE)==0
then return end then return end
local g2=Duel.GetFieldGroup(tp,LOCATION_HAND,0) local g2=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
Duel.ConfirmCards(1-tp,g2) Duel.ConfirmCards(1-tp,g2)
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_SPSUMMON)
sg=Duel.SelectTarget(1-tp,c12006009.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp) sg=Duel.SelectTarget(1-tp,c12006009.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
if sg:GetCount()>0 then if sg:GetCount()>0 then
Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP_ATTACK) Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP_ATTACK)
end end
Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
Duel.ShuffleHand(tp) Duel.ShuffleHand(tp)
end end
\ No newline at end of file
update/filelist.txt
View file @ 702653bd
This source diff could not be displayed because it is too large. You can view the blob instead.
update/version.txt
View file @ 702653bd
2019/11/5 10:43:29 2019/11/18 18:59:22
\ No newline at end of file \ 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