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
02503888
Commit
02503888
authored
Aug 28, 2025
by
POLYMER
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
21a5edc3
Changes
9
Hide whitespace changes
Inline
Side-by-side
Showing
9 changed files
with
322 additions
and
12 deletions
+322
-12
expansions/script/c11451026.lua
expansions/script/c11451026.lua
+1
-1
expansions/script/c11451917.lua
expansions/script/c11451917.lua
+1
-1
expansions/script/c14010007.lua
expansions/script/c14010007.lua
+5
-4
expansions/script/c75081005.lua
expansions/script/c75081005.lua
+1
-1
expansions/script/c75081015.lua
expansions/script/c75081015.lua
+1
-1
expansions/script/c89490017.lua
expansions/script/c89490017.lua
+104
-1
expansions/script/c89490035.lua
expansions/script/c89490035.lua
+104
-1
expansions/script/c89490054.lua
expansions/script/c89490054.lua
+104
-1
expansions/script/c89490087.lua
expansions/script/c89490087.lua
+1
-1
No files found.
expansions/script/c11451026.lua
View file @
02503888
...
@@ -176,7 +176,7 @@ function cm.operation4(e,tp,eg,ep,ev,re,r,rp)
...
@@ -176,7 +176,7 @@ function cm.operation4(e,tp,eg,ep,ev,re,r,rp)
Duel
.
CreateToken
(
tp
,
tc
:
GetOriginalCode
())
Duel
.
CreateToken
(
tp
,
tc
:
GetOriginalCode
())
Card
.
RegisterEffect
=
_CRegisterEffect
Card
.
RegisterEffect
=
_CRegisterEffect
if
e1
then
if
e1
then
Debug
.
Message
(
e1
:
GetCode
())
--
Debug.Message(e1:GetCode())
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_F
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_F
)
e1
:
SetCode
(
EVENT_CUSTOM
+
m
)
e1
:
SetCode
(
EVENT_CUSTOM
+
m
)
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetRange
(
LOCATION_MZONE
)
...
...
expansions/script/c11451917.lua
View file @
02503888
...
@@ -36,7 +36,7 @@ function cm.efilter(e)
...
@@ -36,7 +36,7 @@ function cm.efilter(e)
return
e
:
GetCode
()
==
EVENT_SUMMON_SUCCESS
and
e
:
IsActivated
()
and
not
e
:
IsHasType
(
EFFECT_TYPE_SINGLE
)
return
e
:
GetCode
()
==
EVENT_SUMMON_SUCCESS
and
e
:
IsActivated
()
and
not
e
:
IsHasType
(
EFFECT_TYPE_SINGLE
)
end
end
function
cm
.
efilter2
(
e
)
function
cm
.
efilter2
(
e
)
return
(
e
:
IsHasCategory
(
CATEGORY_TOHAND
)
or
e
:
IsHasCategory
(
CATEGORY_DRAW
))
and
e
:
IsActivated
(
)
return
(
(
e
:
IsHasCategory
(
CATEGORY_TOHAND
)
or
e
:
IsHasCategory
(
CATEGORY_DRAW
))
and
e
:
IsActivated
())
or
(
e
:
GetHandler
():
IsType
(
TYPE_SPIRIT
)
and
e
:
GetType
()
&
0x801
==
0x801
and
(
e
:
GetCode
()
==
EVENT_SUMMON_SUCCESS
or
e
:
GetCode
()
==
EVENT_FLIP
)
and
e
:
IsHasProperty
(
EFFECT_FLAG_CANNOT_DISABLE
)
)
end
end
function
cm
.
spfilter
(
c
)
function
cm
.
spfilter
(
c
)
return
c
:
IsOriginalEffectProperty
(
cm
.
efilter
)
and
c
:
IsAbleToHand
()
return
c
:
IsOriginalEffectProperty
(
cm
.
efilter
)
and
c
:
IsAbleToHand
()
...
...
expansions/script/c14010007.lua
View file @
02503888
...
@@ -32,8 +32,9 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
...
@@ -32,8 +32,9 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
SetChainLimit
(
aux
.
FALSE
)
Duel
.
SetChainLimit
(
aux
.
FALSE
)
end
end
function
cm
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
cm
.
actcon
then
return
end
if
Duel
.
IsExistingMatchingCard
(
cm
.
Gehfilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
nil
)
and
Duel
.
IsExistingMatchingCard
(
cm
.
Sealfilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
nil
)
and
Duel
.
IsExistingMatchingCard
(
cm
.
Shunorosfilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
nil
)
then
local
WIN_REASON_CREATORGOD
=
0x47
local
WIN_REASON_CREATORGOD
=
0x47
local
p
=
e
:
GetHandler
():
GetControler
()
local
p
=
e
:
GetHandler
():
GetControler
()
Duel
.
Win
(
p
,
WIN_REASON_CREATORGOD
)
Duel
.
Win
(
p
,
WIN_REASON_CREATORGOD
)
end
end
end
\ No newline at end of file
expansions/script/c75081005.lua
View file @
02503888
...
@@ -44,7 +44,7 @@ function c75081005.drepop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -44,7 +44,7 @@ function c75081005.drepop(e,tp,eg,ep,ev,re,r,rp)
end
end
function
c75081005
.
retop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c75081005
.
retop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
c
=
e
:
GetHandler
()
if
Duel
.
ReturnToField
(
e
:
GetLabelObject
())
~=
0
and
t
c
:
IsLocation
(
LOCATION_MZONE
)
and
Duel
.
GetFlagEffect
(
tp
,
75081005
)
==
0
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
75081005
,
0
))
then
if
Duel
.
ReturnToField
(
e
:
GetLabelObject
())
~=
0
and
c
:
IsLocation
(
LOCATION_MZONE
)
and
Duel
.
GetFlagEffect
(
tp
,
75081005
)
==
0
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
75081005
,
0
))
then
Duel
.
RegisterFlagEffect
(
tp
,
75081005
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
Duel
.
RegisterFlagEffect
(
tp
,
75081005
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
local
ct
=
1
local
ct
=
1
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
...
...
expansions/script/c75081015.lua
View file @
02503888
...
@@ -67,7 +67,7 @@ function c75081015.retcon1(e,tp,eg,ep,ev,re,r,rp)
...
@@ -67,7 +67,7 @@ function c75081015.retcon1(e,tp,eg,ep,ev,re,r,rp)
end
end
function
c75081015
.
retop1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c75081015
.
retop1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
e
:
GetLabelObject
()
local
tc
=
e
:
GetLabelObject
()
if
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
~=
0
and
tc
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
tp
,
false
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
75081015
,
2
))
~=
0
then
if
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
~=
0
and
tc
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
tp
,
false
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
75081015
,
2
))
then
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
end
...
...
expansions/script/c89490017.lua
View file @
02503888
...
@@ -12,7 +12,7 @@ function s.initial_effect(c)
...
@@ -12,7 +12,7 @@ function s.initial_effect(c)
e1
:
SetTarget
(
s
.
target
)
e1
:
SetTarget
(
s
.
target
)
e1
:
SetOperation
(
s
.
operation
)
e1
:
SetOperation
(
s
.
operation
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
local
custom_code
=
aux
.
RegisterMergedDelay
edEvent_ToSingleCard
(
c
,
id
,
EVENT_LEAVE_FIELD
)
local
custom_code
=
s
.
RegisterMerg
edEvent_ToSingleCard
(
c
,
id
,
EVENT_LEAVE_FIELD
)
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
...
@@ -116,3 +116,106 @@ function s.spop2(e,tp,eg,ep,ev,re,r,rp)
...
@@ -116,3 +116,106 @@ function s.spop2(e,tp,eg,ep,ev,re,r,rp)
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
end
function
s
.
RegisterMergedEvent_ToSingleCard
(
c
,
code
,
events
)
local
g
=
Group
.
CreateGroup
()
g
:
KeepAlive
()
local
mt
=
getmetatable
(
c
)
local
seed
=
0
if
type
(
events
)
==
"table"
then
for
_
,
event
in
ipairs
(
events
)
do
seed
=
seed
+
event
end
else
seed
=
events
end
while
(
mt
[
seed
]
==
true
)
do
seed
=
seed
+
1
end
mt
[
seed
]
=
true
local
event_code_single
=
(
code
~
(
seed
<<
16
))
|
EVENT_CUSTOM
if
type
(
events
)
==
"table"
then
for
_
,
event
in
ipairs
(
events
)
do
s
.
RegisterMergedEvent_ToSingleCard_AddOperation
(
c
,
g
,
event
,
event_code_single
)
end
else
s
.
RegisterMergedEvent_ToSingleCard_AddOperation
(
c
,
g
,
events
,
event_code_single
)
end
--listened to again
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e3
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_SET_AVAILABLE
)
e3
:
SetCode
(
EVENT_MOVE
)
e3
:
SetLabelObject
(
g
)
e3
:
SetOperation
(
s
.
ThisCardMovedToPublicResetCheck_ToSingleCard
)
c
:
RegisterEffect
(
e3
)
return
event_code_single
end
function
s
.
RegisterMergedEvent_ToSingleCard_AddOperation
(
c
,
g
,
event
,
event_code_single
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetCode
(
event
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_SET_AVAILABLE
)
e1
:
SetRange
(
0xff
)
e1
:
SetLabel
(
event_code_single
)
e1
:
SetLabelObject
(
g
)
e1
:
SetOperation
(
s
.
MergedDelayEventCheck1_ToSingleCard
)
c
:
RegisterEffect
(
e1
)
local
ec
=
{
EVENT_CHAIN_ACTIVATING
,
EVENT_CHAINING
,
EVENT_ATTACK_ANNOUNCE
,
EVENT_BREAK_EFFECT
,
EVENT_CHAIN_SOLVING
,
EVENT_CHAIN_SOLVED
,
EVENT_CHAIN_END
,
EVENT_SUMMON
,
EVENT_SPSUMMON
,
EVENT_MSET
,
EVENT_BATTLE_DESTROYED
}
for
_
,
code
in
ipairs
(
ec
)
do
local
ce
=
e1
:
Clone
()
ce
:
SetCode
(
code
)
ce
:
SetOperation
(
s
.
MergedDelayEventCheck2_ToSingleCard
)
c
:
RegisterEffect
(
ce
)
end
end
function
s
.
MergedDelayEventCheck1_ToSingleCard
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
local
c
=
e
:
GetOwner
()
g
:
Merge
(
eg
)
if
Duel
.
CheckEvent
(
EVENT_MOVE
)
then
local
_
,
meg
=
Duel
.
CheckEvent
(
EVENT_MOVE
,
true
)
if
meg
:
IsContains
(
c
)
and
(
c
:
IsFaceup
()
or
c
:
IsPublic
())
then
g
:
Clear
()
end
end
if
Duel
.
GetCurrentChain
()
==
0
and
#
g
>
0
and
g
:
IsExists
(
Card
.
IsReason
,
1
,
nil
,
REASON_ADJUST
|
REASON_EFFECT
)
then
local
_eg
=
g
:
Clone
()
Duel
.
RaiseEvent
(
_eg
,
e
:
GetLabel
(),
re
,
r
,
rp
,
ep
,
ev
)
g
:
Clear
()
end
end
function
s
.
MergedDelayEventCheck2_ToSingleCard
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
if
Duel
.
CheckEvent
(
EVENT_MOVE
)
then
local
_
,
meg
=
Duel
.
CheckEvent
(
EVENT_MOVE
,
true
)
local
c
=
e
:
GetOwner
()
if
meg
:
IsContains
(
c
)
and
(
c
:
IsFaceup
()
or
c
:
IsPublic
())
then
g
:
Clear
()
end
end
if
#
g
>
0
then
local
_eg
=
g
:
Clone
()
Duel
.
RaiseEvent
(
_eg
,
e
:
GetLabel
(),
re
,
r
,
rp
,
ep
,
ev
)
g
:
Clear
()
end
end
function
s
.
ThisCardMovedToPublicResetCheck_ToSingleCard
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetOwner
()
local
g
=
e
:
GetLabelObject
()
if
c
:
IsFaceup
()
or
c
:
IsPublic
()
then
g
:
Clear
()
end
end
expansions/script/c89490035.lua
View file @
02503888
...
@@ -17,7 +17,7 @@ function s.initial_effect(c)
...
@@ -17,7 +17,7 @@ function s.initial_effect(c)
e0
:
SetCondition
(
s
.
hsyncon
)
e0
:
SetCondition
(
s
.
hsyncon
)
e0
:
SetOperation
(
s
.
hsynreg
)
e0
:
SetOperation
(
s
.
hsynreg
)
c
:
RegisterEffect
(
e0
)
c
:
RegisterEffect
(
e0
)
local
custom_code
=
aux
.
RegisterMergedDelay
edEvent_ToSingleCard
(
c
,
id
,
EVENT_LEAVE_FIELD
)
local
custom_code
=
s
.
RegisterMerg
edEvent_ToSingleCard
(
c
,
id
,
EVENT_LEAVE_FIELD
)
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
...
@@ -56,3 +56,106 @@ function s.spop2(e,tp,eg,ep,ev,re,r,rp)
...
@@ -56,3 +56,106 @@ function s.spop2(e,tp,eg,ep,ev,re,r,rp)
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
end
function
s
.
RegisterMergedEvent_ToSingleCard
(
c
,
code
,
events
)
local
g
=
Group
.
CreateGroup
()
g
:
KeepAlive
()
local
mt
=
getmetatable
(
c
)
local
seed
=
0
if
type
(
events
)
==
"table"
then
for
_
,
event
in
ipairs
(
events
)
do
seed
=
seed
+
event
end
else
seed
=
events
end
while
(
mt
[
seed
]
==
true
)
do
seed
=
seed
+
1
end
mt
[
seed
]
=
true
local
event_code_single
=
(
code
~
(
seed
<<
16
))
|
EVENT_CUSTOM
if
type
(
events
)
==
"table"
then
for
_
,
event
in
ipairs
(
events
)
do
s
.
RegisterMergedEvent_ToSingleCard_AddOperation
(
c
,
g
,
event
,
event_code_single
)
end
else
s
.
RegisterMergedEvent_ToSingleCard_AddOperation
(
c
,
g
,
events
,
event_code_single
)
end
--listened to again
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e3
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_SET_AVAILABLE
)
e3
:
SetCode
(
EVENT_MOVE
)
e3
:
SetLabelObject
(
g
)
e3
:
SetOperation
(
s
.
ThisCardMovedToPublicResetCheck_ToSingleCard
)
c
:
RegisterEffect
(
e3
)
return
event_code_single
end
function
s
.
RegisterMergedEvent_ToSingleCard_AddOperation
(
c
,
g
,
event
,
event_code_single
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetCode
(
event
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_SET_AVAILABLE
)
e1
:
SetRange
(
0xff
)
e1
:
SetLabel
(
event_code_single
)
e1
:
SetLabelObject
(
g
)
e1
:
SetOperation
(
s
.
MergedDelayEventCheck1_ToSingleCard
)
c
:
RegisterEffect
(
e1
)
local
ec
=
{
EVENT_CHAIN_ACTIVATING
,
EVENT_CHAINING
,
EVENT_ATTACK_ANNOUNCE
,
EVENT_BREAK_EFFECT
,
EVENT_CHAIN_SOLVING
,
EVENT_CHAIN_SOLVED
,
EVENT_CHAIN_END
,
EVENT_SUMMON
,
EVENT_SPSUMMON
,
EVENT_MSET
,
EVENT_BATTLE_DESTROYED
}
for
_
,
code
in
ipairs
(
ec
)
do
local
ce
=
e1
:
Clone
()
ce
:
SetCode
(
code
)
ce
:
SetOperation
(
s
.
MergedDelayEventCheck2_ToSingleCard
)
c
:
RegisterEffect
(
ce
)
end
end
function
s
.
MergedDelayEventCheck1_ToSingleCard
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
local
c
=
e
:
GetOwner
()
g
:
Merge
(
eg
)
if
Duel
.
CheckEvent
(
EVENT_MOVE
)
then
local
_
,
meg
=
Duel
.
CheckEvent
(
EVENT_MOVE
,
true
)
if
meg
:
IsContains
(
c
)
and
(
c
:
IsFaceup
()
or
c
:
IsPublic
())
then
g
:
Clear
()
end
end
if
Duel
.
GetCurrentChain
()
==
0
and
#
g
>
0
and
g
:
IsExists
(
Card
.
IsReason
,
1
,
nil
,
REASON_ADJUST
|
REASON_EFFECT
)
then
local
_eg
=
g
:
Clone
()
Duel
.
RaiseEvent
(
_eg
,
e
:
GetLabel
(),
re
,
r
,
rp
,
ep
,
ev
)
g
:
Clear
()
end
end
function
s
.
MergedDelayEventCheck2_ToSingleCard
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
if
Duel
.
CheckEvent
(
EVENT_MOVE
)
then
local
_
,
meg
=
Duel
.
CheckEvent
(
EVENT_MOVE
,
true
)
local
c
=
e
:
GetOwner
()
if
meg
:
IsContains
(
c
)
and
(
c
:
IsFaceup
()
or
c
:
IsPublic
())
then
g
:
Clear
()
end
end
if
#
g
>
0
then
local
_eg
=
g
:
Clone
()
Duel
.
RaiseEvent
(
_eg
,
e
:
GetLabel
(),
re
,
r
,
rp
,
ep
,
ev
)
g
:
Clear
()
end
end
function
s
.
ThisCardMovedToPublicResetCheck_ToSingleCard
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetOwner
()
local
g
=
e
:
GetLabelObject
()
if
c
:
IsFaceup
()
or
c
:
IsPublic
()
then
g
:
Clear
()
end
end
expansions/script/c89490054.lua
View file @
02503888
...
@@ -9,7 +9,7 @@ function s.initial_effect(c)
...
@@ -9,7 +9,7 @@ function s.initial_effect(c)
e1
:
SetTarget
(
s
.
sptg
)
e1
:
SetTarget
(
s
.
sptg
)
e1
:
SetOperation
(
s
.
spop
)
e1
:
SetOperation
(
s
.
spop
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
local
custom_code
=
aux
.
RegisterMergedDelay
edEvent_ToSingleCard
(
c
,
id
,
EVENT_LEAVE_FIELD
)
local
custom_code
=
s
.
RegisterMerg
edEvent_ToSingleCard
(
c
,
id
,
EVENT_LEAVE_FIELD
)
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
...
@@ -70,3 +70,106 @@ function s.spop2(e,tp,eg,ep,ev,re,r,rp)
...
@@ -70,3 +70,106 @@ function s.spop2(e,tp,eg,ep,ev,re,r,rp)
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
end
function
s
.
RegisterMergedEvent_ToSingleCard
(
c
,
code
,
events
)
local
g
=
Group
.
CreateGroup
()
g
:
KeepAlive
()
local
mt
=
getmetatable
(
c
)
local
seed
=
0
if
type
(
events
)
==
"table"
then
for
_
,
event
in
ipairs
(
events
)
do
seed
=
seed
+
event
end
else
seed
=
events
end
while
(
mt
[
seed
]
==
true
)
do
seed
=
seed
+
1
end
mt
[
seed
]
=
true
local
event_code_single
=
(
code
~
(
seed
<<
16
))
|
EVENT_CUSTOM
if
type
(
events
)
==
"table"
then
for
_
,
event
in
ipairs
(
events
)
do
s
.
RegisterMergedEvent_ToSingleCard_AddOperation
(
c
,
g
,
event
,
event_code_single
)
end
else
s
.
RegisterMergedEvent_ToSingleCard_AddOperation
(
c
,
g
,
events
,
event_code_single
)
end
--listened to again
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e3
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_SET_AVAILABLE
)
e3
:
SetCode
(
EVENT_MOVE
)
e3
:
SetLabelObject
(
g
)
e3
:
SetOperation
(
s
.
ThisCardMovedToPublicResetCheck_ToSingleCard
)
c
:
RegisterEffect
(
e3
)
return
event_code_single
end
function
s
.
RegisterMergedEvent_ToSingleCard_AddOperation
(
c
,
g
,
event
,
event_code_single
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetCode
(
event
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_SET_AVAILABLE
)
e1
:
SetRange
(
0xff
)
e1
:
SetLabel
(
event_code_single
)
e1
:
SetLabelObject
(
g
)
e1
:
SetOperation
(
s
.
MergedDelayEventCheck1_ToSingleCard
)
c
:
RegisterEffect
(
e1
)
local
ec
=
{
EVENT_CHAIN_ACTIVATING
,
EVENT_CHAINING
,
EVENT_ATTACK_ANNOUNCE
,
EVENT_BREAK_EFFECT
,
EVENT_CHAIN_SOLVING
,
EVENT_CHAIN_SOLVED
,
EVENT_CHAIN_END
,
EVENT_SUMMON
,
EVENT_SPSUMMON
,
EVENT_MSET
,
EVENT_BATTLE_DESTROYED
}
for
_
,
code
in
ipairs
(
ec
)
do
local
ce
=
e1
:
Clone
()
ce
:
SetCode
(
code
)
ce
:
SetOperation
(
s
.
MergedDelayEventCheck2_ToSingleCard
)
c
:
RegisterEffect
(
ce
)
end
end
function
s
.
MergedDelayEventCheck1_ToSingleCard
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
local
c
=
e
:
GetOwner
()
g
:
Merge
(
eg
)
if
Duel
.
CheckEvent
(
EVENT_MOVE
)
then
local
_
,
meg
=
Duel
.
CheckEvent
(
EVENT_MOVE
,
true
)
if
meg
:
IsContains
(
c
)
and
(
c
:
IsFaceup
()
or
c
:
IsPublic
())
then
g
:
Clear
()
end
end
if
Duel
.
GetCurrentChain
()
==
0
and
#
g
>
0
and
g
:
IsExists
(
Card
.
IsReason
,
1
,
nil
,
REASON_ADJUST
|
REASON_EFFECT
)
then
local
_eg
=
g
:
Clone
()
Duel
.
RaiseEvent
(
_eg
,
e
:
GetLabel
(),
re
,
r
,
rp
,
ep
,
ev
)
g
:
Clear
()
end
end
function
s
.
MergedDelayEventCheck2_ToSingleCard
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
e
:
GetLabelObject
()
if
Duel
.
CheckEvent
(
EVENT_MOVE
)
then
local
_
,
meg
=
Duel
.
CheckEvent
(
EVENT_MOVE
,
true
)
local
c
=
e
:
GetOwner
()
if
meg
:
IsContains
(
c
)
and
(
c
:
IsFaceup
()
or
c
:
IsPublic
())
then
g
:
Clear
()
end
end
if
#
g
>
0
then
local
_eg
=
g
:
Clone
()
Duel
.
RaiseEvent
(
_eg
,
e
:
GetLabel
(),
re
,
r
,
rp
,
ep
,
ev
)
g
:
Clear
()
end
end
function
s
.
ThisCardMovedToPublicResetCheck_ToSingleCard
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetOwner
()
local
g
=
e
:
GetLabelObject
()
if
c
:
IsFaceup
()
or
c
:
IsPublic
()
then
g
:
Clear
()
end
end
expansions/script/c89490087.lua
View file @
02503888
...
@@ -39,7 +39,7 @@ function s.thcon(e,tp,eg,ep,ev,re,r,rp)
...
@@ -39,7 +39,7 @@ function s.thcon(e,tp,eg,ep,ev,re,r,rp)
return
Duel
.
IsExistingMatchingCard
(
s
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
return
Duel
.
IsExistingMatchingCard
(
s
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
end
end
function
s
.
thfilter
(
c
)
function
s
.
thfilter
(
c
)
return
c
:
IsSetCard
(
0xc34
)
and
not
c
:
IsType
(
TYPE_TUNER
)
and
c
:
IsAbleToHand
()
return
c
:
IsSetCard
(
0xc34
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
not
c
:
IsType
(
TYPE_TUNER
)
and
c
:
IsAbleToHand
()
end
end
function
s
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
s
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
s
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
s
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
...
...
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