Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
no81cards
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Locked Files
Issues
0
Issues
0
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Security & Compliance
Security & Compliance
Dependency List
License Compliance
Packages
Packages
List
Container Registry
Analytics
Analytics
CI / CD
Code Review
Insights
Issues
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Nemo Ma
no81cards
Commits
b60fe110
Commit
b60fe110
authored
Jan 18, 2022
by
Nemo Ma
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
e9bbda34
Changes
23
Show whitespace changes
Inline
Side-by-side
Showing
23 changed files
with
443 additions
and
72 deletions
+443
-72
expansions/script/c11451401.lua
expansions/script/c11451401.lua
+3
-1
expansions/script/c11451414.lua
expansions/script/c11451414.lua
+7
-4
expansions/script/c11451462.lua
expansions/script/c11451462.lua
+41
-6
expansions/script/c11451463.lua
expansions/script/c11451463.lua
+41
-6
expansions/script/c11451464.lua
expansions/script/c11451464.lua
+41
-6
expansions/script/c11451465.lua
expansions/script/c11451465.lua
+41
-6
expansions/script/c11451466.lua
expansions/script/c11451466.lua
+41
-6
expansions/script/c11451467.lua
expansions/script/c11451467.lua
+41
-6
expansions/script/c11451474.lua
expansions/script/c11451474.lua
+2
-2
expansions/script/c11451486.lua
expansions/script/c11451486.lua
+7
-3
expansions/script/c11451509.lua
expansions/script/c11451509.lua
+2
-0
expansions/script/c11451642.lua
expansions/script/c11451642.lua
+14
-3
expansions/script/c13254065.lua
expansions/script/c13254065.lua
+2
-1
expansions/script/c13254070.lua
expansions/script/c13254070.lua
+1
-0
expansions/script/c188811.lua
expansions/script/c188811.lua
+4
-1
expansions/script/c188813.lua
expansions/script/c188813.lua
+10
-2
expansions/script/c188815.lua
expansions/script/c188815.lua
+127
-0
expansions/script/c40009105.lua
expansions/script/c40009105.lua
+2
-2
expansions/script/c40009106.lua
expansions/script/c40009106.lua
+1
-1
expansions/script/c53722008.lua
expansions/script/c53722008.lua
+2
-5
expansions/script/c53726016.lua
expansions/script/c53726016.lua
+1
-0
expansions/script/c67200415.lua
expansions/script/c67200415.lua
+11
-10
expansions/script/c67200433.lua
expansions/script/c67200433.lua
+1
-1
No files found.
expansions/script/c11451401.lua
View file @
b60fe110
--
幻旅传说·逃亡
--
traveler saga outrun
--21.04.10
local
m
=
11451401
local
cm
=
_G
[
"c"
..
m
]
...
...
@@ -63,5 +63,7 @@ function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return
eg
:
IsExists
(
cm
.
thfilter
,
1
,
nil
)
end
function
cm
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
eg
:
Filter
(
cm
.
thfilter
,
nil
)
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
Duel
.
ShuffleHand
(
tp
)
end
\ No newline at end of file
expansions/script/c11451414.lua
View file @
b60fe110
...
...
@@ -43,8 +43,9 @@ function cm.initial_effect(c)
cm
[
1
]
=
0
local
ge1
=
Effect
.
CreateEffect
(
c
)
ge1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
ge1
:
SetCode
(
EVENT_RELEASE
)
ge1
:
SetOperation
(
cm
.
check
)
ge1
:
SetCode
(
EFFECT_SEND_REPLACE
)
ge1
:
SetTarget
(
cm
.
check
)
ge1
:
SetValue
(
aux
.
FALSE
)
Duel
.
RegisterEffect
(
ge1
,
0
)
local
ge2
=
Effect
.
CreateEffect
(
c
)
ge2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
...
...
@@ -59,13 +60,15 @@ end
function
cm
.
filter
(
c
,
tp
)
return
c
:
IsControler
(
tp
)
and
c
:
IsSetCard
(
0x6978
)
and
c
:
IsFaceup
()
end
function
cm
.
check
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
check
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
for
tc
in
aux
.
Next
(
eg
)
do
if
(
tc
:
Is
PreviousLocation
(
LOCATION_MZONE
)
or
(
tc
:
GetPreviousLocation
()
&
LOCATION_ONFIELD
==
0
and
tc
:
GetOriginalType
()
&
0x1
>
0
))
and
tc
:
IsSetCard
(
0x6978
)
then
if
(
tc
:
Is
Location
(
LOCATION_MZONE
)
or
(
not
tc
:
IsOnField
()
and
tc
:
GetOriginalType
()
&
0x1
>
0
))
and
tc
:
IsSetCard
(
0x6978
)
and
tc
:
IsReason
(
REASON_RELEASE
)
then
local
p
=
tc
:
GetReasonPlayer
()
cm
[
p
]
=
cm
[
p
]
+
1
end
end
return
false
end
function
cm
.
clear
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
cm
[
0
]
=
0
...
...
expansions/script/c11451462.lua
View file @
b60fe110
...
...
@@ -155,6 +155,16 @@ end
function
cm
.
retfilter2
(
c
,
p
,
loc
)
return
c
:
IsPreviousControler
(
p
)
and
c
:
IsPreviousLocation
(
loc
)
end
function
cm
.
fselect2
(
g
,
pft
)
return
g
:
FilterCount
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
<=
pft
end
function
cm
.
returntofield
(
tc
)
if
tc
:
GetPreviousTypeOnField
()
&
TYPE_EQUIP
>
0
then
Duel
.
SendtoGrave
(
tc
,
REASON_RULE
+
REASON_RETURN
)
else
Duel
.
ReturnToField
(
tc
)
end
end
function
cm
.
retcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
if
not
g
:
IsExists
(
cm
.
filter6
,
1
,
nil
,
e
)
then
...
...
@@ -167,26 +177,51 @@ function cm.retop(e,tp,eg,ep,ev,re,r,rp)
local
g
=
e
:
GetLabelObject
()
local
sg
=
g
:
Filter
(
cm
.
filter6
,
nil
,
e
)
g
:
DeleteGroup
()
local
ft
,
mg
=
{},{}
local
ft
,
mg
,
pft
,
pmg
=
{},{},
{},{}
ft
[
1
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
ft
[
2
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_MZONE
)
ft
[
3
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
ft
[
4
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_SZONE
)
pft
[
3
],
pft
[
4
]
=
0
,
0
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
mg
[
1
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_MZONE
)
mg
[
2
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_MZONE
)
mg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_SZONE
)
mg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_SZONE
)
for
i
=
1
,
4
do
pmg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_PZONE
)
pmg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_PZONE
)
for
i
=
1
,
2
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
m
,
2
))
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
mg
[
i
]:
Select
(
tp
,
ft
[
i
],
ft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
Duel
.
ReturnToF
ield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntof
ield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
for
tc
in
aux
.
Next
(
sg
)
do
for
i
=
3
,
4
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
ct
=
math.min
(
#
(
mg
[
i
]
-
pmg
[
i
])
+
pft
[
i
],
ft
[
i
])
local
tg
=
mg
[
i
]:
SelectSubGroup
(
tp
,
cm
.
fselect2
,
false
,
ct
,
ct
,
nil
,
pft
[
i
])
local
ptg
=
tg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
ptg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
-
ptg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
elseif
#
pmg
[
i
]
>
pft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
pmg
[
i
]:
Select
(
tp
,
pft
[
i
],
pft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
local
psg
=
sg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
psg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
sg
-
psg
)
do
if
tc
:
GetPreviousLocation
()
&
LOCATION_ONFIELD
>
0
then
Duel
.
ReturnToF
ield
(
tc
)
cm
.
returntof
ield
(
tc
)
elseif
tc
:
IsPreviousLocation
(
LOCATION_HAND
)
then
Duel
.
SendtoHand
(
tc
,
tc
:
GetPreviousControler
(),
REASON_EFFECT
)
end
...
...
expansions/script/c11451463.lua
View file @
b60fe110
...
...
@@ -159,6 +159,16 @@ end
function
cm
.
retfilter2
(
c
,
p
,
loc
)
return
c
:
IsPreviousControler
(
p
)
and
c
:
IsPreviousLocation
(
loc
)
end
function
cm
.
fselect2
(
g
,
pft
)
return
g
:
FilterCount
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
<=
pft
end
function
cm
.
returntofield
(
tc
)
if
tc
:
GetPreviousTypeOnField
()
&
TYPE_EQUIP
>
0
then
Duel
.
SendtoGrave
(
tc
,
REASON_RULE
+
REASON_RETURN
)
else
Duel
.
ReturnToField
(
tc
)
end
end
function
cm
.
retcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
if
not
g
:
IsExists
(
cm
.
filter6
,
1
,
nil
,
e
)
then
...
...
@@ -171,26 +181,51 @@ function cm.retop(e,tp,eg,ep,ev,re,r,rp)
local
g
=
e
:
GetLabelObject
()
local
sg
=
g
:
Filter
(
cm
.
filter6
,
nil
,
e
)
g
:
DeleteGroup
()
local
ft
,
mg
=
{},{}
local
ft
,
mg
,
pft
,
pmg
=
{},{},
{},{}
ft
[
1
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
ft
[
2
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_MZONE
)
ft
[
3
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
ft
[
4
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_SZONE
)
pft
[
3
],
pft
[
4
]
=
0
,
0
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
mg
[
1
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_MZONE
)
mg
[
2
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_MZONE
)
mg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_SZONE
)
mg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_SZONE
)
for
i
=
1
,
4
do
pmg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_PZONE
)
pmg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_PZONE
)
for
i
=
1
,
2
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
m
,
2
))
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
mg
[
i
]:
Select
(
tp
,
ft
[
i
],
ft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
Duel
.
ReturnToF
ield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntof
ield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
for
tc
in
aux
.
Next
(
sg
)
do
for
i
=
3
,
4
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
ct
=
math.min
(
#
(
mg
[
i
]
-
pmg
[
i
])
+
pft
[
i
],
ft
[
i
])
local
tg
=
mg
[
i
]:
SelectSubGroup
(
tp
,
cm
.
fselect2
,
false
,
ct
,
ct
,
nil
,
pft
[
i
])
local
ptg
=
tg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
ptg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
-
ptg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
elseif
#
pmg
[
i
]
>
pft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
pmg
[
i
]:
Select
(
tp
,
pft
[
i
],
pft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
local
psg
=
sg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
psg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
sg
-
psg
)
do
if
tc
:
GetPreviousLocation
()
&
LOCATION_ONFIELD
>
0
then
Duel
.
ReturnToF
ield
(
tc
)
cm
.
returntof
ield
(
tc
)
elseif
tc
:
IsPreviousLocation
(
LOCATION_HAND
)
then
Duel
.
SendtoHand
(
tc
,
tc
:
GetPreviousControler
(),
REASON_EFFECT
)
end
...
...
expansions/script/c11451464.lua
View file @
b60fe110
...
...
@@ -215,6 +215,16 @@ end
function
cm
.
retfilter2
(
c
,
p
,
loc
)
return
c
:
IsPreviousControler
(
p
)
and
c
:
IsPreviousLocation
(
loc
)
end
function
cm
.
fselect2
(
g
,
pft
)
return
g
:
FilterCount
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
<=
pft
end
function
cm
.
returntofield
(
tc
)
if
tc
:
GetPreviousTypeOnField
()
&
TYPE_EQUIP
>
0
then
Duel
.
SendtoGrave
(
tc
,
REASON_RULE
+
REASON_RETURN
)
else
Duel
.
ReturnToField
(
tc
)
end
end
function
cm
.
retcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
if
not
g
:
IsExists
(
cm
.
filter6
,
1
,
nil
,
e
)
then
...
...
@@ -227,26 +237,51 @@ function cm.retop(e,tp,eg,ep,ev,re,r,rp)
local
g
=
e
:
GetLabelObject
()
local
sg
=
g
:
Filter
(
cm
.
filter6
,
nil
,
e
)
g
:
DeleteGroup
()
local
ft
,
mg
=
{},{}
local
ft
,
mg
,
pft
,
pmg
=
{},{},
{},{}
ft
[
1
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
ft
[
2
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_MZONE
)
ft
[
3
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
ft
[
4
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_SZONE
)
pft
[
3
],
pft
[
4
]
=
0
,
0
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
mg
[
1
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_MZONE
)
mg
[
2
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_MZONE
)
mg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_SZONE
)
mg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_SZONE
)
for
i
=
1
,
4
do
pmg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_PZONE
)
pmg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_PZONE
)
for
i
=
1
,
2
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
m
,
2
))
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
mg
[
i
]:
Select
(
tp
,
ft
[
i
],
ft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
Duel
.
ReturnToF
ield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntof
ield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
for
tc
in
aux
.
Next
(
sg
)
do
for
i
=
3
,
4
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
ct
=
math.min
(
#
(
mg
[
i
]
-
pmg
[
i
])
+
pft
[
i
],
ft
[
i
])
local
tg
=
mg
[
i
]:
SelectSubGroup
(
tp
,
cm
.
fselect2
,
false
,
ct
,
ct
,
nil
,
pft
[
i
])
local
ptg
=
tg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
ptg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
-
ptg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
elseif
#
pmg
[
i
]
>
pft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
pmg
[
i
]:
Select
(
tp
,
pft
[
i
],
pft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
local
psg
=
sg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
psg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
sg
-
psg
)
do
if
tc
:
GetPreviousLocation
()
&
LOCATION_ONFIELD
>
0
then
Duel
.
ReturnToF
ield
(
tc
)
cm
.
returntof
ield
(
tc
)
elseif
tc
:
IsPreviousLocation
(
LOCATION_HAND
)
then
Duel
.
SendtoHand
(
tc
,
tc
:
GetPreviousControler
(),
REASON_EFFECT
)
end
...
...
expansions/script/c11451465.lua
View file @
b60fe110
...
...
@@ -193,6 +193,16 @@ end
function
cm
.
retfilter2
(
c
,
p
,
loc
)
return
c
:
IsPreviousControler
(
p
)
and
c
:
IsPreviousLocation
(
loc
)
end
function
cm
.
fselect2
(
g
,
pft
)
return
g
:
FilterCount
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
<=
pft
end
function
cm
.
returntofield
(
tc
)
if
tc
:
GetPreviousTypeOnField
()
&
TYPE_EQUIP
>
0
then
Duel
.
SendtoGrave
(
tc
,
REASON_RULE
+
REASON_RETURN
)
else
Duel
.
ReturnToField
(
tc
)
end
end
function
cm
.
retcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
if
not
g
:
IsExists
(
cm
.
filter6
,
1
,
nil
,
e
)
then
...
...
@@ -205,26 +215,51 @@ function cm.retop(e,tp,eg,ep,ev,re,r,rp)
local
g
=
e
:
GetLabelObject
()
local
sg
=
g
:
Filter
(
cm
.
filter6
,
nil
,
e
)
g
:
DeleteGroup
()
local
ft
,
mg
=
{},{}
local
ft
,
mg
,
pft
,
pmg
=
{},{},
{},{}
ft
[
1
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
ft
[
2
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_MZONE
)
ft
[
3
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
ft
[
4
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_SZONE
)
pft
[
3
],
pft
[
4
]
=
0
,
0
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
mg
[
1
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_MZONE
)
mg
[
2
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_MZONE
)
mg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_SZONE
)
mg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_SZONE
)
for
i
=
1
,
4
do
pmg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_PZONE
)
pmg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_PZONE
)
for
i
=
1
,
2
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
m
,
2
))
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
mg
[
i
]:
Select
(
tp
,
ft
[
i
],
ft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
Duel
.
ReturnToF
ield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntof
ield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
for
tc
in
aux
.
Next
(
sg
)
do
for
i
=
3
,
4
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
ct
=
math.min
(
#
(
mg
[
i
]
-
pmg
[
i
])
+
pft
[
i
],
ft
[
i
])
local
tg
=
mg
[
i
]:
SelectSubGroup
(
tp
,
cm
.
fselect2
,
false
,
ct
,
ct
,
nil
,
pft
[
i
])
local
ptg
=
tg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
ptg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
-
ptg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
elseif
#
pmg
[
i
]
>
pft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
pmg
[
i
]:
Select
(
tp
,
pft
[
i
],
pft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
local
psg
=
sg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
psg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
sg
-
psg
)
do
if
tc
:
GetPreviousLocation
()
&
LOCATION_ONFIELD
>
0
then
Duel
.
ReturnToF
ield
(
tc
)
cm
.
returntof
ield
(
tc
)
elseif
tc
:
IsPreviousLocation
(
LOCATION_HAND
)
then
Duel
.
SendtoHand
(
tc
,
tc
:
GetPreviousControler
(),
REASON_EFFECT
)
end
...
...
expansions/script/c11451466.lua
View file @
b60fe110
...
...
@@ -214,6 +214,16 @@ end
function
cm
.
retfilter2
(
c
,
p
,
loc
)
return
c
:
IsPreviousControler
(
p
)
and
c
:
IsPreviousLocation
(
loc
)
end
function
cm
.
fselect2
(
g
,
pft
)
return
g
:
FilterCount
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
<=
pft
end
function
cm
.
returntofield
(
tc
)
if
tc
:
GetPreviousTypeOnField
()
&
TYPE_EQUIP
>
0
then
Duel
.
SendtoGrave
(
tc
,
REASON_RULE
+
REASON_RETURN
)
else
Duel
.
ReturnToField
(
tc
)
end
end
function
cm
.
retcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
if
not
g
:
IsExists
(
cm
.
filter6
,
1
,
nil
,
e
)
then
...
...
@@ -226,26 +236,51 @@ function cm.retop(e,tp,eg,ep,ev,re,r,rp)
local
g
=
e
:
GetLabelObject
()
local
sg
=
g
:
Filter
(
cm
.
filter6
,
nil
,
e
)
g
:
DeleteGroup
()
local
ft
,
mg
=
{},{}
local
ft
,
mg
,
pft
,
pmg
=
{},{},
{},{}
ft
[
1
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
ft
[
2
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_MZONE
)
ft
[
3
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
ft
[
4
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_SZONE
)
pft
[
3
],
pft
[
4
]
=
0
,
0
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
mg
[
1
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_MZONE
)
mg
[
2
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_MZONE
)
mg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_SZONE
)
mg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_SZONE
)
for
i
=
1
,
4
do
pmg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_PZONE
)
pmg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_PZONE
)
for
i
=
1
,
2
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
m
,
2
))
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
mg
[
i
]:
Select
(
tp
,
ft
[
i
],
ft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
Duel
.
ReturnToF
ield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntof
ield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
for
tc
in
aux
.
Next
(
sg
)
do
for
i
=
3
,
4
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
ct
=
math.min
(
#
(
mg
[
i
]
-
pmg
[
i
])
+
pft
[
i
],
ft
[
i
])
local
tg
=
mg
[
i
]:
SelectSubGroup
(
tp
,
cm
.
fselect2
,
false
,
ct
,
ct
,
nil
,
pft
[
i
])
local
ptg
=
tg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
ptg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
-
ptg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
elseif
#
pmg
[
i
]
>
pft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
pmg
[
i
]:
Select
(
tp
,
pft
[
i
],
pft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
local
psg
=
sg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
psg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
sg
-
psg
)
do
if
tc
:
GetPreviousLocation
()
&
LOCATION_ONFIELD
>
0
then
Duel
.
ReturnToF
ield
(
tc
)
cm
.
returntof
ield
(
tc
)
elseif
tc
:
IsPreviousLocation
(
LOCATION_HAND
)
then
Duel
.
SendtoHand
(
tc
,
tc
:
GetPreviousControler
(),
REASON_EFFECT
)
end
...
...
expansions/script/c11451467.lua
View file @
b60fe110
...
...
@@ -243,6 +243,16 @@ end
function
cm
.
retfilter2
(
c
,
p
,
loc
)
return
c
:
IsPreviousControler
(
p
)
and
c
:
IsPreviousLocation
(
loc
)
end
function
cm
.
fselect2
(
g
,
pft
)
return
g
:
FilterCount
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
<=
pft
end
function
cm
.
returntofield
(
tc
)
if
tc
:
GetPreviousTypeOnField
()
&
TYPE_EQUIP
>
0
then
Duel
.
SendtoGrave
(
tc
,
REASON_RULE
+
REASON_RETURN
)
else
Duel
.
ReturnToField
(
tc
)
end
end
function
cm
.
retcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
if
not
g
:
IsExists
(
cm
.
filter6
,
1
,
nil
,
e
)
then
...
...
@@ -255,26 +265,51 @@ function cm.retop(e,tp,eg,ep,ev,re,r,rp)
local
g
=
e
:
GetLabelObject
()
local
sg
=
g
:
Filter
(
cm
.
filter6
,
nil
,
e
)
g
:
DeleteGroup
()
local
ft
,
mg
=
{},{}
local
ft
,
mg
,
pft
,
pmg
=
{},{},
{},{}
ft
[
1
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
ft
[
2
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_MZONE
)
ft
[
3
]
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
ft
[
4
]
=
Duel
.
GetLocationCount
(
1
-
tp
,
LOCATION_SZONE
)
pft
[
3
],
pft
[
4
]
=
0
,
0
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
3
]
=
pft
[
3
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
0
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
if
Duel
.
CheckLocation
(
1
-
tp
,
LOCATION_PZONE
,
1
)
then
pft
[
4
]
=
pft
[
4
]
+
1
end
mg
[
1
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_MZONE
)
mg
[
2
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_MZONE
)
mg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_SZONE
)
mg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_SZONE
)
for
i
=
1
,
4
do
pmg
[
3
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
tp
,
LOCATION_PZONE
)
pmg
[
4
]
=
sg
:
Filter
(
cm
.
retfilter2
,
nil
,
1
-
tp
,
LOCATION_PZONE
)
for
i
=
1
,
2
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
m
,
2
))
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
mg
[
i
]:
Select
(
tp
,
ft
[
i
],
ft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
Duel
.
ReturnToF
ield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntof
ield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
for
tc
in
aux
.
Next
(
sg
)
do
for
i
=
3
,
4
do
if
#
mg
[
i
]
>
ft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
ct
=
math.min
(
#
(
mg
[
i
]
-
pmg
[
i
])
+
pft
[
i
],
ft
[
i
])
local
tg
=
mg
[
i
]:
SelectSubGroup
(
tp
,
cm
.
fselect2
,
false
,
ct
,
ct
,
nil
,
pft
[
i
])
local
ptg
=
tg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
ptg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
tg
-
ptg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
elseif
#
pmg
[
i
]
>
pft
[
i
]
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11451461
,
7
))
local
tg
=
pmg
[
i
]:
Select
(
tp
,
pft
[
i
],
pft
[
i
],
nil
)
for
tc
in
aux
.
Next
(
tg
)
do
cm
.
returntofield
(
tc
)
end
sg
:
Sub
(
tg
)
end
end
local
psg
=
sg
:
Filter
(
Card
.
IsPreviousLocation
,
nil
,
LOCATION_PZONE
)
for
tc
in
aux
.
Next
(
psg
)
do
cm
.
returntofield
(
tc
)
end
for
tc
in
aux
.
Next
(
sg
-
psg
)
do
if
tc
:
GetPreviousLocation
()
&
LOCATION_ONFIELD
>
0
then
Duel
.
ReturnToF
ield
(
tc
)
cm
.
returntof
ield
(
tc
)
elseif
tc
:
IsPreviousLocation
(
LOCATION_HAND
)
then
Duel
.
SendtoHand
(
tc
,
tc
:
GetPreviousControler
(),
REASON_EFFECT
)
end
...
...
expansions/script/c11451474.lua
View file @
b60fe110
...
...
@@ -48,7 +48,7 @@ function cm.spfilter(c)
return
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
)
and
c
:
IsAbleToGraveAsCost
()
end
function
cm
.
thfilter
(
c
)
return
c
:
IsRace
(
RACE_INSECT
)
return
c
:
IsRace
(
RACE_INSECT
)
and
c
:
GetOriginalType
()
&
0x1
==
0x1
end
function
cm
.
spcon
(
e
,
c
)
if
c
==
nil
then
return
true
end
...
...
@@ -85,7 +85,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
end
function
cm
.
destg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_GRAVE
)
and
chkc
:
IsControler
(
1
-
tp
)
and
chkc
:
IsType
(
TYPE_MONSTER
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
Card
.
IsType
,
tp
,
0
,
LOCATION_GRAVE
,
1
,
nil
,
TYPE_MONSTER
)
end
if
chk
==
0
then
return
Duel
.
GetMatchingGroupCount
(
aux
.
NOT
(
Card
.
IsPublic
),
tp
,
0
,
LOCATION_HAND
,
nil
)
>
0
and
Duel
.
IsExistingTarget
(
Card
.
IsType
,
tp
,
0
,
LOCATION_GRAVE
,
1
,
nil
,
TYPE_MONSTER
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TARGET
)
local
g
=
Duel
.
SelectTarget
(
tp
,
Card
.
IsType
,
tp
,
0
,
LOCATION_GRAVE
,
1
,
1
,
nil
,
TYPE_MONSTER
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
nil
,
1
,
0
,
0
)
...
...
expansions/script/c11451486.lua
View file @
b60fe110
...
...
@@ -17,7 +17,6 @@ function cm.initial_effect(c)
c
:
RegisterEffect
(
e0
)
--effect1
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetCategory
(
CATEGORY_TOHAND
)
e1
:
SetType
(
EFFECT_TYPE_IGNITION
)
e1
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e1
:
SetRange
(
LOCATION_MZONE
)
...
...
@@ -128,8 +127,13 @@ function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_XMATERIAL
)
local
g1
=
Duel
.
SelectTarget
(
tp
,
cm
.
filter
,
tp
,
LOCATION_ONFIELD
+
LOCATION_GRAVE
,
LOCATION_ONFIELD
+
LOCATION_GRAVE
,
2
-
op
,
2
-
op
,
e
:
GetHandler
(),
e
)
if
op
==
0
then
e
:
SetCategory
(
CATEGORY_TOHAND
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
g1
,
1
,
0
,
0
)
if
op
==
0
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_LEAVE_GRAVE
,
g1
,
1
,
0
,
0
)
end
else
e
:
SetCategory
(
0
)
end
if
g1
:
IsExists
(
Card
.
IsLocation
,
1
,
nil
,
LOCATION_GRAVE
)
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_LEAVE_GRAVE
,
g1
,
1
,
0
,
0
)
end
end
function
cm
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
...
...
expansions/script/c11451509.lua
View file @
b60fe110
...
...
@@ -105,6 +105,8 @@ function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return
eg
:
IsExists
(
cm
.
thfilter
,
1
,
nil
)
end
function
cm
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
eg
:
Filter
(
cm
.
thfilter
,
nil
)
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
Duel
.
ShuffleHand
(
tp
)
end
function
cm
.
rscon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
expansions/script/c11451642.lua
View file @
b60fe110
...
...
@@ -24,14 +24,25 @@ end
function
cm
.
spfilter
(
c
,
e
,
tp
,
mg
)
if
bit
.
band
(
c
:
GetType
(),
0x81
)
~=
0x81
or
c
.
mat_filter
or
c
.
mat_group_check
or
not
(
c
:
IsAttribute
(
ATTRIBUTE_WIND
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
SUMMON_TYPE_RITUAL
,
tp
,
false
,
true
))
then
return
false
end
local
ct
=
math.max
(
1
,
c
:
GetLevel
()
//
3
)
return
#
mg
>
0
and
mg
:
CheckSubGroup
(
cm
.
fselect
,
ct
,
ct
,
c
,
tp
)
if
c
.
mat_filter
then
local
g
=
mg
:
Filter
(
cm
.
mfilter2
,
nil
,
c
)
if
c
.
mat_group_check
then
return
#
g
>
0
and
g
:
CheckSubGroup
(
cm
.
fselect2
,
ct
,
ct
,
tp
,
rc
)
end
return
#
g
>
0
and
g
:
CheckSubGroup
(
cm
.
fselect
,
ct
,
ct
,
tp
)
end
return
#
mg
>
0
and
mg
:
CheckSubGroup
(
cm
.
fselect
,
ct
,
ct
,
tp
)
end
function
cm
.
fselect
(
g
,
c
,
tp
)
function
cm
.
fselect
(
g
,
tp
)
return
Duel
.
GetMZoneCount
(
tp
,
g
)
>
0
end
function
cm
.
fselect2
(
g
,
tp
)
return
Duel
.
GetMZoneCount
(
tp
,
g
)
>
0
and
rc
.
mat_group_check
(
g
)
end
function
cm
.
mfilter
(
c
)
return
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
)
and
c
:
IsAbleToGrave
()
end
function
cm
.
mfilter2
(
c
,
rc
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
rc
.
mat_filter
(
c
)
end
function
cm
.
filter1
(
c
,
e
)
return
not
c
:
IsImmuneToEffect
(
e
)
end
...
...
@@ -50,7 +61,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
Duel
.
ConfirmCards
(
1
-
tp
,
tc
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOGRAVE
)
local
ct
=
math.max
(
1
,
tc
:
GetLevel
()
//
3
)
local
mat
=
mg
:
SelectSubGroup
(
tp
,
cm
.
fselect
,
false
,
ct
,
ct
,
c
,
tp
)
local
mat
=
mg
:
SelectSubGroup
(
tp
,
cm
.
fselect
,
false
,
ct
,
ct
,
tp
)
if
not
mat
or
#
mat
==
0
then
return
end
tc
:
SetMaterial
(
mat
)
Duel
.
SendtoGrave
(
mat
,
REASON_EFFECT
+
REASON_MATERIAL
+
REASON_RITUAL
)
...
...
expansions/script/c13254065.lua
View file @
b60fe110
...
...
@@ -82,10 +82,11 @@ function cm.disop(e,tp,eg,ep,ev,re,r,rp)
local
g
=
Duel
.
GetFieldGroup
(
tp
,
0
,
LOCATION_DECK
)
if
g
:
GetCount
()
>
0
then
Duel
.
BreakEffect
()
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
Duel
.
ConfirmCards
(
tp
,
g
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
sg
=
g
:
Select
(
tp
,
1
,
1
,
nil
)
Duel
.
SendtoHand
(
sg
,
tp
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
sg
)
Duel
.
ShuffleDeck
(
1
-
tp
)
end
end
...
...
expansions/script/c13254070.lua
View file @
b60fe110
...
...
@@ -59,6 +59,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
e6
:
SetCode
(
EFFECT_CANNOT_ACTIVATE
)
e6
:
SetTargetRange
(
1
,
0
)
e6
:
SetValue
(
cm
.
aclimit
)
e6
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e6
,
tp
)
end
function
cm
.
filter
(
c
,
sp
)
...
...
expansions/script/c188811.lua
View file @
b60fe110
...
...
@@ -40,6 +40,9 @@ function c188811.initial_effect(c)
e4
:
SetOperation
(
c188811
.
xeqop
)
c
:
RegisterEffect
(
e4
)
end
function
c188811
.
eqlimit
(
e
,
c
)
return
(
c
:
IsRace
(
RACE_MACHINE
)
and
c
:
IsAttribute
(
ATTRIBUTE_LIGHT
))
or
e
:
GetHandler
():
GetEquipTarget
()
==
c
end
function
c188811
.
filter
(
c
)
local
ct1
,
ct2
=
c
:
GetUnionCount
()
return
c
:
IsFaceup
()
and
c
:
IsRace
(
RACE_MACHINE
)
and
c
:
IsAttribute
(
ATTRIBUTE_WATER
)
and
ct2
==
0
...
...
@@ -109,7 +112,7 @@ function c188811.xeqop(e,tp,eg,ep,ev,re,r,rp)
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsFaceup
()
and
tc
:
IsRelateToEffect
(
e
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_EQUIP
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c188811
.
unfil2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
,
0
,
1
,
nil
,
tp
,
tc
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c188811
.
unfil2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
tp
,
tc
)
local
ec
=
g
:
GetFirst
()
if
ec
and
aux
.
CheckUnionEquip
(
ec
,
tc
)
and
Duel
.
Equip
(
tp
,
ec
,
tc
)
then
aux
.
SetUnionState
(
ec
)
...
...
expansions/script/c188813.lua
View file @
b60fe110
...
...
@@ -6,7 +6,7 @@ function c188813.initial_effect(c)
aux
.
EnableUnionAttribute
(
c
,
c188813
.
eqlimit
)
--equip
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
18881
3
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
18881
1
,
0
))
e1
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e1
:
SetCategory
(
CATEGORY_EQUIP
)
e1
:
SetType
(
EFFECT_TYPE_IGNITION
)
...
...
@@ -25,7 +25,9 @@ function c188813.initial_effect(c)
c
:
RegisterEffect
(
e2
)
--ac
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_IGNITION
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
+
EFFECT_FLAG_DELAY
)
e3
:
SetCode
(
EVENT_EQUIP
)
e3
:
SetRange
(
LOCATION_SZONE
)
e3
:
SetCountLimit
(
1
,
188813
)
e3
:
SetCondition
(
c188813
.
accon
)
...
...
@@ -33,6 +35,9 @@ function c188813.initial_effect(c)
e3
:
SetOperation
(
c188813
.
acop
)
c
:
RegisterEffect
(
e3
)
end
function
c188813
.
eqlimit
(
e
,
c
)
return
(
c
:
IsRace
(
RACE_MACHINE
)
and
c
:
IsAttribute
(
ATTRIBUTE_LIGHT
))
or
e
:
GetHandler
():
GetEquipTarget
()
==
c
end
function
c188813
.
matfilter
(
c
)
return
c
:
IsType
(
TYPE_UNION
)
and
not
c
:
IsCode
(
188813
)
end
...
...
@@ -80,6 +85,9 @@ end
function
c188813
.
acfilter
(
c
,
tp
)
return
c
:
IsCode
(
188812
)
and
c
:
GetActivateEffect
():
IsActivatable
(
tp
)
end
function
c188813
.
accon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
eg
:
IsContains
(
e
:
GetHandler
())
end
function
c188813
.
actg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c188813
.
acfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
tp
)
end
end
...
...
expansions/script/c188815.lua
0 → 100644
View file @
b60fe110
--超硼素巨神 杰克南瓜
function
c188815
.
initial_effect
(
c
)
c
:
SetUniqueOnField
(
1
,
0
,
188815
)
c
:
EnableReviveLimit
()
--splimit
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_SINGLE
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetCode
(
EFFECT_SPSUMMON_CONDITION
)
c
:
RegisterEffect
(
e0
)
--spsummon1
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetType
(
EFFECT_TYPE_IGNITION
)
e1
:
SetRange
(
LOCATION_GRAVE
)
e1
:
SetCountLimit
(
1
,
188815
)
e1
:
SetCost
(
c188815
.
spcost1
)
e1
:
SetTarget
(
c188815
.
sptg1
)
e1
:
SetOperation
(
c188815
.
spop1
)
c
:
RegisterEffect
(
e1
)
--spsummon2
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
188815
,
1
))
e2
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_REMOVE
)
e2
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e2
:
SetCode
(
EVENT_FREE_CHAIN
)
e2
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetHintTiming
(
0
,
TIMINGS_CHECK_MONSTER
+
TIMING_MAIN_END
)
e2
:
SetCountLimit
(
1
,
088815
)
e2
:
SetCondition
(
c188815
.
spcon2
)
e2
:
SetTarget
(
c188815
.
sptg2
)
e2
:
SetOperation
(
c188815
.
spop2
)
c
:
RegisterEffect
(
e2
)
end
function
c188815
.
spfilter1
(
c
)
return
c
:
IsRace
(
RACE_ZOMBIE
)
and
c
:
IsAbleToGraveAsCost
()
and
(
Duel
.
GetMZoneCount
(
tp
,
c
)
>
0
or
c
:
IsLocation
(
LOCATION_HAND
))
end
function
c188815
.
fcheck
(
c
,
g
)
return
g
:
IsExists
(
Card
.
IsOriginalCodeRule
,
1
,
c
,
c
:
GetOriginalCodeRule
())
end
function
c188815
.
fselect
(
g
)
return
not
g
:
IsExists
(
c188815
.
fcheck
,
1
,
nil
,
g
)
end
function
c188815
.
spcost1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
local
g
=
Duel
.
GetMatchingGroup
(
c188815
.
ctfil
,
tp
,
LOCATION_HAND
+
LOCATION_ONFIELD
,
0
,
2
,
nil
)
if
chk
==
0
then
return
g
:
CheckSubGroup
(
c188815
.
fselect
,
2
,
99
)
end
local
sg
=
g
:
SelectSubGroup
(
tp
,
c188815
.
fselect
,
false
,
2
,
99
,
g
)
Duel
.
SendtoGrave
(
g
,
REASON_COST
)
end
function
c188815
.
sptg1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
c
,
1
,
0
,
0
)
end
function
c188815
.
spop1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
c
:
IsRelateToEffect
(
e
)
then
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
function
c188815
.
spcon2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
(
Duel
.
GetCurrentPhase
()
==
PHASE_MAIN1
or
Duel
.
GetCurrentPhase
()
==
PHASE_MAIN2
)
end
function
c188815
.
spfilter2
(
c
,
e
,
tp
)
local
code
=
c
:
GetCode
()
return
c
:
IsRace
(
RACE_ZOMBIE
)
and
c
:
IsAbleToRemoveAsCost
()
and
Duel
.
IsExistingMatchingCard
(
c188815
.
spfilter3
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
,
code
)
end
function
c188815
.
spfilter2
(
c
,
e
,
tp
,
code
)
return
c
:
IsRace
(
RACE_ZOMBIE
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
and
not
c
:
IsCode
(
code
)
end
function
c188815
.
sptg2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
local
c
=
e
:
GetHandler
()
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingTarget
(
c188815
.
spfilter2
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
and
c
:
IsAbleToRemove
()
end
local
tc
=
Duel
.
SelectTarget
(
tp
,
c188815
.
spfilter2
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
e
,
tp
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_MZONE
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_REMOVE
,
c
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_REMOVE
,
tc
,
1
,
0
,
0
)
end
function
c188815
.
spop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
and
Duel
.
Remove
(
tc
,
POS_FACEUP
,
REASON_EFFECT
)
~=
0
then
local
code
=
tc
:
GetCode
()
local
g
=
Duel
.
GetMatchingGroup
(
c188815
.
spfilter3
,
tp
,
LOCATION_DECK
,
0
,
nil
,
e
,
tp
,
code
)
if
g
:
GetCount
()
<=
0
then
return
end
local
sc
=
g
:
Select
(
tp
,
1
,
1
,
nil
):
GetFirst
()
if
Duel
.
SpecialSummon
(
sc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
then
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_LEAVE_FIELD_REDIRECT
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_REDIRECT
)
e1
:
SetValue
(
LOCATION_REMOVED
)
sc
:
RegisterEffect
(
e1
,
true
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_CANNOT_TRIGGER
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
sc
:
RegisterEffect
(
e1
)
if
c
:
IsFaceup
()
and
c
:
IsRelateToEffect
(
e
)
and
c
:
IsAbleToRemove
()
then
Duel
.
BreakEffect
()
if
Duel
.
Remove
(
c
,
POS_FACEUP
,
REASON_EFFECT
+
REASON_TEMPORARY
)
~=
0
then
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e2
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e2
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
e2
:
SetLabelObject
(
c
)
e2
:
SetCountLimit
(
1
)
e2
:
SetOperation
(
c188815
.
retop
)
Duel
.
RegisterEffect
(
e2
,
tp
)
end
end
end
end
end
function
c188815
.
retop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
ReturnToField
(
e
:
GetLabelObject
())
end
expansions/script/c40009105.lua
View file @
b60fe110
...
...
@@ -153,7 +153,7 @@ end
-- re:GetHandler():RegisterFlagEffect(m,RESET_CHAIN,0,1)
--end
function
cm
.
chcon2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
GetLP
(
e
:
GetHandlerPlayer
())
>=
12000
return
ep
==
1
-
tp
and
Duel
.
GetLP
(
e
:
GetHandlerPlayer
())
>=
12000
end
function
cm
.
chop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Group
.
CreateGroup
()
...
...
@@ -162,7 +162,7 @@ function cm.chop2(e,tp,eg,ep,ev,re,r,rp)
end
function
cm
.
repop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_CARD
,
0
,
m
)
Duel
.
Damage
(
tp
-
1
,
2000
,
REASON_EFFECT
)
Duel
.
Damage
(
1
-
tp
,
2000
,
REASON_EFFECT
)
Duel
.
Recover
(
tp
,
2000
,
REASON_EFFECT
)
end
function
cm
.
sumlimit
(
e
,
c
,
sump
,
sumtype
,
sumpos
,
targetp
)
...
...
expansions/script/c40009106.lua
View file @
b60fe110
--守护天使 急诊天马
local
m
=
m
local
m
=
40009101
local
cm
=
_G
[
"c"
..
m
]
cm
.
named_with_ProtectorSpirit
=
1
function
cm
.
initial_effect
(
c
)
...
...
expansions/script/c53722008.lua
View file @
b60fe110
...
...
@@ -16,7 +16,6 @@ function cm.initial_effect(c)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e1
:
SetCondition
(
cm
.
effcon
)
e1
:
SetOperation
(
cm
.
effop
)
c
:
RegisterEffect
(
e1
)
local
e2
=
Effect
.
CreateEffect
(
c
)
...
...
@@ -51,15 +50,13 @@ end
-- Duel.Hint(HINT_CARD,0,m)
-- Duel.Destroy(e:GetHandler(),REASON_EFFECT)
--end
function
cm
.
effcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_XYZ
)
end
function
cm
.
effop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
not
c
:
IsSummonType
(
SUMMON_TYPE_XYZ
)
then
return
end
local
mg
=
c
:
GetMaterial
()
for
tc
in
aux
.
Next
(
mg
)
do
local
code
=
tc
:
GetOriginalCode
()
if
code
>
53722000
and
code
<
53722008
and
c
:
GetFlagEffect
(
code
)
==
0
and
((
not
g
)
or
(
not
g
:
IsExists
(
cm
.
tgfil
,
1
,
nil
,
tp
)))
then
if
code
>
53722000
and
code
<
53722008
and
c
:
GetFlagEffect
(
code
)
==
0
then
c
:
CopyEffect
(
code
,
RESET_EVENT
+
RESETS_STANDARD
,
1
)
c
:
RegisterFlagEffect
(
code
,
RESET_EVENT
+
RESETS_STANDARD
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
code
-
53722000
))
end
...
...
expansions/script/c53726016.lua
View file @
b60fe110
...
...
@@ -19,6 +19,7 @@ function cm.initial_effect(c)
e2
:
SetOperation
(
cm
.
imop
)
c
:
RegisterEffect
(
e2
)
end
cm
.
has_text_type
=
TYPE_DUAL
function
cm
.
spfilter
(
c
,
e
,
tp
)
return
c
:
IsType
(
TYPE_DUAL
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
...
...
expansions/script/c67200415.lua
View file @
b60fe110
...
...
@@ -88,7 +88,7 @@ function c67200415.desop(e,tp,eg,ep,ev,re,r,rp)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
TRUE
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
HintSelection
(
g
)
Duel
.
Destroy
(
g
,
REASON_EFFECT
)
if
Duel
.
Destroy
(
g
,
REASON_EFFECT
)
~=
0
then
local
ct
=
g
:
GetFirst
():
GetLevel
()
if
ct
>
0
and
Duel
.
GetMatchingGroupCount
(
Card
.
IsCanAddCounter
,
tp
,
LOCATION_ONFIELD
,
0
,
nil
,
0x1
,
1
)
>
0
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
67200415
,
4
))
then
...
...
@@ -101,6 +101,7 @@ function c67200415.desop(e,tp,eg,ep,ev,re,r,rp)
end
end
end
end
end
--
function
c67200415
.
dttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
...
...
expansions/script/c67200433.lua
View file @
b60fe110
--术结天缘 古洛夫拉菲
function
c67200433
.
initial_effect
(
c
)
--
c:EnableReviveLimit()
c
:
EnableReviveLimit
()
aux
.
EnablePendulumAttribute
(
c
,
false
)
aux
.
AddXyzProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsSetCard
,
0x5671
),
5
,
2
)
--Activate
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment