Skip to content

no81cards
no81cards
Commit abe8b3d8 authored by Nemo Ma's avatar Nemo Ma
Browse files
Options

wild+

parent 25173dcc
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 1661 additions and 3767 deletions
expansions/lflist.conf
View file @ abe8b3d8
......@@ -10,6 +10,20 @@
130002004 0
130002005 0
#WILD, I say WILD, WAHAHA
14824018 0
14824033 0
25000000 0
25000001 0
25000403 0
60001158 0
60001159 0
60001160 0
60001161 0
60001162 0
60001163 0
60001164 0
60001165 0
60001166 0
77693580 0
94380880 0
15000318 0
......@@ -41,15 +55,11 @@
14050000 0
27582500 0
16170003 0
25000001 0
25000049 0
50005205 0
86510002 0
86510003 0
86510004 0
14012021 0
25000001 0
25000049 0
700021 0
700022 0
700023 0
......@@ -67,7 +77,6 @@
16200006 0
16200007 0
16200008 0
25010000 0
30000001 0
30000004 0
30000005 0
......@@ -748,6 +757,22 @@
30002065 0
30010000 0
30012000 0
#220508
60000056 0
60000063 0
60000057 0
60000058 0
60000059 0
60000060 0
60000061 0
60000062 0
12057802 0
12057819 0
30000325 0
30005095 0
60002025 0
83000068 0
19198102 1
#220501
12057603 0
22520006 0
......@@ -871,7 +896,6 @@
31400077 0
31414002 0
53799104 0
60000016 0
72412020 0
88990192 0
114427368 0
......@@ -1572,7 +1596,6 @@
64800043 0
9910051 2
9910710 2
25000157 2
#210613
33405100 0
9300315 0
......@@ -1666,9 +1689,6 @@
14000204 0
14000205 0
14000206 0
25000154 0
25000155 0
25000156 0
72100316 0
72100317 0
72100318 0
......@@ -1695,7 +1715,6 @@
14010039 0
22070230 0
22544155 0
25000055 0
30000200 0
31470002 0
31470011 0
......@@ -1759,7 +1778,6 @@
79034052 0
14010062 1
22020490 1
25000127 1
33330080 1
79029233 1
#210404
......@@ -1820,7 +1838,6 @@
#210131
14010116 0
22020090 0
25010013 0
33401202 0
65010561 0
79029333 0
......@@ -1891,7 +1908,6 @@
131000013 0
131000016 0
131000019 0
25000132 1
79029350 1
#forbidden
31400042 0 --超热血跑者，无限手卡跳，跳出来至少抓3，基本上是个陀螺
......@@ -1959,7 +1975,6 @@
72100035 0
72100112 0
30001007 0
25010012 0
90700058 0
90700057 0
82208118 0
......@@ -2006,8 +2021,6 @@
14010231 0
130002101 0
130002102 0
25000063 0
25000064 0
30000235 0
30000230 0
31400050 0
......@@ -2085,23 +2098,6 @@
22510013 0
22510014 0
22510015 0
25000000 0
25000005 0
25000006 0
25000007 0
25000008 0
25000009 0
25000010 0
25000022 0
25000023 0
25000002 0
25000003 0
25000004 0
25000001 0
25000053 0
25000061 0
25000049 0
25000024 0
30000300 0
30000305 0
30000310 0
......@@ -2152,7 +2148,6 @@
72100033 0
72100038 0
72100034 0
25010005 0
79029011 0
79029034 0
79029078 0
......@@ -2391,8 +2386,6 @@
14001011 0
14001012 0
14001051 0
25000059 0
25000065 0
79029514 0
82221016 0
77770002 0
......@@ -2715,14 +2708,6 @@
9950147 0
33403501 0
9981580 0
25000005 0
25000006 0
25000007 0
25000008 0
25000009 0
25000010 0
25000022 0
25000023 0
114620013 0
9950748 0
9950749 0
......@@ -2756,7 +2741,6 @@
9950728 0
9950718 0
9950723 0
25010005 0
9950294 0
9950467 0
14010223 0
......@@ -2929,8 +2913,6 @@
82208114 0
82208115 0
82208116 0
25000063 0
25000064 0
130002102 0
130002101 0
9950011 0
......@@ -2980,10 +2962,6 @@
33403513 1
65000000 1
82204250 1
25000014 1
25000015 1
25000016 1
25000017 1
79029038 1
79029050 1
9980400 1
......@@ -3167,10 +3145,6 @@
9950448 1
9950452 1
#33403500 1
25000018 1
25000019 1
25000020 1
25000021 1
9950624 1
9950681 0
9950425 1
......@@ -3178,7 +3152,6 @@
9950989 1
9950289 1
9950285 1
25000049 0
9950038 1
9951101 1
9951328 1
......@@ -3454,7 +3427,6 @@
73915051 2 --Scapegoat
!THE WILD LIST
25000001 0
20000 0
14050000 0
79029836 0
......@@ -3524,7 +3496,6 @@
#forbidden
72100025 0
72100125 0
25010012 0
90700058 0
90700057 0
#210919
......@@ -3557,8 +3528,6 @@
14010231 0
130002101 0
130002102 0
25000063 0
25000064 0
30000235 0
30000230 0
31400050 0
......@@ -3712,8 +3681,6 @@
82208103 0
130002101 0
130002102 0
25000064 0
25000063 0
31400050 0 --归亡死恶魔，无任何限制的单卡抛瓦
90700001 0 --霜火要塞，系列剑指west环境，ban此卡即可
#limit
......
expansions/no42.cdb
View file @ abe8b3d8
No preview for this file type
expansions/no81.cdb
View file @ abe8b3d8
No preview for this file type
expansions/pics/25000001.jpg
View replaced file @ 25173dcc View file @ abe8b3d8
expansions/pics/25000001.jpg

39.6 KB | W: | H:

expansions/pics/25000001.jpg

168 KB | W: | H:

expansions/pics/25000001.jpg
expansions/pics/25000001.jpg
expansions/pics/25000001.jpg
expansions/pics/25000001.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/script/c10700459.lua
View file @ abe8b3d8
......@@ -14,7 +14,7 @@ function c10700459.initial_effect(c)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE)
e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e4:SetCondition(c10700459.atcon)
e4:SetCondition(c10700459.atcon2)
e4:SetValue(1)
c:RegisterEffect(e4)
--search
......@@ -43,9 +43,15 @@ end
function c10700459.cfilter(c,atk)
return c:IsFaceup() and c:GetAttack()>atk
end
function c10700459.cfilter2(c,atk)
return c:IsFaceup() and c:GetAttack()<atk
end
function c10700459.atcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c10700459.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,e:GetHandler():GetAttack())
end
function c10700459.atcon2(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c10700459.cfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,e:GetHandler():GetAttack())
end
function c10700459.spfilter(c,e,tp)
return c:GetAttack()==1700 and c:GetDefense()==1000 and c:IsRace(RACE_BEASTWARRIOR) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
......@@ -55,7 +61,7 @@ function c10700459.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)
end
function c10700459.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or not e:GetHandler():IsRelateToEffect(e) then return end
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c10700459.spfilter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then
......
expansions/script/c1100001.lua deleted 100644 → 0
View file @ 25173dcc
--红绘卷
function c1100001.initial_effect(c)
--
c:EnableReviveLimit()
aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_BOTH_BATTLE_DAMAGE)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1100001,1))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_BATTLE_START)
e2:SetCondition(c1100001.con2)
e2:SetOperation(c1100001.op2)
c:RegisterEffect(e2)
--
end
--
function c1100001.con2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local bc=c:GetBattleTarget()
return c:IsRelateToBattle() and bc and bc:IsFaceup() and bc:IsRelateToBattle() and bc:GetAttack()>=Duel.GetLP(tp)
end
function c1100001.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e2_1=Effect.CreateEffect(c)
e2_1:SetType(EFFECT_TYPE_SINGLE)
e2_1:SetCode(EFFECT_REFLECT_BATTLE_DAMAGE)
e2_1:SetValue(1)
e2_1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
c:RegisterEffect(e2_1)
end
--
\ No newline at end of file
expansions/script/c1100003.lua deleted 100644 → 0
View file @ 25173dcc
--魔符『拿来吧你』
function c1100003.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1100003,0))
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_CHAINING)
e1:SetCountLimit(1,1100003+EFFECT_COUNT_CODE_DUEL+EFFECT_COUNT_CODE_OATH)
e1:SetCondition(c1100003.con1)
e1:SetTarget(c1100003.tg1)
e1:SetOperation(c1100003.op1)
c:RegisterEffect(e1)
--
end
--
function c1100003.ProtectedRun(f,...)
if not f then return true end
local params={...}
local ret={}
local res_test=pcall(function()
ret={f(table.unpack(params))}
end)
if not res_test then return false end
return table.unpack(ret)
end
function c1100003.con1(e,tp,eg,ep,ev,re,r,rp)
local te=re:GetHandler():GetActivateEffect()
if not te then return false end
local con=te:GetCondition()
local tg=te:GetTarget()
local res=false
if not c1100003.ProtectedRun(con,e,tp,eg,ep,ev,re,r,rp) then res=1 end
if not c1100003.ProtectedRun(tg,e,tp,eg,ep,ev,re,r,rp,0) then res=2 end
return ep~=tp and re:IsHasType(EFFECT_TYPE_ACTIVATE)
and Duel.IsChainNegatable(ev)
and not res
and re:GetHandler():CheckActivateEffect(false,true,false)~=nil
end
function c1100003.tg1(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
if bit.band(re:GetHandler():GetOriginalType(),TYPE_MONSTER)~=0 then
e:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
else
e:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
end
end
function c1100003.op1(e,tp,eg,ep,ev,re,r,rp)
local rc=re:GetHandler()
if not Duel.NegateActivation(ev) then return end
if not rc:IsRelateToEffect(re) then return end
if Duel.Destroy(eg,REASON_EFFECT)~=0 and not rc:IsLocation(LOCATION_HAND+LOCATION_DECK) and aux.NecroValleyFilter()(rc) then
if rc:IsType(TYPE_MONSTER)
and (not rc:IsLocation(LOCATION_EXTRA) and Duel.GetMZoneCount(tp)>0 or rc:IsLocation(LOCATION_EXTRA) and Duel.GetLocationCountFromEx(tp,tp,nil,rc)>0)
and rc:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE)
and Duel.SelectYesNo(tp,aux.Stringid(1100003,1)) then
Duel.BreakEffect()
Duel.SpecialSummon(rc,0,tp,tp,false,false,POS_FACEDOWN_DEFENSE)
Duel.ConfirmCards(1-tp,rc)
elseif (rc:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0) and rc:IsSSetable()
and Duel.SelectYesNo(tp,aux.Stringid(1100003,2)) then
Duel.BreakEffect()
Duel.SSet(tp,rc)
end
end
end
--
\ No newline at end of file
expansions/script/c1110198.lua deleted 100644 → 0
View file @ 25173dcc
muxu=muxu or {}
local cm=muxu
muxu.loaded_metatable_list={}
--
--c-code:1195103 当前回合发动的卡
--
--p-code:1195103 这个回合发动过效果
--
function muxu.load_metatable(code)
local m1=_G["c"..code]
if m1 then return m1 end
local m2=muxu.loaded_metatable_list[code]
if m2 then return m2 end
_G["c"..code]={}
if pcall(function() dofile("expansions/script/c"..code..".lua") end) or pcall(function() dofile("script/c"..code..".lua") end) then
local mt=_G["c"..code]
_G["c"..code]=nil
if mt then
muxu.loaded_metatable_list[code]=mt
return mt
end
else
_G["c"..code]=nil
end
end
--
function muxu.check_set(c,setcode,v,f,...)
local codet=nil
if type(c)=="number" then
codet={c}
elseif type(c)=="table" then
codet=c
elseif type(c)=="userdata" then
local f=f or Card.GetCode
codet={f(c)}
end
local ncodet={...}
for i,code in pairs(codet) do
for i,ncode in pairs(ncodet) do
if code==ncode then return true end
end
local mt=muxu.load_metatable(code)
if mt and mt["named_with_"..setcode] and (not v or mt["named_with_"..setcode]==v) then return true end
end
return false
end
--
function muxu.check_set_Soul(c) --灵曲
return muxu.check_set(c,"Soul")
end
function muxu.check_set_Border(c) --交界
return muxu.check_set(c,"Border")
end
function muxu.check_set_Legend(c) --秘谈
return muxu.check_set(c,"Legend")
end
--
function muxu.check_set_Urban(c) --灵都
return muxu.check_set(c,"Urban")
end
function muxu.check_fusion_set_Urban(c)
if c:IsHasEffect(6205579) then return false end
local codet={c:GetFusionCode()}
for j,code in pairs(codet) do
local mt=muxu.load_metatable(code)
if mt then
for str,v in pairs(mt) do
if type(str)=="string" and str:find("_Urban") and v then return true end
end
end
end
return false
end
--
function muxu.check_set_Butterfly(c) --蝶舞
return muxu.check_set(c,"Butterfly")
end
function muxu.check_set_Lines(c) --灵纹
return muxu.check_set(c,"Lines")
end
function muxu.check_set_Hinbackc(c) --莱姆狐
return muxu.check_set(c,"Hinbackc")
end
function muxu.check_set_Medicine(c) --梅蒂欣
return muxu.check_set(c,"Medicine")
end
function muxu.check_set_Poison(c) --毒符
return muxu.check_set(c,"Poison")
end
function muxu.check_set_Materdim(c)
return muxu.check_set(c,"Materdim")
end
--
function muxu.check_set_NozaLeah(c)
return muxu.check_set(c,"NozaLeah")
end
function muxu.check_link_set_NozaLeah(c)
local codet={c:GetLinkCode()}
for j,code in pairs(codet) do
local mt=muxu.load_metatable(code)
if mt then
for str,v in pairs(mt) do
if type(str)=="string" and str:find("_NozaLeah") and v then return true end
end
end
end
return false
end
--
--muxu_ih_KTatara 有「小伞」记述的卡
function muxu.check_set_Tatara(c) --小伞
return muxu.check_set(c,"Tatara")
end
function muxu.check_fusion_set_Tatara(c)
if c:IsHasEffect(6205579) then return false end
local codet={c:GetFusionCode()}
for j,code in pairs(codet) do
local mt=muxu.load_metatable(code)
if mt then
for str,v in pairs(mt) do
if type(str)=="string" and str:find("_Tatara") and v then return true end
end
end
end
return false
end
function muxu.check_link_set_Tatara(c)
local codet={c:GetLinkCode()}
for j,code in pairs(codet) do
local mt=muxu.load_metatable(code)
if mt then
for str,v in pairs(mt) do
if type(str)=="string" and str:find("_Tatara") and v then return true end
end
end
end
return false
end
--
function muxu.check_set_Umbrella(c) --伞符
return muxu.check_set(c,"Umbrella")
end
function muxu.check_set_Scenersh(c) --景愿
return muxu.check_set(c,"Scenersh")
end
--
--
if not muxu.chk then
muxu.chk=true
--1111050 EVENT_TO_DECK
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_TO_DECK)
e1:SetCondition(
function(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists((function(c)
return c:GetFlagEffect(1111050)~=0 end),1,nil)
end)
e1:SetOperation(
function(e,tp,eg,ep,ev,re,r,rp)
local p=Duel.GetTurnPlayer()
local tg=eg:Filter((function(c)
return c:GetFlagEffect(1111050)~=0 end),nil)
if tg:GetCount()<1 then return end
local b1=tg:IsExists(Card.IsControler,1,nil,p)
local b2=tg:IsExists(Card.IsControler,1,nil,1-p)
if b1 then Duel.ShuffleDeck(p) end
if b2 then Duel.ShuffleDeck(1-p) end
local tc=tg:GetFirst()
while tc do
tc:ReverseInDeck()
tc=tg:GetNext()
end
end)
Duel.RegisterEffect(e1,0)
--TURN ACTIVITY
local e2=Effect.GlobalEffect()
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_CHAINING)
e2:SetOperation(
function(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetFlagEffect(rp,1195103)<1 then
Duel.RegisterFlagEffect(tp,1195103,RESET_PHASE+PHASE_END,0,1)
end
end)
Duel.RegisterEffect(e2,0)
--当前回合发动的卡
local e3=Effect.GlobalEffect()
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_CHAINING)
e3:SetOperation(
function(e,tp,eg,ep,ev,re,r,rp)
local rc=re:GetHandler()
if re:IsHasType(EFFECT_TYPE_ACTIVATE) then
rc:RegisterFlagEffect(1195103,RESET_EVENT+0x1fe0000,0,0,Duel.GetTurnCount())
end
end)
Duel.RegisterEffect(e3,0)
--
end
--
expansions/script/c1141002.lua deleted 100644 → 0
View file @ 25173dcc
--可怜的非法投弃物·多多良小伞
local m=1141002
local cm=_G["c"..m]
xpcall(function() require("expansions/script/c1110198") end,function() require("script/c1110198") end)
cm.named_with_Tatara=true
--
function c1141002.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1141002,0))
e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND+CATEGORY_HANDES)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_FLIP+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetTarget(c1141002.tg1)
e1:SetOperation(c1141002.op1)
c:RegisterEffect(e1)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
e3:SetOperation(c1141002.op3)
c:RegisterEffect(e3)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1141002,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_HAND)
e2:SetCost(c1141002.cost2)
e2:SetTarget(c1141002.tg2)
e2:SetOperation(c1141002.op2)
c:RegisterEffect(e2)
--
end
--
c1141002.muxu_ih_KTatara=1
--
function c1141002.tfilter1(c)
return c.muxu_ih_KTatara and c:IsAbleToHand()
and (c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP))
end
function c1141002.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c1141002.tfilter1,tp,LOCATION_DECK,0,1,nil) end
if e:GetHandler():GetFlagEffect(1141002)~=0 then
e:SetLabel(1)
e:GetHandler():ResetFlagEffect(1141002)
else
e:SetLabel(0)
end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
--
function c1141002.op1(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=Duel.SelectMatchingCard(tp,c1141002.tfilter1,tp,LOCATION_DECK,0,1,1,nil)
if sg:GetCount()>0 then
local tc=sg:GetFirst()
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
if not tc:IsLocation(LOCATION_HAND) then return end
if e:GetLabel()==1 and Duel.SelectYesNo(tp,aux.Stringid(1141002,2)) then return end
Duel.BreakEffect()
Duel.SendtoGrave(tc,REASON_EFFECT+REASON_DISCARD)
end
end
--
function c1141002.op3(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RegisterFlagEffect(1141002,0,0,0)
end
--
function c1141002.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsDiscardable() end
Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
end
--
function c1141002.allfilter2(c)
return c:IsLocation(LOCATION_MZONE)
end
function c1141002.ollfilter2(c,e)
return not c:IsImmuneToEffect(e)
end
function c1141002.decfilter2(c,e)
return not c:IsImmuneToEffect(e)
end
--
function c1141002.CheckRecursive2(c,mg,sg,exg,tp,fc,chkf)
sg:AddCard(c)
local res=false
if sg:GetCount()>=fc.muxu_mat_count then
res=Duel.GetLocationCountFromEx(chkf,tp,sg,fc)>0 and fc:CheckFusionMaterial(sg,nil,chkf)
else
res=mg:IsExists(c1141002.CheckRecursive2,1,sg,mg,sg,exg,tp,fc,chkf)
end
sg:RemoveCard(c)
return res
end
--
function c1141002.tfilter2(c,e,tp,mg,exg,f,chkf)
mg:Merge(exg)
local sg=Group.CreateGroup()
return c:IsType(TYPE_FUSION)
and muxu.check_set_Tatara(c) and (not f or f(c))
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and mg:IsExists(c1141002.CheckRecursive2,1,sg,mg,sg,exg,tp,c,chkf)
end
function c1141002.mfilter2(c,e,tp,m,f,chkf)
return c:IsType(TYPE_FUSION)
and muxu.check_set_Tatara(c) and (not f or f(c))
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
end
--
function c1141002.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local chkf=tp
local mg=Duel.GetFusionMaterial(tp)
mg=mg:Filter(c1141002.allfilter2,nil)
mg=mg:Filter(c1141002.ollfilter2,nil,e)
Duel.RegisterFlagEffect(1-tp,1141002,0,0,0)
local exg=Duel.GetMatchingGroup(c1141002.decfilter2,tp,0,LOCATION_MZONE,mg,e)
local res=Duel.IsExistingMatchingCard(c1141002.tfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg,exg,nil,chkf)
Duel.ResetFlagEffect(1-tp,1141002)
if not res then
local ce=Duel.GetChainMaterial(tp)
if ce~=nil then
local fgroup=ce:GetTarget()
local mg3=fgroup(ce,e,tp)
local mf=ce:GetValue()
res=Duel.IsExistingMatchingCard(c1141002.mfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf)
end
end
return res
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
--
function c1141002.op2(e,tp,eg,ep,ev,re,r,rp)
local chkf=tp
local mg=Duel.GetFusionMaterial(tp)
mg=mg:Filter(c1141002.allfilter2,nil)
mg=mg:Filter(c1141002.ollfilter2,nil,e)
Duel.RegisterFlagEffect(1-tp,1141002,0,0,0)
local exg=Duel.GetMatchingGroup(c1141002.decfilter2,tp,0,LOCATION_MZONE,mg,e)
local sg1=Duel.GetMatchingGroup(c1141002.tfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg,exg,nil,chkf)
Duel.ResetFlagEffect(1-tp,1141002)
local mg3=nil
local sg2=nil
local ce=Duel.GetChainMaterial(tp)
if ce~=nil then
local fgroup=ce:GetTarget()
lg=fgroup(ce,e,tp)
local mf=ce:GetValue()
sg2=Duel.GetMatchingGroup(c1141002.tfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf)
end
if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
local sg=sg1:Clone()
if sg2 then sg:Merge(sg2) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=sg:Select(tp,1,1,nil)
local tc=tg:GetFirst()
if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
local lg=Group.CreateGroup()
Duel.RegisterFlagEffect(1-tp,1141002,0,0,0)
mg:Merge(exg)
repeat
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FMATERIAL)
local g=mg:FilterSelect(tp,c1141002.CheckRecursive2,1,1,lg,mg,lg,exg,tp,tc,chkf)
lg:Merge(g)
until lg:GetCount()>=tc.muxu_mat_count
tc:SetMaterial(lg)
Duel.ResetFlagEffect(1-tp,1141002)
Duel.SendtoGrave(lg,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
Duel.BreakEffect()
Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
else
local mat2=Duel.SelectFusionMaterial(tp,tc,mg3,nil,chkf)
local fop=ce:GetOperation()
fop(ce,e,tp,tc,mat2)
end
tc:CompleteProcedure()
end
end
--
expansions/script/c1141004.lua deleted 100644 → 0
View file @ 25173dcc
--万年备用的唐伞·多多良小伞
local m=1141004
local cm=_G["c"..m]
xpcall(function() require("expansions/script/c1110198") end,function() require("script/c1110198") end)
cm.named_with_Tatara=true
--
function c1141004.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_TO_GRAVE)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e1:SetCondition(c1141004.con1)
e1:SetTarget(c1141004.tg1)
e1:SetOperation(c1141004.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1141004,0))
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_FLIP+EFFECT_TYPE_TRIGGER_F)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetTarget(c1141004.tg2)
e2:SetOperation(c1141004.op2)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
e3:SetOperation(c1141004.op3)
c:RegisterEffect(e3)
--
end
--
c1141004.muxu_ih_KTatara=1
--
function c1141004.con1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return bit.band(r,0x4040)~=0 and c:IsPreviousLocation(LOCATION_HAND)
end
--
function c1141004.tfilter1(c)
return (muxu.check_set_Umbrella(c) or (c.muxu_ih_KTatara and c:IsType(TYPE_TRAP))) and c:IsAbleToHand()
end
function c1141004.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c1141004.tfilter1,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
--
function c1141004.op1(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=Duel.SelectMatchingCard(tp,c1141004.tfilter1,tp,LOCATION_DECK,0,1,1,nil)
if sg:GetCount()<1 then return end
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
end
--
function c1141004.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return true end
if c:GetFlagEffect(1141004)~=0 then
e:SetLabel(1)
c:ResetFlagEffect(1141004)
else
e:SetLabel(0)
end
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,nil,1,tp,LOCATION_GRAVE)
end
--
function c1141004.ofilter2(c,e,tp,num)
return muxu.check_set_Tatara(c)
and ((num==1 and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE) and Duel.GetMZoneCount(tp)>0)
or c:IsAbleToHand())
end
function c1141004.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SelectYesNo(tp,aux.Stringid(1141004,0)) then Duel.SendtoHand(c,nil,REASON_EFFECT) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RESOLVECARD)
local sg=Duel.SelectMatchingCard(tp,c1141004.ofilter2,tp,LOCATION_GRAVE,0,1,1,nil,e,tp,e:GetLabel())
if sg:GetCount()>0 then
local tc=sg:GetFirst()
local b1=tc:IsAbleToHand()
local b2=(e:GetLabel()==1 and tc:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE) and Duel.GetMZoneCount(tp)>0)
local off=1
local ops={}
local opval={}
if b1 then
ops[off]=aux.Stringid(1141004,1)
opval[off-1]=1
off=off+1
end
if b2 then
ops[off]=aux.Stringid(1141004,2)
opval[off-1]=2
off=off+1
end
local op=Duel.SelectOption(tp,table.unpack(ops))
local sel=opval[op]
if sel==1 then
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
end
if sel==2 then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEDOWN_DEFENSE)
Duel.ConfirmCards(1-tp,tc)
end
end
end
--
function c1141004.op3(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RegisterFlagEffect(1141004,0,0,0)
end
expansions/script/c1141005.lua deleted 100644 → 0
View file @ 25173dcc
--夜间游荡的唐伞妖怪
local m=1141005
local cm=_G["c"..m]
xpcall(function() require("expansions/script/c1110198") end,function() require("script/c1110198") end)
--
function c1141005.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_HAND)
e1:SetHintTiming(0,TIMING_END_PHASE)
e1:SetCost(c1141005.cost1)
e1:SetTarget(c1141005.tg1)
e1:SetOperation(c1141005.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1141005,0))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
e2:SetCode(EVENT_FLIP)
e2:SetTarget(c1141005.tg2)
e2:SetOperation(c1141005.op2)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
e3:SetOperation(c1141005.op3)
c:RegisterEffect(e3)
--
end
--
c1141005.muxu_ih_KTatara=1
--
function c1141005.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler(),REASON_COST) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
local sg=Duel.SelectMatchingCard(tp,Card.IsDiscardable,tp,LOCATION_HAND,0,1,1,e:GetHandler(),REASON_COST)
Duel.SendtoGrave(sg,REASON_COST+REASON_DISCARD)
end
--
function c1141005.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return not c:IsStatus(STATUS_CHAINING)
and Duel.GetMZoneCount(tp)>0
and (c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_ATTACK) or c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE)) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
--
function c1141005.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local pos1=c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_ATTACK) and POS_FACEUP_ATTACK or 0
local pos2=c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE) and POS_FACEDOWN_DEFENSE or 0
if not c:IsRelateToEffect(e) then return end
Duel.SpecialSummon(c,0,tp,tp,false,false,pos1+pos2)
if c:IsFacedown() then Duel.ConfirmCards(1-tp,c) end
end
--
function c1141005.tfilter2(c)
return c.muxu_ih_KTatara and c:IsType(TYPE_TRAP) and c:IsSSetable()
end
function c1141005.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local b1=Duel.IsExistingMatchingCard(c1141005.tfilter2,tp,LOCATION_HAND,0,1,nil)
local c=e:GetHandler()
if chk==0 then
local b1=Duel.IsExistingMatchingCard(c1141005.tfilter2,tp,LOCATION_HAND,0,1,nil)
local b2=Duel.IsExistingMatchingCard(c1141005.tfilter2,tp,LOCATION_DECK,0,1,nil) and c:GetFlagEffect(1141005)>0
return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and (b1 or b2)
end
if e:GetHandler():GetFlagEffect(1141005)~=0 then
e:SetLabel(1)
e:GetHandler():ResetFlagEffect(1141005)
else
e:SetLabel(0)
end
end
--
function c1141005.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local loc=LOCATION_HAND
if e:GetLabel()==1 then loc=LOCATION_DECK+LOCATION_HAND end
if Duel.GetLocationCount(tp,LOCATION_SZONE)<1 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local sg=Duel.SelectMatchingCard(tp,c1141005.tfilter2,tp,loc,0,1,1,nil)
if sg:GetCount()>0 then
Duel.SSet(tp,sg)
Duel.ConfirmCards(1-tp,sg)
local e2_1=Effect.CreateEffect(c)
e2_1:SetType(EFFECT_TYPE_SINGLE)
e2_1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
e2_1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e2_1:SetReset(RESET_EVENT+0x1fe0000)
sg:GetFirst():RegisterEffect(e2_1,true)
end
end
--
function c1141005.op3(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RegisterFlagEffect(1141005,0,0,0)
end
\ No newline at end of file
expansions/script/c1141021.lua deleted 100644 → 0
View file @ 25173dcc
--融合测试伞
local m=1141021
local cm=_G["c"..m]
xpcall(function() require("expansions/script/c1110198") end,function() require("script/c1110198") end)
cm.named_with_Tatara=true
--
function c1141021.initial_effect(c)
--
c:EnableReviveLimit()
aux.AddFusionProcMix(c,true,true,c1141021.FusFilter1,c1141021.FusFilter2)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1141021,0))
e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_FLIP+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e1:SetTarget(c1141021.tg1)
e1:SetOperation(c1141021.op1)
c:RegisterEffect(e1)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
e3:SetOperation(c1141021.op3)
c:RegisterEffect(e3)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1141021,1))
e2:SetCategory(CATEGORY_POSITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_MZONE)
e2:SetCost(c1141021.cost2)
e2:SetTarget(c1141021.tg2)
e2:SetOperation(c1141021.op2)
c:RegisterEffect(e2)
--
end
--
function c1141021.FusFilter1(c)
return muxu.check_fusion_set_Tatara(c)
end
function c1141021.FusFilter2(c)
local p=c:GetControler()
return c:IsFusionType(TYPE_FLIP)
or (Duel.GetFlagEffect(p,1141002)>0 and c:IsFacedown())
end
--
c1141021.muxu_mat_count=2
c1141021.muxu_ih_KTatara=1
--
function c1141021.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFacedown,tp,0,LOCATION_MZONE,1,nil) end
if e:GetHandler():GetFlagEffect(1141021)~=0 then
e:SetLabel(1)
e:GetHandler():ResetFlagEffect(1141021)
else
e:SetLabel(0)
end
local sg=Group.CreateGroup()
if e:GetLabel()==1 then
sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
else
sg=Duel.GetMatchingGroup(Card.IsFacedown,tp,0,LOCATION_MZONE,nil)
end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
end
--
function c1141021.op1(e,tp,eg,ep,ev,re,r,rp)
local sg=Group.CreateGroup()
if e:GetLabel() and e:GetLabel()==1 then
sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
else
sg=Duel.GetMatchingGroup(Card.IsFacedown,tp,0,LOCATION_MZONE,nil)
end
if sg:GetCount()<1 then return end
Duel.Destroy(sg,REASON_EFFECT)
end
--
function c1141021.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsReleasable() end
Duel.Release(c,REASON_COST)
end
--
function c1141021.tfilter2(c)
return c:IsFacedown() and c:IsCanChangePosition()
end
function c1141021.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c1141021.tfilter2(chkc) end
if chk==0 then return Duel.IsExistingTarget(c1141021.tfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
Duel.SelectTarget(tp,c1141021.tfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
end
--
function c1141021.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if not tc:IsRelateToEffect(e) then return end
if tc:IsPosition(POS_FACEUP_DEFENSE) then return end
if Duel.ChangePosition(tc,POS_FACEUP_DEFENSE)<1 then return end
if not muxu.check_set_Tatara(tc) then return end
if not c:IsType(TYPE_FUSION) then return end
if not c:IsType(TYPE_MONSTER) then return end
tc:CopyEffect(c:GetCode(),RESET_EVENT+0x1fe0000)
end
--
function c1141021.op3(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RegisterFlagEffect(1141021,0,0,0)
end
--
expansions/script/c1141101.lua deleted 100644 → 0
View file @ 25173dcc
--虹符『飞跃彩虹』
local m=1141101
local cm=_G["c"..m]
xpcall(function() require("expansions/script/c1110198") end,function() require("script/c1110198") end)
--
function c1141101.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetTarget(c1141101.tg1)
e1:SetOperation(c1141101.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_DECKDES)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_GRAVE)
e2:SetCost(aux.bfgcost)
e2:SetTarget(c1141101.tg2)
e2:SetOperation(c1141101.op2)
c:RegisterEffect(e2)
--
end
--
c1141101.muxu_ih_KTatara=1
--
function c1141101.tfilter1(c)
return c:IsType(TYPE_FLIP) and c:IsType(TYPE_MONSTER)
and not c:IsPublic()
end
function c1141101.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c1141101.tfilter1,tp,LOCATION_HAND,0,1,nil) end
end
function c1141101.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELF)
local sg=Duel.SelectMatchingCard(tp,c1141101.tfilter1,tp,LOCATION_HAND,0,1,1,nil)
if sg:GetCount()>0 then
local tc=sg:GetFirst()
local e1_1=Effect.CreateEffect(c)
e1_1:SetType(EFFECT_TYPE_SINGLE)
e1_1:SetCode(EFFECT_PUBLIC)
e1_1:SetReset(RESET_EVENT+0x1fe0000)
tc:RegisterEffect(e1_1)
local e1_2=Effect.CreateEffect(c)
e1_2:SetType(EFFECT_TYPE_SINGLE)
e1_2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1_2:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
e1_2:SetRange(LOCATION_HAND)
e1_2:SetValue(function(e,c,mg) return true end)
e1_2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1_2)
end
end
--
function c1141101.allfilter2(c)
return c:IsLocation(LOCATION_MZONE)
end
function c1141101.ollfilter2(c,e)
return not c:IsImmuneToEffect(e)
end
function c1141101.decfilter2(c,e)
return c:IsAbleToGrave() and not c:IsImmuneToEffect(e)
end
--
function c1141101.CheckRecursive2(c,mg,sg,exg,tp,fc,chkf)
local b1=Duel.IsExistingMatchingCard(Card.IsFacedown,tp,0,LOCATION_MZONE,1,nil)
local b2=sg:GetCount()>0 and sg:IsExists((function(c) return (c:IsFacedown() and c:IsLocation(LOCATION_MZONE)) end),1,nil)
if exg and exg:IsContains(c) and not (b1 and b2) then return false end
sg:AddCard(c)
local res=false
if sg:GetCount()>=fc.muxu_mat_count then
res=Duel.GetLocationCountFromEx(chkf,tp,sg,fc)>0 and fc:CheckFusionMaterial(sg,nil,chkf)
else
res=mg:IsExists(c1141101.CheckRecursive2,1,sg,mg,sg,exg,tp,fc,chkf)
end
sg:RemoveCard(c)
return res
end
--
function c1141101.tfilter2(c,e,tp,mg,exg,f,chkf)
mg:Merge(exg)
local sg=Group.CreateGroup()
return c:IsType(TYPE_FUSION)
and muxu.check_set_Tatara(c) and (not f or f(c))
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and mg:IsExists(c1141101.CheckRecursive2,1,sg,mg,sg,exg,tp,c,chkf)
end
function c1141101.mfilter2(c,e,tp,m,f,chkf)
return c:IsType(TYPE_FUSION)
and muxu.check_set_Tatara(c) and (not f or f(c))
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
end
--
function c1141101.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local chkf=tp
local mg=Duel.GetFusionMaterial(tp)
mg=mg:Filter(c1141101.allfilter2,nil)
mg=mg:Filter(c1141101.ollfilter2,nil,e)
local exg=Duel.GetMatchingGroup(c1141101.decfilter2,tp,LOCATION_DECK,0,mg,e)
local res=Duel.IsExistingMatchingCard(c1141101.tfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg,exg,nil,chkf)
if not res then
local ce=Duel.GetChainMaterial(tp)
if ce~=nil then
local fgroup=ce:GetTarget()
local mg3=fgroup(ce,e,tp)
local mf=ce:GetValue()
res=Duel.IsExistingMatchingCard(c1141101.mfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf)
end
end
return res
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
--
function c1141101.op2(e,tp,eg,ep,ev,re,r,rp)
local chkf=tp
local mg=Duel.GetFusionMaterial(tp)
mg=mg:Filter(c1141101.allfilter2,nil)
mg=mg:Filter(c1141101.ollfilter2,nil,e)
local exg=Duel.GetMatchingGroup(c1141101.decfilter2,tp,LOCATION_DECK,0,mg,e)
local sg1=Duel.GetMatchingGroup(c1141101.tfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg,exg,nil,chkf)
local mg3=nil
local sg2=nil
local ce=Duel.GetChainMaterial(tp)
if ce~=nil then
local fgroup=ce:GetTarget()
lg=fgroup(ce,e,tp)
local mf=ce:GetValue()
sg2=Duel.GetMatchingGroup(c1141101.tfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf)
end
if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
local sg=sg1:Clone()
if sg2 then sg:Merge(sg2) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=sg:Select(tp,1,1,nil)
local tc=tg:GetFirst()
if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
local lg=Group.CreateGroup()
mg:Merge(exg)
repeat
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FMATERIAL)
local g=mg:FilterSelect(tp,c1141101.CheckRecursive2,1,1,lg,mg,lg,exg,tp,tc,chkf)
lg:Merge(g)
until lg:GetCount()==tc.muxu_mat_count
tc:SetMaterial(lg)
local qg=lg:Filter(Card.IsLocation,nil,LOCATION_MZONE)
qg=qg:Filter(Card.IsFacedown,nil)
Duel.ConfirmCards(1-tp,qg)
Duel.SendtoGrave(lg,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
Duel.BreakEffect()
Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
else
local mat2=Duel.SelectFusionMaterial(tp,tc,mg3,nil,chkf)
local fop=ce:GetOperation()
fop(ce,e,tp,tc,mat2)
end
tc:CompleteProcedure()
end
end
--
expansions/script/c1141701.lua deleted 100644 → 0
View file @ 25173dcc
--雨符『雨夜怪谈』
local m=1141701
local cm=_G["c"..m]
xpcall(function() require("expansions/script/c1110198") end,function() require("script/c1110198") end)
--
function c1141701.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetTarget(c1141701.tg1)
e1:SetOperation(c1141701.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetCondition(c1141701.con2)
e2:SetTarget(c1141701.tg2)
e2:SetOperation(c1141701.op2)
c:RegisterEffect(e2)
--
end
--
c1141701.muxu_ih_KTatara=1
--
function c1141701.tfilter1(c,e,tp)
return muxu.check_set_Tatara(c) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c1141701.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
local b1=Duel.IsExistingMatchingCard(Card.IsDefensePos,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
local b2=Duel.GetLocationCountFromEx(tp)>0
and Duel.IsExistingMatchingCard(c1141701.tfilter1,tp,LOCATION_EXTRA,0,1,nil,e,tp)
if chk==0 then return (b1 or b2) end
local off=1
local ops={}
local opval={}
if b1 then
ops[off]=aux.Stringid(1141701,0)
opval[off-1]=1
off=off+1
end
if b2 then
ops[off]=aux.Stringid(1141701,1)
opval[off-1]=2
off=off+1
end
local op=Duel.SelectOption(tp,table.unpack(ops))
local sel=opval[op]
e:SetLabel(sel)
if sel==1 then
e:SetCategory(CATEGORY_POSITION)
Duel.SetOperationInfo(0,CATEGORY_POSITION,nil,1,0,LOCATION_MZONE)
end
if sel==2 then
e:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
end
--
function c1141701.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local sel=e:GetLabel()
if sel==1 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
local sg=Duel.SelectMatchingCard(tp,Card.IsDefensePos,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
if sg:GetCount()<1 then return end
Duel.ChangePosition(sg,0,0,POS_FACEUP_ATTACK,POS_FACEUP_ATTACK)
end
if sel==2 then
if Duel.GetLocationCountFromEx(tp)<1 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
local sg=Duel.SelectMatchingCard(tp,c1141701.tfilter1,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
if sg:GetCount()>0 then
Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
Duel.BreakEffect()
Duel.SendtoDeck(sg,tp,2,REASON_RULE)
end
if c:IsRelateToEffect(e) and c:IsCanTurnSet() then
Duel.BreakEffect()
c:CancelToGrave()
Duel.ChangePosition(c,POS_FACEDOWN)
Duel.RaiseEvent(c,EVENT_SSET,e,REASON_EFFECT,tp,tp,0)
end
end
end
--
function c1141701.con2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return bit.band(r,0x4040)~=0 and c:IsPreviousLocation(LOCATION_HAND)
end
--
function c1141701.tg2(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 c1141701.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsSSetable() then return end
if not c:IsRelateToEffect(e) then return end
Duel.SSet(tp,c)
Duel.ConfirmCards(1-tp,c)
end
--
expansions/script/c1141702.lua deleted 100644 → 0
View file @ 25173dcc
--光晕『唐伞惊吓闪光』
local m=1141702
local cm=_G["c"..m]
xpcall(function() require("expansions/script/c1110198") end,function() require("script/c1110198") end)
--
function c1141702.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_NEGATE+CATEGORY_POSITION)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_CHAINING)
e1:SetCondition(c1141702.con1)
e1:SetTarget(c1141702.tg1)
e1:SetOperation(c1141702.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_GRAVE)
e2:SetCost(c1141702.cost2)
e2:SetCondition(c1141702.con2)
e2:SetOperation(c1141702.op2)
c:RegisterEffect(e2)
--
end
--
c1141702.muxu_ih_KTatara=1
--
function c1141702.con1(e,tp,eg,ep,ev,re,r,rp)
local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
return loc==LOCATION_MZONE and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev)
end
--
function c1141702.tfilter1(c,e,tp)
local b1=c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_ATTACK)
local b2=c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE)
return b1 or b2
end
function c1141702.tg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c1141702.tfilter1(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c1141702.tfilter1,tp,LOCATION_GRAVE,0,1,nil,e,tp) and re:GetHandler():IsCanTurnSet() end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c1141702.tfilter1,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
if re:GetHandler():IsCanTurnSet() and re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_POSITION,eg,1,0,0)
end
end
--
function c1141702.op1(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if not tc:IsRelateToEffect(e) then return end
local Pos1=tc:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_ATTACK) and POS_FACEUP_ATTACK or 0
local Pos2=tc:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE) and POS_FACEDOWN_DEFENSE or 0
if Duel.SpecialSummon(c,0,tp,tp,false,false,Pos1+Pos2)>0 then
Duel.NegateActivation(ev)
if not re:GetHandler():IsRelateToEffect(re) then return end
Duel.Destroy(eg,REASON_EFFECT)
end
end
--
function c1141702.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
end
--
function c1141702.tfilter2(c,tp)
return c:GetSummonPlayer()==tp and muxu.check_set_Tatara(c) and c:GetPreviousLocation()==LOCATION_EXTRA
end
function c1141702.con2(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp and Duel.GetCurrentPhase()==PHASE_MAIN1 and eg:IsExists(c1141702.tfilter2,1,nil,tp)
end
--
function c1141702.op2(e,tp,eg,ep,ev,re,r,rp)
Duel.SkipPhase(1-tp,PHASE_MAIN1,RESET_PHASE+PHASE_MAIN1,1)
end
--
expansions/script/c11451456.lua
View file @ abe8b3d8
......@@ -61,7 +61,8 @@ function cm.debcon(e,tp,eg,ep,ev,re,r,rp)
end
function cm.debug(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsFaceup,0,LOCATION_MZONE,LOCATION_MZONE,nil)
Debug.Message("场上的表侧表示怪兽合计等级:"..g:GetSum(Card.GetLevel))
--Debug.Message("场上的表侧表示怪兽合计等级:"..g:GetSum(Card.GetLevel))
assert(false,"场上的表侧表示怪兽合计等级:"..g:GetSum(Card.GetLevel))
end
function cm.mzfilter(c)
return c:IsLinkRace(RACE_PSYCHO) and c:IsLinkAttribute(ATTRIBUTE_LIGHT) and c:GetLevel()>=3 and c:GetLevel()<=10
......
expansions/script/c11451566.lua
View file @ abe8b3d8
......@@ -6,7 +6,7 @@ cm.named_with_Arknight=1
function cm.initial_effect(c)
--pendulum summon
c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_LINK),2,2,cm.lcheck)
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_LINK),2,99,cm.lcheck)
--skill
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DESTROY)
......
expansions/script/c11451611.lua
View file @ abe8b3d8
......@@ -62,7 +62,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetTarget(cm.splimit)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetCode(EFFECT_LIMIT_SPECIAL_SUMMON_POSITION)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
......
expansions/script/c11451612.lua
View file @ abe8b3d8
......@@ -63,7 +63,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetTarget(cm.splimit)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetCode(EFFECT_LIMIT_SPECIAL_SUMMON_POSITION)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
......
expansions/script/c11451613.lua
View file @ abe8b3d8
......@@ -63,7 +63,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetTarget(cm.splimit)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetCode(EFFECT_LIMIT_SPECIAL_SUMMON_POSITION)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
......
expansions/script/c11451614.lua
View file @ abe8b3d8
......@@ -63,7 +63,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetTarget(cm.splimit)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetCode(EFFECT_LIMIT_SPECIAL_SUMMON_POSITION)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
......
expansions/script/c11451615.lua
View file @ abe8b3d8
......@@ -58,7 +58,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetTarget(cm.splimit)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetCode(EFFECT_LIMIT_SPECIAL_SUMMON_POSITION)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
......
expansions/script/c11451616.lua
View file @ abe8b3d8
......@@ -58,7 +58,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetTarget(cm.splimit)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetCode(EFFECT_LIMIT_SPECIAL_SUMMON_POSITION)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
......@@ -99,7 +99,7 @@ function cm.filter4(c,e)
return c:IsFaceup() and c:IsAbleToRemove() and c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e)
end
function cm.filter5(c,e,tp,m,f,chkf)
return (c:IsType(TYPE_FUSION) or _G["c"..c:GetOriginalCode()].IsFusionSpellTrap) and (not f or f(c)) and (c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false,POS_FACEDOWN_DEFENSE) or c:IsSSetable()) and c:CheckFusionMaterial(m,nil,chkf)
return (c:IsType(TYPE_FUSION) or c.IsFusionSpellTrap) and (not f or f(c)) and (c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false,POS_FACEDOWN_DEFENSE) or c:IsSSetable()) and c:CheckFusionMaterial(m,nil,chkf)
end
function cm.filter6(c)
return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove()
......
expansions/script/c11451617.lua
View file @ abe8b3d8
......@@ -58,7 +58,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetTarget(cm.splimit)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetCode(EFFECT_LIMIT_SPECIAL_SUMMON_POSITION)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
......
expansions/script/c11451618.lua
View file @ abe8b3d8
......@@ -59,7 +59,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetTarget(cm.splimit)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetCode(EFFECT_LIMIT_SPECIAL_SUMMON_POSITION)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
......
expansions/script/c11451645.lua
View file @ abe8b3d8
......@@ -40,7 +40,7 @@ function cm.initial_effect(c)
ge0:SetCondition(cm.spcon)
ge0:SetTarget(cm.sptg)
ge0:SetOperation(cm.spop)
Duel.RegisterEffect(ge0,0)
--Duel.RegisterEffect(ge0,0)
end
end
function cm.effcon(e,tp,eg,ep,ev,re,r,rp)
......@@ -48,6 +48,16 @@ function cm.effcon(e,tp,eg,ep,ev,re,r,rp)
end
function cm.regop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
local e0=Effect.CreateEffect(e:GetHandler())
e0:SetDescription(aux.Stringid(m,0))
e0:SetCategory(CATEGORY_SPECIAL_SUMMON)
e0:SetProperty(EFFECT_FLAG_DELAY)
e0:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e0:SetCode(EVENT_LEAVE_GRAVE)
e0:SetCondition(cm.spcon)
e0:SetTarget(cm.sptg)
e0:SetOperation(cm.spop)
Duel.RegisterEffect(e0,tp)
end
function cm.valcheck(e,c)
local g=c:GetMaterial()
......@@ -92,4 +102,19 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
sc:CompleteProcedure()
end
end
end
function cm.xyzfilter(c)
return c:IsXyzSummonable(nil) and c:IsSetCard(0x172)
end
function cm.xyztg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.xyzfilter,tp,LOCATION_EXTRA,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function cm.xyzop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(cm.xyzfilter,tp,LOCATION_EXTRA,0,nil)
if #g>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=g:Select(tp,1,1,nil)
Duel.XyzSummon(tp,tg:GetFirst(),nil)
end
end
\ No newline at end of file
expansions/script/c1146016.lua deleted 100644 → 0
View file @ 25173dcc
--辉光之针的魔法少女
function c1146016.initial_effect(c)
--
c:EnableReviveLimit()
aux.AddFusionProcFun2(c,c1146016.FusFilter1,c1146016.FusFilter2,false)
aux.AddContactFusionProcedure(c,Card.IsReleasable,LOCATION_MZONE,0,Duel.Release,REASON_COST+REASON_FUSION+REASON_MATERIAL)
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION)
e1:SetValue(c1146016.splimit)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1146016,0))
e2:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(c1146016.con2)
e2:SetOperation(c1146016.op2)
c:RegisterEffect(e2)
--
if not c1146016.global_check then
c1146016.global_check=true
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EVENT_LEVEL_UP)
e3:SetLabelObject(c)
e3:SetOperation(c1146016.op3)
local e4=Effect.GlobalEffect()
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
e4:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e4:SetTarget(function (e,c) return c:IsFaceup() end)
e4:SetLabelObject(e3)
Duel.RegisterEffect(e4,0)
end
--
local e5=Effect.CreateEffect(c)
e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e5:SetProperty(EFFECT_FLAG_DELAY)
e5:SetCode(EVENT_CUSTOM+1146016)
e5:SetRange(LOCATION_GRAVE)
e5:SetCountLimit(1,1146016)
e5:SetTarget(c1146016.tg5)
e5:SetOperation(c1146016.op5)
c:RegisterEffect(e5)
--
end
--
function c1146016.FusFilter1(c)
return c:IsRace(RACE_FIEND)
end
function c1146016.FusFilter2(c)
return c:IsRace(RACE_SPELLCASTER)
end
--
function c1146016.splimit(e,se,sp,st)
local c=e:GetHandler()
return not c:IsLocation(LOCATION_EXTRA) or aux.fuslimit(e,se,sp,st)
end
--
function c1146016.con2(e,tp,eg,ep,ev,re,r,rp)
local b1=eg and eg:IsExists(aux.TRUE,1,e:GetHandler())
local b2=(Duel.GetCurrentPhase()~=PHASE_DAMAGE or not Duel.IsDamageCalculated())
return b1 and b2
end
--
function c1146016.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local mg=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
if mg:GetCount()<1 then return end
local tc=mg:GetFirst()
while tc do
local e2_1=Effect.CreateEffect(c)
e2_1:SetType(EFFECT_TYPE_SINGLE)
e2_1:SetCode(EFFECT_UPDATE_ATTACK)
e2_1:SetReset(RESET_EVENT+RESETS_STANDARD)
e2_1:SetValue(-1200)
tc:RegisterEffect(e2_1)
tc=mg:GetNext()
end
Duel.BreakEffect()
local dg=mg:Filter(Card.IsAttack,nil,0)
if dg:GetCount()<1 then return end
Duel.Destroy(dg,REASON_EFFECT)
end
--
function c1146016.op3(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetLabelObject()
Duel.RaiseEvent(c,EVENT_CUSTOM+1146016,re,r,rp,ep,ev)
end
--
function c1146016.tg5(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.GetMZoneCount(tp)>0
and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end
--
function c1146016.op5(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.GetMZoneCount(tp)<1 then return end
if not c:IsRelateToEffect(e) then return end
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end
--
expansions/script/c1146018.lua deleted 100644 → 0
View file @ 25173dcc
--秋意渐浓的唐伞妖怪
function c1146018.initial_effect(c)
--
c:EnableReviveLimit()
--
local val={aux.FilterBoolFunction(Card.IsFusionAttribute,ATTRIBUTE_WIND),aux.FilterBoolFunction(Card.IsRace,RACE_ZOMBIE)}
local fun={}
local mat={}
for i=1,#val do
if type(val[i])=='function' then
fun[i]=function(c,fc,sub,mg,sg) return val[i](c,fc,sub,mg,sg) and not c:IsHasEffect(6205579) end
else
fun[i]=function(c,fc,sub) return c:IsFusionCode(val[i]) or (sub and c:CheckFusionSubstitute(fc)) end
table.insert(mat,val[i])
end
end
if #mat>0 and c.material_count==nil then
local mt=getmetatable(c)
mt.material_count=#mat
mt.material=mat
end
local mt=getmetatable(c)
mt.material_count=2
mt.material=mat
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_FUSION_MATERIAL)
e1:SetCondition(c1146018.FConditionMix(false,true,table.unpack(fun)))
e1:SetOperation(c1146018.FOperationMix(false,true,table.unpack(fun)))
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1146018,0))
e2:SetCategory(CATEGORY_POSITION)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_MZONE)
e2:SetCost(c1146018.cost2)
e2:SetTarget(c1146018.tg2)
e2:SetOperation(c1146018.op2)
c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(1146018,1))
e3:SetCategory(CATEGORY_POSITION+CATEGORY_TODECK)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_FLIP+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetTarget(c1146018.tg3)
e3:SetOperation(c1146018.op3)
c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e4:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
e4:SetOperation(c1146018.op4)
c:RegisterEffect(e4)
--
end
--
function c1146018.FSelectMix(c,tp,mg,sg,fc,sub,chkf,...)
sg:AddCard(c)
local res
if sg:GetCount()<#{...} then
res=mg:IsExists(c1146018.FSelectMix,1,sg,tp,mg,sg,fc,sub,chkf,...)
else
res=aux.FCheckMixGoal(sg,tp,fc,sub,chkf,...)
end
sg:RemoveCard(c)
return res
end
--
function c1146018.FExtraMaterialFilter(c,fc)
return c:IsCanBeFusionMaterial(fc) and c:IsFusionAttribute(ATTRIBUTE_WIND) and not c:IsHasEffect(6205579)
end
function c1146018.exzonefilter(c)
return c:GetSequence()>4
end
--
function c1146018.FConditionMix(insf,sub,...)
local funs={...}
return
function(e,g,gc,chkfnf)
if g==nil then return insf and aux.MustMaterialCheck(nil,e:GetHandlerPlayer(),EFFECT_MUST_BE_FMATERIAL) end
local chkf=chkfnf&0xff
local c=e:GetHandler()
local tp=c:GetControler()
local notfusion=chkfnf>>8~=0
local sub=sub or notfusion
local mg=g:Filter(aux.FConditionFilterMix,c,c,sub,table.unpack(funs))
local exg=Duel.GetMatchingGroup(c1146018.FExtraMaterialFilter,tp,LOCATION_DECK,0,mg,c)
if #exg>0 and mg:IsExists(c1146018.exzonefilter,1,nil) then
mg:Merge(exg)
end
if gc then
if not mg:IsContains(gc) then return false end
local sg=Group.CreateGroup()
return c1146018.FSelectMix(gc,tp,mg,sg,c,sub,chkf,table.unpack(funs))
end
local sg=Group.CreateGroup()
local res=mg:IsExists(c1146018.FSelectMix,1,nil,tp,mg,sg,c,sub,chkf,table.unpack(funs))
return res
end
end
--
function c1146018.exgfilter(c,exg)
return exg:IsContains(c)
end
function c1146018.FOperationMix(insf,sub,...)
local funs={...}
return
function(e,tp,eg,ep,ev,re,r,rp,gc,chkfnf)
local chkf=chkfnf&0xff
local c=e:GetHandler()
local tp=c:GetControler()
local notfusion=chkfnf>>8~=0
local sub=sub or notfusion
local mg=eg:Filter(aux.FConditionFilterMix,c,c,sub,table.unpack(funs))
local exg=Duel.GetMatchingGroup(c1146018.FExtraMaterialFilter,tp,LOCATION_DECK,0,mg,c)
if #exg>0 and mg:IsExists(c1146018.exzonefilter,1,nil) then
mg:Merge(exg)
end
local sg=Group.CreateGroup()
if gc then sg:AddCard(gc) end
while sg:GetCount()<#funs do
if #sg==1 and not sg:IsExists(c1146018.exzonefilter,1,nil) then
mg:Sub(exg)
end
if sg:IsExists(c1146018.exgfilter,1,nil,exg) then
mg=mg:Filter(c1146018.exzonefilter,nil)
end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FMATERIAL)
local g=mg:FilterSelect(tp,c1146018.FSelectMix,1,1,sg,tp,mg,sg,c,sub,chkf,table.unpack(funs))
sg:Merge(g)
end
Duel.SetFusionMaterial(sg)
end
end
--
function c1146018.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) end
Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
end
--
function c1146018.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE,tp,LOCATION_REASON_CONTROL)>0 and c:IsCanTurnSet() end
Duel.SetOperationInfo(0,CATEGORY_POSITION,c,1,0,0)
end
--
function c1146018.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsControler(tp) then return end
if Duel.GetMZoneCount(tp)<1 then return end
if not c:IsRelateToEffect(e) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
local s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,0)
Duel.MoveSequence(c,math.log(s,2))
Duel.BreakEffect()
Duel.ChangePosition(c,POS_FACEDOWN_DEFENSE)
end
--
function c1146018.tg3(e,tp,eg,ep,ev,re,r,rp,chk)
if e:GetHandler():GetFlagEffect(1146018)~=0 then
e:SetLabel(1)
e:GetHandler():ResetFlagEffect(1146018)
else
e:SetLabel(0)
end
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsCanTurnSet,tp,LOCATION_MZONE,LOCATION_MZONE,1,e:GetHandler())
and Duel.GetFlagEffect(tp,1146018)<1 end
Duel.RegisterFlagEffect(tp,1146018,RESET_PHASE+PHASE_END,0,1)
local g=Duel.GetMatchingGroup(Card.IsCanTurnSet,tp,LOCATION_MZONE,LOCATION_MZONE,e:GetHandler())
if e:GetLabel()~=1 then
Duel.SetOperationInfo(0,CATEGORY_POSITION,g,g:GetCount(),0,0)
end
end
--
function c1146018.op3(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,aux.ExceptThisCard(e))
if g:GetCount()<1 then return end
if e:GetLabel()==1 and Duel.SelectYesNo(tp,aux.Stringid(1146018,2)) then
Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
else
Duel.ChangePosition(g,POS_FACEDOWN_DEFENSE)
end
end
--
function c1146018.op4(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RegisterFlagEffect(1146018,0,0,0)
end
--
expansions/script/c1146020.lua deleted 100644 → 0
View file @ 25173dcc
--跨越时空之船的船长
function c1146020.initial_effect(c)
--
c:EnableReviveLimit()
aux.AddLinkProcedure(c,nil,2,2,c1146020.lcheck)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1146020,0))
e1:SetCategory(CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCondition(c1146020.con1)
e1:SetTarget(c1146020.tg1)
e1:SetOperation(c1146020.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1146020,1))
e2:SetCategory(CATEGORY_REMOVE)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetTarget(c1146020.tg2)
e2:SetOperation(c1146020.op2)
c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_REMOVE)
e3:SetCondition(c1146020.con3)
e3:SetOperation(c1146020.op3)
c:RegisterEffect(e3)
--
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(1146020,2))
e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_PHASE+PHASE_END)
e4:SetRange(LOCATION_REMOVED)
e4:SetCountLimit(1,EFFECT_COUNT_CODE_DUEL)
e4:SetCondition(c1146020.con4)
e4:SetTarget(c1146020.tg4)
e4:SetOperation(c1146020.op4)
c:RegisterEffect(e4)
--
end
--
function c1146020.lcheck(g,lc)
return g:IsExists(Card.IsRace,1,nil,RACE_ZOMBIE)
end
--
function c1146020.con1(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
end
--
function c1146020.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local gc=Duel.GetFieldGroup(tp,LOCATION_GRAVE,0)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,gc,gc:GetCount(),0,0)
end
--
function c1146020.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local gc=Duel.GetFieldGroup(tp,LOCATION_GRAVE,0)
if Duel.Remove(gc,POS_FACEUP,REASON_EFFECT)>0 then
local tg=Duel.GetOperatedGroup()
local tc=tg:GetFirst()
for tc in aux.Next(tg) do
local e1_1=Effect.CreateEffect(c)
e1_1:SetType(EFFECT_TYPE_SINGLE)
e1_1:SetCode(EFFECT_CANNOT_TRIGGER)
e1_1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1_1:SetRange(LOCATION_REMOVED)
e1_1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1_1)
end
if c:IsFacedown() then return end
if c:GetControler()~=tp then return end
if not c:IsRelateToEffect(e) then return end
if not c:IsLocation(LOCATION_MZONE) then return end
local fid=c:GetFieldID()
local tc=tg:GetFirst()
for tc in aux.Next(tg) do
tc:RegisterFlagEffect(1146020,RESET_EVENT+0x1fe0000,0,0,fid)
end
local e1_2=Effect.CreateEffect(c)
e1_2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e1_2:SetCode(EVENT_LEAVE_FIELD)
e1_2:SetLabel(fid)
e1_2:SetLabelObject(c)
e1_2:SetCondition(c1146020.con1_2)
e1_2:SetOperation(c1146020.op1_2)
Duel.RegisterEffect(e1_2,tp)
end
end
--
function c1146020.con1_2(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
return tc and eg:IsContains(tc)
end
function c1146020.ofilter1_2(c,fid)
return c:GetFlagEffectLabel(1146020)==fid
end
function c1146020.op1_2(e,tp,eg,ep,ev,re,r,rp)
local sg=Duel.GetMatchingGroup(c1146020.ofilter1_2,tp,LOCATION_REMOVED,0,nil,e:GetLabel())
if sg:GetCount()>0 then
Duel.SendtoGrave(sg,REASON_EFFECT+REASON_RETURN)
end
e:Reset()
end
--
function c1146020.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_REMOVE,e:GetHandler(),1,0,0)
end
--
function c1146020.op2(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
end
--
function c1146020.con3(e,tp,eg,ep,ev,re,r,rp)
return r and bit.band(r,REASON_EFFECT)~=0
end
--
function c1146020.op3(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsFacedown() then return end
e:GetHandler():RegisterFlagEffect(1146021,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
end
--
function c1146020.con4(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(1146021)~=0
end
--
function c1146020.tg4(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end
--
function c1146020.op4(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
local e4_1=Effect.CreateEffect(c)
e4_1:SetDescription(aux.Stringid(1146020,3))
e4_1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e4_1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4_1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e4_1:SetRange(LOCATION_REMOVED)
e4_1:SetCountLimit(1)
e4_1:SetOperation(c1146020.op4_1)
e4_1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2)
c:RegisterEffect(e4_1)
end
--
function c1146020.op4_1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local b1=(Duel.GetMZoneCount(tp)>0)
local b2=c:IsCanBeSpecialSummoned(e,0,tp,false,false)
if b1 and b2 then
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end
e:Reset()
end
--
expansions/script/c1184001.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·三色猫
function c1184001.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1184001,0))
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetTarget(c1184001.tg1)
e1:SetOperation(c1184001.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
e2:SetRange(LOCATION_SZONE)
e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c1184001.tg2)
e2:SetLabelObject(e1)
c:RegisterEffect(e2)
--
end
--
function c1184001.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
and not e:GetHandler():IsForbidden() end
end
--
function c1184001.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local e1_1=Effect.CreateEffect(c)
e1_1:SetCode(EFFECT_CHANGE_TYPE)
e1_1:SetType(EFFECT_TYPE_SINGLE)
e1_1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1_1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1_1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
c:RegisterEffect(e1_1)
end
--
function c1184001.tg2(e,c)
local seq=c:GetSequence()
return c:IsType(TYPE_EFFECT) and c:IsSetCard(0x3e12)
and seq<5 and math.abs(e:GetHandler():GetSequence()-seq)==1
end
--
expansions/script/c1184003.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·狸子面包
function c1184003.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1184003,0))
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetCountLimit(1,1184003)
e1:SetTarget(c1184003.tg1)
e1:SetOperation(c1184003.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184003,0))
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_HAND)
e2:SetCountLimit(1,1184003)
e2:SetCost(c1184003.cost2)
e2:SetTarget(c1184003.tg1)
e2:SetOperation(c1184003.op1)
c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(1184003,1))
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_LEAVE_GRAVE)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetTarget(c1184003.tg3)
e3:SetOperation(c1184003.op3)
c:RegisterEffect(e3)
--
end
--
function c1184003.tfilter1_1(c)
return c:IsSetCard(0x3e12) and c:IsType(TYPE_MONSTER)
and not c:IsForbidden()
end
function c1184003.tfilter1_2(c)
return c:IsSetCard(0x3e12) and c:IsFaceup()
end
function c1184003.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local ft=Duel.GetLocationCount(tp,LOCATION_SZONE,0)
local dt=Duel.GetMatchingGroup(c1184003.tfilter1_1,tp,LOCATION_DECK,0,nil):GetClassCount(Card.GetCode)
local mt=Duel.GetMatchingGroupCount(c1184003.tfilter1_2,tp,LOCATION_MZONE,0,nil)
return mt>0 and dt>=mt and ft>=mt
end
end
--
function c1184003.ofilter1(sg)
return sg:GetClassCount(Card.GetCode)==sg:GetCount()
end
function c1184003.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local ft=Duel.GetLocationCount(tp,LOCATION_SZONE,0)
local dg=Duel.GetMatchingGroup(c1184003.tfilter1_1,tp,LOCATION_DECK,0,nil)
local dt=dg:GetClassCount(Card.GetCode)
local mt=Duel.GetMatchingGroupCount(c1184003.tfilter1_2,tp,LOCATION_MZONE,0,nil)
if mt>0 and dt>=mt and ft>=mt then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELF)
local sg=dg:SelectSubGroup(tp,c1184003.ofilter1,false,mt,mt)
for tc in aux.Next(sg) do
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local e1_1=Effect.CreateEffect(c)
e1_1:SetCode(EFFECT_CHANGE_TYPE)
e1_1:SetType(EFFECT_TYPE_SINGLE)
e1_1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1_1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1_1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
tc:RegisterEffect(e1_1)
end
end
end
--
function c1184003.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsDiscardable() end
Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
end
--
function c1184003.tfilter3(c)
return c:IsSetCard(0x3e12) and c:IsAbleToHand()
end
function c1184003.tg3(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c1184003.tfilter3,tp,LOCATION_GRAVE,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
end
function c1184003.op3(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c1184003.tfilter3,tp,LOCATION_GRAVE,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
--
expansions/script/c1184004.lua deleted 100644 → 0
View file @ 25173dcc
--小红帽和巧克力
function c1184004.initial_effect(c)
--
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,1184004+EFFECT_COUNT_CODE_OATH)
e1:SetCondition(c1184004.con1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184004,0))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1)
e2:SetCost(c1184004.cost2)
e2:SetTarget(c1184004.tg2)
e2:SetOperation(c1184004.op2)
c:RegisterEffect(e2)
--
end
--
function c1184004.cfilter1(c)
return c:IsFaceup() and c:IsSetCard(0x3e12)
end
function c1184004.con1(e,c)
if c==nil then return true end
local tp=c:GetControler()
return Duel.GetMZoneCount(tp)>0
and Duel.IsExistingMatchingCard(c1184004.cfilter1,tp,LOCATION_MZONE,0,1,nil)
end
--
function c1184004.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToDeckAsCost() end
Duel.SendtoDeck(e:GetHandler(),nil,2,REASON_COST)
end
function c1184004.tfilter2(c,e,tp)
return ((c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsLevel(3)) or c:IsSetCard(0x3e12)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c1184004.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp,e:GetHandler())>0
and Duel.IsExistingMatchingCard(c1184004.tfilter2,tp,LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end
function c1184004.op2(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetMZoneCount(tp)<1 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c1184004.tfilter2,tp,LOCATION_DECK,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
--
expansions/script/c1184005.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·甜甜圈
function c1184005.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1184005,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCountLimit(1,1184005)
e1:SetRange(LOCATION_HAND)
e1:SetLabel(0)
e1:SetCost(c1184005.cost1)
e1:SetTarget(c1184005.tg1)
e1:SetOperation(c1184005.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184005,1))
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetTarget(c1184005.tg2)
e2:SetOperation(c1184005.op2)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
c:RegisterEffect(e3)
--
end
--
function c1184005.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
e:SetLabel(1)
if chk==0 then return true end
end
function c1184005.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if e:GetLabel()~=1 then return false end
return e:GetHandler():IsAbleToGraveAsCost()
end
Duel.SendtoGrave(e:GetHandler(),REASON_COST)
e:GetHandler():RegisterFlagEffect(1184005,RESET_EVENT+0x1fe0000,0,0)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
end
function c1184005.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:GetFlagEffect(1184005)>0 then
Duel.SendtoHand(c,nil,REASON_EFFECT)
end
end
--
function c1184005.tfilter2(c)
return c:IsSetCard(0x3e12) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and not c:IsCode(1184005)
end
function c1184005.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c1184005.tfilter2,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c1184005.op2(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c1184005.tfilter2,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
--
expansions/script/c1184007.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·曲奇人形
function c1184007.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1184007,0))
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_GRAVE)
e1:SetCountLimit(1,1184007)
e1:SetTarget(c1184007.tg1)
e1:SetOperation(c1184007.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184007,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_SZONE)
e2:SetCost(c1184007.cost2)
e2:SetTarget(c1184007.tg2)
e2:SetOperation(c1184007.op2)
c:RegisterEffect(e2)
--
end
--
function c1184007.tfilter1(c)
return c:IsFaceup() and c:IsType(TYPE_XYZ)
end
function c1184007.tg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c1184007.tfilter1(chkc) end
if chk==0 then return Duel.IsExistingTarget(c1184007.tfilter1,tp,LOCATION_MZONE,0,1,nil) and e:GetHandler():IsCanOverlay() end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
Duel.SelectTarget(tp,c1184007.tfilter1,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
end
function c1184007.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and not c:IsImmuneToEffect(e) then
local og=c:GetOverlayGroup()
if og:GetCount()>0 then
Duel.SendtoGrave(og,REASON_RULE)
end
Duel.Overlay(tc,Group.FromCards(c))
end
end
--
function c1184007.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end
function c1184007.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
local ac=Duel.AnnounceCard(tp)
Duel.SetTargetParam(ac)
Duel.SetOperationInfo(0,CATEGORY_ANNOUNCE,nil,0,tp,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function c1184007.op2(e,tp,eg,ep,ev,re,r,rp)
local e2_1=Effect.CreateEffect(e:GetHandler())
e2_1:SetDescription(aux.Stringid(1184007,2))
e2_1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2_1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e2_1:SetCountLimit(1)
e2_1:SetLabel(Duel.GetTurnCount())
e2_1:SetCondition(c1184007.con2_1)
e2_1:SetOperation(c1184007.op2_1)
if Duel.GetTurnPlayer()==tp and Duel.GetCurrentPhase()==PHASE_STANDBY then
e2_1:SetReset(RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
else
e2_1:SetReset(RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
end
Duel.RegisterEffect(e2_1,tp)
end
function c1184007.cfilter2_1(c,e,tp)
return c:IsSetCard(0x3e12) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
end
function c1184007.con2_1(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
and Duel.GetTurnCount()~=e:GetLabel()
and Duel.IsExistingMatchingCard(c1184007.cfilter2_1,tp,LOCATION_EXTRA,0,1,nil,e,tp)
end
function c1184007.op2_1(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,1184007)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local mg=Duel.SelectMatchingCard(tp,c1184007.cfilter2_1,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
if mg:GetCount()>0 then
Duel.SpecialSummon(mg,0,tp,tp,false,false,POS_FACEUP)
end
end
--
\ No newline at end of file
expansions/script/c1184010.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·和菓子
function c1184010.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1184010,0))
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON+CATEGORY_ANNOUNCE)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetCost(c1184010.cost1)
e1:SetTarget(c1184010.tg1)
e1:SetOperation(c1184010.op1)
c:RegisterEffect(e1)
--
end
--
function c1184010.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end
function c1184010.tfilter1_1(c)
return c:IsAttribute(ATTRIBUTE_WATER) and c:IsSetCard(0x3e12) and c:IsType(TYPE_MONSTER)
end
function c1184010.tfilter1_2(c)
return c:IsSetCard(0x3e12) and c:IsType(TYPE_SPELL) and c:IsAbleToHand()
end
function c1184010.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
local ct=Duel.GetMatchingGroupCount(c1184010.tfilter1_1,tp,LOCATION_GRAVE,0,nil)
if chk==0 then return ct~=1 or Duel.IsExistingMatchingCard(c1184010.tfilter1_2,tp,LOCATION_DECK,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
local ac=Duel.AnnounceCard(tp)
Duel.SetTargetParam(ac)
Duel.SetOperationInfo(0,CATEGORY_ANNOUNCE,nil,0,tp,0)
end
function c1184010.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local ct=Duel.GetMatchingGroupCount(c1184010.tfilter1_1,tp,LOCATION_GRAVE,0,nil)
if ct==0 then
local ac=Duel.GetChainInfo(0,CHAININFO_TARGET_PARAM)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_ACTIVATE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,1)
e2:SetLabel(ac)
e2:SetValue(c1184010.aclimit2)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp)
end
if ct==1 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=Duel.SelectMatchingCard(tp,c1184010.tfilter1_2,tp,LOCATION_DECK,0,1,1,nil)
if sg:GetCount()>0 then
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
end
end
if ct==2 then
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_ADD_ATTRIBUTE)
e3:SetRange(LOCATION_GRAVE)
e3:SetValue(ATTRIBUTE_WATER)
e3:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e3)
local e4=Effect.CreateEffect(e:GetHandler())
e4:SetDescription(aux.Stringid(1184010,1))
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e4:SetCode(EVENT_PHASE+PHASE_STANDBY)
e4:SetCountLimit(1)
e4:SetLabel(Duel.GetTurnCount())
e4:SetCondition(c1184010.con4)
e4:SetOperation(c1184010.op4)
if Duel.GetTurnPlayer()==tp and Duel.GetCurrentPhase()==PHASE_STANDBY then
e4:SetReset(RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
else
e4:SetReset(RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
end
Duel.RegisterEffect(e4,tp)
end
end
function c1184010.aclimit2(e,re,tp)
return re:IsHasType(EFFECT_TYPE_ACTIVATE)
and re:GetHandler():IsCode(e:GetLabel())
end
function c1184010.cfilter4(c,e,tp)
return c:IsSetCard(0x3e12) and c:IsAttribute(ATTRIBUTE_EARTH)
and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
end
function c1184010.con4(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
and Duel.GetTurnCount()~=e:GetLabel()
and Duel.IsExistingMatchingCard(c1184010.cfilter4,tp,LOCATION_EXTRA,0,1,nil,e,tp)
end
function c1184010.op4(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,1184010)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local mg=Duel.SelectMatchingCard(tp,c1184010.cfilter4,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
if mg:GetCount()>0 then
Duel.SpecialSummon(mg,0,tp,tp,false,false,POS_FACEUP)
end
end
--
\ No newline at end of file
expansions/script/c1184011.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·小牛乳
function c1184011.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1184011,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,1184011)
e1:SetCost(c1184011.cost1)
e1:SetTarget(c1184011.tg1)
e1:SetOperation(c1184011.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184011,1))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetOperation(c1184011.op2)
c:RegisterEffect(e2)
--
end
--
function c1184011.tfilter1_1(c)
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x3e12)
and not c:IsForbidden()
end
function c1184011.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE,0)>0
and Duel.IsExistingMatchingCard(c1184011.tfilter1_1,tp,LOCATION_HAND,0,1,e:GetHandler()) end
local ft=Duel.GetLocationCount(tp,LOCATION_SZONE,0)
local dg=Duel.GetMatchingGroup(c1184011.tfilter1_1,tp,LOCATION_HAND,0,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELF)
local sg=dg:Select(tp,1,math.min(ft,dg:GetCount()),e:GetHandler())
for tc in aux.Next(sg) do
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local e1_1=Effect.CreateEffect(e:GetHandler())
e1_1:SetCode(EFFECT_CHANGE_TYPE)
e1_1:SetType(EFFECT_TYPE_SINGLE)
e1_1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1_1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1_1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
tc:RegisterEffect(e1_1)
end
end
function c1184011.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function c1184011.op1(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
end
--
function c1184011.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e2_1=Effect.CreateEffect(c)
e2_1:SetType(EFFECT_TYPE_SINGLE)
e2_1:SetCode(EFFECT_DUAL_SUMMONABLE)
c:RegisterEffect(e2_1)
local e2_2=Effect.CreateEffect(c)
e2_2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
e2_2:SetTargetRange(LOCATION_MZONE,0)
e2_2:SetTarget(c1184011.tg2_2)
e2_2:SetLabelObject(e2_1)
e2_2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2_2,tp)
end
function c1184011.tg2_2(e,c)
return c:IsSetCard(0x3e12) and c:IsFaceup()
end
\ No newline at end of file
expansions/script/c1184014.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·樱叶糕
function c1184014.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1184014,0))
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_HAND)
e1:SetTarget(c1184014.tg1)
e1:SetOperation(c1184014.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184014,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,1184014)
e2:SetCondition(c1184014.con2)
e2:SetTarget(c1184014.tg2)
e2:SetOperation(c1184014.op2)
c:RegisterEffect(e2)
--
end
--
function c1184014.tfilter1(c)
return c:IsFaceup() and c:IsType(TYPE_XYZ)
end
function c1184014.tg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c1184014.tfilter1(chkc) end
if chk==0 then return Duel.IsExistingTarget(c1184014.tfilter1,tp,LOCATION_MZONE,0,1,nil) and e:GetHandler():IsCanOverlay() end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
Duel.SelectTarget(tp,c1184014.tfilter1,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
end
function c1184014.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and not c:IsImmuneToEffect(e) then
local og=c:GetOverlayGroup()
if og:GetCount()>0 then
Duel.SendtoGrave(og,REASON_RULE)
end
Duel.Overlay(tc,Group.FromCards(c))
end
end
--
function c1184014.con2(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSetCard(0x3e12)
end
function c1184014.tfilter2(c,e,tp,mg)
return c:IsSynchroSummonable(nil,mg)
and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
end
function c1184014.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
local mg=c:GetOverlayGroup()
if chk==0 then return Duel.IsExistingMatchingCard(c1184014.tfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function c1184014.ofilter2(mg,tp,lc)
return lc:IsSynchroSummonable(nil,mg,#mg-1,#mg-1)
and Duel.GetLocationCountFromEx(tp,tp,mg,lc)>0
end
function c1184014.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local mg=c:GetOverlayGroup()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=Duel.SelectMatchingCard(tp,c1184014.tfilter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,mg)
if sg:GetCount()>0 then
local lc=sg:GetFirst()
--
local rg=mg:SelectSubGroup(tp,c1184014.ofilter2,false,1,#mg,tp,lc)
lc:SetMaterial(rg)
Duel.SendtoGrave(rg,REASON_SYNCHRO+REASON_MATERIAL)
local e2_1=Effect.CreateEffect(c)
e2_1:SetDescription(aux.Stringid(1184014,2))
e2_1:SetType(EFFECT_TYPE_FIELD)
e2_1:SetCode(EFFECT_SPSUMMON_PROC)
e2_1:SetRange(LOCATION_EXTRA)
e2_1:SetValue(SUMMON_TYPE_SYNCHRO)
e2_1:SetReset(RESET_EVENT+0x1fe0000)
lc:RegisterEffect(e2_1,true)
Duel.SpecialSummonRule(tp,lc,SUMMON_TYPE_SYNCHRO)
e2_1:Reset()
--
end
end
--
expansions/script/c1184022.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·秋色拿铁
function c1184022.initial_effect(c)
--
c:EnableReviveLimit()
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(1165)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetRange(LOCATION_EXTRA)
e1:SetCondition(c1184022.XyzLevelFreeCondition(c1184022.f,nil,2,2))
e1:SetTarget(c1184022.XyzLevelFreeTarget(c1184022.f,nil,2,2))
e1:SetOperation(aux.XyzLevelFreeOperation(c1184022.f,nil,2,2))
e1:SetValue(SUMMON_TYPE_XYZ)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_DIRECT_ATTACK)
c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(1184022,0))
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetCountLimit(1,1184022)
e3:SetRange(LOCATION_MZONE)
e3:SetCost(c1184022.cost3)
e3:SetTarget(c1184022.tg3)
e3:SetOperation(c1184022.op3)
c:RegisterEffect(e3)
--
end
--
function c1184022.f(c,xyzcard)
return c:IsXyzLevel(xyzcard,3) and c:IsAttribute(ATTRIBUTE_EARTH)
end
function c1184022.XyzExgFilter(c,xyzcard)
return c:IsSetCard(0x3e12) and c:IsCanBeXyzMaterial(xyzcard)
and c:IsFaceup() and c:GetOriginalLevel()==3
and bit.band(c:GetOriginalAttribute(),ATTRIBUTE_EARTH)~=0
end
function c1184022.XyzLevelFreeCondition(f,gf,minct,maxct)
return
function(e,c,og,min,max)
if c==nil then return true end
if c:IsType(TYPE_PENDULUM) and c:IsFaceup() then return false end
local tp=c:GetControler()
local minc=minct
local maxc=maxct
if min then
minc=math.max(minc,min)
maxc=math.min(maxc,max)
end
if maxc<minc then return false end
local mg=nil
if og then
mg=og:Filter(aux.XyzLevelFreeFilter,nil,c,f)
else
mg=Duel.GetMatchingGroup(aux.XyzLevelFreeFilter,tp,LOCATION_MZONE,0,nil,c,f)
exg=Duel.GetMatchingGroup(c1184022.XyzExgFilter,tp,LOCATION_SZONE,0,nil,c)
mg:Merge(exg)
end
local sg=aux.GetMustMaterialGroup(tp,EFFECT_MUST_BE_XMATERIAL)
if sg:IsExists(aux.MustMaterialCounterFilter,1,nil,mg) then return false end
Duel.SetSelectedCard(sg)
aux.GCheckAdditional=aux.TuneMagicianCheckAdditionalX(EFFECT_TUNE_MAGICIAN_X)
local res=mg:CheckSubGroup(aux.XyzLevelFreeGoal,minc,maxc,tp,c,gf)
aux.GCheckAdditional=nil
return res
end
end
function c1184022.XyzLevelFreeTarget(f,gf,minct,maxct)
return
function(e,tp,eg,ep,ev,re,r,rp,chk,c,og,min,max)
if og and not min then return true end
local minc=minct
local maxc=maxct
if min then
if min>minc then minc=min end
if max<maxc then maxc=max end
end
local mg=nil
if og then
mg=og:Filter(aux.XyzLevelFreeFilter,nil,c,f)
else
mg=Duel.GetMatchingGroup(aux.XyzLevelFreeFilter,tp,LOCATION_MZONE,0,nil,c,f)
exg=Duel.GetMatchingGroup(c1184022.XyzExgFilter,tp,LOCATION_SZONE,0,nil,c)
mg:Merge(exg)
end
local sg=aux.GetMustMaterialGroup(tp,EFFECT_MUST_BE_XMATERIAL)
Duel.SetSelectedCard(sg)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
local cancel=Duel.IsSummonCancelable()
aux.GCheckAdditional=aux.TuneMagicianCheckAdditionalX(EFFECT_TUNE_MAGICIAN_X)
local g=mg:SelectSubGroup(tp,aux.XyzLevelFreeGoal,cancel,minc,maxc,tp,c,gf)
Auxiliary.GCheckAdditional=nil
if g and g:GetCount()>0 then
g:KeepAlive()
e:SetLabelObject(g)
return true
else return false end
end
end
--
function c1184022.cfilter3_1(c,e,tp,og)
return c:IsAbleToGraveAsCost()
and og:IsExists(c1184022.cfilter3_2,1,c,e,tp)
end
function c1184022.cfilter3_2(c,e,tp)
return c:IsType(TYPE_MONSTER)
and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c1184022.cost3(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
local og=c:GetOverlayGroup()
if chk==0 then return og:IsExists(c1184022.cfilter3_1,1,nil,e,tp,og) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local sg=og:FilterSelect(tp,c1184022.cfilter3_1,1,1,nil,e,tp,og)
Duel.SendtoGrave(sg,REASON_COST)
end
--
function c1184022.tg3(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
local og=c:GetOverlayGroup()
if chk==0 then return Duel.GetMZoneCount(tp)>0
and og:IsExists(c1184022.cfilter3_2,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,0)
end
--
function c1184022.op3(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local og=c:GetOverlayGroup()
if Duel.GetMZoneCount(tp)<1 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=og:FilterSelect(tp,c1184022.cfilter3_2,1,1,nil,e,tp)
if sg:GetCount()>0 then
Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
end
end
--
expansions/script/c1184031.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·苏打水
function c1184031.initial_effect(c)
--
c:EnableReviveLimit()
aux.AddFusionProcFunRep(c,c1184031.FusFilter,1,true,true)
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION)
e1:SetValue(aux.fuslimit)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_EXTRA)
e2:SetCondition(c1184031.con2)
e2:SetOperation(c1184031.op2)
c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(1184031,0))
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetOperation(c1184031.op3)
c:RegisterEffect(e3)
--
end
--
function c1184031.FusFilter(c)
return c:IsAttack(1800) and c:IsLevel(3)
end
--
function c1184031.cfilter2(c,fc)
return bit.band(c:GetOriginalType(),TYPE_XYZ)~=0
and bit.band(c:GetOriginalType(),TYPE_MONSTER)~=0
and c:IsAbleToGraveAsCost()
and c:IsFusionSetCard(0x3e12)
and c:IsCanBeFusionMaterial(fc,SUMMON_TYPE_SPECIAL)
end
function c1184031.con2(e,c)
if c==nil then return true end
local tp=c:GetControler()
return Duel.IsExistingMatchingCard(c1184031.cfilter2,tp,LOCATION_SZONE,0,1,nil,c)
end
--
function c1184031.op2(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local sg=Duel.SelectMatchingCard(tp,c1184031.cfilter2,tp,LOCATION_SZONE,0,1,1,nil,c)
c:SetMaterial(sg)
Duel.SendtoGrave(sg,REASON_COST)
end
--
function c1184031.op3(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetFlagEffect(tp,1184031)~=0 then return end
if not Duel.IsPlayerCanAdditionalSummon(tp) then return end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetDescription(aux.Stringid(1184031,1))
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetTargetRange(LOCATION_HAND,0)
e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x3e12))
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
Duel.RegisterFlagEffect(tp,1184031,RESET_PHASE+PHASE_END,0,1)
end
--
expansions/script/c1184041.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·儿童列车
function c1184041.initial_effect(c)
--
c:EnableReviveLimit()
aux.AddLinkProcedure(c,c1184041.lfilter,2,2,c1184041.lcheck)
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_DIRECT_ATTACK)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184041,0))
e2:SetCategory(CATEGORY_TODECK+CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(c1184041.con2)
e2:SetCost(c1184041.cost2)
e2:SetTarget(c1184041.tg2)
e2:SetOperation(c1184041.op2)
c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(1184041,0))
e3:SetCategory(CATEGORY_TODECK+CATEGORY_SEARCH+CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_BATTLE_DAMAGE)
e3:SetRange(LOCATION_MZONE)
e3:SetTarget(c1184041.tg2)
e3:SetOperation(c1184041.op2)
c:RegisterEffect(e3)
--
end
--
function c1184041.lfilter(c)
return c:IsLevel(3)
end
function c1184041.lcheck(g,lc)
return g:IsExists(Card.IsLinkSetCard,1,nil,0x3e12)
end
--
function c1184041.con2(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
end
function c1184041.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsReleasable() end
Duel.Release(e:GetHandler(),REASON_COST)
end
function c1184041.tfilter2(c)
return c:IsSetCard(0x3e12) and c:IsAbleToHand()
end
function c1184041.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
local b1=Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,1,nil) and c:GetFlagEffect(1184041)==0
local b2=Duel.IsExistingMatchingCard(c1184041.tfilter2,tp,LOCATION_DECK,0,1,nil) and c:GetFlagEffect(1184042)==0
if chk==0 then return b1 or b2 end
end
function c1184041.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local b1=Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,1,nil) and c:GetFlagEffect(1184041)==0
local b2=Duel.IsExistingMatchingCard(c1184041.tfilter2,tp,LOCATION_DECK,0,1,nil) and c:GetFlagEffect(1184042)==0
local op=0
if b1 and b2 then op=Duel.SelectOption(tp,aux.Stringid(1184041,1),aux.Stringid(1184041,2))
elseif b1 then op=Duel.SelectOption(tp,aux.Stringid(1184041,1))
elseif b2 then op=Duel.SelectOption(tp,aux.Stringid(1184041,2))+1
else return end
if op==0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local sg=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,1,1,nil)
Duel.SendtoDeck(sg,nil,2,REASON_EFFECT)
c:RegisterFlagEffect(1184041,RESET_PHASE+PHASE_END,0,1)
else
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=Duel.SelectMatchingCard(tp,c1184041.tfilter2,tp,LOCATION_DECK,0,1,1,nil)
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
c:RegisterFlagEffect(1184042,RESET_PHASE+PHASE_END,0,1)
end
end
--
\ No newline at end of file
expansions/script/c1184051.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·黑猫蛋糕
function c1184051.initial_effect(c)
--
c:EnableReviveLimit()
aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1,1)
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e1:SetRange(LOCATION_EXTRA)
e1:SetCountLimit(1,1184051)
e1:SetCondition(c1184051.con1)
e1:SetOperation(c1184051.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184051,0))
e2:SetCategory(CATEGORY_TODECK+CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCountLimit(1,1184051+100)
e2:SetTarget(c1184051.tg2)
e2:SetOperation(c1184051.op2)
c:RegisterEffect(e2)
--
end
--
function c1184051.cfilter1(c)
return c:IsSetCard(0x3e12) and c:IsAbleToExtraAsCost()
end
function c1184051.con1(e,c)
if c==nil then return true end
local tp=c:GetControler()
return Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
and Duel.IsExistingMatchingCard(c1184051.cfilter1,tp,LOCATION_GRAVE,0,2,nil)
end
function c1184051.op1(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local sg=Duel.SelectMatchingCard(tp,c1184051.cfilter1,tp,LOCATION_GRAVE,0,2,Duel.GetMatchingGroup(c1184051.cfilter1,tp,LOCATION_GRAVE,0,nil):GetCount(),nil)
Duel.DisableShuffleCheck()
Duel.SendtoDeck(sg,nil,2,REASON_COST)
end
--
function c1184051.tfilter2(c)
return c:IsSetCard(0x3e12) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck()
end
function c1184051.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local sg=Duel.GetMatchingGroup(c1184051.tfilter2,tp,LOCATION_GRAVE,0,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,sg,sg:GetCount(),0,0)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c1184051.ofilter2(c)
return c:IsSetCard(0x3e12) and c:IsType(TYPE_TRAP) and c:IsAbleToHand()
end
function c1184051.op2(e,tp,eg,ep,ev,re,r,rp)
local sg=Duel.GetMatchingGroup(c1184051.tfilter2,tp,LOCATION_GRAVE,0,nil)
if Duel.SendtoDeck(sg,nil,2,REASON_EFFECT)>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=Duel.SelectMatchingCard(tp,c1184051.ofilter2,tp,LOCATION_DECK,0,1,1,nil)
if sg:GetCount()>0 then
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
end
end
end
--
expansions/script/c1184052.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·鲜红蛋糕
function c1184052.initial_effect(c)
--
c:EnableReviveLimit()
aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1,1)
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e1:SetRange(LOCATION_EXTRA)
e1:SetCountLimit(1,1184052)
e1:SetCondition(c1184052.con1)
e1:SetOperation(c1184052.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184052,0))
e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_ATKCHANGE)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCountLimit(1,1184052+100)
e2:SetOperation(c1184052.op2)
c:RegisterEffect(e2)
--
end
--
function c1184052.cfilter1(c)
return c:IsSetCard(0x3e12) and c:IsFaceup() and c:IsReleasable()
end
function c1184052.gfilter1(sg)
return sg:GetClassCount(Card.GetCode)==2
end
function c1184052.con1(e,c)
if c==nil then return true end
local tp=c:GetControler()
local mg=Duel.GetMatchingGroup(c1184052.cfilter1,tp,LOCATION_MZONE,0,nil)
return mg:CheckSubGroup(c1184052.gfilter1,2,2,nil)
end
function c1184052.op1(e,tp,eg,ep,ev,re,r,rp,c)
local mg=Duel.GetMatchingGroup(c1184052.cfilter1,tp,LOCATION_MZONE,0,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local sg=mg:SelectSubGroup(tp,c1184052.gfilter1,false,2,2,nil)
Duel.Release(sg,REASON_COST)
end
--
function c1184052.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local mg=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,0)
for tc in aux.Next(mg) do
local e2_1=Effect.CreateEffect(c)
e2_1:SetType(EFFECT_TYPE_SINGLE)
e2_1:SetCode(EFFECT_UPDATE_ATTACK)
e2_1:SetValue(1000)
e2_1:SetReset(RESET_EVENT+0x1fe0000)
tc:RegisterEffect(e2_1)
end
local e2_2=Effect.CreateEffect(c)
e2_2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2_2:SetCode(EVENT_PHASE+PHASE_END)
e2_2:SetCountLimit(1)
e2_2:SetCondition(c1184052.con2_2)
e2_2:SetOperation(c1184052.op2_2)
e2_2:SetReset(EVENT_PHASE+PHASE_END)
Duel.RegisterEffect(e2_2,tp)
end
function c1184052.con2_2(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c1184052.ofilter2_2(c)
return c:IsFaceup() and c:GetAttack()==c:GetBaseAttack()
end
function c1184052.op2_2(e,tp,eg,ep,ev,re,r,rp)
local mg=Duel.GetMatchingGroup(c1185052.ofilter2_2,tp,LOCATION_MZONE,LOCATION_MZONE,0)
if mg:GetCount()>0 then Duel.SendtoGrave(mg,REASON_RULE) end
end
--
\ No newline at end of file
expansions/script/c1184061.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·巧克力香精
function c1184061.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184061,0))
e2:SetCategory(CATEGORY_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetCountLimit(1,1184061)
e2:SetRange(LOCATION_SZONE)
e2:SetTarget(c1184061.tg2)
e2:SetOperation(c1184061.op2)
c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(1184061,1))
e3:SetCategory(CATEGORY_TODECK)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_SZONE)
e3:SetCost(c1184061.cost3)
e3:SetTarget(c1184061.tg3)
e3:SetOperation(c1184061.op3)
c:RegisterEffect(e3)
--
end
--
function c1184061.tfilter2(c)
return c:IsAttribute(ATTRIBUTE_EARTH) and c:IsSummonable(true,nil)
end
function c1184061.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c1184061.tfilter2,tp,LOCATION_HAND,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
end
function c1184061.op2(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c1184061.tfilter2,tp,LOCATION_HAND,0,1,1,nil)
if g:GetCount()>0 then
Duel.Summon(tp,g:GetFirst(),true,nil)
end
end
--
function c1184061.cost3(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end
function c1184061.tg3(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE)
end
function c1184061.op3(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local sg=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_GRAVE,0,1,2,e:GetHandler())
if sg:GetCount()>0 then
Duel.SendtoDeck(sg,nil,2,REASON_EFFECT)
end
end
--
expansions/script/c1184062.lua deleted 100644 → 0
View file @ 25173dcc
--梦之始
function c1184062.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TODECK+CATEGORY_SEARCH+CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetTarget(c1184062.tg1)
e1:SetOperation(c1184062.op1)
c:RegisterEffect(e1)
--
end
--
function c1184062.tfilter1(c)
return c:IsSetCard(0x3e12) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
end
function c1184062.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_DECK,0,1,e:GetHandler())
and Duel.GetMatchingGroup(c1184062.tfilter1,tp,LOCATION_DECK,0,nil):GetClassCount(Card.GetCode)>1 end
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_HAND)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,2,tp,LOCATION_DECK)
end
function c1184062.ofilter1(sg)
return sg:GetClassCount(Card.GetCode)==sg:GetCount()
end
function c1184062.op1(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local sg=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
if sg:GetCount()>0 and Duel.SendtoDeck(sg,nil,2,REASON_EFFECT)>0 then
local dg=Duel.GetMatchingGroup(c1184062.tfilter1,tp,LOCATION_DECK,0,nil)
if dg:GetClassCount(Card.GetCode)<2 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local lg=dg:SelectSubGroup(tp,c1184062.ofilter1,false,2,2)
Duel.SendtoHand(lg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,lg)
end
end
--
expansions/script/c1184063.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·冰淇淋
function c1184063.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1184063,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetTarget(c1184063.tg1)
e1:SetOperation(c1184063.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184063,1))
e2:SetCategory(CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_PHASE+PHASE_END)
e2:SetCountLimit(1)
e2:SetRange(LOCATION_GRAVE)
e2:SetCondition(c1184063.con2)
e2:SetTarget(c1184063.tg2)
e2:SetOperation(c1184063.op2)
c:RegisterEffect(e2)
--
end
--
function c1184063.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.GetMZoneCount(tp)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,c:GetCode(),0,0x11,1800,1800,3,RACE_FAIRY,ATTRIBUTE_WATER+ATTRIBUTE_EARTH)
and not c:IsLocation(LOCATION_MZONE) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function c1184063.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.GetMZoneCount(tp)<1 then return end
if not c:IsRelateToEffect(e) then return end
if Duel.IsPlayerCanSpecialSummonMonster(tp,m,0,0x11,1800,1800,3,RACE_FAIRY,ATTRIBUTE_WATER+ATTRIBUTE_EARTH) then
c:AddMonsterAttribute(TYPE_NORMAL,ATTRIBUTE_WATER+ATTRIBUTE_EARTH)
Duel.SpecialSummon(c,0,tp,tp,true,false,POS_FACEUP)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
e1:SetValue(1)
c:RegisterEffect(e1)
end
end
--
function c1184063.con2(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
and not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_MONSTER)
end
function c1184063.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToHand() end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,1000)
end
function c1184063.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
if Duel.SendtoHand(c,nil,REASON_EFFECT)>0 then
Duel.BreakEffect()
Duel.Recover(tp,1000,REASON_EFFECT)
end
end
--
expansions/script/c1184064.lua deleted 100644 → 0
View file @ 25173dcc
--缤纷假日
function c1184064.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetTarget(c1184064.tg1)
e1:SetOperation(c1184064.op1)
c:RegisterEffect(e1)
--
end
--
function c1184064.BthFilter(c,e,tp)
return c:IsSetCard(0x3e12) and c:IsAbleToHand()
and Duel.IsExistingMatchingCard(c1184064.FusFilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,c)
end
function c1184064.FusFilter(c,e,tp,tc)
return Duel.GetLocationCountFromEx(tp,tp,tc,c)>0
and c:IsSetCard(0x3e12) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
end
function c1184064.AthFilter(c)
return c:IsSetCard(0x3e12) and c:IsType(TYPE_MONSTER)
and c:GetLevel()>0 and c:IsAbleToHand()
end
function c1184064.RitCheckFilter(sg,lv)
return sg:GetSum(Card.GetLevel)==lv
end
function c1184064.RitFilter(c,e,tp,mg)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return false end
if bit.band(c:GetType(),0x81)~=0x81 or not c:IsSetCard(0x3e12)
or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
return mg:CheckSubGroup(c1184064.RitCheckFilter,1,#mg,c:GetLevel())
end
function c1184064.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
local b1=Duel.IsExistingMatchingCard(c1184064.BthFilter,tp,LOCATION_MZONE,0,1,nil,e,tp)
local mg=Duel.GetMatchingGroup(c1184064.AthFilter,tp,LOCATION_DECK,0,nil)
local b2=Duel.IsExistingMatchingCard(c1184064.RitFilter,tp,LOCATION_HAND,0,1,nil,e,tp,mg)
if chk==0 then return (b1 or b2) end
local off=1
local ops={}
local opval={}
if b1 then
ops[off]=aux.Stringid(1184064,0)
opval[off-1]=1
off=off+1
end
if b2 then
ops[off]=aux.Stringid(1184064,1)
opval[off-1]=2
off=off+1
end
local op=Duel.SelectOption(tp,table.unpack(ops))
local sel=opval[op]
e:SetLabel(sel)
if sel==1 then
e:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_MZONE)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
else
e:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
end
end
function c1184064.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local sel=e:GetLabel()
if sel==1 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
local tc=Duel.SelectMatchingCard(tp,c1184064.BthFilter,tp,LOCATION_MZONE,0,1,1,nil,e,tp):GetFirst()
if tc and Duel.SendtoHand(tc,nil,REASON_EFFECT)>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=Duel.SelectMatchingCard(tp,c1184064.FusFilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,tc)
if sg:GetCount()<1 then return end
Duel.SpecialSummon(sg,0,tp,tp,true,true,POS_FACEUP)
end
else
local mg=Duel.GetMatchingGroup(c1184064.AthFilter,tp,LOCATION_DECK,0,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tc=Duel.SelectMatchingCard(tp,c1184064.RitFilter,tp,LOCATION_HAND,0,1,1,nil,e,tp,mg):GetFirst()
if tc then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=mg:SelectSubGroup(tp,c1184064.RitCheckFilter,false,1,#mg,tc:GetLevel())
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
tc:CompleteProcedure()
Duel.ShuffleHand(tp)
end
end
end
--
\ No newline at end of file
expansions/script/c1184071.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·金海蜇
function c1184071.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
e1:SetTarget(c1184071.tg1)
e1:SetOperation(c1184071.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TODECK)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_GRAVE)
e2:SetCost(c1184071.cost2)
e2:SetTarget(c1184071.tg2)
e2:SetOperation(c1184071.op2)
c:RegisterEffect(e2)
--
end
--
function c1184071.tg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
end
function c1184071.op1(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) then
Duel.Destroy(tc,REASON_EFFECT)
end
end
--
function c1184071.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToDeckAsCost() end
Duel.HintSelection(Group.FromCards(e:GetHandler()))
Duel.SendtoDeck(e:GetHandler(),nil,2,REASON_COST)
end
function c1184071.tg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and chkc:IsAbleToDeck() end
if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToDeck,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,e:GetHandler()) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectTarget(tp,Card.IsAbleToDeck,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,e:GetHandler())
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
end
function c1184071.op2(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
Duel.SendtoDeck(tc,nil,1,REASON_EFFECT)
end
--
expansions/script/c1184073.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·肉桂卷
function c1184073.initial_effect(c)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1184073,0))
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetTarget(c1184073.tg1)
e1:SetOperation(c1184073.op1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184073,1))
e2:SetCategory(CATEGORY_LEAVE_GRAVE)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_GRAVE)
e2:SetCost(c1184073.cost2)
e2:SetTarget(c1184073.tg2)
e2:SetOperation(c1184073.op2)
c:RegisterEffect(e2)
--
end
--
function c1184073.tg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsFacedown() and chkc:IsControler(1-tp) end
if chk==0 then return Duel.IsExistingTarget(Card.IsFacedown,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPPO)
Duel.SelectTarget(tp,Card.IsFacedown,tp,0,LOCATION_ONFIELD,1,1,nil)
end
function c1184073.op1(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) then
local e1_1=Effect.CreateEffect(e:GetHandler())
e1_1:SetType(EFFECT_TYPE_SINGLE)
e1_1:SetCode(EFFECT_CANNOT_TRIGGER)
e1_1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_SET_AVAILABLE)
e1_1:SetRange(LOCATION_ONFIELD)
e1_1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1_1,true)
end
end
--
function c1184073.cfilter2(c,tc)
return bit.band(c:GetOriginalType(),TYPE_MONSTER)~=0
and c:IsSetCard(0x3e12)
and c:IsAbleToDeckAsCost() and c:IsFaceup()
and (tc:IsSSetable() or c:IsLocation(LOCATION_SZONE))
end
function c1184073.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c1184073.cfilter2,tp,LOCATION_ONFIELD,0,1,nil,c) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local sg=Duel.SelectMatchingCard(tp,c1184073.cfilter2,tp,LOCATION_ONFIELD,0,1,1,nil,c)
Duel.SendtoDeck(sg,nil,2,REASON_COST)
end
function c1184073.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsSSetable()
or (c:IsSSetable(false) and Duel.IsExistingMatchingCard(c1184073.cfilter2,tp,LOCATION_SZONE,0,1,nil)) end
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
end
function c1184073.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsSSetable() and c:IsRelateToEffect(e) then Duel.SSet(tp,c) end
end
--
\ No newline at end of file
expansions/script/c1184081.lua deleted 100644 → 0
View file @ 25173dcc
--饮食艺术·奶油点心
function c1184081.initial_effect(c)
--
c:EnableReviveLimit()
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(aux.imval1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(1184081,0))
e2:SetCategory(CATEGORY_TODECK)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_HAND)
e2:SetCountLimit(1,1184081)
e2:SetCost(c1184081.cost2)
e2:SetOperation(c1184081.op2)
c:RegisterEffect(e2)
--
end
--
function c1184081.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end
function c1184081.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e2_1=Effect.CreateEffect(c)
e2_1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e2_1:SetCode(EVENT_TO_GRAVE)
e2_1:SetCondition(c1184081.con2_1)
e2_1:SetOperation(c1184081.op2_1)
e2_1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2_1,tp)
local e2_2=Effect.CreateEffect(c)
e2_2:SetDescription(aux.Stringid(1184081,1))
e2_2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e2_2:SetCode(EVENT_CHAIN_SOLVED)
e2_2:SetCondition(c1184081.con2_2)
e2_2:SetOperation(c1184081.op2_2)
e2_2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2_2,tp)
end
function c1184081.cfilter2_1(c)
return c:IsSetCard(0x3e12) and c:IsReason(REASON_EFFECT+REASON_COST)
end
function c1184081.con2_1(e,tp,eg,ep,ev,re,r,rp)
return rp==Duel.GetTurnPlayer()
and re:IsHasType(EFFECT_TYPE_ACTIONS) and not re:IsHasType(EFFECT_TYPE_CONTINUOUS)
and eg:IsExists(c1184081.cfilter2_1,1,nil)
end
function c1184081.op2_1(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(tp,1184081,RESET_CHAIN,0,1)
end
function c1184081.con2_2(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFlagEffect(tp,1184081)>0
end
function c1184081.op2_2(e,tp,eg,ep,ev,re,r,rp)
local al=Duel.GetFlagEffect(tp,1184081)
local num=Duel.GetMatchingGroupCount(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,nil)
Duel.ResetFlagEffect(tp,1184081)
local ct=math.min(al,num)
if ct>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local sg=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,ct,ct,nil)
if sg:GetCount()>0 then
Duel.Hint(HINT_CARD,tp,1184081)
Duel.SendtoDeck(sg,nil,2,REASON_EFFECT)
end
end
end
--
\ No newline at end of file
expansions/script/c13254031.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c13254032.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c13254033.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c13254034.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c13254035.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c13254036.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c13254037.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c13254040.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c13254060.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c13254068.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c13255411.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c14824018.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c14824033.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c22020720.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c22020740.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c22020810.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c25000000.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c25000001.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c25000403.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c3001010.lua deleted 100644 → 0
View file @ 25173dcc
This diff is collapsed.
expansions/script/c3001011.lua deleted 100644 → 0
View file @ 25173dcc
This diff is collapsed.
expansions/script/c3001012.lua deleted 100644 → 0
View file @ 25173dcc
This diff is collapsed.
expansions/script/c33400711.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715001.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715002.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715003.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715004.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715005.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715006.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715008.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715009.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715010.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715011.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715012.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c53715013.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60000006.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001129.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001137.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001139.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001141.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001143.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001158.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001159.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001160.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001161.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001162.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001163.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001164.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001165.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c60001166.lua 0 → 100644
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c79029505.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c79029506.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c79029515.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c79029516.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c79029520.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c79029521.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c79029525.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c79029526.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c79029566.lua
View file @ abe8b3d8
This diff is collapsed.
expansions/script/c88990222.lua deleted 100644 → 0
View file @ 25173dcc
This diff is collapsed.
expansions/script/desktop.ini
View file @ abe8b3d8
This diff is collapsed.
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