Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Y
ygopro-222DIY-cards
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
alstroemeria-silentlove
ygopro-222DIY-cards
Commits
34da2710
Commit
34da2710
authored
Mar 17, 2021
by
Tachibana
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
tnndx
parent
6db45bcc
Pipeline
#2676
passed with stages
in 24 minutes and 29 seconds
Changes
17
Pipelines
1
Show whitespace changes
Inline
Side-by-side
Showing
17 changed files
with
220 additions
and
71 deletions
+220
-71
expansions/222DIY.cdb
expansions/222DIY.cdb
+0
-0
expansions/script/c33400801.lua
expansions/script/c33400801.lua
+6
-1
expansions/script/c33400802.lua
expansions/script/c33400802.lua
+7
-2
expansions/script/c33400803.lua
expansions/script/c33400803.lua
+7
-2
expansions/script/c33400804.lua
expansions/script/c33400804.lua
+6
-1
expansions/script/c33400805.lua
expansions/script/c33400805.lua
+6
-1
expansions/script/c33400806.lua
expansions/script/c33400806.lua
+6
-1
expansions/script/c33400807.lua
expansions/script/c33400807.lua
+7
-2
expansions/script/c33400808.lua
expansions/script/c33400808.lua
+6
-1
expansions/script/c33400809.lua
expansions/script/c33400809.lua
+5
-0
expansions/script/c33400810.lua
expansions/script/c33400810.lua
+21
-4
expansions/script/c33400811.lua
expansions/script/c33400811.lua
+21
-4
expansions/script/c33400812.lua
expansions/script/c33400812.lua
+22
-5
expansions/script/c33400813.lua
expansions/script/c33400813.lua
+22
-5
expansions/script/c33400814.lua
expansions/script/c33400814.lua
+41
-22
expansions/script/c33400815.lua
expansions/script/c33400815.lua
+30
-11
expansions/script/c33400818.lua
expansions/script/c33400818.lua
+7
-9
No files found.
expansions/222DIY.cdb
View file @
34da2710
No preview for this file type
expansions/script/c33400801.lua
View file @
34da2710
...
@@ -50,6 +50,11 @@ end
...
@@ -50,6 +50,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
3
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400802.lua
View file @
34da2710
...
@@ -67,6 +67,11 @@ end
...
@@ -67,6 +67,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
3
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400803.lua
View file @
34da2710
...
@@ -70,6 +70,11 @@ end
...
@@ -70,6 +70,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
3
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400804.lua
View file @
34da2710
...
@@ -56,6 +56,11 @@ end
...
@@ -56,6 +56,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
5
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400805.lua
View file @
34da2710
...
@@ -54,6 +54,11 @@ end
...
@@ -54,6 +54,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
3
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400806.lua
View file @
34da2710
...
@@ -68,6 +68,11 @@ end
...
@@ -68,6 +68,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
3
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400807.lua
View file @
34da2710
...
@@ -70,6 +70,11 @@ end
...
@@ -70,6 +70,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
3
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400808.lua
View file @
34da2710
...
@@ -56,6 +56,11 @@ end
...
@@ -56,6 +56,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
5
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400809.lua
View file @
34da2710
...
@@ -65,6 +65,11 @@ function cm.mvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
...
@@ -65,6 +65,11 @@ function cm.mvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local
b2
=
Duel
.
IsExistingMatchingCard
(
cm
.
mvfilter2
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
,
tp
)
local
b2
=
Duel
.
IsExistingMatchingCard
(
cm
.
mvfilter2
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
,
tp
)
if
chk
==
0
then
return
b1
or
b2
end
if
chk
==
0
then
return
b1
or
b2
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
6
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
mvop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
mvop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
cm
.
mvfilter1
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
cm
.
mvfilter1
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
...
...
expansions/script/c33400810.lua
View file @
34da2710
...
@@ -40,7 +40,7 @@ function cm.initial_effect(c)
...
@@ -40,7 +40,7 @@ function cm.initial_effect(c)
end
end
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
return
c
:
IsSetCard
(
0xa341
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
return
c
:
IsSetCard
(
0xa341
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
()
+
10000
)
==
0
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
end
end
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
local
g
=
Group
.
CreateGroup
()
local
g
=
Group
.
CreateGroup
()
...
@@ -61,8 +61,20 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
...
@@ -61,8 +61,20 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
g2
:
Merge
(
g1
)
g2
:
Merge
(
g1
)
c
:
SetMaterial
(
g2
)
c
:
SetMaterial
(
g2
)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
()
+
10000
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
()
+
10000
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg1
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc1
:
GetCode
())
local
tc1
=
tg1
:
GetFirst
()
while
tc1
do
tc1
:
RegisterFlagEffect
(
tc1
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
4
))
tc1
=
tg1
:
GetNext
()
end
local
tg2
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc2
:
GetCode
())
local
tc2
=
tg2
:
GetFirst
()
while
tc2
do
tc2
:
RegisterFlagEffect
(
tc2
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
4
))
tc2
=
tg2
:
GetNext
()
end
end
end
function
cm
.
con
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
con
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
@@ -103,6 +115,11 @@ end
...
@@ -103,6 +115,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
5
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400811.lua
View file @
34da2710
...
@@ -39,7 +39,7 @@ function cm.initial_effect(c)
...
@@ -39,7 +39,7 @@ function cm.initial_effect(c)
end
end
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
return
c
:
IsSetCard
(
0xa341
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
return
c
:
IsSetCard
(
0xa341
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
()
+
10000
)
==
0
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
end
end
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
local
g
=
Group
.
CreateGroup
()
local
g
=
Group
.
CreateGroup
()
...
@@ -60,8 +60,20 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
...
@@ -60,8 +60,20 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
g2
:
Merge
(
g1
)
g2
:
Merge
(
g1
)
c
:
SetMaterial
(
g2
)
c
:
SetMaterial
(
g2
)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
()
+
10000
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
()
+
10000
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg1
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc1
:
GetCode
())
local
tc1
=
tg1
:
GetFirst
()
while
tc1
do
tc1
:
RegisterFlagEffect
(
tc1
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
4
))
tc1
=
tg1
:
GetNext
()
end
local
tg2
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc2
:
GetCode
())
local
tc2
=
tg2
:
GetFirst
()
while
tc2
do
tc2
:
RegisterFlagEffect
(
tc2
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
4
))
tc2
=
tg2
:
GetNext
()
end
end
end
function
cm
.
seqfilter
(
c
)
function
cm
.
seqfilter
(
c
)
...
@@ -119,6 +131,11 @@ end
...
@@ -119,6 +131,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
5
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400812.lua
View file @
34da2710
...
@@ -40,7 +40,7 @@ function cm.initial_effect(c)
...
@@ -40,7 +40,7 @@ function cm.initial_effect(c)
end
end
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
return
c
:
IsSetCard
(
0xa341
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
return
c
:
IsSetCard
(
0xa341
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
()
+
10000
)
==
0
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
end
end
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
local
g
=
Group
.
CreateGroup
()
local
g
=
Group
.
CreateGroup
()
...
@@ -61,8 +61,20 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
...
@@ -61,8 +61,20 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
g2
:
Merge
(
g1
)
g2
:
Merge
(
g1
)
c
:
SetMaterial
(
g2
)
c
:
SetMaterial
(
g2
)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
()
+
10000
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
()
+
10000
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg1
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc1
:
GetCode
())
local
tc1
=
tg1
:
GetFirst
()
while
tc1
do
tc1
:
RegisterFlagEffect
(
tc1
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
3
))
tc1
=
tg1
:
GetNext
()
end
local
tg2
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc2
:
GetCode
())
local
tc2
=
tg2
:
GetFirst
()
while
tc2
do
tc2
:
RegisterFlagEffect
(
tc2
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
3
))
tc2
=
tg2
:
GetNext
()
end
end
end
function
cm
.
con
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
con
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
@@ -104,6 +116,11 @@ end
...
@@ -104,6 +116,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
4
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400813.lua
View file @
34da2710
...
@@ -40,7 +40,7 @@ function cm.initial_effect(c)
...
@@ -40,7 +40,7 @@ function cm.initial_effect(c)
end
end
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
return
c
:
IsSetCard
(
0xa341
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
return
c
:
IsSetCard
(
0xa341
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
()
+
10000
)
==
0
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
end
end
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
local
g
=
Group
.
CreateGroup
()
local
g
=
Group
.
CreateGroup
()
...
@@ -61,8 +61,20 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
...
@@ -61,8 +61,20 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
g2
:
Merge
(
g1
)
g2
:
Merge
(
g1
)
c
:
SetMaterial
(
g2
)
c
:
SetMaterial
(
g2
)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
()
+
10000
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
()
+
10000
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg1
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc1
:
GetCode
())
local
tc1
=
tg1
:
GetFirst
()
while
tc1
do
tc1
:
RegisterFlagEffect
(
tc1
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
4
))
tc1
=
tg1
:
GetNext
()
end
local
tg2
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc2
:
GetCode
())
local
tc2
=
tg2
:
GetFirst
()
while
tc2
do
tc2
:
RegisterFlagEffect
(
tc2
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
4
))
tc2
=
tg2
:
GetNext
()
end
end
end
function
cm
.
seqfilter
(
c
)
function
cm
.
seqfilter
(
c
)
...
@@ -123,6 +135,11 @@ end
...
@@ -123,6 +135,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
5
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400814.lua
View file @
34da2710
...
@@ -22,36 +22,36 @@ function cm.initial_effect(c)
...
@@ -22,36 +22,36 @@ function cm.initial_effect(c)
e1
:
SetValue
(
cm
.
splimit
)
e1
:
SetValue
(
cm
.
splimit
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
--ChainLimit
--ChainLimit
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e2
:
SetCode
(
EVENT_CHAINING
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetOperation
(
cm
.
chainop
)
c
:
RegisterEffect
(
e2
)
--inactivatable
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
)
e3
:
SetCode
(
E
VENT_CHAINING
)
e3
:
SetCode
(
E
FFECT_CANNOT_INACTIVATE
)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
Set
Operation
(
cm
.
chainop
)
e3
:
Set
Value
(
cm
.
effectfilter
)
c
:
RegisterEffect
(
e3
)
c
:
RegisterEffect
(
e3
)
--inactivatable
local
e4
=
Effect
.
CreateEffect
(
c
)
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetType
(
EFFECT_TYPE_FIELD
)
e4
:
SetType
(
EFFECT_TYPE_FIELD
)
e4
:
SetCode
(
EFFECT_CANNOT_
INACTIVATE
)
e4
:
SetCode
(
EFFECT_CANNOT_
DISEFFECT
)
e4
:
SetRange
(
LOCATION_MZONE
)
e4
:
SetRange
(
LOCATION_MZONE
)
e4
:
SetValue
(
cm
.
effectfilter
)
e4
:
SetValue
(
cm
.
effectfilter
)
c
:
RegisterEffect
(
e4
)
c
:
RegisterEffect
(
e4
)
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetType
(
EFFECT_TYPE_FIELD
)
e5
:
SetCode
(
EFFECT_CANNOT_DISEFFECT
)
e5
:
SetRange
(
LOCATION_MZONE
)
e5
:
SetValue
(
cm
.
effectfilter
)
c
:
RegisterEffect
(
e5
)
--set
--set
local
e
2
=
Effect
.
CreateEffect
(
c
)
local
e
9
=
Effect
.
CreateEffect
(
c
)
e
2
:
SetCategory
(
CATEGORY_DISABLE
+
CATEGORY_TOHAND
)
e
9
:
SetCategory
(
CATEGORY_DISABLE
+
CATEGORY_TOHAND
)
e
2
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e
9
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e
2
:
SetCode
(
EVENT_CHAINING
)
e
9
:
SetCode
(
EVENT_CHAINING
)
e
2
:
SetRange
(
LOCATION_MZONE
)
e
9
:
SetRange
(
LOCATION_MZONE
)
e
2
:
SetCountLimit
(
2
,
m
)
e
9
:
SetCountLimit
(
2
,
m
)
e
2
:
SetCondition
(
cm
.
stcon
)
e
9
:
SetCondition
(
cm
.
stcon
)
e
2
:
SetTarget
(
cm
.
sttg
)
e
9
:
SetTarget
(
cm
.
sttg
)
e
2
:
SetOperation
(
cm
.
stop
)
e
9
:
SetOperation
(
cm
.
stop
)
c
:
RegisterEffect
(
e
2
)
c
:
RegisterEffect
(
e
9
)
--Equip Okatana
--Equip Okatana
local
e8
=
Effect
.
CreateEffect
(
c
)
local
e8
=
Effect
.
CreateEffect
(
c
)
e8
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e8
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
...
@@ -69,6 +69,7 @@ end
...
@@ -69,6 +69,7 @@ end
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
return
c
:
IsSetCard
(
0xa341
)
and
c
:
IsType
(
TYPE_FUSION
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
return
c
:
IsSetCard
(
0xa341
)
and
c
:
IsType
(
TYPE_FUSION
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
()
+
10000
)
==
0
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
end
end
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
...
@@ -76,6 +77,7 @@ function cm.hspfilter2(c,tp,sc,tc)
...
@@ -76,6 +77,7 @@ function cm.hspfilter2(c,tp,sc,tc)
g
:
AddCard
(
tc
)
g
:
AddCard
(
tc
)
g
:
AddCard
(
c
)
g
:
AddCard
(
c
)
return
c
:
IsSetCard
(
0xa341
)
and
c
:
IsType
(
TYPE_FUSION
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
return
c
:
IsSetCard
(
0xa341
)
and
c
:
IsType
(
TYPE_FUSION
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
()
+
10000
)
==
0
and
c
:
IsControler
(
tp
)
and
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
g
,
sc
)
>
0
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
c
:
IsControler
(
tp
)
and
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
g
,
sc
)
>
0
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
end
end
function
cm
.
hspcon
(
e
,
c
)
function
cm
.
hspcon
(
e
,
c
)
...
@@ -92,6 +94,18 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
...
@@ -92,6 +94,18 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg1
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc1
:
GetCode
())
local
tc1
=
tg1
:
GetFirst
()
while
tc1
do
tc1
:
RegisterFlagEffect
(
tc1
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
6
))
tc1
=
tg1
:
GetNext
()
end
local
tg2
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc2
:
GetCode
())
local
tc2
=
tg2
:
GetFirst
()
while
tc2
do
tc2
:
RegisterFlagEffect
(
tc2
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
6
))
tc2
=
tg2
:
GetNext
()
end
end
end
function
cm
.
splimit
(
e
,
se
,
sp
,
st
)
function
cm
.
splimit
(
e
,
se
,
sp
,
st
)
...
@@ -135,6 +149,11 @@ end
...
@@ -135,6 +149,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
7
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400815.lua
View file @
34da2710
...
@@ -50,16 +50,16 @@ function cm.initial_effect(c)
...
@@ -50,16 +50,16 @@ function cm.initial_effect(c)
e3
:
SetValue
(
cm
.
tglimit
)
e3
:
SetValue
(
cm
.
tglimit
)
c
:
RegisterEffect
(
e3
)
c
:
RegisterEffect
(
e3
)
--set
--set
local
e
5
=
Effect
.
CreateEffect
(
c
)
local
e
9
=
Effect
.
CreateEffect
(
c
)
e
5
:
SetCategory
(
CATEGORY_DISABLE
+
CATEGORY_TOHAND
)
e
9
:
SetCategory
(
CATEGORY_DISABLE
+
CATEGORY_TOHAND
)
e
5
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e
9
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e
5
:
SetCode
(
EVENT_CHAINING
)
e
9
:
SetCode
(
EVENT_CHAINING
)
e
5
:
SetRange
(
LOCATION_MZONE
)
e
9
:
SetRange
(
LOCATION_MZONE
)
e
5
:
SetCountLimit
(
2
,
m
)
e
9
:
SetCountLimit
(
2
,
m
)
e
5
:
SetCondition
(
cm
.
stcon
)
e
9
:
SetCondition
(
cm
.
stcon
)
e
5
:
SetTarget
(
cm
.
sttg
)
e
9
:
SetTarget
(
cm
.
sttg
)
e
5
:
SetOperation
(
cm
.
stop
)
e
9
:
SetOperation
(
cm
.
stop
)
c
:
RegisterEffect
(
e
5
)
c
:
RegisterEffect
(
e
9
)
--Equip Okatana
--Equip Okatana
local
e8
=
Effect
.
CreateEffect
(
c
)
local
e8
=
Effect
.
CreateEffect
(
c
)
e8
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e8
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
...
@@ -77,6 +77,7 @@ end
...
@@ -77,6 +77,7 @@ end
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
function
cm
.
hspfilter
(
c
,
tp
,
sc
)
return
c
:
IsSetCard
(
0xa341
)
and
c
:
IsType
(
TYPE_FUSION
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
return
c
:
IsSetCard
(
0xa341
)
and
c
:
IsType
(
TYPE_FUSION
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
()
+
10000
)
==
0
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
and
c
:
IsControler
(
tp
)
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
Duel
.
CheckReleaseGroup
(
c
:
GetControler
(),
cm
.
hspfilter2
,
1
,
c
,
c
:
GetControler
(),
sc
,
tc
)
end
end
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
function
cm
.
hspfilter2
(
c
,
tp
,
sc
,
tc
)
...
@@ -84,6 +85,7 @@ function cm.hspfilter2(c,tp,sc,tc)
...
@@ -84,6 +85,7 @@ function cm.hspfilter2(c,tp,sc,tc)
g
:
AddCard
(
tc
)
g
:
AddCard
(
tc
)
g
:
AddCard
(
c
)
g
:
AddCard
(
c
)
return
c
:
IsSetCard
(
0xa341
)
and
c
:
IsType
(
TYPE_FUSION
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
return
c
:
IsSetCard
(
0xa341
)
and
c
:
IsType
(
TYPE_FUSION
)
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
())
==
0
and
Duel
.
GetFlagEffect
(
tp
,
c
:
GetCode
()
+
10000
)
==
0
and
c
:
IsControler
(
tp
)
and
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
g
,
sc
)
>
0
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
and
c
:
IsControler
(
tp
)
and
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
g
,
sc
)
>
0
and
c
:
IsCanBeFusionMaterial
(
sc
,
SUMMON_TYPE_SPECIAL
)
end
end
function
cm
.
hspcon
(
e
,
c
)
function
cm
.
hspcon
(
e
,
c
)
...
@@ -100,6 +102,18 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
...
@@ -100,6 +102,18 @@ function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
Release
(
g2
,
REASON_COST
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc1
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
tc2
:
GetCode
(),
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg1
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc1
:
GetCode
())
local
tc1
=
tg1
:
GetFirst
()
while
tc1
do
tc1
:
RegisterFlagEffect
(
tc1
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
6
))
tc1
=
tg1
:
GetNext
()
end
local
tg2
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
tc2
:
GetCode
())
local
tc2
=
tg2
:
GetFirst
()
while
tc2
do
tc2
:
RegisterFlagEffect
(
tc2
:
GetCode
()
+
10000
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
6
))
tc2
=
tg2
:
GetNext
()
end
end
end
function
cm
.
splimit
(
e
,
se
,
sp
,
st
)
function
cm
.
splimit
(
e
,
se
,
sp
,
st
)
...
@@ -131,6 +145,11 @@ end
...
@@ -131,6 +145,11 @@ end
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
cm
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
7
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
=
e
:
GetHandler
()
c
=
e
:
GetHandler
()
...
...
expansions/script/c33400818.lua
View file @
34da2710
...
@@ -126,6 +126,11 @@ function cm.regop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -126,6 +126,11 @@ function cm.regop(e,tp,eg,ep,ev,re,r,rp)
e3
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
e3
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e3
,
tp
)
Duel
.
RegisterEffect
(
e3
,
tp
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
Duel
.
RegisterFlagEffect
(
tp
,
m
,
RESET_EVENT
+
RESET_PHASE
+
PHASE_END
,
0
,
0
)
local
tg
=
Duel
.
GetMatchingGroup
(
Card
.
IsOriginalCodeRule
,
tp
,
0x7f
,
0
,
nil
,
m
)
local
tc
=
tg
:
GetFirst
()
while
tc
do
tc
:
RegisterFlagEffect
(
m
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
9
))
tc
=
tg
:
GetNext
()
end
end
end
function
cm
.
actlimit1
(
e
,
re
,
tp
)
function
cm
.
actlimit1
(
e
,
re
,
tp
)
return
not
re
:
GetHandler
():
IsLocation
(
LOCATION_ONFIELD
)
return
not
re
:
GetHandler
():
IsLocation
(
LOCATION_ONFIELD
)
...
@@ -448,10 +453,3 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -448,10 +453,3 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
end
end
end
end
end
end
\ No newline at end of file
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