Skip to content

Y
ygopro-222DIY-cards
Commit 0660cec2 authored by 聖園ミカ's avatar 聖園ミカ 🐟
Browse files
Options

byd

parent cb6c0bb0
Hide whitespace changes
Inline Side-by-side
Showing with 70 additions and 4699 deletions
expansions/FiNALE.cdb
View file @ 0660cec2
No preview for this file type
expansions/lflist.conf
View file @ 0660cec2
......@@ -793,12 +793,6 @@
31200000 0 --复合工程机龙
31200010 1 --机骸少女·惩戒
#313
31300001 1 --小白兔 Ι
31300006 1 --小白兔 Ε
31300007 0 --小白兔 Λ
31300009 1 --处分
31300011 1 --偷跑出去玩
31300017 0 --小白兔 Ξ
31300027 0 --PekoMiko大战争
31300040 0 --黄油巫女 miko
#332
......
expansions/script/c11886004.lua deleted 100644 → 0
View file @ cb6c0bb0
--金毛！佐佐木茜
local m=11886004
local cm=_G["c"..m]
function cm.initial_effect(c)
aux.EnablePendulumAttribute(c)
--atk & def
local e0=Effect.CreateEffect(c)
e0:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
e0:SetType(EFFECT_TYPE_IGNITION)
e0:SetRange(LOCATION_PZONE)
e0:SetProperty(EFFECT_FLAG_CARD_TARGET)
e0:SetCountLimit(1)
e0:SetTarget(cm.atktg)
e0:SetOperation(cm.atkop)
c:RegisterEffect(e0)
--special summon
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,m)
e1:SetCondition(cm.spcon)
c:RegisterEffect(e1)
--direct attack
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_DIRECT_ATTACK)
e2:SetCondition(cm.dircon)
c:RegisterEffect(e2)
end
function cm.atkfilter(c)
return c:IsFaceup() and c:IsAttackAbove(2000)
end
function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.atkfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(cm.atkfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
Duel.SelectTarget(tp,cm.atkfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
end
function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsFaceup() then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(-1000)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
tc:RegisterEffect(e1)
end
end
function cm.filter(c)
return c:IsFaceup() and c:IsAttackAbove(2000)
end
function cm.spcon(e,c)
if c==nil then return true end
local tp=c:GetControler()
return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and not Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_MZONE,0,1,nil)
end
function cm.cfilter(c)
return c:GetAttack()<2000 or c:IsFacedown()
end
function cm.dircon(e)
local tp=e:GetHandlerPlayer()
return not Duel.IsExistingMatchingCard(cm.cfilter,tp,0,LOCATION_MZONE,1,nil)
end
expansions/script/c21100600.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 猫猫绿
function c21100600.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_RECOVER)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100600)
e1:SetCost(c21100600.cost)
e1:SetTarget(c21100600.tg)
e1:SetOperation(c21100600.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100601)
e2:SetTarget(c21100600.tg2)
e2:SetOperation(c21100600.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100600.con3)
c:RegisterEffect(e3)
end
function c21100600.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100600.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100600.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100600.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100600.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100600.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.SelectYesNo(tp,aux.Stringid(21100600,0)) then
Duel.BreakEffect()
Duel.Recover(tp,400,REASON_EFFECT)
end
end
function c21100600.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100600.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100600.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100600.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100600.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100600,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100600.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100602.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 咖啡兔
function c21100602.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DAMAGE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100602)
e1:SetCost(c21100602.cost)
e1:SetTarget(c21100602.tg)
e1:SetOperation(c21100602.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100603)
e2:SetTarget(c21100602.tg2)
e2:SetOperation(c21100602.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100602.con3)
c:RegisterEffect(e3)
end
function c21100602.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100602.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100602.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100602.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100602.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100602.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.SelectYesNo(tp,aux.Stringid(21100602,0)) then
Duel.BreakEffect()
Duel.Damage(1-tp,400,REASON_EFFECT)
end
end
function c21100602.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100602.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100602.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100602.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100602.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100602,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100602.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100604.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 哥特喵
function c21100604.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100604)
e1:SetCost(c21100604.cost)
e1:SetTarget(c21100604.tg)
e1:SetOperation(c21100604.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100605)
e2:SetTarget(c21100604.tg2)
e2:SetOperation(c21100604.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100604.con3)
c:RegisterEffect(e3)
end
function c21100604.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100604.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100604.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100604.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100604.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100604.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsPlayerCanDraw(tp,1) and Duel.SelectYesNo(tp,aux.Stringid(21100604,0)) then
Duel.BreakEffect()
Duel.Draw(tp,1,REASON_EFFECT)
end
end
function c21100604.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100604.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100604.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100604.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100604.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100604,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100604.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100606.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 零食歌姬
function c21100606.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_RECOVER)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100606)
e1:SetCost(c21100606.cost)
e1:SetTarget(c21100606.tg)
e1:SetOperation(c21100606.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100607)
e2:SetTarget(c21100606.tg2)
e2:SetOperation(c21100606.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100606.con3)
c:RegisterEffect(e3)
end
function c21100606.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100606.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100606.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100606.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100606.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100606.e(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsLevel(2)
end
function c21100606.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(c21100606.e,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100606,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_SPSUMMON)
local sg=Duel.SelectMatchingCard(tp,c21100606.e,tp,LOCATION_HAND,0,1,1,nil,e,tp)
Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
end
end
function c21100606.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100606.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100606.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100606.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100606.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100606,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100606.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100608.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 蓝汽水
function c21100608.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100608)
e1:SetCost(c21100608.cost)
e1:SetTarget(c21100608.tg)
e1:SetOperation(c21100608.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100609)
e2:SetTarget(c21100608.tg2)
e2:SetOperation(c21100608.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100608.con3)
c:RegisterEffect(e3)
end
function c21100608.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100608.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100608.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100608.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100608.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100608.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.SelectYesNo(tp,aux.Stringid(21100608,0)) then
Duel.BreakEffect()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_ADD_TYPE)
e1:SetValue(TYPE_TUNER)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1)
end
end
function c21100608.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100608.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100608.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100608.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100608.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100608,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100608.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100610.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 炸鸡猫
function c21100610.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100610)
e1:SetCost(c21100610.cost)
e1:SetTarget(c21100610.tg)
e1:SetOperation(c21100610.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100611)
e2:SetTarget(c21100610.tg2)
e2:SetOperation(c21100610.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100610.con3)
c:RegisterEffect(e3)
end
function c21100610.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100610.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100610.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100610.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100610.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100610.e(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100610.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(aux.NecroValleyFilter(c21100610.e,e,tp),tp,LOCATION_GRAVE,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100610,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_SPSUMMON)
local sg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c21100610.e,e,tp),tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
if sg:GetCount()>0 then
Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
end
end
end
function c21100610.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100610.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100610.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100610.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100610.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100610,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100610.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100612.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 新年贺岁
function c21100612.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_RECOVER)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100612)
e1:SetCost(c21100612.cost)
e1:SetTarget(c21100612.tg)
e1:SetOperation(c21100612.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100614)
e2:SetTarget(c21100612.tg2)
e2:SetOperation(c21100612.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100612.con3)
c:RegisterEffect(e3)
end
function c21100612.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100612.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100612.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100612.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100612.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100612.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100613)
e1:SetCondition(c21100612.conex)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
e2:SetTargetRange(LOCATION_HAND,0)
e2:SetTarget(c21100612.tgex)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
end
end
function c21100612.conex(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100612.tgex(e,c)
return c:IsLevel(2) and not c:IsCode(21100612)
end
function c21100612.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100612.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100612.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100612.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100612.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100612,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100612.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100615.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 红姑凉
function c21100615.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_ATKCHANGE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100615)
e1:SetCost(c21100615.cost)
e1:SetTarget(c21100615.tg)
e1:SetOperation(c21100615.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100616)
e2:SetTarget(c21100615.tg2)
e2:SetOperation(c21100615.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100615.con3)
c:RegisterEffect(e3)
end
function c21100615.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100615.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100615.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100615.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100615.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100615.e(c)
return c:IsFaceup() and c:IsLevel(2) and c:IsAttack(50)
end
function c21100615.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local g=Duel.GetMatchingGroup(c21100615.e,tp,LOCATION_MZONE,0,nil)
if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(21100615,0)) then
Duel.BreakEffect()
for tc in aux.Next(g) do
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EFFECT_SET_ATTACK)
e1:SetValue(2500)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
end
end
end
function c21100615.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100615.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100615.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100615.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100615.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100615,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100615.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100617.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 巧克兔
function c21100617.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100617)
e1:SetCost(c21100617.cost)
e1:SetTarget(c21100617.tg)
e1:SetOperation(c21100617.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100618)
e2:SetTarget(c21100617.tg2)
e2:SetOperation(c21100617.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100617.con3)
c:RegisterEffect(e3)
end
function c21100617.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100617.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100617.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100617.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100617.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100617.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
Duel.BreakEffect()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_CHAINING)
e1:SetCondition(c21100617.conex)
e1:SetOperation(c21100617.opex)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
function c21100617.conex(e,tp,eg,ep,ev,re,r,rp)
local loc=Duel.GetChainInfo(0,CHAININFO_TRIGGERING_LOCATION)
return loc==LOCATION_HAND and rp==1-tp
end
function c21100617.opex(e,tp,eg,ep,ev,re,r,rp)
Duel.Draw(tp,1,REASON_EFFECT)
end
function c21100617.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100617.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100617.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100617.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100617.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100617,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100617.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100619.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 蛋糕粉
function c21100619.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100619)
e1:SetCost(c21100619.cost)
e1:SetTarget(c21100619.tg)
e1:SetOperation(c21100619.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100620)
e2:SetTarget(c21100619.tg2)
e2:SetOperation(c21100619.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100619.con3)
c:RegisterEffect(e3)
end
function c21100619.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100619.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100619.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100619.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100619.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100619.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c21100619.ind)
e1:SetValue(1)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
function c21100619.ind(e,c)
return c:IsFaceup() and (c:IsLevel(2) or c:IsRank(2) or c:IsLink(2))
end
function c21100619.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100619.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100619.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100619.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100619.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100619,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100619.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100621.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 午夜铛铛
function c21100621.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100621)
e1:SetCost(c21100621.cost)
e1:SetTarget(c21100621.tg)
e1:SetOperation(c21100621.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100622)
e2:SetTarget(c21100621.tg2)
e2:SetOperation(c21100621.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100621.con3)
c:RegisterEffect(e3)
end
function c21100621.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100621.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100621.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100621.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100621.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100621.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c21100621.ind)
e1:SetValue(1)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
function c21100621.ind(e,c)
return c:IsFaceup() and (c:IsLevel(2) or c:IsRank(2) or c:IsLink(2))
end
function c21100621.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100621.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100621.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100621.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100621.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100621,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100621.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100623.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 万圣南瓜瓜
function c21100623.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100623)
e1:SetCost(c21100623.cost)
e1:SetTarget(c21100623.tg)
e1:SetOperation(c21100623.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100624)
e2:SetTarget(c21100623.tg2)
e2:SetOperation(c21100623.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100623.con3)
c:RegisterEffect(e3)
end
function c21100623.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100623.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100623.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100623.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100623.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100623.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c21100623.ind)
e1:SetValue(aux.tgoval)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
function c21100623.ind(e,c)
return c:IsFaceup() and (c:IsLevel(2) or c:IsRank(2) or c:IsLink(2))
end
function c21100623.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100623.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100623.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100623.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100623.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100623,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100623.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100625.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 橙子喵
function c21100625.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100625)
e1:SetCost(c21100625.cost)
e1:SetTarget(c21100625.tg)
e1:SetOperation(c21100625.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100626)
e2:SetTarget(c21100625.tg2)
e2:SetOperation(c21100625.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100625.con3)
c:RegisterEffect(e3)
end
function c21100625.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100625.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100625.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100625.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100625.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100625.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabelObject(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
e1:SetLabelObject(e:GetLabelObject())
e1:SetCountLimit(1)
e1:SetOperation(c21100625.opex)
Duel.RegisterEffect(e1,tp)
end
end
function c21100625.e(c)
return c:IsLinkSummonable(nil)
end
function c21100625.opex(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetLabelObject()
local g=Duel.GetMatchingGroup(c21100625.e,tp,LOCATION_EXTRA,0,nil)
if g:GetCount()>0 and Duel.SelectEffectYesNo(tp,c,aux.Stringid(21100625,0)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=g:Select(tp,1,1,nil)
Duel.LinkSummon(tp,tg:GetFirst(),nil)
end
e:Reset()
end
function c21100625.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100625.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100625.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100625.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100625.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100625,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100625.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100627.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 绿酷酷
function c21100627.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100627)
e1:SetCost(c21100627.cost)
e1:SetTarget(c21100627.tg)
e1:SetOperation(c21100627.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100628)
e2:SetTarget(c21100627.tg2)
e2:SetOperation(c21100627.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100627.con3)
c:RegisterEffect(e3)
end
function c21100627.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100627.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100627.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100627.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100627.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100627.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(21100627,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_DESTROY)
local dg=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
Duel.Destroy(dg,REASON_EFFECT)
end
end
function c21100627.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100627.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100627.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100627.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100627.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100627,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100627.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100629.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 坏浮狸
function c21100629.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100629)
e1:SetCost(c21100629.cost)
e1:SetTarget(c21100629.tg)
e1:SetOperation(c21100629.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100630)
e2:SetTarget(c21100629.tg2)
e2:SetOperation(c21100629.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100629.con3)
c:RegisterEffect(e3)
end
function c21100629.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100629.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100629.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100629.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100629.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100629.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP) and Duel.SelectYesNo(tp,aux.Stringid(21100629,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_DESTROY)
local dg=Duel.SelectMatchingCard(tp,Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,TYPE_SPELL+TYPE_TRAP)
Duel.Destroy(dg,REASON_EFFECT)
end
end
function c21100629.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100629.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100629.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100629.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100629.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100629,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100629.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100631.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 冰激凌服务员
function c21100631.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK+CATEGORY_GRAVE_ACTION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100631)
e1:SetCost(c21100631.cost)
e1:SetTarget(c21100631.tg)
e1:SetOperation(c21100631.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100632)
e2:SetTarget(c21100631.tg2)
e2:SetOperation(c21100631.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100631.con3)
c:RegisterEffect(e3)
end
function c21100631.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100631.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100631.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100631.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100631.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100631.e(c)
return c:IsAbleToDeck() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100631.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(aux.NecroValleyFilter(c21100631.e),tp,LOCATION_GRAVE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(21100631,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_TODECK)
local tg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c21100631.e),tp,LOCATION_GRAVE,0,1,5,nil)
Duel.SendtoDeck(tg,nil,2,REASON_EFFECT)
end
end
function c21100631.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100631.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100631.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100631.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100631.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100631,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100631.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100633.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 动次碰次
function c21100633.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100633)
e1:SetCost(c21100633.cost)
e1:SetTarget(c21100633.tg)
e1:SetOperation(c21100633.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100634)
e2:SetTarget(c21100633.tg2)
e2:SetOperation(c21100633.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100633.con3)
c:RegisterEffect(e3)
end
function c21100633.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100633.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100633.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100633.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100633.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100633.e(c)
return c:IsLevel(2) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and c:IsFaceup()
end
function c21100633.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(c21100633.e,tp,LOCATION_MZONE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(21100633,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_OPERATECARD)
local sg=Duel.SelectMatchingCard(tp,c21100633.e,tp,LOCATION_MZONE,0,1,4,nil)
for tc in aux.Next(sg) do
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_ADD_TYPE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(TYPE_TUNER)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1)
end
end
end
function c21100633.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100633.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100633.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100633.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100633.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100633,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100633.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100635.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 面包酱酱
function c21100635.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100635)
e1:SetCost(c21100635.cost)
e1:SetTarget(c21100635.tg)
e1:SetOperation(c21100635.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100636)
e2:SetTarget(c21100635.tg2)
e2:SetOperation(c21100635.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100635.con3)
c:RegisterEffect(e3)
end
function c21100635.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100635.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100635.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100635.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100635.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100635.e(c)
return c:IsAbleToHand() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and c:IsLevel(2)
end
function c21100635.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(aux.NecroValleyFilter(c21100635.e),tp,LOCATION_GRAVE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(21100635,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_ATOHAND)
local tg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c21100635.e),tp,LOCATION_GRAVE,0,1,1,nil)
Duel.SendtoHand(tg,nil,REASON_EFFECT)
end
end
function c21100635.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100635.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100635.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100635.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100635.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100635,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100635.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100637.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 魔法魔法魔
function c21100637.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100637)
e1:SetCost(c21100637.cost)
e1:SetTarget(c21100637.tg)
e1:SetOperation(c21100637.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100638)
e2:SetTarget(c21100637.tg2)
e2:SetOperation(c21100637.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100637.con3)
c:RegisterEffect(e3)
end
function c21100637.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100637.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100637.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100637.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100637.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100637.e(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsSetCard(0x3902)
end
function c21100637.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(c21100637.e,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100637,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_SPSUMMON)
local sg=Duel.SelectMatchingCard(tp,c21100637.e,tp,LOCATION_HAND,0,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_ADD_TYPE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(TYPE_TUNER)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
sg:GetFirst():RegisterEffect(e1)
end
end
end
function c21100637.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100637.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100637.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100637.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100637.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100637,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100637.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100639.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 挎包小可爱
function c21100639.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY+CATEGORY_NEGATE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100639)
e1:SetCost(c21100639.cost)
e1:SetTarget(c21100639.tg)
e1:SetOperation(c21100639.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100640)
e2:SetTarget(c21100639.tg2)
e2:SetOperation(c21100639.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100639.con3)
c:RegisterEffect(e3)
end
function c21100639.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100639.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100639.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100639.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100639.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100639.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_CHAINING)
e1:SetCountLimit(1)
e1:SetCondition(c21100639.conex)
e1:SetOperation(c21100639.opex)
e1:SetReset(RESET_PHASE+PHASE_END,3)
Duel.RegisterEffect(e1,tp)
Duel.RegisterFlagEffect(tp,21100639,RESET_PHASE+PHASE_END,0,2)
end
end
function c21100639.conex(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp and Duel.GetFlagEffect(tp,21100639)==0 and Duel.IsChainNegatable(ev)
end
function c21100639.opex(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Destroy(eg,REASON_EFFECT)
end
e:Reset()
end
function c21100639.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100639.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100639.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100639.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100639.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100639,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100639.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100641.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 龙龙
function c21100641.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_RECOVER+CATEGORY_DAMAGE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100641)
e1:SetCost(c21100641.cost)
e1:SetTarget(c21100641.tg)
e1:SetOperation(c21100641.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100642)
e2:SetTarget(c21100641.tg2)
e2:SetOperation(c21100641.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100641.con3)
c:RegisterEffect(e3)
end
function c21100641.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100641.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100641.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100641.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100641.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100641.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.SelectYesNo(tp,aux.Stringid(21100641,0)) then
Duel.BreakEffect()
Duel.Recover(tp,200,REASON_EFFECT)
Duel.Damage(1-tp,200,REASON_EFFECT)
end
end
function c21100641.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100641.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100641.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100641.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100641.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100641,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100641.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100643.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 浴衣兔兔
function c21100643.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK+CATEGORY_GRAVE_ACTION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100643)
e1:SetCost(c21100643.cost)
e1:SetTarget(c21100643.tg)
e1:SetOperation(c21100643.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100644)
e2:SetTarget(c21100643.tg2)
e2:SetOperation(c21100643.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100643.con3)
c:RegisterEffect(e3)
end
function c21100643.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100643.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100643.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100643.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100643.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100643.e(c)
return c:IsAbleToDeck()
end
function c21100643.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(aux.NecroValleyFilter(c21100643.e),tp,LOCATION_GRAVE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(21100643,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_TODECK)
local tg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c21100643.e),tp,LOCATION_GRAVE,0,1,3,nil)
Duel.SendtoDeck(tg,nil,2,REASON_EFFECT)
end
end
function c21100643.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100643.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100643.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100643.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100643.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100643,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100643.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100645.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 兔兔恰饼
function c21100645.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_REMOVE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100645)
e1:SetCost(c21100645.cost)
e1:SetTarget(c21100645.tg)
e1:SetOperation(c21100645.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100646)
e2:SetTarget(c21100645.tg2)
e2:SetOperation(c21100645.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100645.con3)
c:RegisterEffect(e3)
end
function c21100645.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100645.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100645.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100645.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100645.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100645.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_GRAVE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(21100645,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_REMOVE)
local rg=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,0,LOCATION_GRAVE,1,1,nil)
Duel.Remove(rg,POS_FACEUP,REASON_EFFECT)
end
end
function c21100645.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100645.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100645.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100645.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100645.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100645,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100645.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100647.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 赛博药剂狐
function c21100647.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_ATKCHANGE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100647)
e1:SetCost(c21100647.cost)
e1:SetTarget(c21100647.tg)
e1:SetOperation(c21100647.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100648)
e2:SetTarget(c21100647.tg2)
e2:SetOperation(c21100647.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100647.con3)
c:RegisterEffect(e3)
end
function c21100647.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100647.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100647.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100647.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100647.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100647.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(21100647,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_FACEUP)
local ag=Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,LOCATION_MZONE,0,1,3,nil)
for tc in aux.Next(ag) do
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(400)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
end
end
function c21100647.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100647.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100647.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100647.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100647.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100647,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100647.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100649.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 小蓝狗
function c21100649.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_ATKCHANGE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100649)
e1:SetCost(c21100649.cost)
e1:SetTarget(c21100649.tg)
e1:SetOperation(c21100649.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100650)
e2:SetTarget(c21100649.tg2)
e2:SetOperation(c21100649.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100649.con3)
c:RegisterEffect(e3)
end
function c21100649.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100649.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100649.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100649.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100649.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100649.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(21100649,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_FACEUP)
local ag=Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,3,nil)
for tc in aux.Next(ag) do
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(-400)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
end
end
function c21100649.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100649.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100649.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100649.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100649.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100649,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100649.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100651.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 猫咪魔术西
function c21100651.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW+CATEGORY_TODECK)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100651)
e1:SetCost(c21100651.cost)
e1:SetTarget(c21100651.tg)
e1:SetOperation(c21100651.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100652)
e2:SetTarget(c21100651.tg2)
e2:SetOperation(c21100651.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100651.con3)
c:RegisterEffect(e3)
end
function c21100651.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100651.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100651.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100651.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100651.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100651.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsPlayerCanDraw(tp,2) and Duel.SelectYesNo(tp,aux.Stringid(21100651,0)) then
Duel.BreakEffect()
if Duel.Draw(tp,2,REASON_EFFECT)>1 then
local hg=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
if #hg<2 then return false end
Duel.Hint(3,tp,HINTMSG_TODECK)
local tg=hg:Select(tp,2,2,nil)
Duel.SendtoDeck(tg,nil,2,REASON_EFFECT)
end
end
end
function c21100651.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100651.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100651.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100651.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100651.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100651,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100651.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100653.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 紫色贵族
function c21100653.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100653)
e1:SetCost(c21100653.cost)
e1:SetTarget(c21100653.tg)
e1:SetOperation(c21100653.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100654)
e2:SetTarget(c21100653.tg2)
e2:SetOperation(c21100653.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100653.con3)
c:RegisterEffect(e3)
end
function c21100653.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100653.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100653.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100653.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100653.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100653.e(c)
return c:IsFaceup() and (c:IsLevel(2) or c:IsRank(2) or c:IsLink(2))
end
function c21100653.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local dg=Duel.GetMatchingGroup(c21100653.e,tp,LOCATION_MZONE,0,nil)
if dg:GetCount()>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(0,1)
e1:SetValue(HALF_DAMAGE)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
for tc in aux.Next(dg) do
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_DIRECT_ATTACK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1)
end
end
end
end
function c21100653.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100653.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100653.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100653.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100653.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100653,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100653.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100655.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 褐色熊熊
function c21100655.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100655)
e1:SetCost(c21100655.cost)
e1:SetTarget(c21100655.tg)
e1:SetOperation(c21100655.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100656)
e2:SetTarget(c21100655.tg2)
e2:SetOperation(c21100655.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100655.con3)
c:RegisterEffect(e3)
end
function c21100655.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100655.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100655.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100655.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100655.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100655.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CHANGE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(c21100655.damval)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
function c21100655.damval(e,re,val,r,rp,rc)
return math.floor(val/2)
end
function c21100655.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100655.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100655.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100655.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100655.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100655,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100655.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100657.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 绿魔法喵喵
function c21100657.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW+CATEGORY_TOGRAVE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100657)
e1:SetCost(c21100657.cost)
e1:SetTarget(c21100657.tg)
e1:SetOperation(c21100657.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100658)
e2:SetTarget(c21100657.tg2)
e2:SetOperation(c21100657.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100657.con3)
c:RegisterEffect(e3)
end
function c21100657.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100657.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100657.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100657.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100657.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.IsPlayerCanDraw(tp,2) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100657.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsPlayerCanDraw(tp,2) then
if Duel.Draw(tp,2,REASON_EFFECT)==2 then
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local tg=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,1,nil)
if tg:GetCount()>0 then
Duel.SendtoGrave(tg,REASON_EFFECT)
end
end
end
end
function c21100657.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100657.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100657.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100657.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100657.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100657,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100657.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100659.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 小黄巫
function c21100659.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_REMOVE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100659)
e1:SetCost(c21100659.cost)
e1:SetTarget(c21100659.tg)
e1:SetOperation(c21100659.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100660)
e2:SetTarget(c21100659.tg2)
e2:SetOperation(c21100659.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100659.con3)
c:RegisterEffect(e3)
end
function c21100659.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100659.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100659.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100659.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100659.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100659.e(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
end
function c21100659.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_HAND,0,1,nil) and Duel.IsExistingMatchingCard(c21100659.e,tp,LOCATION_DECK,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100659,0)) then
Duel.Hint(3,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_HAND,0,1,1,nil)
Duel.Hint(3,tp,HINTMSG_ATOHAND)
local g2=Duel.SelectMatchingCard(tp,c21100659.e,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
Duel.SendtoHand(g2,nil,REASON_EFFECT)
end
end
function c21100659.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100659.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100659.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100659.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100659.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100659,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100659.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100661.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 粉宝宝
function c21100661.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOGRAVE+CATEGORY_DECKDES)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100661)
e1:SetCost(c21100661.cost)
e1:SetTarget(c21100661.tg)
e1:SetOperation(c21100661.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100662)
e2:SetTarget(c21100661.tg2)
e2:SetOperation(c21100661.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100661.con3)
c:RegisterEffect(e3)
end
function c21100661.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100661.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100661.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100661.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100661.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100661.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and g:GetCount()>0 and g:Filter(Card.IsAbleToGrave,nil)==3 and Duel.SelectYesNo(tp,aux.Stringid(21100661,0)) then
Duel.SendtoGrave(g,REASON_EFFECT)
end
end
function c21100661.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100661.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100661.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100661.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100661.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100661,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100661.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100663.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 宅宅紫
function c21100663.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100663)
e1:SetCost(c21100663.cost)
e1:SetTarget(c21100663.tg)
e1:SetOperation(c21100663.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100664)
e2:SetTarget(c21100663.tg2)
e2:SetOperation(c21100663.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100663.con3)
c:RegisterEffect(e3)
end
function c21100663.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100663.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100663.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100663.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100663.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then
local ct=0
local ce={Duel.IsPlayerAffectedByEffect(tp,EFFECT_SET_SUMMON_COUNT_LIMIT)}
for _,te in ipairs(ce) do
ct=math.max(ct,te:GetValue())
end
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and ct<2 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100663.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SET_SUMMON_COUNT_LIMIT)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(2)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
function c21100663.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100663.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100663.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100663.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100663.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100663,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100663.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100665.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 香草冰激凌
function c21100665.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100665)
e1:SetCost(c21100665.cost)
e1:SetTarget(c21100665.tg)
e1:SetOperation(c21100665.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100666)
e2:SetTarget(c21100665.tg2)
e2:SetOperation(c21100665.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100665.con3)
c:RegisterEffect(e3)
end
function c21100665.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100665.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100665.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100665.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100665.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100665.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_ATKCHANGE)
e1:SetRange(LOCATION_MZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetTarget(c21100665.tgex)
e1:SetOperation(c21100665.opex)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1)
end
end
function c21100665.e(c)
return c:IsFaceup() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100665.tgex(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
local g=Duel.GetMatchingGroup(c21100665.e,tp,LOCATION_MZONE+LOCATION_GRAVE,0,nil)
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) and g:GetCount()>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
local tg=Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_ATKCHANGE,tg,1,tp,g:GetCount()*200)
end
function c21100665.opex(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
local g=Duel.GetMatchingGroup(c21100665.e,tp,LOCATION_MZONE+LOCATION_GRAVE,0,nil)
if g:GetCount()>0 and tc:IsFaceup() and tc:IsRelateToEffect(e) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(g:GetCount()*200)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
end
function c21100665.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100665.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100665.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100665.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100665.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100665,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100665.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100667.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 爆米花弹珠糖
function c21100667.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOEXTRA)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100667)
e1:SetCost(c21100667.cost)
e1:SetTarget(c21100667.tg)
e1:SetOperation(c21100667.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100668)
e2:SetTarget(c21100667.tg2)
e2:SetOperation(c21100667.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100667.con3)
c:RegisterEffect(e3)
end
function c21100667.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100667.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100667.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100667.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100667.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100667.e(c)
return c:IsAbleToExtra() and c:IsType(TYPE_FUSION+TYPE_LINK+TYPE_XYZ+TYPE_SYNCHRO) and c:IsType(TYPE_MONSTER)
end
function c21100667.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(c21100667.e,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(21100667,0)) then
Duel.BreakEffect()
Duel.Hint(3,tp,HINTMSG_TODECK)
local g=Duel.SelectMatchingCard(tp,c21100667.e,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,3,nil)
Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
end
end
function c21100667.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100667.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100667.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100667.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100667.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100667,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100667.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100669.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 读书蝴蝶
function c21100669.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100669)
e1:SetCost(c21100669.cost)
e1:SetTarget(c21100669.tg)
e1:SetOperation(c21100669.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100670)
e2:SetTarget(c21100669.tg2)
e2:SetOperation(c21100669.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100669.con3)
c:RegisterEffect(e3)
end
function c21100669.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100669.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100669.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100669.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100669.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100669.e(c)
return c:IsAbleToHand() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100669.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetCondition(c21100669.conex)
e1:SetOperation(c21100669.opex)
e1:SetReset(RESET_PHASE+PHASE_END,2)
Duel.RegisterEffect(e1,tp)
end
end
function c21100669.conex(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==1-tp
end
function c21100669.opex(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.IsExistingMatchingCard(c21100669.e,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(21100669,0)) then
Duel.Hint(3,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c21100669.e,tp,LOCATION_DECK,0,1,1,nil)
Duel.SendtoHand(g,nil,REASON_EFFECT)
end
e:Reset()
end
function c21100669.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100669.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100669.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100669.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100669.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100669,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100669.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c21100671.lua deleted 100644 → 0
View file @ cb6c0bb0
--午时游行 兔兔女王
function c21100671.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,21100671)
e1:SetCost(c21100671.cost)
e1:SetTarget(c21100671.tg)
e1:SetOperation(c21100671.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,21100672)
e2:SetTarget(c21100671.tg2)
e2:SetOperation(c21100671.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(c21100671.con3)
c:RegisterEffect(e3)
end
function c21100671.q(c)
return c:IsAbleToGraveAsCost() and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER)
end
function c21100671.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c21100671.q,tp,LOCATION_HAND,0,1,c) end
Duel.Hint(3,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c21100671.q,tp,LOCATION_HAND,0,1,1,c)
Duel.SendtoGrave(g,REASON_COST)
end
function c21100671.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,tp,LOCATION_HAND)
end
function c21100671.e(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsSetCard(0x3902)
end
function c21100671.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
Duel.BreakEffect()
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
if ft>0 then
for i=1,ft do
local lp=Duel.GetLP(tp)
if lp>=1500 and Duel.IsExistingMatchingCard(aux.NecroValleyFilter(c21100671.e,e,tp),tp,LOCATION_GRAVE+LOCATION_HAND,0,1,nil,e,tp) then
if Duel.SelectYesNo(tp,aux.Stringid(21100671,0)) then
Duel.SetLP(tp,lp-1500)
Duel.Hint(3,tp,HINTMSG_SPSUMMON)
local sg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c21100671.e,e,tp),tp,LOCATION_GRAVE+LOCATION_HAND,0,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 and i~=ft and not Duel.SelectYesNo(tp,aux.Stringid(21100671,2)) then break
end
else break
end
end
end
end
end
end
function c21100671.con3(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsSetCard(0x3902)
end
function c21100671.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetDecktopGroup(tp,3)
if chk==0 then return g:GetCount()>0 and g:GetCount()==3 end
end
function c21100671.w(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x3902) and c:IsType(TYPE_MONSTER) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function c21100671.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:GetCount()==3 then
Duel.ConfirmDecktop(tp,3)
Duel.DisableShuffleCheck()
if g:IsExists(c21100671.w,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(21100671,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:FilterSelect(tp,c21100671.w,1,1,nil,e,tp)
if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0 then
e:SetLabel(sg:GetFirst():GetCode())
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetTargetRange(1,0)
e1:SetLabel(e:GetLabel())
e1:SetTarget(function(e,c,sump,sumtype,sumpos,targetp)
return c:IsCode(e:GetLabel()) end)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
Duel.ShuffleDeck(tp)
end
end
\ No newline at end of file
expansions/script/c31300000.lua deleted 100644 → 0
View file @ cb6c0bb0
--黯月兔
Duel.LoadScript("c31300100.lua")
local s, id = GetID()
function s.initial_effect(c)
Scl.SetFusionMaterial(c, true, true, s.ffilter, 2, 2)
local e1 = Scl.CreateSingleTriggerOptionalEffect(c, "BeSpecialSummoned",
"Send2GY", { 1, id }, "Send2GY", "Delay", nil, nil,
{ "~Target", "Send2GY", s.tgfilter, "Deck" }, s.tgop)
local e2 = Scl.CreateSingleTriggerMandatoryEffect(c, "AtStartOfDamageStep",
"Destroy", nil, "Destroy", nil, s.descon, nil, s.destg, s.desop)
local e3 = Scl.CreateSingleTriggerOptionalEffect(c, "BeSent2GY",
"Add2Hand", { 1, id+100 }, "Add2Hand", "Target,Delay", nil, nil,
{ "Target", "Add2Hand", s.thfilter, "GY" }, s.thop)
end
function s.ffilter(c, fc)
return c:IsFusionType(TYPE_TUNER)
end
function s.tgfilter(c)
return c:IsAbleToGrave() and c:IsLevelBelow(3) and c:IsType(TYPE_TUNER)
end
function s.tgop(e,tp)
Scl.SelectAndOperateCards("Send2GY",tp,s.tgfilter,tp,"Deck",0,1,1,nil)()
end
function s.descon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local bc=c:GetBattleTarget()
return bc and not bc:IsType(TYPE_TUNER)
end
function s.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler():GetBattleTarget(),1,0,0)
end
function s.desop(e,tp,eg,ep,ev,re,r,rp)
local bc=e:GetHandler():GetBattleTarget()
if bc:IsRelateToBattle() then
Duel.Destroy(bc,REASON_EFFECT)
end
end
function s.thfilter(c)
return c:IsAbleToHand() and c:IsLevelBelow(3) and c:IsType(TYPE_TUNER)
end
function s.thop(e,tp)
local _, tc = Scl.GetTargetsReleate2Chain()
if tc then
Scl.Send2Hand(tc, nil, "Effect")
end
end
\ No newline at end of file
expansions/script/c31300001.lua deleted 100644 → 0
View file @ cb6c0bb0
--小小白兔
Duel.LoadScript("c31300100.lua")
local s, id = GetID()
function s.initial_effect(c)
local e1 = Scl.CreateActivateEffect_FusionSummon(c, nil,
s.ffilter, s.matfilter, "Send2GY")
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_CHAINING)
e1:SetCondition(s.fcon)
local e2 = LittleRabbit.SpecialSummonFun(c, id)
end
function s.fcon(e, tp, eg, ep, ev, re, r, rp)
return rp ~= tp
end
function s.ffilter(c)
return c:IsType(TYPE_TUNER)
end
function s.matfilter(e, tp)
return Duel.GetFusionMaterial(tp)
end
\ No newline at end of file
expansions/script/c31300002.lua deleted 100644 → 0
View file @ cb6c0bb0
--小兔子大小姐
Duel.LoadScript("c31300100.lua")
local s, id = GetID()
function s.initial_effect(c)
Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
local e1 = Scl.CreateActivateEffect(c, nil, "SpecialSummon", {1, id, "Oath"},
"SpecialSummon", nil, nil, s.cost,
{"~Target", "SpecialSummon", s.spfilter, "Deck"}, s.act)
local e2 = Scl.CreateFieldTriggerOptionalEffect(c, "DuringSP", "SpecialSummon",
1, "SpecialSummon", nil, "GY", scl.cond_opponents_turn,
{ "Cost", "ShuffleIn2Deck", Card.IsAbleToDeckAsCost },
{"~Target", "SpecialSummon", s.spfilter, "Deck"}, s.act)
end
function s.spfilter(c,e,tp)
return Scl.IsCanBeSpecialSummonedNormaly2(c,e,tp) and LittleRabbit.TunerFilter(c)
end
function s.act(e,tp)
if Duel.GetFieldGroupCount(tp, 0 , LOCATION_MZONE) > 0 then
Scl.SelectAndOperateCards("SpecialSummon", tp, s.spfilter, tp, "Deck", 0 , 1, 1, nil, e, tp)()
else
Scl.CreateFieldTriggerContinousEffect({e:GetHandler(), tp}, "DuringEP",
"SpecialSummon", 1, nil, nil, s.spcon, s.spop, RESETS_EP_SCL)
end
end
function s.spcon(e,tp)
return Scl.IsExistingMatchingCard(s.spfilter, tp, "Deck", 0, 1, nil,e,tp)
end
function s.spop(e,tp)
Scl.SelectAndOperateCards("SpecialSummon", tp, s.spfilter, tp, "Deck", 0 , 1, 1, nil, e, tp)()
end
function s.counterfilter(c)
return not c:IsSummonLocation(LOCATION_EXTRA) or c:IsType(TYPE_FUSION)
end
function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetCustomActivityCount(6498706,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetTargetRange(1,0)
e1:SetTarget(s.splimit)
Duel.RegisterEffect(e1,tp)
end
function s.splimit(e,c)
return c:IsLocation(LOCATION_EXTRA) and not c:IsType(TYPE_FUSION)
end
\ No newline at end of file
expansions/script/c31300003.lua deleted 100644 → 0
View file @ cb6c0bb0
--小兔子护士
Duel.LoadScript("c31300100.lua")
local s, id = GetID()
function s.initial_effect(c)
local e1 = Scl.CreateActivateEffect_FusionSummon(c, nil,
s.ffilter, s.matfilter, "Send2GY")
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_ATTACK_ANNOUNCE)
e1:SetCondition(s.fcon)
local e2 = LittleRabbit.SpecialSummonFun(c, id)
end
function s.fcon(e, tp, eg, ep, ev, re, r, rp)
return Duel.GetAttacker():IsControler(1-tp)
end
function s.ffilter(c)
return c:IsType(TYPE_TUNER)
end
function s.matfilter(e, tp)
return Duel.GetFusionMaterial(tp)
end
\ No newline at end of file
expansions/script/c31300004.lua deleted 100644 → 0
View file @ cb6c0bb0
--小兔子猎人
Duel.LoadScript("c31300100.lua")
local s, id = GetID()
function s.initial_effect(c)
Scl.SetSummonCondition(c, true, aux.FALSE)
Scl.SetFusionMaterial(c, true, true, s.ffilter, 1, 1, s.ffilter2, 1, 1)
--aux.AddContactFusionProcedure(c, Card.IsReleasable, LOCATION_HAND+LOCATION_ONFIELD)
Scl.AddSpecialSummonProcedure(c, "Extra", s.sprcon, nil, s.sprop)
local e1 = Scl.CreateQuickOptionalEffect(c, nil, "SetTrap",1,"SetTrap", nil,
"MonsterZone", s.setcon,
{ "Cost", "Look&ShuffleIn2Deck", s.cfilter, "Hand,GY" },
{ "~Target", "SetTrap", s.sfilter, "Deck,GY" }, s.setop)
local e2 = Scl.CreateSingleBuffEffect(c, "!BeBattleTarget", 1, "MonsterZone")
local e3 = Scl.CreateSingleBuffEffect(c, "!BeEffectTarget",
aux.tgoval, "MonsterZone")
end
function s.sprcon(e,c,tp)
return Scl.IsExistingMatchingCard({s.tfilter,s.gfilter},tp,"Hand,OnField",0,2,2,nil)
end
function s.tfilter(c)
if not Scl.IsCanBeTributed(c) then return false end
return Scl.IsCardType(c,0,"NormalTrap") or LittleRabbit.TunerFilter(c)
end
function s.gfilter(g)
return #g == 1 or g:FilterCount(Scl.IsCardType,nil,0,"Trap") == 1
end
function s.sprop(e,tp)
Scl.SelectAndOperateCards("Tribute",tp,{s.tfilter,s.gfilter},tp,"Hand,OnField",0,2,2,nil)()
end
function s.setcon(e,tp)
return e:GetHandler():GetFlagEffect(id) == 0
end
function s.cfilter(c)
return c:IsAbleToDeckAsCost() and LittleRabbit.TunerFilter(c)
end
function s.sfilter(c,e,tp)
return c:GetType() == TYPE_TRAP and c:IsSSetable(true) and Duel.GetLocationCount(1-tp, LOCATION_SZONE) > 0
end
function s.setop(e,tp)
Scl.SelectAndOperateCards("SetTrap", tp, aux.NecroValleyFilter(s.sfilter), tp, "Deck,GY", 0, 1, 1, nil,e,tp)(tp, 1-tp)
local _, c = Scl.GetFaceupActivateCard()
if c then
c:RegisterFlagEffect(id, RESETS_EP_SCL, 0, 2)
end
end
function s.ffilter(c)
return c:IsFusionType(TYPE_TUNER) and c:IsAttack(150) and c:IsDefense(2050)
end
function s.ffilter2(c)
return c:GetType() == TYPE_TRAP
end
\ No newline at end of file
expansions/script/c31300005.lua deleted 100644 → 0
View file @ cb6c0bb0
--小白兔的抵价购物
Duel.LoadScript("c31300100.lua")
local s, id = GetID()
function s.initial_effect(c)
local e1 = Scl.CreateActivateEffect(c, nil, "Draw", nil, "Tribute,Draw",
"Target", nil, nil, {
{ "Target", "Tribute", Card.IsReleasableByEffect, "OnField", 0, 2 },
{ "~PlayerTarget", "Draw", 2 }}, s.act)
local e2 = LittleRabbit.ToGYFunction(c, id, "Draw", "Draw,Send2GY", nil, nil, {
{ "PlayerTarget", "Draw", 2 },
{ "~Target", "Send2GY", Card.IsAbleToGrave, "Hand" }}, s.drop)
end
function s.drcon(e,tp)
local c = e:GetHandler()
return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEDOWN) and c:IsPreviousControler(1-tp)
end
function s.drop(e,tp)
if Duel.Draw(tp,2, REASON_EFFECT) > 0 then
Scl.SelectAndOperateCards("Send2GY", tp, Card.IsAbleToGrave, tp, "Hand", 0 , 1, 1, nil)()
end
end
function s.act(e,tp)
local tg = Scl.GetTargetsReleate2Chain()
if #tg <= 0 or Duel.Release(tg, REASON_EFFECT) <= 0 then return end
Duel.Draw(tp, 2, REASON_EFFECT)
end
expansions/script/c31300006.lua deleted 100644 → 0
View file @ cb6c0bb0
--小兔子女仆
Duel.LoadScript("c31300100.lua")
local s, id = GetID()
function s.initial_effect(c)
local e1 = Scl.CreateActivateEffect(c, nil, "Draw", nil, "Tribute,Draw", "Target",
nil, nil, { {"Target", "Tribute", Card.IsReleasableByEffect, "OnField", 0, 4, 4, c}, {"PlayerTarget", "Draw", 1} }, s.act)
local e2 = Scl.CreateSingleTriggerOptionalEffect(c, "BeSent2GY",
"Draw", {id, 1}, "Draw,Send2GY", "Delay", s.drcon, nil,
{ "PlayerTarget", "Draw", 2 }, s.drop)
end
function s.act(e,tp)
local tg = Scl.GetTargetsReleate2Chain()
if #tg > 0 and Duel.Release(tg, REASON_EFFECT) > 0 then
Duel.Draw(tp, 1, REASON_EFFECT)
end
end
function s.drcon(e,tp)
local c = e:GetHandler()
return c:IsPreviousControler(1-tp) and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEDOWN)
end
function s.drop(e,tp)
if Duel.Draw(tp, 2, REASON_EFFECT) > 0 then
Scl.SelectAndOperateCards("Send2GY", tp, Card.IsAbleToGrave, tp, "Hand", 0, 1, 1, nil)()
end
end
\ No newline at end of file
expansions/script/c31300007.lua deleted 100644 → 0
View file @ cb6c0bb0
--特殊个体
Duel.LoadScript("c31300100.lua")
local s, id = GetID()
function s.initial_effect(c)
local e1 = Scl.CreateQuickOptionalEffect(c, nil, "SetTrap", {1, id},
"SetTrap", nil, "MonsterZone", nil, nil,
{"~Target", "SetTrap", s.setfilter, "Deck,GY,Banished"}, s.setop)
local e2 = Scl.CreateQuickOptionalEffect(c, nil, "SetTrap", {1, id},
"SetTrap", nil, "Hand", nil, nil, {
{"~Target", "SetTrap", s.setfilter, "Deck,GY"},
{"~Target", "Send2GY", Card.IsAbleToGrave}}, s.setop2)
local e3 = Scl.CreateIgnitionEffect(c, "ShuffleIn2Deck", {1, id + 100},
"ShuffleIn2Deck", "Target", "GY", nil, nil, {
{"~Target", "ShuffleIn2Deck", Card.IsAbleToDeck },
{"Target", "ShuffleIn2Deck", Card.IsAbleToDeck, "GY", "GY", 1, 3,c}}, s.tdop)
end
function s.tdop(e,tp)
local _, c = Scl.GetActivateCard()
local g = Scl.GetTargetsReleate2Chain()
if not c or #g == 0 then return end
Duel.SendtoDeck(g+c, nil, 2, REASON_EFFECT)
end
function s.setfilter(c,e,tp)
return aux.IsCodeListed(c, 31300005) and c:IsSSetable(true) and Duel.GetLocationCount(1-tp, LOCATION_SZONE) > 0
end
function s.setop(e,tp)
Scl.SelectAndOperateCards("SetTrap", tp, aux.NecroValleyFilter(s.setfilter), tp, "Deck,GY", 0, 1, 1, nil,e,tp)(tp, 1-tp)
end
function s.setop2(e,tp)
if Scl.SelectAndOperateCards("SetTrap", tp, aux.NecroValleyFilter(s.setfilter), tp, "Deck,GY", 0, 1, 1, nil,e,tp)(tp, 1-tp) > 0 then
local _, c = Scl.GetActivateCard()
if c then
Duel.SendtoGrave(c,REASON_EFFECT)
end
end
end
\ No newline at end of file
expansions/script/c31300008.lua deleted 100644 → 0
View file @ cb6c0bb0
--小白兔 Γ
Duel.LoadScript("c31300100.lua")
local s, id = GetID()
function c31300008.initial_effect(c)
local e1 = Scl.AddSpecialSummonProcedure(c, "Hand,GY", s.sprcon,nil, s.sprop, nil, nil, SUMMON_VALUE_SELF)
local e2 = Scl.CreateSingleTriggerOptionalEffect(c, "BeSpecialSummonedBySelf", "SetTrap", nil, "SetTrap", "Delay", s.setcon, nil, { "~Target", "SetTrap", s.setfilter, "Deck,GY" }, s.setop)
local e3 = Scl.CreateSingleTriggerOptionalEffect(c, "BeSpecialSummonedBySelf", "Return2Hand", nil, "Return2Hand", "Delay", s.rhcon, nil, { "~Target", "Return2Hand", Card.IsAbleToHand }, s.rhop)
Scl.CreateSingleBuffEffect(c, "!BeTributed", 1, "MonsterZone")
local e4 = Scl.CreateSingleBuffEffect(c, "!BeTributed", 1, "MonsterZone")
local e5,e6,e7,e8 = Scl.CreateSingleBuffEffect(c, "!BeUsedAsMaterial4Fusion/Synchro/Xyz/LinkSummon", 1, "MonsterZone")
end
function s.sprcon(e,c,tp)
return Scl.IsExistingMatchingCard(Card.IsReleasableByEffect,tp,"OnField",0,1,nil)
end
function s.sprop(e,tp)
Scl.SelectAndOperateCards("Tribute",tp, Card.IsReleasableByEffect,tp,"OnField",0,1,1,nil)()
end
function s.setcon(e,tp)
local c = e:GetHandler()
return Scl.IsSummonFormZone(c, "Hand")
end
function s.setfilter(c,e,tp)
return c:GetType() == TYPE_TRAP and c:IsSSetable(true) and Duel.GetLocationCount(1-tp, LOCATION_SZONE) > 0
end
function s.setop(e,tp)
Scl.SelectAndOperateCards("SetTrap", tp, aux.NecroValleyFilter(s.setfilter), tp, "Deck,GY,Banish", 0, 1, 1, nil,e,tp)(tp, 1-tp)
end
function s.rhcon(e,tp)
local c = e:GetHandler()
return Scl.IsSummonFormZone(c, "GY")
end
function s.rhop(e,tp)
local _, c = Scl.GetActivateCard()
if c then
Scl.Send2Hand(c, tp, "Effect", true)
end
end
\ No newline at end of file
expansions/script/c31300009.lua deleted 100644 → 0
View file @ cb6c0bb0
--小白兔的万圣节
Duel.LoadScript("c31300100.lua")
local s,id = GetID()
function s.initial_effect(c)
Scl.AddTokenList(c, 31300005)
local e1 = Scl.CreateActivateEffect(c, "FreeChain", "Draw", nil, "Draw", "PlayerTarget", nil, nil, { "PlayerTarget", "Draw", 0, 3 }, s.act1)
local e2 = Scl.CreateActivateEffect(c, "FreeChain", "Destroy", nil, "Destroy,SpecialSummonToken", nil, nil, nil, { { "~Target", "Destroy", { aux.TRUE, s.gcheck }, "Hand,OnField", 0, 5, 5, c }, { "ExtraTarget", s.fun } }, s.act2)
local e3 = Scl.CreateActivateEffect_Activate1ofTheseEffects(c, e1, e2)
local e4 = Scl.CreateSingleTriggerOptionalEffect(c, "BeSent2GY",
"SetTrap", {id, 1}, "SetTrap", "Delay", s.setcon, nil,
{"~Target", "SetTrap", s.setfilter, "Deck,GY"}, s.setop)
end
function s.act1(e,tp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p, d, REASON_EFFECT)
end
function s.gcheck(g,e,tp)
return Duel.GetMZoneCount(tp, g, tp) > 0
end
function s.fun(e, tp, eg, ep, ev, re, r, rp, chk)
if chk == 0 then
return Scl.IsCanSpecialSummonToken(e,tp,31300005, POS_FACEUP)
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,0)
Duel.SetOperationInfo(0, CATEGORY_TOKEN, nil, 1, tp, 0)
end
function s.act2(e,tp)
local ct = Scl.SelectAndOperateCards("Destroy",tp,{aux.TRUE,s.gcheck},tp,"Hand,OnField",0,5,5,aux.ExceptThisCard(e),e,tp)()
if ct == 0 then return end
Scl.SpecialSummonToken(e,tp,31300005,1,ct,POS_FACEUP)
end
function s.setcon(e,tp)
local c = e:GetHandler()
return c:IsPreviousControler(1-tp) and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEDOWN)
end
function s.setfilter(c,e,tp)
return not c:IsCode(id) and Scl.IsCardType(c, 0, "NormalTrap") and c:IsSSetable(true) and Duel.GetLocationCount(1-tp, LOCATION_SZONE) > 0
end
function s.setop(e,tp)
Scl.SelectAndOperateCards("SetTrap", tp, aux.NecroValleyFilter(s.setfilter), tp, "Deck,GY", 0, 1, 1, nil,e,tp)(tp, 1-tp)
end
\ No newline at end of file
expansions/script/c31300011.lua deleted 100644 → 0
View file @ cb6c0bb0
--采购
Duel.LoadScript("c31300100.lua")
local s,id = GetID()
function s.initial_effect(c)
local e1 = Scl.CreateActivateEffect(c, "FreeChain", nil, nil, "ShuffleIn2Deck,Draw",nil,nil,nil,{ {"~Target", "ShuffleIn2Deck", Card.IsAbleToDeck, "Hand", 0, true, true, s.exfun}, {"PlayerTarget", "Draw", s.drct}}, s.act)
local e2 = Scl.CreateSingleTriggerOptionalEffect(c, "BeSent2GY",
"ShuffleIn2Deck", {id, 1}, "ShuffleIn2Deck", "Delay", s.tdcon, nil,
{"~Target", "ShuffleIn2Deck", s.tdfilter, "Deck,GY"}, s.tdop)
end
function s.exfun(e,tp)
if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
return e:GetHandler()
else
return nil
end
end
function s.drct(e,tp)
local g = Scl.GetMatchingGroup(Card.IsAbleToDeck,tp,"Hand",0,s.exfun(e,tp))
if #g - 2 <= 0 then return 999
else return #g - 2
end
end
function s.act(e,tp)
local g = Scl.GetMatchingGroup(Card.IsAbleToDeck,tp,"Hand",0,nil)
if #g > 0 and Scl.Send2Deck(g,nil,SEQ_DECKSHUFFLE,"Effect") > 0 then
local ct = Scl.GetCorrectlyOperatedCount("Deck,Extra") - 2
if ct > 0 then
Duel.Draw(tp, ct, REASON_EFFECT)
end
end
end
function s.tdcon(e,tp)
local c = e:GetHandler()
return c:IsPreviousControler(1-tp) and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEDOWN)
end
function s.tdfilter(c,e,tp)
local b1 = Scl.IsCardType(c,0,"Tuner") and c:IsAttack(150) and c:IsDefense(2050)
local b2 = Scl.IsCardType(c,0,"NormalTrap")
return (b1 or b2) and (Scl.IsInZone(c, "Deck") or c:IsAbleToDeck())
end
function s.tdop(e,tp)
Scl.SelectAndOperateCards("ShuffleIn2Deck", tp, aux.NecroValleyFilter(s.tdfilter), tp, "Deck,GY", 0, 1, 1, nil)(1-tp)
end
\ No newline at end of file
expansions/script/c31300012.lua deleted 100644 → 0
View file @ cb6c0bb0
--模仿
Duel.LoadScript("c31300100.lua")
local s,id = GetID()
function s.initial_effect(c)
Scl.AddTokenList(c, 31300005)
local e1 = Scl.CreateActivateEffect(c, "FreeChain", nil, nil, "SpecialSummonToken", nil, nil, nil, scl.target_special_summon_token(31300005, true), s.act)
local e2 = Scl.CreateSingleTriggerOptionalEffect(c, "BeSent2GY",
"SpecialSummonFromDeck", {id, 1}, "SpecialSummonFromDeck", "Delay", s.spcon, nil,
{"~Target", "SpecialSummonFromDeck", s.spfilter, "Deck"}, s.spop)
end
function s.act(e,tp)
local ct, og = Scl.SpecialSummonToken(e,tp,31300005,true)
for tc in aux.Next(g) do
Scl.CreatePlayerBuffEffect({e:GetHandler(),tc}, "!SpecialSummon", 1, nil, {1, 0}, "OnField")
end
end
function s.spcon(e,tp)
local c = e:GetHandler()
return c:IsPreviousControler(1-tp) and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEDOWN)
end
function s.spfilter(c,e,tp)
return Scl.IsCardType(c, 0, "Tuner") and c:IsAttack(150) and c:IsDefense(2050) and Scl.IsCanBeSpecialSummonedNormaly2(c,e,tp)
end
function s.spop(e,tp)
Scl.SelectAndOperateCards("SpecialSummonFromDeck",tp,s.spfilter,tp,"Deck",0,1,1,nil,e,tp)()
end
expansions/script/c31300013.lua deleted 100644 → 0
View file @ cb6c0bb0
--恶梦兔 E
Duel.LoadScript("c31300100.lua")
local m,cm = rscf.DefineCard(31300013)
function cm.initial_effect(c)
local e1 = rsef.STF(c,EVENT_TO_HAND,"td",nil,"td",nil,nil,nil,
rsop.target(Card.IsAbleToDeck,"td"),cm.tdop)
local e2= rsef.QO(c,EVENT_CHAINING,"sp",{1,m + 100},"sp",nil,
LOCATION_GRAVE,cm.spscon,nil,
rsop.target(rscf.spfilter2(),"sp"),cm.spsop)
end
function cm.tdop(e,tp)
local c = rscf.GetSelf(e)
if not c then return end
local op = tp == c:GetOwner() and 1-tp or tp
if Duel.SendtoDeck(c,op,2,REASON_EFFECT) > 0 and c:IsLocation(LOCATION_DECK) then
Duel.SetLP(tp,math.max(0,Duel.GetLP(tp) - 400))
end
end
function cm.spscon(e,tp,eg,ep,ev,re,r,rp,chk)
local loc , ap = Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_PLAYER)
return re:IsHasCategory(CATEGORY_SPECIAL_SUMMON) and ap == tp and loc & (LOCATION_HAND+LOCATION_ONFIELD) ~= 0
end
function cm.spsop(e,tp)
local c = rscf.GetSelf(e)
if not c or Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) <=0 then return end
c:RegisterFlagEffect(m,rsrst.std,0,1)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_CHAIN_END)
e1:SetCondition(cm.tdcon2)
e1:SetOperation(cm.tdop2)
e1:SetLabelObject(c)
Duel.RegisterEffect(e1,tp)
end
\ No newline at end of file
expansions/script/c31300014.lua deleted 100644 → 0
View file @ cb6c0bb0
--恶梦兔
Duel.LoadScript("c31300100.lua")
local s,id = GetID()
function s.initial_effect(c)
c:EnableReviveLimit()
aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionType,TYPE_TUNER),aux.NOT(aux.FilterBoolFunction(Card.IsFusionType,TYPE_TUNER)),true)
local e1 = Scl.CreateSingleBuffEffect(c, "!BeDestroyedByBattle", 1, "MonsterZone")
local e2 = Scl.CreateSingleBuffEffect(c, "OpponentTakesBattleDamageInstead", 1, "MonsterZone")
local e3,e4 = Scl.CreateSingleTriggerOptionalEffect(c, "BeSent2GY,BeBanished", "ShuffleIn2Deck", nil, nil, "Delay", s.tdcon, nil, { { "~Target", "Dummy", aux.TRUE, "Deck", 0, 10 }, { "~Target", "Dummy", aux.TRUE, 0, "Deck", 10 } }, s.tdop)
end
function s.tdcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_EFFECT) and rp==1-tp and c:IsPreviousControler(tp)
and c:IsPreviousLocation(LOCATION_ONFIELD)
end
function s.tdop(e,tp)
local g = Duel.GetDecktopGroup(tp,10)
if #g < 10 then return end
Duel.ConfirmDecktop(tp,10)
if rsgf.SelectOperate("td",g,tp,aux.TRUE,1,4,nil,{1-tp,2,REASON_EFFECT }) > 0 then
Duel.ShuffleDeck(1-tp)
g = Duel.GetDecktopGroup(1-tp,10)
if #g < 10 then return end
Duel.ConfirmDecktop(1-tp,10)
if rsgf.SelectOperate("td",g,tp,aux.TRUE,1,4,nil,{tp,2,REASON_EFFECT }) > 0 then
Duel.ShuffleDeck(tp)
end
end
end
\ No newline at end of file
expansions/script/c31300015.lua deleted 100644 → 0
View file @ cb6c0bb0
--掉进兔子洞
Duel.LoadScript("c31300100.lua")
local s,id = GetID()
function s.initial_effect(c)
local e1 = Scl.CreateActivateEffect(c)
local e2,e3 = Scl.CreateEffectBuffEffect(c, "!NegateActivation,!NegateActivatedEffect",scl.value_cannot_be_negated(s.filter),"Spell&TrapZone")
local e3 = Scl.CreateIgnitionEffect(c,"Add2Hand",{1,id},"AddFromGY2Hand,ShuffleIn2Deck", "Target", "GY", nil, nil, s.tg, s.op)
end
function s.filter(e, tp1, ct, re, rp, tg, zone, seq, tp2)
local atk,def = Duel.GetChainInfo(ct, CHAININFO_TRIGGERING_ATTACK, CHAININFO_TRIGGERING_DEFENSE)
return atk == 150 and def == 200 and e:IsActiveType(TYPE_TUNER) and tp1 == tp2
end
function s.check(c1,c2)
if not LittleRabbit.TunerFilter(c1) then return false end
local b1 = c1:IsAbleToHand() and c2:IsAbleToDeck()
local b2 = c2:IsAbleToHand() and c1:IsAbleToDeck()
return b1 or b2
end
function s.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c = e:GetHandler()
if chkc then return s.check(chkc, c) end
if chk == 0 then return Duel.IsExistingTarget(s.check,tp,LOCATION_GRAVE,0,1,c,c) end
local tg = Scl.SelectTargets("Target",tp,s.check,tp,"GY",0,1,1,c,c)
end
function s.op(e,tp)
local _, c1 = Scl.GetActivateCard()
local _, c2 = Scl.GetTargetsReleate2Chain()
if not c1 or not c2 then return end
local b1 = c1:IsAbleToHand() and c2:IsAbleToDeck()
local b2 = c2:IsAbleToHand() and c1:IsAbleToDeck()
local td, th
if b1 and not b2 then
th = c1
td = c2
elseif b2 and not b1 then
th = c2
td = c1
else
_, th = Scl.SelectCardsFromGroup("Return2Hand",Scl.Mix2Group(c1,c2),tp,aux.TRUE,1,1,nil)
td = c1 == th and c2 or c1
end
Scl.Send2Hand(th,nil,"Effect")
Scl.Send2Deck(td,nil,SEQ_DECKSHUFFLE,"Effect")
end
expansions/script/c31300016.lua deleted 100644 → 0
View file @ cb6c0bb0
--小白兔 Δ
Duel.LoadScript("c31300100.lua")
local m,cm = rscf.DefineCard(31300016)
function cm.initial_effect(c)
local e1 = rsef.FTO(c,EVENT_TO_HAND,"dr",{1,m},"dr","ptg",
LOCATION_HAND,cm.drcon,cm.drcost,rsop.target(1,"dr"),cm.drop)
local e2= rsef.QO(c,EVENT_CHAINING,"sp",{1,m + 100},"sp",nil,
LOCATION_GRAVE,cm.spscon,nil,
rsop.target(rscf.spfilter2(),"sp"),cm.spsop)
end
function cm.drcon(e,tp,eg)
return eg:IsExists(cm.cfilter,1,e:GetHandler())
end
function cm.cfilter(c)
return c:IsType(TYPE_TUNER) and not c:IsPublic() and c:IsPreviousLocation(LOCATION_DECK)
end
function cm.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
local c = e:GetHandler()
local cg = eg:Filter(cm.cfilter,c)
if chk == 0 then return not c:IsPublic() and #cg > 0 end
cg:AddCard(c)
for tc in aux.Next(cg) do
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_PUBLIC)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
end
function cm.drop(e,tp)
local p,d = Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p,d,REASON_EFFECT)
end
function cm.spscon(e,tp,eg,ep,ev,re,r,rp,chk)
local loc , ap = Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_PLAYER)
return re:IsHasCategory(CATEGORY_SPECIAL_SUMMON) and ap == tp and loc & (LOCATION_HAND+LOCATION_ONFIELD) ~= 0
end
function cm.spsop(e,tp)
local c = rscf.GetSelf(e)
if not c or Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) <=0 then return end
c:RegisterFlagEffect(m,rsrst.std,0,1)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_CHAIN_END)
e1:SetCondition(cm.tdcon2)
e1:SetOperation(cm.tdop2)
e1:SetLabelObject(c)
Duel.RegisterEffect(e1,tp)
end
\ No newline at end of file
expansions/script/c31300017.lua deleted 100644 → 0
View file @ cb6c0bb0
--小白兔 Ζ
Duel.LoadScript("c31300100.lua")
local s,id = GetID()
function s.initial_effect(c)
local e1 = Scl.CreateSingleTriggerMandatoryEffect(c, "BeAdded2Hand", "LoseLP", nil, "ShuffleIn2Deck,SetTrap",nil,nil,nil,nil,s.op)
end
function s.op(e,tp)
Duel.SetLP(tp, Duel.GetLP(tp) - 1000)
if Duel.GetLP(tp) == 0 then
return
end
local _, c = Scl.GetActivateCard()
local b1 = c and c:IsAbleToDeck()
local b2 = Scl.IsExistingMatchingCard(aux.NecroValleyFilter(s.setfilter),tp,"Deck,GY",0,1,nil) and Duel.GetLocationCount(1-tp, LOCATION_SZONE) > 0
local op = Scl.SelectOption(tp,b1,"ShuffleIn2Deck",b2,"SetTrap")
if op == 1 then
Scl.Send2Deck(c,1-tp,SEQ_DECKSHUFFLE,"Effect")
else
Scl.SelectAndOperateCards("SetTrap",tp,aux.NecroValleyFilter(s.setfilter),tp,"Deck,GY",0,1,1,nil)(tp, 1-tp)
end
end
function s.setfilter(c)
return Scl.IsCardType(c,0,"NormalTrap") and c:IsSSetable(true) and aux.IsCodeListed(c, 31300005)
end
\ No newline at end of file
expansions/script/c31300018.lua deleted 100644 → 0
View file @ cb6c0bb0
--小白兔的魔镜
Duel.LoadScript("c31300100.lua")
local s,id = GetID()
function s.initial_effect(c)
Scl.AddTokenList(c,31300005,31300010,31300019)
local e1 = Scl.CreateActivateEffect(c, "FreeChain",nil,nil,"SpecialSummonToken",nil,nil,nil,scl.target_special_summon_token(31300019,s.ct,POS_FACEUP_ATTACK,1),s.act)
local e2 = Scl.CreateSingleTriggerOptionalEffect(c, "BeSent2GY",
{id,0}, {id, 1}, nil, "Delay", s.damcon, nil,
nil, s.damop)
end
function s.ct(e,tp)
return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)
end
function s.act(e,tp)
local ct = Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)
if ct == 0 then return end
local ct, sg = Scl.SpecialSummonToken(e,tp,31300019,1,ct,POS_FACEUP_ATTACK,1-tp)
for tk in aux.Next(sg) do
local e1 = Scl.CreateSingleBuffEffect({e:GetHandler(),tk},"+Type",TYPE_EFFECT,"MonsterZone",nil,RESETS_SCL)
local e2 = Scl.CreateSingleBuffEffect({e:GetHandler(),tk},"-Type",TYPE_NORMAL,"MonsterZone",nil,RESETS_SCL,{id,1},nil,"ClientHint")
local e3 = Scl.CreateSingleTriggerContinousEffect(tk, "AtStartOfDamageStep",nil,nil,nil,nil,s.atkop, RESETS_SCL)
end
end
function s.atkop(e,tp)
local c = e:GetHandler()
local bc = c:GetBattleTarget()
if not bc or not bc:IsControler(1-tp) then return end
Scl.HintCard(id)
Scl.AddSingleBuff2Self(c, "=ATK", bc:GetAttack(), "=DEF", bc:GetDefense(),"Reset",RESETS_EP_SCL+RESET_DISABLE)
end
function s.damcon(e,tp)
local c = e:GetHandler()
return c:IsPreviousControler(1-tp) and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEDOWN)
end
function s.damop(e,tp)
local e1 = Scl.CreatePlayerBuffEffect({e:GetHandler(),tp},"OpponentTakesBattleDamageInstead",1,nil,{0,1},nil,nil,RESET_EP_SCL)
end
\ No newline at end of file
expansions/script/c31300019.lua deleted 100644 → 0
View file @ cb6c0bb0
--小鲨鱼升级了
Duel.LoadScript("c31300100.lua")
local s,id,o = GetID()
function s.initial_effect(c)
rscf.AddTokenList(c, 31300024)
local e1 = rsef.A(c,nil,nil,nil,"eq,atk,def,rec",nil,nil,nil,
rsop.target(s.eqfilter,"eq",LOCATION_EXTRA),s.act)
local e2 = rsef.I(c,"td",{1,id},"td","tg",LOCATION_GRAVE,nil,nil,
rstg.target({Card.IsAbleToDeck,"td",LOCATION_GRAVE,LOCATION_GRAVE,1,3,c},
{"opc",Card.IsAbleToDeck,"td"}),s.tdop)
end
function s.tdop(e,tp)
local c = rscf.GetSelf(e)
local g = rsgf.GetTargetGroup()
g:AddCard(c)
if #g > 0 then
Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
end
end
function s.eqfilter(c,e,tp)
local ac = e:GetHandler()
return ((ac:IsLocation(LOCATION_SZONE) and Duel.GetLocationCount(tp,LOCATION_SZONE) > 0) or Duel.GetLocationCount(tp,LOCATION_SZONE)>1 or (not e:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.GetLocationCount(tp,LOCATION_SZONE) > 0))and c:IsFacedown() and Duel.IsExistingMatchingCard(s.exfilter,tp,LOCATION_MZONE,0,1,nil)
end
function s.exfilter(c)
return c:IsFaceup() and c:IsCode(31300024)
end
function s.act(e,tp)
local c = e:GetHandler()
local tg = Duel.GetMatchingGroup(s.exfilter,tp,LOCATION_MZONE,0,nil)
if #tg<=0 then return end
local g = Duel.GetMatchingGroup(Card.IsFacedown,tp,LOCATION_EXTRA,0,nil)
if #g == 0 or Duel.GetLocationCount(tp,LOCATION_SZONE) <= 0 then return end
local sg = g:RandomSelect(tp,1)
Duel.ConfirmCards(1-tp,sg)
local tc = sg:GetFirst()
if tc:IsForbidden() then
Duel.SendtoGrave(tc,REASON_RULE)
return
end
if aux.IsCodeListed(tc, 31300024) then
local ec = tg:Select(tp,1,1,nil):GetFirst()
rsop.Equip(e, tc, ec)
else
if Duel.Recover(tp, 1200, REASON_EFFECT) > 0 then
for tc in aux.Next(tg) do
local e1,e2 = rscf.QuickBuff({c,tc},"atk+,def+",1200)
end
end
end
end
expansions/script/c52700166.lua deleted 100644 → 0
View file @ cb6c0bb0
--超忍龙 空前绝后
local s,id,o=GetID()
function s.initial_effect(c)
--synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_DRAGON),1)
c:EnableReviveLimit()
--negate
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(4628897,0))
e1:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_CHAINING)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e1:SetCountLimit(1,id)
e1:SetRange(LOCATION_MZONE)
e1:SetCondition(s.negcon)
e1:SetTarget(s.negtg)
e1:SetOperation(s.negop)
c:RegisterEffect(e1)
--atk
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(s.atkcon)
e2:SetValue(2000)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e3)
--to hand/grave
local e4=Effect.CreateEffect(c)
e4:SetDescription(1109)
e4:SetCategory(CATEGORY_TOHAND+CATEGORY_TOGRAVE+CATEGORY_SEARCH)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e4:SetCode(EVENT_LEAVE_FIELD)
e4:SetCountLimit(1,id+1)
e4:SetCondition(s.thcon)
e4:SetTarget(s.thtg)
e4:SetOperation(s.thop)
c:RegisterEffect(e4)
end
function s.ndcfilter(c)
return c:IsFaceup() and c:IsRace(RACE_DRAGON)
end
function s.atkcon(e)
return Duel.IsExistingMatchingCard(s.ndcfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,e:GetHandler())
end
function s.negcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsStatus(STATUS_BATTLE_DESTROYED) then return false end
return Duel.IsChainNegatable(ev)
end
function s.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
end
end
function s.negop(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Destroy(eg,REASON_EFFECT)
end
end
function s.thcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsPreviousLocation(LOCATION_ONFIELD) and not
(c:IsLocation(LOCATION_DECK+LOCATION_EXTRA) and c:IsPreviousPosition(POS_FACEDOWN))
end
function s.thfilter(c)
return c:IsSetCard(0x6527) and (c:IsAbleToHand() or c:IsAbleToGrave())
end
function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
end
function s.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()<=0 then return end
local tc=g:GetFirst()
if tc:IsAbleToHand() and (not tc:IsAbleToGrave() or Duel.SelectOption(tp,1190,1191)==0) then
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
else
Duel.SendtoGrave(tc,REASON_EFFECT)
end
end
expansions/script/c52700169.lua deleted 100644 → 0
View file @ cb6c0bb0
--忍龙 幻影
local s,id,o=GetID()
function s.initial_effect(c)
--synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_DRAGON),1)
c:EnableReviveLimit()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(id,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,id)
e1:SetCondition(s.spcon)
e1:SetTarget(s.sptg)
e1:SetOperation(s.spop)
c:RegisterEffect(e1)
--eff
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(13171876,1))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetCondition(s.effcon)
e3:SetOperation(s.effop)
c:RegisterEffect(e3)
--to hand/grave
local e4=Effect.CreateEffect(c)
e4:SetDescription(1109)
e4:SetCategory(CATEGORY_TOHAND+CATEGORY_TOGRAVE+CATEGORY_SEARCH)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e4:SetCode(EVENT_LEAVE_FIELD)
e4:SetCountLimit(1,id+1)
e4:SetCondition(s.thcon)
e4:SetTarget(s.thtg)
e4:SetOperation(s.thop)
c:RegisterEffect(e4)
end
function s.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end
function s.spfilter(c,e,tp)
return c:IsRace(RACE_DRAGON) and c:IsLevelBelow(6) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE+LOCATION_HAND,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_HAND)
end
function s.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_GRAVE+LOCATION_HAND,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
function s.effcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp
end
function s.effop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
--cannot be target
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetValue(s.atlimit)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
function s.atlimit(e,c)
return c:IsFaceup() and c~=e:GetHandler()
end
function s.thcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsPreviousLocation(LOCATION_ONFIELD) and not
(c:IsLocation(LOCATION_DECK+LOCATION_EXTRA) and c:IsPreviousPosition(POS_FACEDOWN))
end
function s.thfilter(c)
return c:IsSetCard(0x6527) and (c:IsAbleToHand() or c:IsAbleToGrave())
end
function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
end
function s.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()<=0 then return end
local tc=g:GetFirst()
if tc:IsAbleToHand() and (not tc:IsAbleToGrave() or Duel.SelectOption(tp,1190,1191)==0) then
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
else
Duel.SendtoGrave(tc,REASON_EFFECT)
end
end
expansions/script/c52700172.lua deleted 100644 → 0
View file @ cb6c0bb0
--忍龙 突风
local s,id,o=GetID()
function s.initial_effect(c)
--to hand
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(id,0))
e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND+CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetCountLimit(1,id)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetTarget(s.thtg)
e1:SetOperation(s.thop)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e2)
--equip
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_EQUIP)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetRange(LOCATION_GRAVE)
e3:SetCountLimit(1,id+1)
e3:SetTarget(s.eqtg)
e3:SetOperation(s.eqop)
c:RegisterEffect(e3)
--pierce
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_PIERCE)
c:RegisterEffect(e4)
end
function s.thfilter(c)
return c:IsSetCard(0x6527) and (c:IsAbleToHand() or c:IsAbleToGrave())
end
function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
end
function s.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()<=0 then return end
local tc=g:GetFirst()
if tc:IsAbleToHand() and (not tc:IsAbleToGrave() or Duel.SelectOption(tp,1190,1191)==0) then
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
else
Duel.SendtoGrave(tc,REASON_EFFECT)
end
end
function s.eqfilter(c)
return c:IsFaceup() and c:IsRace(RACE_DRAGON)
end
function s.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.eqfilter(chkc) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
and e:GetHandler():CheckUniqueOnField(tp)
and Duel.IsExistingTarget(s.eqfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
Duel.SelectTarget(tp,s.eqfilter,tp,LOCATION_MZONE,0,1,1,nil)
if e:GetHandler():IsLocation(LOCATION_GRAVE) then
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
end
end
function s.eqop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
local tc=Duel.GetFirstTarget()
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 or tc:IsControler(1-tp) or tc:IsFacedown() or not tc:IsRelateToEffect(e) or not c:CheckUniqueOnField(tp) then
Duel.SendtoGrave(c,REASON_EFFECT)
return
end
if not Duel.Equip(tp,c,tc) then return end
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_EQUIP_LIMIT)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(s.eqlimit)
e1:SetLabelObject(tc)
c:RegisterEffect(e1)
end
function s.eqlimit(e,c)
return c==e:GetLabelObject()
end
expansions/script/c52700175.lua deleted 100644 → 0
View file @ cb6c0bb0
--忍龙 密探
local s,id,o=GetID()
function s.initial_effect(c)
--level
local e1=Effect.CreateEffect(c)
e1:SetDescription(2)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1,id)
e1:SetTarget(s.sptg)
e1:SetOperation(s.spop)
c:RegisterEffect(e1)
--equip
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_EQUIP)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_GRAVE)
e2:SetCountLimit(1,id+1)
e2:SetTarget(s.eqtg)
e2:SetOperation(s.eqop)
c:RegisterEffect(e2)
--Untargetable
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_EQUIP)
e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e3:SetValue(aux.tgoval)
c:RegisterEffect(e3)
end
function s.lvfilter(c)
return c:IsRace(RACE_DRAGON) and c:IsFaceup() and c:IsLevelAbove(1)
end
function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and s.lvfilter(chkc) end
local c=e:GetHandler()
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(s.lvfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(id,0))
local g=Duel.SelectTarget(tp,s.lvfilter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end
function s.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
local tc=Duel.GetFirstTarget()
local lv=tc:GetLevel()
local off=1
local ops={}
local opval={}
if lv>0 then
ops[off]=aux.Stringid(id,1)
opval[off-1]=1
off=off+1
end
if lv>2 then
ops[off]=aux.Stringid(id,2)
opval[off-1]=2
off=off+1
end
if tc:IsRelateToEffect(e) and tc:IsLevelAbove(1) then
local op=Duel.SelectOption(tp,table.unpack(ops))
local sel=opval[op]
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
if sel==1 then
e1:SetValue(2)
else
e1:SetValue(-2)
end
tc:RegisterEffect(e1)
end
end
end
function s.eqfilter(c)
return c:IsFaceup() and c:IsRace(RACE_DRAGON)
end
function s.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.eqfilter(chkc) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
and e:GetHandler():CheckUniqueOnField(tp)
and Duel.IsExistingTarget(s.eqfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
Duel.SelectTarget(tp,s.eqfilter,tp,LOCATION_MZONE,0,1,1,nil)
if e:GetHandler():IsLocation(LOCATION_GRAVE) then
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
end
end
function s.eqop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
local tc=Duel.GetFirstTarget()
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 or tc:IsControler(1-tp) or tc:IsFacedown() or not tc:IsRelateToEffect(e) or not c:CheckUniqueOnField(tp) then
Duel.SendtoGrave(c,REASON_EFFECT)
return
end
if not Duel.Equip(tp,c,tc) then return end
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_EQUIP_LIMIT)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(s.eqlimit)
e1:SetLabelObject(tc)
c:RegisterEffect(e1)
end
function s.eqlimit(e,c)
return c==e:GetLabelObject()
end
expansions/script/c52700178.lua deleted 100644 → 0
View file @ cb6c0bb0
--忍龙的护卫
local s,id,o=GetID()
function s.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_ATTACK,0x11e0)
e1:SetCountLimit(1,id)
e1:SetTarget(s.target)
e1:SetOperation(s.activate)
c:RegisterEffect(e1)
--Equip
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(id,2))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_EQUIP)
e3:SetRange(LOCATION_GRAVE)
e3:SetCountLimit(1,id)
e3:SetCondition(s.setcon)
e3:SetTarget(s.settg)
e3:SetOperation(s.setop)
c:RegisterEffect(e3)
end
function s.tgfilter(c)
return c:IsFaceup() and c:GetEquipTarget() and c:IsAbleToGrave()
end
function s.desfilter(c,tp)
return Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c)
end
function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then return chkc:IsOnField() and chkc~=c and s.desfilter(chkc,tp) end
if chk==0 then return Duel.IsExistingTarget(s.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,s.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,c)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
local tg=Duel.GetMatchingGroup(s.tgfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,tg,1,0,0)
end
function s.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,s.tgfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
local tc=Duel.GetFirstTarget()
if Duel.SendtoGrave(g,REASON_EFFECT)~=0 and tc:IsRelateToEffect(e) then
Duel.Destroy(tc,REASON_EFFECT)
end
end
function s.setcfilter(c,tp)
local tc=c:GetEquipTarget()
return tc and tc:IsControler(tp) and tc:IsRace(RACE_DRAGON)
end
function s.setcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(s.setcfilter,1,nil,tp)
end
function s.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsSSetable() end
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
end
function s.setop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) then
Duel.SSet(tp,c)
end
end
\ No newline at end of file
expansions/script/c53702500.lua
View file @ 0660cec2
......@@ -3,6 +3,7 @@ AD_Database=true
SNNM=SNNM or {}
local cm=SNNM
--53702700 alleffectreset
if not Group.ForEach then
function Group.ForEach(group,func,...)
if aux.GetValueType(group)=="Group" and group:GetCount()>0 then
local d_group=group:Clone()
......@@ -11,6 +12,7 @@ local cm=SNNM
end
end
end
end
--
function cm.AllGlobalCheck(c)
if not cm.snnm_global_check then
......@@ -6637,6 +6639,48 @@ function cm.HTAmvhint(code)
else c:RegisterFlagEffect(code+50,RESET_EVENT+0x7e0000,EFFECT_FLAG_CLIENT_HINT,1,1,aux.Stringid(53765000,0)) end
end
end
function cm.DragoronMergedDelay(c)
local mt=getmetatable(c)
if mt[53757098]==true then return end
mt[53757098]=true
if not g then g=Group.CreateGroup() end
g:KeepAlive()
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_CHAINING)
ge1:SetLabelObject(g)
ge1:SetOperation(cm.DragoronM1)
Duel.RegisterEffect(ge1,0)
local ge2=ge1:Clone()
ge2:SetCode(4179255)
ge2:SetOperation(cm.DragoronM2)
Duel.RegisterEffect(ge2,0)
local ge3=ge1:Clone()
ge3:SetCode(EVENT_CHAIN_END)
ge3:SetOperation(cm.DragoronMEnd)
Duel.RegisterEffect(ge3,0)
end
function cm.DragoronM1(e,tp,eg,ep,ev,re,r,rp)
local g=e:GetLabelObject()
if re and re:IsHasType(EFFECT_TYPE_ACTIVATE) then g:Merge(re:GetHandler()) end
end
function cm.DragoronM2(e,tp,eg,ep,ev,re,r,rp)
local g=e:GetLabelObject()
if re then g:Merge(re:GetHandler()) end
if Duel.GetCurrentChain()==0 and not Duel.CheckEvent(EVENT_CHAIN_END) then
local _eg=g:Clone()
Duel.RaiseEvent(_eg,EVENT_CUSTOM+53757098,re,r,rp,ep,ev)
g:Clear()
end
end
function cm.DragoronMEnd(e,tp,eg,ep,ev,re,r,rp)
local g=e:GetLabelObject()
if #g>0 then
local _eg=g:Clone()
Duel.RaiseEvent(_eg,EVENT_CUSTOM+53757098,re,r,rp,ep,ev)
g:Clear()
end
end
function cm.DragoronActivate(c,code)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_ACTIVATE)
......
expansions/script/c81009023.lua deleted 100644 → 0
View file @ cb6c0bb0
--小白兔 未知
local m=81009023
local cm=_G["c"..m]
Duel.LoadScript("c81000000.lua")
function cm.initial_effect(c)
--fusion material
c:EnableReviveLimit()
aux.AddFusionProcFunRep(c,cm.ffilter,3,true)
--special summon
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMING_END_PHASE)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1,m)
e1:SetCondition(cm.spcon)
e1:SetCost(cm.spcost)
e1:SetTarget(cm.sptg)
e1:SetOperation(cm.spop)
c:RegisterEffect(e1)
--
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1,m+900)
e4:SetCondition(cm.damcon)
e4:SetCost(cm.damcost)
e4:SetOperation(cm.damop)
c:RegisterEffect(e4)
end
function cm.ffilter(c)
return c:IsFusionType(TYPE_TUNER) and c:IsOnField()
end
function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
end
function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsReleasable() and Duel.GetMZoneCount(tp,c)>0 end
Duel.Release(c,REASON_COST)
end
function cm.spfilter(c,e,tp)
return not c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsAttack(150) and c:IsDefense(2050) and c:IsType(TYPE_TUNER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE,0,nil,e,tp)
if ft<=0 or g:GetCount()==0 then return end
if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:SelectSubGroup(tp,aux.dncheck,false,1,ft)
Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
end
function cm.damcon(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker()
local at=Duel.GetAttackTarget()
return Duel.GetBattleDamage(tp)>0
and (a:IsControler(tp) or (at and at:IsControler(tp)))
end
function cm.dfilter(c)
return c:IsAttack(150) and c:IsDefense(2050) and c:IsType(TYPE_TUNER) and c:IsAbleToGraveAsCost()
end
function cm.damcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.dfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,cm.dfilter,tp,LOCATION_DECK,0,1,1,nil)
Duel.SendtoGrave(g,REASON_COST)
end
function cm.damop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetReset(RESET_PHASE+PHASE_DAMAGE)
Duel.RegisterEffect(e1,tp)
end
expansions/strings.conf
View file @ 0660cec2
......@@ -38,6 +38,7 @@
!setname 0xe10 帕西菲卡
!setname 0xe11 巧克力旋律
!setname 0x3e12 饮食艺术
!setname 0x3e13 多多良小伞
!setname 0x3e16 水彩童话
!setname 0x5e16 梦想绘卷
#muxu.check_set_Urban 灵都
......@@ -186,11 +187,13 @@
!setname 0x3541 须弥
!setname 0x5541 稻妻
!setname 0x6541 雷电将军
!setname 0x9541 枫丹
!setname 0xc541 无冕的元素龙王
!setname 0x542 H.I
!setname 0x543 逐火十三英桀
!setname 0x544 之律者
!counter 0x1540 蕴种印指示物
!counter 0x540 契约指示物
!counter 0x541 棱镜指示物
#yuangeril 1404497238 118 0x310-0x31f
......@@ -265,6 +268,7 @@
!setname 0xa7a 璇击
!setname 0x3a7a 封璇击
!setname 0x3a7b 璇姬
!counter 0xa7f 好感指示物
#乐 3113279818 130 0xe00-0xe0f
!setname 0xe08 尘世侧写
......@@ -370,6 +374,8 @@
!setname 0xce3 救世之旅
!setname 0xce4 Servant
!setname 0xce5 Emiya
!setname 0xce6 六国皆临
!setname 0xce7 耀炼之光
!counter 0xce1 救世之旅指示物
#空鸽 1058604496 170 0x7f0-0x7ff
......@@ -458,7 +464,10 @@
#七月七日晴 2118557093 211 0x900-0x90f
!setname 0x900 仙灵女巫
!setname 0x901 连接进化魔法
!setname 0x90b 赛博
!setname 0x3902 午时游行
!setname 0x3904 阿巴阿巴
!counter 0x1904 阿巴阿巴指示物
#原初灵心 815192304 215 0x490-0x49f
!setname 0x490 形魔
......@@ -545,6 +554,7 @@
!setname 0xc86 元素精灵
!setname 0xc87 混沌病毒|非混沌
!setname 0xc88 天神右翼
!setname 0xc89 圣殿骑士
!setname 0xc8e 刻神指令
!setname 0xc8f 时刻喷射龙
!counter 0xc8f 王之指示物
......@@ -801,6 +811,7 @@
#一般路过群复读姬 1032308173 379 0x380-0x38f
!setname 0x380 隐居
!setname 0x381 界神
!setname 0x382 演绎者
!setname 0x388 机娘
!setname 0x389 神隐
!counter 0x389 神隐指示物
......@@ -921,6 +932,7 @@
!setname 0x5cb9 化学物质
!setname 0x6cb9 化学反应
!setname 0x9cb9 化学规律
!setname 0xcba B系列机器人
!setname 0xcbf Kamipro
!counter 0xcb1 徽章指示物
!counter 0xcb7 七剑指示物
......@@ -953,8 +965,11 @@
#TILL 3069681055 527 0x520-0x52f
!setname 0x3527 骷髅魔
!setname 0x5527 百群骑士
!setname 0x6527 忍龙
!setname 0x9527 钢钉兄弟会
!setname 0xa527 古莱
!setname 0xc527 安道拉
!setname 0x3528 魔宝
!setname 0x5528 道拉珠艾尔德
#Name_Grapha 格拉法
#AD钙 540551322 537 0x530-0x53f
......@@ -1045,6 +1060,9 @@
#AIC 2770356815 610 0x7c0-0x7cf
!setname 0x37c0 火取
#夕阳下的猫 3751989547 626 0x6d0-0x6df
!setname 0x6d0 仙狸
#绒 2039721962 640
#02 1164477469 648 0x410-0x41f
......@@ -1137,9 +1155,13 @@
#AddCodeList(65080012) 雪暴世界卡名记述
!counter 0xda0 崇净指示物
#举火人 3146095889 657
#举火人 3146095889 657 0x830-0x83f
!setname 0x830 怀表
#AddCodeList(c,65710000) 万象笔记卡名记述
#乳主份子 858329915 658 0xa30-0xa3f
!setname 0xa31 盛夏回忆
#今晚有宵夜吗 3080579137 666 0x660-0x66f
!setname 0x5660 百鬼夜行
!setname 0x666 幻星集
......@@ -1391,6 +1413,7 @@
!setname 0xef2 源氏
!setname 0x3ef2 源氏·鬼切
!setname 0x5ef2 源氏·妖刀姬
!setname 0x3ef5 解放者
!setname 0x3ef6 妙喵族
!setname 0x3ef7 圣化
!setname 0x5ef7 黯雾
......@@ -1421,5 +1444,6 @@
##◇某失智の刀客塔 3529764274 600
##◇小K 1318052139 669
##◇落 2403265619 707-708
##珠泪 773
##◇水叶 865
##芙兰朵露 978818523 896
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