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
Huangnan
no81cards
Commits
5c6cba06
Commit
5c6cba06
authored
Jan 13, 2023
by
Nemo Ma
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
b251cce6
Changes
11
Hide whitespace changes
Inline
Side-by-side
Showing
11 changed files
with
173 additions
and
42 deletions
+173
-42
expansions/script/c11451462.lua
expansions/script/c11451462.lua
+4
-1
expansions/script/c11451463.lua
expansions/script/c11451463.lua
+4
-1
expansions/script/c11451464.lua
expansions/script/c11451464.lua
+4
-1
expansions/script/c11451465.lua
expansions/script/c11451465.lua
+4
-1
expansions/script/c11451466.lua
expansions/script/c11451466.lua
+4
-1
expansions/script/c11451467.lua
expansions/script/c11451467.lua
+4
-1
expansions/script/c11451652.lua
expansions/script/c11451652.lua
+37
-0
expansions/script/c15000904.lua
expansions/script/c15000904.lua
+10
-6
expansions/script/c4591277.lua
expansions/script/c4591277.lua
+98
-26
expansions/script/c64800113.lua
expansions/script/c64800113.lua
+1
-1
expansions/script/c93600301.lua
expansions/script/c93600301.lua
+3
-3
No files found.
expansions/script/c11451462.lua
View file @
5c6cba06
...
...
@@ -41,6 +41,9 @@ end
function
cm
.
filter2
(
c
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
end
function
cm
.
filter22
(
c
,
e
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
and
not
c
:
IsImmuneToEffect
(
e
)
end
function
cm
.
filter3
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x97a
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
...
...
@@ -100,7 +103,7 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function
cm
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
0
,
nil
)
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
0
,
nil
,
e
)
local
sg
=
Duel
.
GetMatchingGroup
(
cm
.
filter3
,
tp
,
LOCATION_DECK
,
0
,
nil
,
e
,
tp
)
local
tg
=
Group
.
CreateGroup
()
for
sc
in
aux
.
Next
(
sg
)
do
...
...
expansions/script/c11451463.lua
View file @
5c6cba06
...
...
@@ -39,6 +39,9 @@ end
function
cm
.
filter2
(
c
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
end
function
cm
.
filter22
(
c
,
e
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
and
not
c
:
IsImmuneToEffect
(
e
)
end
function
cm
.
filter3
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x97a
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
...
...
@@ -104,7 +107,7 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function
cm
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
0
,
nil
)
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
0
,
nil
,
e
)
local
sg
=
Duel
.
GetMatchingGroup
(
cm
.
filter3
,
tp
,
LOCATION_DECK
,
0
,
nil
,
e
,
tp
)
local
tg
=
Group
.
CreateGroup
()
for
sc
in
aux
.
Next
(
sg
)
do
...
...
expansions/script/c11451464.lua
View file @
5c6cba06
...
...
@@ -73,6 +73,9 @@ end
function
cm
.
filter2
(
c
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
end
function
cm
.
filter22
(
c
,
e
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
and
not
c
:
IsImmuneToEffect
(
e
)
end
function
cm
.
filter3
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x97a
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
...
...
@@ -160,7 +163,7 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function
cm
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
nil
)
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
nil
,
e
)
local
sg
=
Duel
.
GetMatchingGroup
(
cm
.
filter3
,
tp
,
LOCATION_DECK
,
0
,
nil
,
e
,
tp
)
local
tg
=
Group
.
CreateGroup
()
for
sc
in
aux
.
Next
(
sg
)
do
...
...
expansions/script/c11451465.lua
View file @
5c6cba06
...
...
@@ -57,6 +57,9 @@ end
function
cm
.
filter2
(
c
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
end
function
cm
.
filter22
(
c
,
e
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
and
not
c
:
IsImmuneToEffect
(
e
)
end
function
cm
.
filter3
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x97a
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
...
...
@@ -138,7 +141,7 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function
cm
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
nil
)
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
nil
,
e
)
local
sg
=
Duel
.
GetMatchingGroup
(
cm
.
filter3
,
tp
,
LOCATION_DECK
,
0
,
nil
,
e
,
tp
)
local
tg
=
Group
.
CreateGroup
()
for
sc
in
aux
.
Next
(
sg
)
do
...
...
expansions/script/c11451466.lua
View file @
5c6cba06
...
...
@@ -62,6 +62,9 @@ end
function
cm
.
filter2
(
c
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
end
function
cm
.
filter22
(
c
,
e
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
and
not
c
:
IsImmuneToEffect
(
e
)
end
function
cm
.
filter3
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x97a
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
...
...
@@ -151,7 +154,7 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function
cm
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
nil
)
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
nil
,
e
)
local
sg
=
Duel
.
GetMatchingGroup
(
cm
.
filter3
,
tp
,
LOCATION_DECK
,
0
,
nil
,
e
,
tp
)
local
trg
=
mg
:
Filter
(
Card
.
IsType
,
nil
,
TYPE_TUNER
)
local
ng
=
mg
-
trg
...
...
expansions/script/c11451467.lua
View file @
5c6cba06
...
...
@@ -65,6 +65,9 @@ end
function
cm
.
filter2
(
c
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
end
function
cm
.
filter22
(
c
,
e
)
return
c
:
IsSetCard
(
0x97a
)
and
((
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_ONFIELD
))
or
(
c
:
IsPublic
()
and
c
:
IsLocation
(
LOCATION_HAND
))
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsAbleToRemove
()
and
not
c
:
IsImmuneToEffect
(
e
)
end
function
cm
.
filter3
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x97a
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
...
...
@@ -180,7 +183,7 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function
cm
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
nil
)
local
mg
=
Duel
.
GetMatchingGroup
(
cm
.
filter2
2
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_ONFIELD
,
nil
,
e
)
local
sg
=
Duel
.
GetMatchingGroup
(
cm
.
filter3
,
tp
,
LOCATION_DECK
,
0
,
nil
,
e
,
tp
)
local
trg
=
mg
:
Filter
(
Card
.
IsType
,
nil
,
TYPE_TUNER
)
local
ng
=
mg
-
trg
...
...
expansions/script/c11451652.lua
View file @
5c6cba06
...
...
@@ -12,6 +12,24 @@ function cm.initial_effect(c)
e1
:
SetTarget
(
cm
.
target
)
e1
:
SetOperation
(
cm
.
operation
)
c
:
RegisterEffect
(
e1
)
if
not
cm
.
global_check
then
cm
.
global_check
=
true
local
ge1
=
Effect
.
CreateEffect
(
c
)
ge1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
ge1
:
SetCode
(
EVENT_CHAINING
)
ge1
:
SetOperation
(
cm
.
checkop
)
Duel
.
RegisterEffect
(
ge1
,
0
)
end
end
function
cm
.
checkop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
rc
=
re
:
GetHandler
()
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
0x10000000
+
m
)
e1
:
SetLabelObject
(
re
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
+
EFFECT_FLAG_IGNORE_IMMUNE
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
)
rc
:
RegisterEffect
(
e1
,
true
)
end
function
cm
.
condition
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_RITUAL
)
...
...
@@ -39,6 +57,13 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
end--]]
local
g
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0xff
,
0xff
,
nil
,
ac
)
local
reg
=
Card
.
RegisterEffect
local
ctl
=
Effect
.
SetCountLimit
Effect
.
SetCountLimit
=
function
(
se
,
ct
,
code
)
if
se
:
GetType
()
&
EFFECT_TYPE_IGNITION
>
0
and
(
not
code
or
code
==
0
)
then
cm
[
se
]
=
true
end
ctl
(
se
,
ct
,
code
)
end
Card
.
RegisterEffect
=
function
(
sc
,
se
,
bool
)
if
se
:
GetType
()
&
EFFECT_TYPE_IGNITION
>
0
and
sc
:
GetOriginalType
()
&
TYPE_MONSTER
>
0
then
se
:
SetType
(
EFFECT_TYPE_QUICK_O
)
...
...
@@ -49,6 +74,17 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
se
:
SetProperty
(
pro
,
pro2
)
end
reg
(
sc
,
se
,
true
)
if
cm
[
se
]
then
cm
[
se
]
=
nil
local
eset
=
{
sc
:
IsHasEffect
(
0x10000000
+
m
)}
if
#
eset
>
0
then
local
ct
=
0
for
_
,
ee
in
pairs
(
eset
)
do
if
ee
:
GetLabelObject
():
GetOperation
()
==
se
:
GetOperation
()
then
ct
=
ct
+
1
end
end
se
:
UseCountLimit
(
sc
:
GetControler
(),
ct
)
end
end
end
for
tc
in
aux
.
Next
(
g
)
do
if
tc
.
initial_effect
then
...
...
@@ -60,4 +96,5 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
end
end
Card
.
RegisterEffect
=
reg
Effect
.
SetCountLimit
=
ctl
end
\ No newline at end of file
expansions/script/c15000904.lua
View file @
5c6cba06
...
...
@@ -97,18 +97,22 @@ function cm.damop(e,tp,eg,ep,ev,re,r,rp)
end
function
cm
.
tdtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_REMOVED
)
end
if
chk
==
0
then
return
Duel
.
IsPlayerCanDraw
(
tp
,
1
)
and
Duel
.
IsExistingTarget
(
Card
.
IsAbleToDeck
,
tp
,
LOCATION_REMOVED
,
0
,
1
,
aux
.
ExceptThisCard
(
e
))
end
if
chk
==
0
then
return
Duel
.
IsPlayerCanDraw
(
tp
,
1
)
and
Duel
.
IsExistingTarget
(
Card
.
IsAbleToDeck
,
tp
,
LOCATION_REMOVED
,
0
,
1
,
e
:
GetHandler
(
))
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TODECK
)
local
g
=
Duel
.
SelectTarget
(
tp
,
Card
.
IsAbleToDeck
,
tp
,
LOCATION_REMOVED
,
0
,
1
,
2
,
aux
.
ExceptThisCard
(
e
))
local
g
=
Duel
.
SelectTarget
(
tp
,
Card
.
IsAbleToDeck
,
tp
,
LOCATION_REMOVED
,
0
,
1
,
2
,
e
:
GetHandler
(
))
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TODECK
,
g
,
#
g
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DRAW
,
nil
,
0
,
tp
,
1
)
end
function
cm
.
tdop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tg
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_CARDS
)
local
sg
=
tg
:
Filter
(
Card
.
IsRelateToEffect
,
nil
,
e
)
if
sg
:
GetCount
()
>
0
and
Duel
.
SendtoDeck
(
sg
,
nil
,
1
,
REASON_EFFECT
)
~=
0
then
Duel
.
ShuffleDeck
(
tp
)
Duel
.
BreakEffect
()
Duel
.
Draw
(
tp
,
1
,
REASON_EFFECT
)
if
sg
:
GetCount
()
>
0
and
Duel
.
SendtoDeck
(
sg
,
nil
,
2
,
REASON_EFFECT
)
~=
0
then
local
g
=
Duel
.
GetOperatedGroup
()
if
g
:
IsExists
(
Card
.
IsLocation
,
1
,
nil
,
LOCATION_DECK
)
then
Duel
.
ShuffleDeck
(
tp
)
end
local
ct
=
g
:
FilterCount
(
Card
.
IsLocation
,
nil
,
LOCATION_DECK
+
LOCATION_EXTRA
)
if
ct
>
0
then
Duel
.
BreakEffect
()
Duel
.
Draw
(
tp
,
1
,
REASON_EFFECT
)
end
end
end
\ No newline at end of file
expansions/script/c4591277.lua
View file @
5c6cba06
...
...
@@ -13,42 +13,114 @@ function c4591277.initial_effect(c)
e1
:
SetOperation
(
c4591277
.
cosoperation
)
c
:
RegisterEffect
(
e1
)
--grave fusion material
if
not
aux
.
bog_grave_fus_mat
then
aux
.
bog_grave_fus_mat
=
true
local
ge1
=
Effect
.
CreateEffect
(
c
)
ge1
:
SetType
(
EFFECT_TYPE_FIELD
)
ge1
:
SetCode
(
EFFECT_EXTRA_FUSION_MATERIAL
)
ge1
:
SetTargetRange
(
LOCATION_GRAVE
,
0
)
ge1
:
SetTarget
(
c4591277
.
mttg
)
ge1
:
SetValue
(
c4591277
.
mtval
)
Duel
.
RegisterEffect
(
ge1
,
0
)
local
ge2
=
ge1
:
Clone
()
Duel
.
RegisterEffect
(
ge2
,
1
)
end
--
if not aux.bog_grave_fus_mat then
--
aux.bog_grave_fus_mat=true
--
local ge1=Effect.CreateEffect(c)
--
ge1:SetType(EFFECT_TYPE_FIELD)
--
ge1:SetCode(EFFECT_EXTRA_FUSION_MATERIAL)
--
ge1:SetTargetRange(LOCATION_GRAVE,0)
--
ge1:SetTarget(c4591277.mttg)
--
ge1:SetValue(c4591277.mtval)
--
Duel.RegisterEffect(ge1,0)
--
local ge2=ge1:Clone()
--
Duel.RegisterEffect(ge2,1)
--
end
--workaround
if
not
aux
.
fus_mat_hack_check
then
aux
.
fus_mat_hack_check
=
true
function
aux
.
fus_mat_hack_exmat_filter
(
c
)
return
c
:
IsHasEffect
(
EFFECT_EXTRA_FUSION_MATERIAL
,
c
:
GetControler
())
--if not aux.fus_mat_hack_check then
-- aux.fus_mat_hack_check=true
-- function aux.fus_mat_hack_exmat_filter(c)
-- return c:IsHasEffect(EFFECT_EXTRA_FUSION_MATERIAL,c:GetControler())
-- end
-- _SendtoGrave=Duel.SendtoGrave
-- function Duel.SendtoGrave(tg,reason)
-- if reason~=REASON_EFFECT+REASON_MATERIAL+REASON_FUSION or Auxiliary.GetValueType(tg)~="Group" then
-- return _SendtoGrave(tg,reason)
-- end
-- local rg=tg:Filter(Card.IsLocation,nil,LOCATION_GRAVE)
-- tg:Sub(rg)
-- local tc=rg:Filter(aux.fus_mat_hack_exmat_filter,nil):GetFirst()
-- if tc then
-- local te=tc:IsHasEffect(EFFECT_EXTRA_FUSION_MATERIAL,tc:GetControler())
-- te:UseCountLimit(tc:GetControler())
-- end
-- local ct1=_SendtoGrave(tg,reason)
-- local ct2=Duel.Remove(rg,POS_FACEUP,reason)
-- return ct1+ct2
-- end
--end
--deck fusion material
if
not
c4591277
.
globle_check
then
--chain check
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetCode
(
EVENT_CHAIN_SOLVING
)
e1
:
SetOperation
(
c4591277
.
chainop
)
Duel
.
RegisterEffect
(
e1
,
0
)
c4591277
.
globle_check
=
true
Swamp_hack_fusion_check
=
Card
.
CheckFusionMaterial
Swamp_hack_fusion_group
=
Group
.
CreateGroup
function
Card
.
CheckFusionMaterial
(
card
,
Group_fus
,
Card_g
,
int_chkf
,
not_mat
)
local
exg
=
Group
.
CreateGroup
()
Swamp_hack_fusion_group
=
Group
.
CreateGroup
()
if
card
:
GetOriginalCode
()
==
4591277
then
exg
=
Duel
.
GetMatchingGroup
(
c4591277
.
filter0
,
int_chkf
,
LOCATION_GRAVE
,
0
,
nil
,
card
)
exg
=
Group
.
__bxor
(
exg
,
Group_fus
):
Filter
(
Card
.
IsLocation
,
nil
,
LOCATION_GRAVE
)
if
exg
:
GetCount
()
>
0
then
if
Duel
.
GetFlagEffect
(
0
,
4591277
)
~=
0
and
Duel
.
GetFlagEffect
(
0
,
4591278
)
==
0
then
Duel
.
RegisterFlagEffect
(
0
,
4591278
,
RESET_EVENT
+
RESET_CHAIN
,
0
,
1
)
local
e1
=
Effect
.
CreateEffect
(
card
)
e1
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EVENT_CHAIN_SOLVED
)
e1
:
SetOperation
(
c4591277
.
resetop
)
e1
:
SetReset
(
RESET_EVENT
+
RESET_CHAIN
)
Duel
.
RegisterEffect
(
e1
,
0
)
local
e2
=
e1
:
Clone
()
e2
:
SetCode
(
EVENT_CHAIN_NEGATED
)
Duel
.
RegisterEffect
(
e2
,
0
)
end
local
hg
=
Group
.
__add
(
exg
,
Group_fus
)
return
Swamp_hack_fusion_check
(
card
,
hg
,
Card_g
,
int_chkf
,
not_mat
)
end
end
return
Swamp_hack_fusion_check
(
card
,
Group_fus
,
Card_g
,
int_chkf
,
not_mat
)
end
Swamp_hack_fusion_select
=
Duel
.
SelectFusionMaterial
function
Duel
.
SelectFusionMaterial
(
tp
,
card
,
mg
,
gc_nil
,
chkf
)
if
card
:
GetOriginalCode
()
==
4591277
and
Duel
.
GetFlagEffect
(
0
,
4591277
)
~=
0
and
Duel
.
GetFlagEffect
(
0
,
4591278
)
~=
0
then
exg
=
Duel
.
GetMatchingGroup
(
c4591277
.
filter0
,
int_chkf
,
LOCATION_GRAVE
,
0
,
nil
,
card
)
if
exg
:
GetCount
()
>
0
then
mg
:
Merge
(
exg
)
Swamp_hack_fusion_group
=
exg
end
end
Duel
.
ResetFlagEffect
(
0
,
4591278
)
return
Swamp_hack_fusion_select
(
tp
,
card
,
mg
,
gc_nil
,
chkf
)
end
_SendtoGrave
=
Duel
.
SendtoGrave
Swamp_hack_fusion
_SendtoGrave
=
Duel
.
SendtoGrave
function
Duel
.
SendtoGrave
(
tg
,
reason
)
if
reason
~=
REASON_EFFECT
+
REASON_MATERIAL
+
REASON_FUSION
or
Auxiliary
.
GetValueType
(
tg
)
~=
"Group"
then
return
_SendtoGrave
(
tg
,
reason
)
if
reason
~=
REASON_EFFECT
+
REASON_MATERIAL
+
REASON_FUSION
or
aux
.
GetValueType
(
tg
)
~=
"Group"
then
return
Swamp_hack_fusion
_SendtoGrave
(
tg
,
reason
)
end
local
rg
=
tg
:
Filter
(
Card
.
IsLocation
,
nil
,
LOCATION_GRAVE
)
local
rg
=
tg
:
Filter
(
c4591277
.
fusion_filter
,
nil
)
tg
:
Sub
(
rg
)
local
tc
=
rg
:
Filter
(
aux
.
fus_mat_hack_exmat_filter
,
nil
):
GetFirst
()
if
tc
then
local
te
=
tc
:
IsHasEffect
(
EFFECT_EXTRA_FUSION_MATERIAL
,
tc
:
GetControler
())
te
:
UseCountLimit
(
tc
:
GetControler
())
end
local
ct1
=
_SendtoGrave
(
tg
,
reason
)
local
ct1
=
Swamp_hack_fusion_SendtoGrave
(
tg
,
reason
)
local
ct2
=
Duel
.
Remove
(
rg
,
POS_FACEUP
,
reason
)
return
ct1
+
ct2
end
end
end
function
c4591277
.
chainop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
RegisterFlagEffect
(
0
,
4591277
,
RESET_EVENT
+
RESET_CHAIN
,
0
,
1
)
end
function
c4591277
.
resetop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
ResetFlagEffect
(
0
,
4591277
)
e
:
Reset
()
end
function
c4591277
.
fusion_filter
(
c
)
return
c
:
IsLocation
(
LOCATION_GRAVE
)
and
Swamp_hack_fusion_group
and
Swamp_hack_fusion_group
:
IsContains
(
c
)
end
function
c4591277
.
mttg
(
e
,
c
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAbleToRemove
()
end
...
...
expansions/script/c64800113.lua
View file @
5c6cba06
...
...
@@ -31,7 +31,7 @@ end
--e1
function
c64800113
.
thcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
return
c
:
IsSummonType
(
SUMMON_TYPE_SYNCHRO
)
not
Duel
.
IsExistingMatchingCard
(
aux
.
TRUE
,
tp
,
LOCATION_MZONE
,
0
,
1
,
c
)
return
c
:
IsSummonType
(
SUMMON_TYPE_SYNCHRO
)
and
not
Duel
.
IsExistingMatchingCard
(
aux
.
TRUE
,
tp
,
LOCATION_MZONE
,
0
,
1
,
c
)
end
function
c64800113
.
cost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
e
:
SetLabel
(
100
)
...
...
expansions/script/c93600301.lua
View file @
5c6cba06
...
...
@@ -61,7 +61,7 @@ function cm.initial_effect(c)
c
:
RegisterEffect
(
e4
)
--material
local
e5
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
m
,
1
))
e1
:
SetDescription
(
aux
.
Stringid
(
m
,
1
))
e5
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e5
:
SetCode
(
EVENT_BATTLE_START
)
e5
:
SetCondition
(
cm
.
effcon
)
...
...
@@ -217,13 +217,13 @@ function cm.xcon(e)
end
local
tc
=
Duel
.
GetFieldCard
(
rp
,
loc
,
zone
)
local
sg
=
Group
.
CreateGroup
()
sg
:
AddCard
(
tc
)
if
tc
then
sg
:
AddCard
(
tc
)
end
if
zone
~=
21
and
zone
~=
22
then
sg
=
Duel
.
GetMatchingGroup
(
cm
.
seqfilter
,
rp
,
LOCATION_ONFIELD
,
0
,
nil
,
zone
)
end
if
loc
==
LOCATION_FZONE
then
tc
=
Duel
.
GetFieldCard
(
rp
,
loc
,
0
)
sg
=
Group
.
FromCards
(
tc
)
if
tc
then
sg
=
Group
.
FromCards
(
tc
)
end
end
if
zone
==
22
then
local
xcg
=
Duel
.
GetMatchingGroup
(
cm
.
filter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
tp
)
...
...
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