Skip to content

Y
ygopro-222DIY-cards
Commit 44ae38e0 authored by TanakaKotoha's avatar TanakaKotoha
Browse files
Options

fbk

parent 14bcc784
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 1491 additions and 1341 deletions
expansions/script/c47500000.lua
View file @ 44ae38e0
...@@ -56,6 +56,6 @@ function c47500000.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -56,6 +56,6 @@ function c47500000.penop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47500000.penfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47500000.penfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47500011.lua
View file @ 44ae38e0
...@@ -87,7 +87,7 @@ function c47500011.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -87,7 +87,7 @@ function c47500011.penop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47500011.penfilter,tp,LOCATION_EXTRA,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47500011.penfilter,tp,LOCATION_EXTRA,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_LEAVE_FIELD_REDIRECT) e1:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
......
expansions/script/c47500017.lua
View file @ 44ae38e0
...@@ -74,7 +74,7 @@ function c47500017.teop(e,tp,eg,ep,ev,re,r,rp) ...@@ -74,7 +74,7 @@ function c47500017.teop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47500017.penfilter,tp,LOCATION_EXTRA,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47500017.penfilter,tp,LOCATION_EXTRA,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
local code=tc:GetOriginalCode() local code=tc:GetOriginalCode()
if tc and Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) then if tc and Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c47500017.tefilter,tp,LOCATION_DECK,0,1,1,code) local g=Duel.SelectMatchingCard(tp,c47500017.tefilter,tp,LOCATION_DECK,0,1,1,code)
if g:GetCount()>0 then if g:GetCount()>0 then
......
expansions/script/c47500031.lua
View file @ 44ae38e0
...@@ -55,7 +55,7 @@ function c47500031.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -55,7 +55,7 @@ function c47500031.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=g:Select(tp,1,ct,nil) local sg=g:Select(tp,1,ct,nil)
local sc=sg:GetFirst() local sc=sg:GetFirst()
while sc do while sc do
Duel.MoveToField(sc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(sc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
sc=sg:GetNext() sc=sg:GetNext()
end end
end end
......
expansions/script/c47501007.lua
View file @ 44ae38e0
...@@ -139,7 +139,7 @@ function c47501007.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -139,7 +139,7 @@ function c47501007.thop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47501007.penfilter,tp,LOCATION_EXTRA,0,2,2,nil) local g=Duel.SelectMatchingCard(tp,c47501007.penfilter,tp,LOCATION_EXTRA,0,2,2,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
tc=g:GetNext() tc=g:GetNext()
end end
end end
......
expansions/script/c47510044.lua
View file @ 44ae38e0
...@@ -95,7 +95,7 @@ function c47510044.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -95,7 +95,7 @@ function c47510044.penop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47510044.penfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47510044.penfilter,tp,LOCATION_DECK,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
......
expansions/script/c47510046.lua
View file @ 44ae38e0
...@@ -151,7 +151,7 @@ function c47510046.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -151,7 +151,7 @@ function c47510046.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47510046.backon(e,tp,eg,ep,ev,re,r,rp) function c47510046.backon(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c47510084.lua
View file @ 44ae38e0
...@@ -180,6 +180,6 @@ function c47510084.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -180,6 +180,6 @@ function c47510084.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510095.lua
View file @ 44ae38e0
...@@ -40,7 +40,7 @@ function c47510095.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -40,7 +40,7 @@ function c47510095.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=g:Select(tp,1,ct,nil) local sg=g:Select(tp,1,ct,nil)
local sc=sg:GetFirst() local sc=sg:GetFirst()
while sc do while sc do
Duel.MoveToField(sc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(sc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
sc=sg:GetNext() sc=sg:GetNext()
end end
end end
......
expansions/script/c47510096.lua
View file @ 44ae38e0
...@@ -40,7 +40,7 @@ function c47510096.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -40,7 +40,7 @@ function c47510096.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=g:Select(tp,1,ct,nil) local sg=g:Select(tp,1,ct,nil)
local sc=sg:GetFirst() local sc=sg:GetFirst()
while sc do while sc do
Duel.MoveToField(sc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(sc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
sc=sg:GetNext() sc=sg:GetNext()
end end
end end
......
expansions/script/c47510097.lua
View file @ 44ae38e0
...@@ -40,7 +40,7 @@ function c47510097.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -40,7 +40,7 @@ function c47510097.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=g:Select(tp,1,ct,nil) local sg=g:Select(tp,1,ct,nil)
local sc=sg:GetFirst() local sc=sg:GetFirst()
while sc do while sc do
Duel.MoveToField(sc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(sc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
sc=sg:GetNext() sc=sg:GetNext()
end end
end end
......
expansions/script/c47510098.lua
View file @ 44ae38e0
...@@ -40,7 +40,7 @@ function c47510098.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -40,7 +40,7 @@ function c47510098.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=g:Select(tp,1,ct,nil) local sg=g:Select(tp,1,ct,nil)
local sc=sg:GetFirst() local sc=sg:GetFirst()
while sc do while sc do
Duel.MoveToField(sc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(sc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
sc=sg:GetNext() sc=sg:GetNext()
end end
end end
......
expansions/script/c47510099.lua
View file @ 44ae38e0
...@@ -40,7 +40,7 @@ function c47510099.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -40,7 +40,7 @@ function c47510099.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=g:Select(tp,1,ct,nil) local sg=g:Select(tp,1,ct,nil)
local sc=sg:GetFirst() local sc=sg:GetFirst()
while sc do while sc do
Duel.MoveToField(sc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(sc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
sc=sg:GetNext() sc=sg:GetNext()
end end
end end
......
expansions/script/c47510100.lua
View file @ 44ae38e0
...@@ -40,7 +40,7 @@ function c47510100.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -40,7 +40,7 @@ function c47510100.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=g:Select(tp,1,ct,nil) local sg=g:Select(tp,1,ct,nil)
local sc=sg:GetFirst() local sc=sg:GetFirst()
while sc do while sc do
Duel.MoveToField(sc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(sc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
sc=sg:GetNext() sc=sg:GetNext()
end end
end end
......
expansions/script/c47510101.lua
View file @ 44ae38e0
...@@ -184,6 +184,6 @@ function c47510101.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -184,6 +184,6 @@ function c47510101.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510103.lua
View file @ 44ae38e0
...@@ -200,6 +200,6 @@ function c47510103.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -200,6 +200,6 @@ function c47510103.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510107.lua
View file @ 44ae38e0
...@@ -133,6 +133,6 @@ function c47510107.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -133,6 +133,6 @@ function c47510107.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510111.lua
View file @ 44ae38e0
...@@ -165,6 +165,6 @@ function c47510111.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -165,6 +165,6 @@ function c47510111.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510115.lua
View file @ 44ae38e0
...@@ -97,6 +97,6 @@ function c47510115.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -97,6 +97,6 @@ function c47510115.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510119.lua
View file @ 44ae38e0
...@@ -179,6 +179,6 @@ function c47510119.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -179,6 +179,6 @@ function c47510119.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510129.lua
View file @ 44ae38e0
...@@ -73,7 +73,7 @@ function c47510129.psop(e,tp,eg,ep,ev,re,r,rp) ...@@ -73,7 +73,7 @@ function c47510129.psop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47510129.psfilter,tp,LOCATION_EXTRA,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47510129.psfilter,tp,LOCATION_EXTRA,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
local atk=tc:GetLeftScale() local atk=tc:GetLeftScale()
if g:GetCount()>0 and Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_SZONE,POS_FACEUP,true) then if g:GetCount()>0 and Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true) then
local dg=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,0,nil) local dg=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,0,nil)
Duel.BreakEffect() Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
......
expansions/script/c47510233.lua
View file @ 44ae38e0
...@@ -136,6 +136,6 @@ function c47510233.tpop(e,tp,eg,ep,ev,re,r,rp) ...@@ -136,6 +136,6 @@ function c47510233.tpop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510235.lua
View file @ 44ae38e0
...@@ -79,7 +79,7 @@ function c47510235.tpop(e,tp,eg,ep,ev,re,r,rp) ...@@ -79,7 +79,7 @@ function c47510235.tpop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47510235.atktg(e,c) function c47510235.atktg(e,c)
......
expansions/script/c47510237.lua
View file @ 44ae38e0
...@@ -123,7 +123,7 @@ function c47510237.tpop(e,tp,eg,ep,ev,re,r,rp) ...@@ -123,7 +123,7 @@ function c47510237.tpop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47510237.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c47510237.cost(e,tp,eg,ep,ev,re,r,rp,chk)
......
expansions/script/c47510239.lua
View file @ 44ae38e0
...@@ -69,7 +69,7 @@ function c47510239.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -69,7 +69,7 @@ function c47510239.thop(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then if g:GetCount()>0 then
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
......
expansions/script/c47510252.lua
View file @ 44ae38e0
...@@ -122,7 +122,7 @@ function c47510252.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -122,7 +122,7 @@ function c47510252.thop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47510252.penfilter,tp,LOCATION_EXTRA+LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47510252.penfilter,tp,LOCATION_EXTRA+LOCATION_GRAVE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
...@@ -139,7 +139,7 @@ function c47510252.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -139,7 +139,7 @@ function c47510252.penop(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 and Duel.SendtoHand(g,tp,REASON_EFFECT) then if g:GetCount()>0 and Duel.SendtoHand(g,tp,REASON_EFFECT) then
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
...@@ -175,7 +175,7 @@ function c47510252.tfop(e,tp,eg,ep,ev,re,r,rp) ...@@ -175,7 +175,7 @@ function c47510252.tfop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47510252.tffilter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47510252.tffilter,tp,LOCATION_GRAVE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
local e2=Effect.CreateEffect(tc) local e2=Effect.CreateEffect(tc)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetRange(LOCATION_SZONE) e2:SetRange(LOCATION_SZONE)
......
expansions/script/c47510260.lua
View file @ 44ae38e0
...@@ -172,6 +172,6 @@ end ...@@ -172,6 +172,6 @@ end
function c47510260.penop(e,tp,eg,ep,ev,re,r,rp) function c47510260.penop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(tp,LOCATION_PZONE,0) local g=Duel.GetFieldGroup(tp,LOCATION_PZONE,0)
if Duel.Destroy(g,REASON_EFFECT)~=0 and e:GetHandler():IsRelateToEffect(e) then if Duel.Destroy(g,REASON_EFFECT)~=0 and e:GetHandler():IsRelateToEffect(e) then
Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510269.lua
View file @ 44ae38e0
This diff is collapsed.
expansions/script/c47510280.lua
View file @ 44ae38e0
...@@ -144,11 +144,11 @@ end ...@@ -144,11 +144,11 @@ end
function c47510280.penop(e,tp,eg,ep,ev,re,r,rp) function c47510280.penop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,0) local g=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,0)
if Duel.Destroy(g,REASON_EFFECT)~=0 and e:GetHandler():IsRelateToEffect(e) then if Duel.Destroy(g,REASON_EFFECT)~=0 and e:GetHandler():IsRelateToEffect(e) then
if Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEUP,true)~=0 then if Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)~=0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,c47510280.pcfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47510280.pcfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
......
expansions/script/c47510402.lua
View file @ 44ae38e0
This diff is collapsed.
expansions/script/c47511000.lua
View file @ 44ae38e0
...@@ -125,6 +125,6 @@ function c47511000.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -125,6 +125,6 @@ function c47511000.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47514896.lua
View file @ 44ae38e0
This diff is collapsed.
expansions/script/c47514966.lua
View file @ 44ae38e0
...@@ -59,7 +59,7 @@ function c47514966.pcop(e,tp,eg,ep,ev,re,r,rp) ...@@ -59,7 +59,7 @@ function c47514966.pcop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,c47514966.pcfilter,tp,LOCATION_EXTRA,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47514966.pcfilter,tp,LOCATION_EXTRA,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47514966.chcon(e,tp,eg,ep,ev,re,r,rp) function c47514966.chcon(e,tp,eg,ep,ev,re,r,rp)
...@@ -104,6 +104,6 @@ end ...@@ -104,6 +104,6 @@ end
function c47514966.penop(e,tp,eg,ep,ev,re,r,rp) function c47514966.penop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(tp,LOCATION_PZONE,LOCATION_PZONE) local g=Duel.GetFieldGroup(tp,LOCATION_PZONE,LOCATION_PZONE)
if Duel.SendtoDeck(g,REASON_EFFECT)~=0 and e:GetHandler():IsRelateToEffect(e) then if Duel.SendtoDeck(g,REASON_EFFECT)~=0 and e:GetHandler():IsRelateToEffect(e) then
Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47517001.lua
View file @ 44ae38e0
...@@ -76,7 +76,7 @@ function c47517001.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -76,7 +76,7 @@ function c47517001.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47517001.tffilter,tp,LOCATION_HAND,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47517001.tffilter,tp,LOCATION_HAND,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
local tc1=g:GetFirst() local tc1=g:GetFirst()
if tc1 and Duel.MoveToField(tc1,tp,tp,LOCATION_SZONE,POS_FACEUP,true) then if tc1 and Duel.MoveToField(tc1,tp,tp,LOCATION_PZONE,POS_FACEUP,true) then
local e4=Effect.CreateEffect(tc1) local e4=Effect.CreateEffect(tc1)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetRange(LOCATION_SZONE) e4:SetRange(LOCATION_SZONE)
......
expansions/script/c47520003.lua
View file @ 44ae38e0
This diff is collapsed.
expansions/script/c47520015.lua
View file @ 44ae38e0
...@@ -149,6 +149,6 @@ function c47520015.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -149,6 +149,6 @@ function c47520015.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47530002.lua
View file @ 44ae38e0
...@@ -2,96 +2,96 @@ ...@@ -2,96 +2,96 @@
local m=47530002 local m=47530002
local cm=_G["c"..m] local cm=_G["c"..m]
function c47530002.initial_effect(c) function c47530002.initial_effect(c)
c:SetSPSummonOnce(47530002) c:SetSPSummonOnce(47530002)
--link summon --link summon
aux.AddLinkProcedure(c,c47530002.lfilter,2,2) aux.AddLinkProcedure(c,c47530002.lfilter,2,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--recover --recover
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(47530002,1)) e1:SetDescription(aux.Stringid(47530002,1))
e1:SetCategory(CATEGORY_RECOVER) e1:SetCategory(CATEGORY_RECOVER)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP) e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCondition(c47530002.reccon) e1:SetCondition(c47530002.reccon)
e1:SetTarget(c47530002.rectg) e1:SetTarget(c47530002.rectg)
e1:SetOperation(c47530002.recop) e1:SetOperation(c47530002.recop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--special summon --special summon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(47530002,0)) e2:SetDescription(aux.Stringid(47530002,0))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,47530002) e2:SetCountLimit(1,47530002)
e2:SetTarget(c47530002.sptg) e2:SetTarget(c47530002.sptg)
e2:SetOperation(c47530002.spop) e2:SetOperation(c47530002.spop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c47530002.lfilter(c) function c47530002.lfilter(c)
return c:IsLevel(10) and c:IsRace(RACE_MACHINE) return c:IsLevel(10) and c:IsRace(RACE_MACHINE)
end end
function c47530002.filter(c) function c47530002.filter(c)
return c:IsFaceup() return c:IsFaceup()
end end
function c47530002.reccon(e,tp,eg,ep,ev,re,r,rp) function c47530002.reccon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK) return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
end end
function c47530002.rectg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c47530002.rectg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c47530002.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c47530002.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c47530002.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c47530002.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
local g=Duel.SelectTarget(tp,c47530002.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,c47530002.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,g:GetFirst():GetAttack()) Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,g:GetFirst():GetAttack())
end end
function c47530002.penfilter(c) function c47530002.penfilter(c)
return c:IsFaceup() and c:IsRace(RACE_MACHINE) return c:IsFaceup() and c:IsRace(RACE_MACHINE)
end end
function c47530002.recop(e,tp,eg,ep,ev,re,r,rp) function c47530002.recop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsFaceup() then if tc:IsRelateToEffect(e) and tc:IsFaceup() then
if Duel.Recover(tp,tc:GetAttack(),REASON_EFFECT) and Duel.SelectYesNo(tp,aux.Stringid(47530002,0)) then if Duel.Recover(tp,tc:GetAttack(),REASON_EFFECT) and Duel.SelectYesNo(tp,aux.Stringid(47530002,0)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,c47530002.penfilter,tp,LOCATION_EXTRA,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47530002.penfilter,tp,LOCATION_EXTRA,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
end end
function c47530002.lkfilter(c) function c47530002.lkfilter(c)
return c:IsFaceup() and c:IsType(TYPE_LINK) return c:IsFaceup() and c:IsType(TYPE_LINK)
end end
function c47530002.spfilter(c,e,tp,zone) function c47530002.spfilter(c,e,tp,zone)
return (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup()) and c:IsRace(RACE_MACHINE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) return (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup()) and c:IsRace(RACE_MACHINE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
end end
function c47530002.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c47530002.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local zone=aux.GetMultiLinkedZone(tp) local zone=aux.GetMultiLinkedZone(tp)
if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and c47530002.spfilter(chkc,e,tp,zone) end if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and c47530002.spfilter(chkc,e,tp,zone) end
if chk==0 then return zone~=0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return zone~=0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c47530002.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp,zone) end and Duel.IsExistingTarget(c47530002.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp,zone) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c47530002.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp,zone) local g=Duel.SelectTarget(tp,c47530002.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp,zone)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end end
function c47530002.spop(e,tp,eg,ep,ev,re,r,rp) function c47530002.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local zone=aux.GetMultiLinkedZone(tp) local zone=aux.GetMultiLinkedZone(tp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if zone~=0 and tc:IsRelateToEffect(e) then if zone~=0 and tc:IsRelateToEffect(e) then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP,zone) Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP,zone)
end end
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e2:SetTargetRange(1,0) e2:SetTargetRange(1,0)
e2:SetTarget(c47530002.splimit) e2:SetTarget(c47530002.splimit)
e2:SetReset(RESET_PHASE+PHASE_END) e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
end end
function c47530002.splimit(e,c) function c47530002.splimit(e,c)
return not c:IsRace(RACE_MACHINE) return not c:IsRace(RACE_MACHINE)
end end
\ No newline at end of file
expansions/script/c47530003.lua
View file @ 44ae38e0
...@@ -2,95 +2,95 @@ ...@@ -2,95 +2,95 @@
local m=47530003 local m=47530003
local cm=_G["c"..m] local cm=_G["c"..m]
function c47530003.initial_effect(c) function c47530003.initial_effect(c)
c:SetSPSummonOnce(47530003) c:SetSPSummonOnce(47530003)
--link summon --link summon
aux.AddLinkProcedure(c,c47530003.lfilter,2,2) aux.AddLinkProcedure(c,c47530003.lfilter,2,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--recover --recover
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(47530003,1)) e1:SetDescription(aux.Stringid(47530003,1))
e1:SetCategory(CATEGORY_RECOVER) e1:SetCategory(CATEGORY_RECOVER)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP) e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCondition(c47530003.reccon) e1:SetCondition(c47530003.reccon)
e1:SetTarget(c47530003.rectg) e1:SetTarget(c47530003.rectg)
e1:SetOperation(c47530003.recop) e1:SetOperation(c47530003.recop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--special summon --special summon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(47530003,0)) e2:SetDescription(aux.Stringid(47530003,0))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,47530003) e2:SetCountLimit(1,47530003)
e2:SetTarget(c47530003.sptg) e2:SetTarget(c47530003.sptg)
e2:SetOperation(c47530003.spop) e2:SetOperation(c47530003.spop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c47530003.lfilter(c) function c47530003.lfilter(c)
return c:IsLevel(10) and c:IsRace(RACE_MACHINE) return c:IsLevel(10) and c:IsRace(RACE_MACHINE)
end end
function c47530003.filter(c) function c47530003.filter(c)
return c:IsFaceup() return c:IsFaceup()
end end
function c47530003.reccon(e,tp,eg,ep,ev,re,r,rp) function c47530003.reccon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK) return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
end end
function c47530003.rectg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c47530003.rectg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c47530003.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c47530003.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c47530003.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c47530003.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
local g=Duel.SelectTarget(tp,c47530003.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,c47530003.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,g:GetFirst():GetAttack()) Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,g:GetFirst():GetAttack())
end end
function c47530003.penfilter(c) function c47530003.penfilter(c)
return c:IsFaceup() and c:IsRace(RACE_MACHINE) return c:IsFaceup() and c:IsRace(RACE_MACHINE)
end end
function c47530003.recop(e,tp,eg,ep,ev,re,r,rp) function c47530003.recop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsFaceup() then if tc:IsRelateToEffect(e) and tc:IsFaceup() then
if Duel.Recover(tp,tc:GetAttack(),REASON_EFFECT) and Duel.SelectYesNo(tp,aux.Stringid(47530003,0)) then if Duel.Recover(tp,tc:GetAttack(),REASON_EFFECT) and Duel.SelectYesNo(tp,aux.Stringid(47530003,0)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,c47530003.penfilter,tp,LOCATION_EXTRA,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47530003.penfilter,tp,LOCATION_EXTRA,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
end end
function c47530003.lkfilter(c) function c47530003.lkfilter(c)
return c:IsFaceup() and c:IsType(TYPE_LINK) return c:IsFaceup() and c:IsType(TYPE_LINK)
end end
function c47530003.spfilter(c,e,tp,zone) function c47530003.spfilter(c,e,tp,zone)
return c:IsRace(RACE_MACHINE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) return c:IsRace(RACE_MACHINE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
end end
function c47530003.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47530003.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
local zone=aux.GetMultiLinkedZone(tp) local zone=aux.GetMultiLinkedZone(tp)
if chk==0 then return zone~=0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return zone~=0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c47530003.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp,zone) end and Duel.IsExistingMatchingCard(c47530003.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp,zone) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
end end
function c47530003.spop(e,tp,eg,ep,ev,re,r,rp) function c47530003.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local zone=aux.GetMultiLinkedZone(tp) local zone=aux.GetMultiLinkedZone(tp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or zone==0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or zone==0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47530003.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp,zone) local g=Duel.SelectMatchingCard(tp,c47530003.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp,zone)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP,zone) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP,zone)
end end
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e2:SetTargetRange(1,0) e2:SetTargetRange(1,0)
e2:SetTarget(c47530003.splimit) e2:SetTarget(c47530003.splimit)
e2:SetReset(RESET_PHASE+PHASE_END) e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
end end
function c47530003.splimit(e,c) function c47530003.splimit(e,c)
return not c:IsRace(RACE_MACHINE) return not c:IsRace(RACE_MACHINE)
end end
\ No newline at end of file
expansions/script/c47530023.lua
View file @ 44ae38e0
This diff is collapsed.
expansions/script/c47530035.lua
View file @ 44ae38e0
...@@ -72,7 +72,7 @@ function c47530035.teop(e,tp,eg,ep,ev,re,r,rp) ...@@ -72,7 +72,7 @@ function c47530035.teop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.SendtoExtraP(c,tp,REASON_EFFECT) Duel.SendtoExtraP(c,tp,REASON_EFFECT)
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47530035.xyzcon(e,tp,eg,ep,ev,re,r,rp) function c47530035.xyzcon(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c47550001.lua
View file @ 44ae38e0
...@@ -85,7 +85,7 @@ function c47550001.fop1(e,tp,eg,ep,ev,re,r,rp) ...@@ -85,7 +85,7 @@ function c47550001.fop1(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateAttack() and Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)~=0 then if Duel.NegateAttack() and Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)~=0 then
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
c:RegisterFlagEffect(47550001,RESET_EVENT+RESETS_STANDARD,0,1) c:RegisterFlagEffect(47550001,RESET_EVENT+RESETS_STANDARD,0,1)
end end
end end
...@@ -110,7 +110,7 @@ function c47550001.fop2(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -110,7 +110,7 @@ function c47550001.fop2(e,tp,eg,ep,ev,re,r,rp,chk)
if Duel.NegateEffect(ev) and Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)~=0 then if Duel.NegateEffect(ev) and Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)~=0 then
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
c:RegisterFlagEffect(47550001,RESET_EVENT+RESETS_STANDARD,0,1) c:RegisterFlagEffect(47550001,RESET_EVENT+RESETS_STANDARD,0,1)
end end
end end
......
expansions/script/c47550007.lua
View file @ 44ae38e0
...@@ -118,7 +118,7 @@ function c47550007.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -118,7 +118,7 @@ function c47550007.penop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
local c=e:GetHandler() local c=e:GetHandler()
if tc and Duel.Destroy(c,REASON_EFFECT)~=0 then if tc and Duel.Destroy(c,REASON_EFFECT)~=0 then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_LEAVE_FIELD_REDIRECT) e1:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
......
expansions/script/c47550008.lua
View file @ 44ae38e0
...@@ -110,7 +110,7 @@ function c47550008.tfop(e,tp,eg,ep,ev,re,r,rp) ...@@ -110,7 +110,7 @@ function c47550008.tfop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47550008.tffilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47550008.tffilter,tp,LOCATION_DECK,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetCode(EFFECT_CHANGE_TYPE) e1:SetCode(EFFECT_CHANGE_TYPE)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
......
expansions/script/c47550017.lua
View file @ 44ae38e0
This diff is collapsed.
expansions/script/c47551109.lua
View file @ 44ae38e0
...@@ -95,7 +95,7 @@ function c47551109.tpenop(e,tp,eg,ep,ev,re,r,rp) ...@@ -95,7 +95,7 @@ function c47551109.tpenop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47551109.tpenfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47551109.tpenfilter,tp,LOCATION_DECK,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
...@@ -111,7 +111,7 @@ end ...@@ -111,7 +111,7 @@ end
function c47551109.penop(e,tp,eg,ep,ev,re,r,rp) function c47551109.penop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(tp,LOCATION_PZONE,0) local g=Duel.GetFieldGroup(tp,LOCATION_PZONE,0)
if Duel.Destroy(g,REASON_EFFECT)~=0 and e:GetHandler():IsRelateToEffect(e) then if Duel.Destroy(g,REASON_EFFECT)~=0 and e:GetHandler():IsRelateToEffect(e) then
Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47551109.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c47551109.cost(e,tp,eg,ep,ev,re,r,rp,chk)
......
expansions/script/c47552431.lua
View file @ 44ae38e0
--露☆娜☆酱 --露☆娜☆酱
function c47552431.initial_effect(c) function c47552431.initial_effect(c)
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableCounterPermit(0x1,LOCATION_PZONE+LOCATION_MZONE) c:EnableCounterPermit(0x1,LOCATION_PZONE+LOCATION_MZONE)
--pendulum set --pendulum set
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DESTROY) e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,47552431) e1:SetCountLimit(1,47552431)
e1:SetCondition(c47552431.pencon) e1:SetCondition(c47552431.pencon)
e1:SetTarget(c47552431.pentg) e1:SetTarget(c47552431.pentg)
e1:SetOperation(c47552431.penop) e1:SetOperation(c47552431.penop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--add counter --add counter
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetCode(EVENT_CHAINING) e2:SetCode(EVENT_CHAINING)
e2:SetRange(LOCATION_PZONE+LOCATION_MZONE) e2:SetRange(LOCATION_PZONE+LOCATION_MZONE)
e2:SetOperation(aux.chainreg) e2:SetOperation(aux.chainreg)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e3:SetCode(EVENT_CHAIN_SOLVED) e3:SetCode(EVENT_CHAIN_SOLVED)
e3:SetRange(LOCATION_PZONE+LOCATION_MZONE) e3:SetRange(LOCATION_PZONE+LOCATION_MZONE)
e3:SetOperation(c47552431.acop) e3:SetOperation(c47552431.acop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--serch --serch
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e4:SetType(EFFECT_TYPE_IGNITION) e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetProperty(EFFECT_FLAG_DELAY) e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1,47552432) e4:SetCountLimit(1,47552432)
e4:SetCost(c47552431.tgcost) e4:SetCost(c47552431.tgcost)
e4:SetTarget(c47552431.tgtg) e4:SetTarget(c47552431.tgtg)
e4:SetOperation(c47552431.tgop) e4:SetOperation(c47552431.tgop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c47552431.pencon(e,tp,eg,ep,ev,re,r,rp) function c47552431.pencon(e,tp,eg,ep,ev,re,r,rp)
return not Duel.IsExistingMatchingCard(nil,tp,LOCATION_PZONE,0,1,e:GetHandler()) return not Duel.IsExistingMatchingCard(nil,tp,LOCATION_PZONE,0,1,e:GetHandler())
end end
function c47552431.penfilter(c) function c47552431.penfilter(c)
return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_SPELLCASTER) and c:IsLevel(8) and c:IsType(TYPE_PENDULUM) and not c:IsForbidden() return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_SPELLCASTER) and c:IsLevel(8) and c:IsType(TYPE_PENDULUM) and not c:IsForbidden()
end end
function c47552431.pentg(e,tp,eg,ep,ev,re,r,rp,chk) function c47552431.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsDestructable() if chk==0 then return e:GetHandler():IsDestructable()
and Duel.IsExistingMatchingCard(c47552431.penfilter,tp,LOCATION_DECK,0,1,nil) end and Duel.IsExistingMatchingCard(c47552431.penfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
end end
function c47552431.penop(e,tp,eg,ep,ev,re,r,rp) function c47552431.penop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
if Duel.Destroy(e:GetHandler(),REASON_EFFECT)~=0 then if Duel.Destroy(e:GetHandler(),REASON_EFFECT)~=0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,c47552431.penfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47552431.penfilter,tp,LOCATION_DECK,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
function c47552431.acop(e,tp,eg,ep,ev,re,r,rp) function c47552431.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x1,2) e:GetHandler():AddCounter(0x1,2)
end end
end end
function c47552431.tgcost(e,tp,eg,ep,ev,re,r,rp,chk) function c47552431.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,4,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,4,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x1,4,REASON_COST) Duel.RemoveCounter(tp,1,0,0x1,4,REASON_COST)
end end
function c47552431.tgfilter(c) function c47552431.tgfilter(c)
return c:IsRace(RACE_SPELLCASTER) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsAbleToGrave() return c:IsRace(RACE_SPELLCASTER) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsAbleToGrave()
end end
function c47552431.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) function c47552431.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c47552431.filter,tp,LOCATION_DECK,0,1,nil,tp) end if chk==0 then return Duel.IsExistingMatchingCard(c47552431.filter,tp,LOCATION_DECK,0,1,nil,tp) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_DECK)
end end
function c47552431.tgop(e,tp,eg,ep,ev,re,r,rp) function c47552431.tgop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c47552431.tgfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47552431.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.Destroy(g,REASON_EFFECT,LOCATION_GRAVE) Duel.Destroy(g,REASON_EFFECT,LOCATION_GRAVE)
end end
end end
\ No newline at end of file
expansions/script/c47570200.lua
View file @ 44ae38e0
--世界树·马格纳 --世界树·马格纳
local m=47570200 function c47570200.initial_effect(c)
local cm=_G["c"..m] --synchro summon
function cm.initial_effect(c) aux.AddSynchroProcedure(c,c47570200.synfilter,aux.NonTuner(c47570200.synfilter1),1)
c:EnableReviveLimit()
--splimit
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetTargetRange(1,0)
e1:SetTarget(c47570200.psplimit)
c:RegisterEffect(e1)
--inactivatable
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_INACTIVATE)
e2:SetRange(LOCATION_PZONE)
e2:SetValue(c47570200.effectfilter)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_CANNOT_DISEFFECT)
e3:SetRange(LOCATION_PZONE)
e3:SetValue(c47570200.effectfilter)
c:RegisterEffect(e3)
--special summon
local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetCondition(c47570200.spcon)
e4:SetOperation(c47570200.spop)
c:RegisterEffect(e4)
--special summon2
local e5=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(47570200,0))
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e5:SetCode(EVENT_TO_DECK)
e5:SetRange(LOCATION_MZONE)
e5:SetCountLimit(1)
e5:SetCondition(c47570200.spcon)
e5:SetTarget(c47570200.sptg2)
e5:SetOperation(c47570200.spop2)
c:RegisterEffect(e5)
local e6=e5:Clone()
e6:SetCode(EVENT_TO_GRAVE)
e6:SetCondition(c47570200.spcon2)
c:RegisterEffect(e6)
--cannot effect
local e7=Effect.CreateEffect(c)
e7:SetDescription(aux.Stringid(47570200,1))
e7:SetType(EFFECT_TYPE_QUICK_O)
e7:SetCode(EVENT_FREE_CHAIN)
e7:SetHintTiming(0,TIMING_DRAW_PHASE)
e7:SetRange(LOCATION_MZONE)
e7:SetCost(c47570200.efcost)
e7:SetOperation(c47570200.efop)
c:RegisterEffect(e7)
end end
function c47570200.synfilter(c)
return c:IsRace(RACE_PLANT)
end
function c47570200.synfilter1(c)
return c:IsRace(RACE_PLANT) or c:IsType(TYPE_PENDULUM)
end
function c47570200.pefilter(c)
return c:IsRace(RACE_PLANT) or c:IsSetCard(0x5da) or c:IsAttribute(ATTRIBUTE_EARTH)
end
function c47570200.psplimit(e,c,tp,sumtp,sumpos)
return not c47570200.pefilter(c) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
end
function c47570200.effectfilter(e,ct)
local p=e:GetHandler():GetControler()
local te,tp,loc=Duel.GetChainInfo(ct,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER,CHAININFO_TRIGGERING_LOCATION)
return p==tp and te:GetHandler():IsRace(RACE_PLANT) and bit.band(loc,LOCATION_ONFIELD)~=0
end
function c47570200.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end
function c47570200.filter(c,e,tp)
return c:IsRace(RACE_PLANT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
end
function c47570200.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47570200.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
function c47570200.tefilter(c,tp)
return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_EXTRA) and c:IsRace(RACE_PLANT)
and c:IsPreviousLocation(LOCATION_ONFIELD)
end
function c47570200.spcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c47570200.tefilter,1,nil,tp)
end
function c47570200.tgfilter(c,tp)
return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_GRAVE) and c:IsRace(RACE_PLANT)
and c:IsPreviousLocation(LOCATION_ONFIELD)
end
function c47570200.spcon2(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c47570200.tgfilter,1,nil,tp)
end
function c47570200.filter2(c,e,tp)
return c:IsAttribute(ATTRIBUTE_EARTH) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c47570200.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c47570200.filter2,tp,LOCATION_HAND,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
end
function c47570200.spop2(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_MZONE)>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47570200.filter2,tp,LOCATION_DECK,0,1,1,nil,e,tp)
local tc=g:GetFirst()
if tc and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CHANGE_LEVEL)
e1:SetValue(8)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCod(EFFECT_ADD_TYPE)
e2:SetValue(TYPE_TUNER)
tc:RegisterEffect(e2)
end
Duel.SpecialSummonComplete()
end
end
function c47570200.efcost(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 c47570200.efop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_CANNOT_ACTIVATE)
e1:SetTargetRange(1,1)
e1:SetValue(c47570200.aclimit)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
function c47570200.aclimit(e,re,tp)
local c=re:GetHandler()
return re:IsActiveType(TYPE_MONSTER) and not c:IsRace(RACE_PLANT)
end
\ No newline at end of file
expansions/script/c47570500.lua
View file @ 44ae38e0
...@@ -96,7 +96,7 @@ function c47570500.tfop(e,tp,eg,ep,ev,re,r,rp) ...@@ -96,7 +96,7 @@ function c47570500.tfop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local sg=g1:Select(tp,1,2,nil) local sg=g1:Select(tp,1,2,nil)
for tc in aux.Next(sg) do for tc in aux.Next(sg) do
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
tc:RegisterFlagEffect(47570500,RESET_EVENT+0x7e0000+RESET_PHASE+PHASE_END,0,1) tc:RegisterFlagEffect(47570500,RESET_EVENT+0x7e0000+RESET_PHASE+PHASE_END,0,1)
end end
end end
...@@ -116,7 +116,7 @@ function c47570500.tpop(e,tp,eg,ep,ev,re,r,rp) ...@@ -116,7 +116,7 @@ function c47570500.tpop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47570500.rtgfilter(c) function c47570500.rtgfilter(c)
......
expansions/script/c47577904.lua
View file @ 44ae38e0
--堕天司的奇袭 --堕天司的奇袭
function c47577904.initial_effect(c) function c47577904.initial_effect(c)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DESTROY+CATEGORY_TOGRAVE) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,47577904+EFFECT_COUNT_CODE_OATH) e1:SetCountLimit(1,47577904+EFFECT_COUNT_CODE_OATH)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetTarget(c47577904.target) e1:SetTarget(c47577904.target)
e1:SetOperation(c47577904.activate) e1:SetOperation(c47577904.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--material --material
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(47577904,0)) e2:SetDescription(aux.Stringid(47577904,0))
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_GRAVE) e2:SetRange(LOCATION_GRAVE)
e2:SetCountLimit(1,47577905) e2:SetCountLimit(1,47577905)
e2:SetCost(aux.bfgcost) e2:SetCost(aux.bfgcost)
e2:SetTarget(c47577904.ptg) e2:SetTarget(c47577904.ptg)
e2:SetOperation(c47577904.pop) e2:SetOperation(c47577904.pop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c47577904.inmfilter(c) function c47577904.inmfilter(c)
return c:IsSetCard(0x95de) and c:IsType(TYPE_PENDULUM) and c:IsFaceup() return c:IsSetCard(0x95de) and c:IsType(TYPE_PENDULUM) and c:IsFaceup()
end end
function c47577904.target(e,tp,eg,ep,ev,re,r,rp,chk) function c47577904.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c47577904.inmfilter,tp,LOCATION_MZONE+LOCATION_EXTRA+LOCATION_GRAVE,0,1,nil) and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) end if chk==0 then return Duel.IsExistingMatchingCard(c47577904.inmfilter,tp,LOCATION_MZONE+LOCATION_EXTRA+LOCATION_GRAVE,0,1,nil) and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
local g=Duel.SelectTarget(tp,c47577904.inmfilter,tp,LOCATION_MZONE+LOCATION_EXTRA+LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectTarget(tp,c47577904.inmfilter,tp,LOCATION_MZONE+LOCATION_EXTRA+LOCATION_GRAVE,0,1,1,nil)
end end
function c47577904.activate(e,tp,eg,ep,ev,re,r,rp) function c47577904.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc and Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)~=0 then if tc and Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)~=0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,0,LOCATION_MZONE,1,1,nil) local g=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,0,LOCATION_MZONE,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.HintSelection(g) Duel.HintSelection(g)
Duel.SendtoGrave(g,REASON_EFFECT) Duel.SendtoGrave(g,REASON_EFFECT)
end end
end end
end end
function c47577904.penfilter(c) function c47577904.penfilter(c)
return c:IsType(TYPE_PENDULUM) and not c:IsForbidden() and c:IsFaceup() and c:IsAttribute(ATTRIBUTE_DARK) return c:IsType(TYPE_PENDULUM) and not c:IsForbidden() and c:IsFaceup() and c:IsAttribute(ATTRIBUTE_DARK)
end end
function c47577904.ptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47577904.ptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c47577904.penfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp,ev) end if chk==0 then return Duel.IsExistingMatchingCard(c47577904.penfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp,ev) end
end end
function c47577904.pop(e,tp,eg,ep,ev,re,r,rp) function c47577904.pop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,c47577904.penfilter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47577904.penfilter,tp,LOCATION_GRAVE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47577910.lua
View file @ 44ae38e0
--刑死的堕天司 沙利叶 --刑死的堕天司 沙利叶
function c47577910.initial_effect(c) function c47577910.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--splimit --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetTargetRange(1,0) e1:SetTargetRange(1,0)
e1:SetTarget(c47577910.psplimit) e1:SetTarget(c47577910.psplimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--draw --draw
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DRAW) e2:SetCategory(CATEGORY_DRAW)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetCountLimit(1,47577910) e2:SetCountLimit(1,47577910)
e2:SetTarget(c47577910.drtg) e2:SetTarget(c47577910.drtg)
e2:SetOperation(c47577910.drop) e2:SetOperation(c47577910.drop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--summon with 1 tribute --summon with 1 tribute
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(47577910,0)) e3:SetDescription(aux.Stringid(47577910,0))
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SUMMON_PROC) e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetCondition(c47577910.otcon) e3:SetCondition(c47577910.otcon)
e3:SetOperation(c47577910.otop) e3:SetOperation(c47577910.otop)
e3:SetValue(SUMMON_TYPE_ADVANCE) e3:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone() local e4=e3:Clone()
e4:SetCode(EFFECT_SET_PROC) e4:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e4) c:RegisterEffect(e4)
-- --
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e5:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e5:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE) e5:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_DELAY) e5:SetProperty(EFFECT_FLAG_DELAY)
e5:SetCode(EVENT_SUMMON_SUCCESS) e5:SetCode(EVENT_SUMMON_SUCCESS)
e5:SetOperation(c47577910.thop) e5:SetOperation(c47577910.thop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--copy effect --copy effect
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetDescription(aux.Stringid(47577910,1)) e7:SetDescription(aux.Stringid(47577910,1))
e7:SetCategory(CATEGORY_TODECK) e7:SetCategory(CATEGORY_TODECK)
e7:SetType(EFFECT_TYPE_QUICK_O) e7:SetType(EFFECT_TYPE_QUICK_O)
e7:SetRange(LOCATION_MZONE) e7:SetRange(LOCATION_MZONE)
e7:SetCode(EVENT_FREE_CHAIN) e7:SetCode(EVENT_FREE_CHAIN)
e7:SetProperty(EFFECT_FLAG_CARD_TARGET) e7:SetProperty(EFFECT_FLAG_CARD_TARGET)
e7:SetCountLimit(1,47577911) e7:SetCountLimit(1,47577911)
e7:SetTarget(c47577910.cptg) e7:SetTarget(c47577910.cptg)
e7:SetOperation(c47577910.cpop) e7:SetOperation(c47577910.cpop)
c:RegisterEffect(e7) c:RegisterEffect(e7)
end end
function c47577910.psplimit(e,c,tp,sumtp,sumpos) function c47577910.psplimit(e,c,tp,sumtp,sumpos)
return not c:IsRace(RACE_FAIRY) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM return not c:IsRace(RACE_FAIRY) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
end end
function c47577910.drfilter(c) function c47577910.drfilter(c)
return c:IsLocation(LOCATION_HAND) and c:IsAbleToGraveAsCost() and c:IsRace(RACE_FAIRY) return c:IsLocation(LOCATION_HAND) and c:IsAbleToGraveAsCost() and c:IsRace(RACE_FAIRY)
end end
function c47577910.drtg(e,tp,eg,ep,ev,re,r,rp,chk) function c47577910.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2) Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
end end
function c47577910.drop(e,tp,eg,ep,ev,re,r,rp) function c47577910.drop(e,tp,eg,ep,ev,re,r,rp)
local ft=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0) local ft=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)
local g=Duel.GetMatchingGroup(c47577910.drfilter,tp,LOCATION_HAND,0,nil) local g=Duel.GetMatchingGroup(c47577910.drfilter,tp,LOCATION_HAND,0,nil)
local ct=math.min(ft-1,g:GetCount()) local ct=math.min(ft-1,g:GetCount())
local sg=g:Select(tp,1,ct,nil) local sg=g:Select(tp,1,ct,nil)
local d=sg:GetCount()+1 local d=sg:GetCount()+1
if Duel.SendtoGrave(sg,REASON_EFFECT)~=0 then if Duel.SendtoGrave(sg,REASON_EFFECT)~=0 then
Duel.Draw(tp,d,REASON_EFFECT) Duel.Draw(tp,d,REASON_EFFECT)
end end
end end
function c47577910.otfilter(c) function c47577910.otfilter(c)
return c:IsType(TYPE_PENDULUM) return c:IsType(TYPE_PENDULUM)
end end
function c47577910.otcon(e,c,minc) function c47577910.otcon(e,c,minc)
if c==nil then return true end if c==nil then return true end
local tp=c:GetControler() local tp=c:GetControler()
return c:GetLevel()>4 and minc<=1 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c47577910.otfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c,tp) return c:GetLevel()>4 and minc<=1 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c47577910.otfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c,tp)
end end
function c47577910.otop(e,tp,eg,ep,ev,re,r,rp,c) function c47577910.otop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local sg=Duel.SelectMatchingCard(tp,c47577910.otfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,c,tp) local sg=Duel.SelectMatchingCard(tp,c47577910.otfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,c,tp)
c:SetMaterial(sg) c:SetMaterial(sg)
Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL) Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
end end
function c47577910.thfilter(c,e,tp,zone) function c47577910.thfilter(c,e,tp,zone)
return c:IsType(TYPE_PENDULUM) and c:IsSetCard(0x95de) return c:IsType(TYPE_PENDULUM) and c:IsSetCard(0x95de)
end end
function c47577910.thop(e,tp,eg,ep,ev,re,r,rp) function c47577910.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELF) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELF)
local g=Duel.SelectMatchingCard(tp,c47577910.thfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47577910.thfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
function c47577910.cpfilter(c) function c47577910.cpfilter(c)
return c:IsSetCard(0x95de) and c:IsType(TYPE_SPELL) and c:IsAbleToDeck() and c:CheckActivateEffect(false,true,false)~=nil return c:IsSetCard(0x95de) and c:IsType(TYPE_SPELL) and c:IsAbleToDeck() and c:CheckActivateEffect(false,true,false)~=nil
end end
function c47577910.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c47577910.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then if chkc then
local te=e:GetLabelObject() local te=e:GetLabelObject()
local tg=te:GetTarget() local tg=te:GetTarget()
return tg and tg(e,tp,eg,ep,ev,re,r,rp,0,chkc) return tg and tg(e,tp,eg,ep,ev,re,r,rp,0,chkc)
end end
if chk==0 then return Duel.IsExistingTarget(c47577910.cpfilter,tp,LOCATION_GRAVE,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c47577910.cpfilter,tp,LOCATION_GRAVE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
local g=Duel.SelectTarget(tp,c47577910.cpfilter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectTarget(tp,c47577910.cpfilter,tp,LOCATION_GRAVE,0,1,1,nil)
local te,ceg,cep,cev,cre,cr,crp=g:GetFirst():CheckActivateEffect(false,true,true) local te,ceg,cep,cev,cre,cr,crp=g:GetFirst():CheckActivateEffect(false,true,true)
Duel.ClearTargetCard() Duel.ClearTargetCard()
g:GetFirst():CreateEffectRelation(e) g:GetFirst():CreateEffectRelation(e)
local tg=te:GetTarget() local tg=te:GetTarget()
if tg then tg(e,tp,ceg,cep,cev,cre,cr,crp,1) end if tg then tg(e,tp,ceg,cep,cev,cre,cr,crp,1) end
te:SetLabelObject(e:GetLabelObject()) te:SetLabelObject(e:GetLabelObject())
e:SetLabelObject(te) e:SetLabelObject(te)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,0,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,0,0,0)
end end
function c47577910.cpop(e,tp,eg,ep,ev,re,r,rp) function c47577910.cpop(e,tp,eg,ep,ev,re,r,rp)
local te=e:GetLabelObject() local te=e:GetLabelObject()
if not te then return end if not te then return end
if not te:GetHandler():IsRelateToEffect(e) then return end if not te:GetHandler():IsRelateToEffect(e) then return end
e:SetLabelObject(te:GetLabelObject()) e:SetLabelObject(te:GetLabelObject())
local op=te:GetOperation() local op=te:GetOperation()
if op then op(e,tp,eg,ep,ev,re,r,rp) end if op then op(e,tp,eg,ep,ev,re,r,rp) end
Duel.BreakEffect() Duel.BreakEffect()
Duel.SendtoDeck(te:GetHandler(),nil,2,REASON_EFFECT) Duel.SendtoDeck(te:GetHandler(),nil,2,REASON_EFFECT)
end end
\ No newline at end of file
expansions/script/c47577918.lua
View file @ 44ae38e0
--堕天司的尖兵 守望者 --堕天司的尖兵 守望者
function c47577918.initial_effect(c) function c47577918.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--pendulum set --pendulum set
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DESTROY) e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,47577918+EFFECT_COUNT_CODE_OATH) e1:SetCountLimit(1,47577918+EFFECT_COUNT_CODE_OATH)
e1:SetCondition(c47577918.pencon) e1:SetCondition(c47577918.pencon)
e1:SetTarget(c47577918.pentg) e1:SetTarget(c47577918.pentg)
e1:SetOperation(c47577918.penop) e1:SetOperation(c47577918.penop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--to hand --to hand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCountLimit(1,47577919+EFFECT_COUNT_CODE_OATH) e2:SetCountLimit(1,47577919+EFFECT_COUNT_CODE_OATH)
e2:SetTarget(c47577918.sptg) e2:SetTarget(c47577918.sptg)
e2:SetOperation(c47577918.spop) e2:SetOperation(c47577918.spop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c47577918.cfilter(c) function c47577918.cfilter(c)
return c:IsType(TYPE_PENDULUM) return c:IsType(TYPE_PENDULUM)
end end
function c47577918.pencon(e,tp,eg,ep,ev,re,r,rp) function c47577918.pencon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c47577918.cfilter,tp,LOCATION_PZONE,0,1,e:GetHandler()) return Duel.IsExistingMatchingCard(c47577918.cfilter,tp,LOCATION_PZONE,0,1,e:GetHandler())
end end
function c47577918.penfilter(c) function c47577918.penfilter(c)
return c:IsSetCard(0x95de) and c:IsType(TYPE_PENDULUM) and not c:IsForbidden() return c:IsSetCard(0x95de) and c:IsType(TYPE_PENDULUM) and not c:IsForbidden()
end end
function c47577918.pentg(e,tp,eg,ep,ev,re,r,rp,chk) function c47577918.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
local sc=Duel.GetFirstMatchingCard(nil,tp,LOCATION_PZONE,0,e:GetHandler()) local sc=Duel.GetFirstMatchingCard(nil,tp,LOCATION_PZONE,0,e:GetHandler())
if chk==0 then return e:GetHandler():IsDestructable() if chk==0 then return e:GetHandler():IsDestructable()
and Duel.IsExistingMatchingCard(c47577918.penfilter,tp,LOCATION_DECK,0,1,nil) end and Duel.IsExistingMatchingCard(c47577918.penfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetTargetCard(sc) Duel.SetTargetCard(sc)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,sc,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,sc,1,0,0)
end end
function c47577918.penop(e,tp,eg,ep,ev,re,r,rp) function c47577918.penop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,c47577918.penfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47577918.penfilter,tp,LOCATION_DECK,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
end end
function c47577918.spfilter(c,e,tp) function c47577918.spfilter(c,e,tp)
return (c:IsSetCard(0x5de) or c:IsSetCard(0x5da)) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return (c:IsSetCard(0x5de) or c:IsSetCard(0x5da)) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c47577918.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c47577918.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c47577918.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c47577918.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
end end
function c47577918.spop(e,tp,eg,ep,ev,re,r,rp) function c47577918.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c47577918.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c47577918.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
local tc=g:GetFirst() local tc=g:GetFirst()
local lv=tc:GetLevel() local lv=tc:GetLevel()
if tc then if tc then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CHANGE_LEVEL) e1:SetCode(EFFECT_CHANGE_LEVEL)
e1:SetValue(lv) e1:SetValue(lv)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
end end
\ No newline at end of file
expansions/script/c47578905.lua
View file @ 44ae38e0
...@@ -100,7 +100,7 @@ function c47578905.pcop(e,tp,eg,ep,ev,re,r,rp) ...@@ -100,7 +100,7 @@ function c47578905.pcop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,c47578905.pcfilter,tp,LOCATION_GRAVE+LOCATION_EXTRA,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47578905.pcfilter,tp,LOCATION_GRAVE+LOCATION_EXTRA,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47578905.thcon(e,tp,eg,ep,ev,re,r,rp) function c47578905.thcon(e,tp,eg,ep,ev,re,r,rp)
...@@ -145,6 +145,6 @@ function c47578905.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -145,6 +145,6 @@ function c47578905.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47578907.lua
View file @ 44ae38e0
...@@ -167,6 +167,6 @@ function c47578907.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -167,6 +167,6 @@ function c47578907.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47578913.lua
View file @ 44ae38e0
...@@ -111,7 +111,7 @@ function c47578913.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -111,7 +111,7 @@ function c47578913.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47578913.ddamcon(e,tp,eg,ep,ev,re,r,rp) function c47578913.ddamcon(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c47578919.lua
View file @ 44ae38e0
...@@ -103,6 +103,6 @@ function c47578919.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -103,6 +103,6 @@ function c47578919.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47579908.lua
View file @ 44ae38e0
...@@ -112,7 +112,7 @@ end ...@@ -112,7 +112,7 @@ end
function c47579908.penop(e,tp,eg,ep,ev,re,r,rp) function c47579908.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) then if c:IsRelateToEffect(e) and Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true) then
if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_LINK)<=0 then return end if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_LINK)<=0 then return end
local tg=Duel.GetFirstMatchingCard(c47579908.filter,tp,LOCATION_EXTRA,0,nil,e,tp) local tg=Duel.GetFirstMatchingCard(c47579908.filter,tp,LOCATION_EXTRA,0,nil,e,tp)
if tg then if tg then
......
expansions/script/c47590005.lua
View file @ 44ae38e0
...@@ -117,6 +117,6 @@ function c47590005.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -117,6 +117,6 @@ function c47590005.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47590006.lua
View file @ 44ae38e0
...@@ -128,6 +128,6 @@ function c47590006.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -128,6 +128,6 @@ function c47590006.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47590008.lua
View file @ 44ae38e0
...@@ -181,7 +181,7 @@ end ...@@ -181,7 +181,7 @@ end
function c47590008.penop(e,tp,eg,ep,ev,re,r,rp) function c47590008.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) then if c:IsRelateToEffect(e) and Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true) then
if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_SYNCHRO)<=0 then return end if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_SYNCHRO)<=0 then return end
local tg=Duel.GetFirstMatchingCard(c47590008.filter,tp,LOCATION_EXTRA,0,nil,e,tp) local tg=Duel.GetFirstMatchingCard(c47590008.filter,tp,LOCATION_EXTRA,0,nil,e,tp)
if tg then if tg then
......
expansions/script/c47590009.lua
View file @ 44ae38e0
...@@ -132,6 +132,6 @@ function c47590009.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -132,6 +132,6 @@ function c47590009.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
expansions/script/c47598771.lua
View file @ 44ae38e0
...@@ -55,6 +55,6 @@ function c47598771.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -55,6 +55,6 @@ function c47598771.penop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47598771.penfilter,tp,LOCATION_GRAVE+LOCATION_EXTRA,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47598771.penfilter,tp,LOCATION_GRAVE+LOCATION_EXTRA,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47598772.lua
View file @ 44ae38e0
...@@ -89,7 +89,7 @@ function c47598772.tfop(e,tp,eg,ep,ev,re,r,rp) ...@@ -89,7 +89,7 @@ function c47598772.tfop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c47598772.ppfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47598772.ppfilter,tp,LOCATION_DECK,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47598772.actop(e,tp,eg,ep,ev,re,r,rp) function c47598772.actop(e,tp,eg,ep,ev,re,r,rp)
...@@ -134,6 +134,6 @@ function c47598772.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -134,6 +134,6 @@ function c47598772.penop(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.BreakEffect() Duel.BreakEffect()
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47598773.lua
View file @ 44ae38e0
...@@ -96,7 +96,7 @@ end ...@@ -96,7 +96,7 @@ end
function c47598773.penop(e,tp,eg,ep,ev,re,r,rp) function c47598773.penop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(tp,LOCATION_PZONE,0) local g=Duel.GetFieldGroup(tp,LOCATION_PZONE,0)
if Duel.Destroy(g,REASON_EFFECT)~=0 and e:GetHandler():IsRelateToEffect(e) then if Duel.Destroy(g,REASON_EFFECT)~=0 and e:GetHandler():IsRelateToEffect(e) then
Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
function c47598773.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c47598773.cost(e,tp,eg,ep,ev,re,r,rp,chk)
......
expansions/script/c47598774.lua
View file @ 44ae38e0
...@@ -148,6 +148,6 @@ function c47598774.penop(e,tp,eg,ep,ev,re,r,rp) ...@@ -148,6 +148,6 @@ function c47598774.penop(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
Duel.BreakEffect() Duel.BreakEffect()
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment