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
75735548
Commit
75735548
authored
Aug 11, 2022
by
Nemo Ma
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
55923274
Changes
9
Hide whitespace changes
Inline
Side-by-side
Showing
9 changed files
with
133 additions
and
196 deletions
+133
-196
expansions/script/c11451578.lua
expansions/script/c11451578.lua
+1
-1
expansions/script/c11451579.lua
expansions/script/c11451579.lua
+1
-1
expansions/script/c11451580.lua
expansions/script/c11451580.lua
+1
-1
expansions/script/c25000038.lua
expansions/script/c25000038.lua
+51
-72
expansions/script/c33200957.lua
expansions/script/c33200957.lua
+1
-0
expansions/script/c33200958.lua
expansions/script/c33200958.lua
+1
-0
expansions/script/c40044918.lua
expansions/script/c40044918.lua
+64
-91
expansions/script/c53734013.lua
expansions/script/c53734013.lua
+1
-1
expansions/script/c77693530.lua
expansions/script/c77693530.lua
+12
-29
No files found.
expansions/script/c11451578.lua
View file @
75735548
...
@@ -5,7 +5,7 @@ local cm=_G["c"..m]
...
@@ -5,7 +5,7 @@ local cm=_G["c"..m]
function
cm
.
initial_effect
(
c
)
function
cm
.
initial_effect
(
c
)
aux
.
AddCodeList
(
c
,
11451581
)
aux
.
AddCodeList
(
c
,
11451581
)
--xyz summon
--xyz summon
aux
.
AddXyzProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsRace
,
RACE_SPELLCASTER
)
,
1
,
2
)
aux
.
AddXyzProcedure
(
c
,
nil
,
1
,
2
)
c
:
EnableReviveLimit
()
c
:
EnableReviveLimit
()
--effect1
--effect1
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
...
...
expansions/script/c11451579.lua
View file @
75735548
...
@@ -5,7 +5,7 @@ local cm=_G["c"..m]
...
@@ -5,7 +5,7 @@ local cm=_G["c"..m]
function
cm
.
initial_effect
(
c
)
function
cm
.
initial_effect
(
c
)
aux
.
AddCodeList
(
c
,
11451582
)
aux
.
AddCodeList
(
c
,
11451582
)
--xyz summon
--xyz summon
aux
.
AddXyzProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsRace
,
RACE_SPELLCASTER
)
,
4
,
2
)
aux
.
AddXyzProcedure
(
c
,
nil
,
4
,
2
)
c
:
EnableReviveLimit
()
c
:
EnableReviveLimit
()
--effect1
--effect1
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
...
...
expansions/script/c11451580.lua
View file @
75735548
...
@@ -5,7 +5,7 @@ local cm=_G["c"..m]
...
@@ -5,7 +5,7 @@ local cm=_G["c"..m]
function
cm
.
initial_effect
(
c
)
function
cm
.
initial_effect
(
c
)
aux
.
AddCodeList
(
c
,
11451583
)
aux
.
AddCodeList
(
c
,
11451583
)
--xyz summon
--xyz summon
aux
.
AddXyzProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsRace
,
RACE_SPELLCASTER
)
,
7
,
2
)
aux
.
AddXyzProcedure
(
c
,
nil
,
7
,
2
)
c
:
EnableReviveLimit
()
c
:
EnableReviveLimit
()
--effect1
--effect1
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
...
...
expansions/script/c25000038.lua
View file @
75735548
--空我龙 升华究极
--空我龙 升华究极
function
c25000038
.
initial_effect
(
c
)
function
c25000038
.
initial_effect
(
c
)
c
:
EnableReviveLimit
()
c
:
EnableReviveLimit
()
--cannot special summon
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e1
:
SetCode
(
EFFECT_SPSUMMON_CONDITION
)
e1
:
SetCode
(
EFFECT_SPSUMMON_CONDITION
)
e1
:
SetValue
(
aux
.
FALSE
)
e1
:
SetValue
(
aux
.
FALSE
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
--special summon
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e2
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e2
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e2
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e2
:
SetRange
(
LOCATION_
EXTRA
)
e2
:
SetRange
(
LOCATION_
HAND
)
e2
:
SetCondition
(
c25000038
.
spcon
)
e2
:
SetCondition
(
c25000038
.
spcon
)
e2
:
SetTarget
(
c25000038
.
sptg
)
e2
:
SetOperation
(
c25000038
.
spop
)
e2
:
SetOperation
(
c25000038
.
spop
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
--
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_SET_ATTACK
)
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetTargetRange
(
0
,
LOCATION_MZONE
)
e1
:
SetValue
(
0
)
c
:
RegisterEffect
(
e1
)
local
e2
=
e1
:
Clone
()
e2
:
SetCode
(
EFFECT_SET_DEFENSE
)
c
:
RegisterEffect
(
e2
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e2
:
SetCode
(
EFFECT_CANNOT_ACTIVATE
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetTargetRange
(
0
,
1
)
e2
:
SetValue
(
c25000038
.
actlimit
)
c
:
RegisterEffect
(
e2
)
--remove
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_
QUICK_O
)
e3
:
SetType
(
EFFECT_TYPE_
FIELD
)
e3
:
SetCode
(
E
VENT_FREE_CHAIN
)
e3
:
SetCode
(
E
FFECT_SET_ATTACK
)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetCountLimit
(
1
,
25000038
)
e3
:
SetTargetRange
(
0
,
LOCATION_MZONE
)
e3
:
SetCost
(
c25000038
.
rmcost
)
e3
:
SetValue
(
0
)
e3
:
SetTarget
(
c25000038
.
rmtg
)
c
:
RegisterEffect
(
e3
)
e3
:
SetOperation
(
c25000038
.
rmop
)
local
e4
=
e3
:
Clone
()
c
:
RegisterEffect
(
e3
)
e4
:
SetCode
(
EFFECT_SET_DEFENSE
)
c
:
RegisterEffect
(
e4
)
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetType
(
EFFECT_TYPE_FIELD
)
e5
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e5
:
SetCode
(
EFFECT_CANNOT_ACTIVATE
)
e5
:
SetRange
(
LOCATION_MZONE
)
e5
:
SetTargetRange
(
0
,
1
)
e5
:
SetValue
(
c25000038
.
actlimit
)
c
:
RegisterEffect
(
e5
)
local
e6
=
Effect
.
CreateEffect
(
c
)
e6
:
SetDescription
(
aux
.
Stringid
(
25000038
,
0
))
e6
:
SetCategory
(
CATEGORY_REMOVE
)
e6
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e6
:
SetCode
(
EVENT_FREE_CHAIN
)
e6
:
SetRange
(
LOCATION_MZONE
)
e6
:
SetHintTiming
(
0
,
TIMINGS_CHECK_MONSTER
+
TIMING_END_PHASE
)
e6
:
SetCountLimit
(
1
,
25000038
)
e6
:
SetCost
(
c25000038
.
rmcost
)
e6
:
SetTarget
(
c25000038
.
rmtg
)
e6
:
SetOperation
(
c25000038
.
rmop
)
c
:
RegisterEffect
(
e6
)
end
end
function
c25000038
.
rfilter
(
c
,
tp
)
function
c25000038
.
rfilter
(
c
,
tp
)
return
c
:
IsAttribute
(
ATTRIBUTE_DARK
)
and
c
:
GetSummonLocation
()
==
LOCATION_EXTRA
and
(
c
:
IsControler
(
tp
)
or
c
:
IsFaceup
())
return
c
:
IsAttribute
(
ATTRIBUTE_DARK
)
and
c
:
GetSummonLocation
()
==
LOCATION_EXTRA
and
(
c
:
IsControler
(
tp
)
or
c
:
IsFaceup
())
end
end
function
c25000038
.
mzfilter
(
c
,
tp
)
return
c
:
IsControler
(
tp
)
and
c
:
GetSequence
()
<
5
end
function
c25000038
.
spcon
(
e
,
c
)
function
c25000038
.
spcon
(
e
,
c
)
if
c
==
nil
then
return
true
end
if
c
==
nil
then
return
true
end
local
tp
=
c
:
GetControler
()
local
tp
=
c
:
GetControler
()
local
rg
=
Duel
.
GetReleaseGroup
(
tp
):
Filter
(
c25000038
.
rfilter
,
nil
,
tp
)
local
rg
=
Duel
.
GetReleaseGroup
(
tp
):
Filter
(
c25000038
.
rfilter
,
nil
,
tp
)
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
return
rg
:
CheckSubGroup
(
aux
.
mzctcheckrel
,
3
,
3
,
tp
)
local
ct
=-
ft
+
1
return
ft
>-
3
and
rg
:
GetCount
()
>
2
and
(
ft
>
0
or
rg
:
IsExists
(
c25000038
.
mzfilter
,
ct
,
nil
,
tp
))
end
end
function
c25000038
.
sp
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
c
)
function
c25000038
.
sp
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
c
)
local
rg
=
Duel
.
GetReleaseGroup
(
tp
):
Filter
(
c25000038
.
rfilter
,
nil
,
tp
)
local
rg
=
Duel
.
GetReleaseGroup
(
tp
):
Filter
(
c25000038
.
rfilter
,
nil
,
tp
)
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g
=
nil
local
sg
=
rg
:
SelectSubGroup
(
tp
,
aux
.
mzctcheckrel
,
true
,
3
,
3
,
tp
)
if
ft
>
0
then
if
sg
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
sg
:
KeepAlive
()
g
=
rg
:
Select
(
tp
,
3
,
3
,
nil
)
e
:
SetLabelObject
(
sg
)
elseif
ft
>-
2
then
return
true
local
ct
=-
ft
+
1
else
return
false
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
end
g
=
rg
:
FilterSelect
(
tp
,
c25000038
.
mzfilter
,
ct
,
ct
,
nil
,
tp
)
function
c25000038
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
c
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g
=
e
:
GetLabelObject
()
local
g2
=
rg
:
Select
(
tp
,
3
-
ct
,
3
-
ct
,
g
)
g
:
Merge
(
g2
)
else
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
g
=
rg
:
FilterSelect
(
tp
,
c25000038
.
mzfilter
,
3
,
3
,
nil
,
tp
)
end
Duel
.
Release
(
g
,
REASON_COST
)
Duel
.
Release
(
g
,
REASON_COST
)
g
:
DeleteGroup
()
end
end
function
c25000038
.
actlimit
(
e
,
re
,
tp
)
function
c25000038
.
actlimit
(
e
,
re
,
tp
)
return
re
:
IsActiveType
(
TYPE_MONSTER
)
and
re
:
GetHandler
():
IsLocation
(
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_REMOVED
)
return
re
:
IsActiveType
(
TYPE_MONSTER
)
and
re
:
GetHandler
():
IsLocation
(
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_REMOVED
)
end
end
function
c25000038
.
rlfil
(
c
)
function
c25000038
.
rlfil
(
c
)
return
return
c
:
IsType
(
TYPE_MONSTER
)
and
(
c
:
IsControler
(
tp
)
or
c
:
IsFaceup
())
end
end
function
c25000038
.
rmcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c25000038
.
rmcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c25000038
.
rlfil
,
tp
,
LOCATION_HAND
+
LOCATION_MZONE
,
0
,
1
,
nil
)
end
local
g
=
Duel
.
GetReleaseGroup
(
tp
,
true
):
Filter
(
c25000038
.
rlfil
,
nil
,
tp
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c25000038
.
rlfil
,
tp
,
LOCATION_HAND
+
LOCATION_MZONE
,
0
,
1
,
1
,
nil
)
if
chk
==
0
then
return
#
g
>
0
end
Duel
.
Release
(
g
,
REASON_COST
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
rg
=
g
:
Select
(
tp
,
1
,
1
,
nil
)
aux
.
UseExtraReleaseCount
(
rg
,
tp
)
Duel
.
Release
(
rg
,
REASON_COST
)
end
end
function
c25000038
.
rmtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c25000038
.
rmtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
Card
.
IsAbleToRemove
,
tp
,
0
,
LOCATION_MZONE
,
1
,
nil
,
POS_FACEDOWN
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
Card
.
IsAbleToRemove
,
tp
,
0
,
LOCATION_MZONE
,
1
,
nil
,
POS_FACEDOWN
)
end
...
@@ -98,20 +91,6 @@ function c25000038.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
...
@@ -98,20 +91,6 @@ function c25000038.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_REMOVE
,
g
,
g
:
GetCount
(),
1
-
tp
,
LOCATION_MZONE
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_REMOVE
,
g
,
g
:
GetCount
(),
1
-
tp
,
LOCATION_MZONE
)
end
end
function
c25000038
.
rmop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c25000038
.
rmop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
g
=
Duel
.
GetMatchingGroup
(
Card
.
IsAbleToRemove
,
tp
,
0
,
LOCATION_MZONE
,
nil
,
POS_FACEDOWN
)
local
g
=
Duel
.
GetMatchingGroup
(
Card
.
IsAbleToRemove
,
tp
,
0
,
LOCATION_MZONE
,
nil
,
POS_FACEDOWN
)
if
g
:
GetCount
()
>
0
then
if
g
:
GetCount
()
>
0
then
Duel
.
Remove
(
g
,
POS_FACEDOWN
,
REASON_EFFECT
)
end
Duel
.
Remove
(
g
,
POS_FACEDOWN
,
REASON_EFFECT
)
end
end
end
expansions/script/c33200957.lua
View file @
75735548
...
@@ -30,6 +30,7 @@ function c33200957.initial_effect(c)
...
@@ -30,6 +30,7 @@ function c33200957.initial_effect(c)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetCode
(
EVENT_RELEASE
)
e3
:
SetCode
(
EVENT_RELEASE
)
e3
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e3
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e3
:
SetCountLimit
(
1
,
33210957
)
e3
:
SetCondition
(
c33200957
.
pencon
)
e3
:
SetCondition
(
c33200957
.
pencon
)
e3
:
SetTarget
(
c33200957
.
pentg
)
e3
:
SetTarget
(
c33200957
.
pentg
)
e3
:
SetOperation
(
c33200957
.
penop
)
e3
:
SetOperation
(
c33200957
.
penop
)
...
...
expansions/script/c33200958.lua
View file @
75735548
...
@@ -30,6 +30,7 @@ function c33200958.initial_effect(c)
...
@@ -30,6 +30,7 @@ function c33200958.initial_effect(c)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetCode
(
EVENT_RELEASE
)
e3
:
SetCode
(
EVENT_RELEASE
)
e3
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e3
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e3
:
SetCountLimit
(
1
,
33210958
)
e3
:
SetCondition
(
c33200958
.
pencon
)
e3
:
SetCondition
(
c33200958
.
pencon
)
e3
:
SetTarget
(
c33200958
.
pentg
)
e3
:
SetTarget
(
c33200958
.
pentg
)
e3
:
SetOperation
(
c33200958
.
penop
)
e3
:
SetOperation
(
c33200958
.
penop
)
...
...
expansions/script/c40044918.lua
View file @
75735548
--暗金教
--E・HERO エアーマン
local
m
=
10419901
function
c40044918
.
initial_effect
(
c
)
local
cm
=
_G
[
"c"
..
m
]
--effect
cm
.
named_with_Kabal
=
1
function
cm
.
Kabal
(
c
)
local
m
=
_G
[
"c"
..
c
:
GetCode
()]
return
m
and
m
.
named_with_Kabal
end
function
cm
.
Potion
(
c
)
local
m
=
_G
[
"c"
..
c
:
GetCode
()]
return
m
and
m
.
named_with_Potion
end
function
cm
.
initial_effect
(
c
)
--to hand
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
m
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
40044918
,
0
))
e1
:
Set
Category
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e1
:
Set
Property
(
EFFECT_FLAG_DAMAGE_STEP
)
e1
:
SetType
(
EFFECT_TYPE_
SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetType
(
EFFECT_TYPE_
TRIGGER_O
+
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EVENT_SUMMON_SUCCESS
)
e1
:
SetCode
(
EVENT_SUMMON_SUCCESS
)
e1
:
SetCountLimit
(
1
,
m
)
e1
:
SetTarget
(
c40044918
.
tg
)
e1
:
SetTarget
(
cm
.
thtg
)
e1
:
SetOperation
(
c40044918
.
op
)
e1
:
SetOperation
(
cm
.
thop
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
local
e2
=
e1
:
Clone
()
e2
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
c
:
RegisterEffect
(
e2
)
end
end
function
c
m
.
th
filter
(
c
)
function
c
40044918
.
ct
filter
(
c
)
return
c
m
.
Potion
(
c
)
and
c
:
IsAbleToHand
()
and
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x8
)
end
end
function
cm
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c40044918
.
schfilter
(
c
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
cm
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
return
c
:
IsSetCard
(
0x8
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAbleToHand
()
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
end
function
cm
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c40044918
.
desfilter
(
c
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
return
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
cm
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
end
if
g
:
GetCount
()
>
0
and
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
>
0
then
function
c40044918
.
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
--Public
local
c
=
e
:
GetHandler
()
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
if
chk
==
0
then
e1
:
SetDescription
(
aux
.
Stringid
(
m
,
9
))
local
ct
=
Duel
.
GetMatchingGroupCount
(
c40044918
.
ctfilter
,
tp
,
LOCATION_MZONE
,
0
,
c
)
e1
:
SetProperty
(
EFFECT_FLAG_CLIENT_HINT
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_PUBLIC
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
g
:
GetFirst
():
RegisterEffect
(
e1
)
local
sel
=
0
local
sel
=
0
local
tc
=
g
:
GetFirst
()
if
ct
>
0
and
Duel
.
IsExistingMatchingCard
(
c40044918
.
desfilter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
1
,
nil
)
then
sel
=
sel
+
1
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
m
,
2
))
if
Duel
.
IsExistingMatchingCard
(
c40044918
.
schfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
then
sel
=
sel
+
2
end
sel
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
m
,
3
),
aux
.
Stringid
(
m
,
4
),
aux
.
Stringid
(
m
,
5
),
aux
.
Stringid
(
m
,
6
),
aux
.
Stringid
(
m
,
7
))
+
1
e
:
SetLabel
(
sel
)
if
sel
==
1
then
return
sel
~=
0
tc
:
RegisterFlagEffect
(
10419701
,
RESET_EVENT
+
RESETS_STANDARD
-
RESET_TOFIELD
,
0
,
1
)
end
--Public
local
sel
=
e
:
GetLabel
()
local
e2
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
if
sel
==
3
then
e2
:
SetDescription
(
aux
.
Stringid
(
m
,
3
))
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
40044918
,
0
))
e2
:
SetProperty
(
EFFECT_FLAG_CLIENT_HINT
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
sel
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
40044918
,
1
),
aux
.
Stringid
(
40044918
,
2
))
+
1
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
elseif
sel
==
1
then
e2
:
SetCode
(
EFFECT_PUBLIC
)
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
40044918
,
1
))
e2
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
else
tc
:
RegisterEffect
(
e2
)
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
40044918
,
2
))
elseif
sel
==
2
then
end
tc
:
RegisterFlagEffect
(
10419702
,
RESET_EVENT
+
RESETS_STANDARD
-
RESET_TOFIELD
,
0
,
1
)
e
:
SetLabel
(
sel
)
--Public
if
sel
==
1
then
local
e2
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
local
g
=
Duel
.
GetMatchingGroup
(
c40044918
.
desfilter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
nil
)
e2
:
SetDescription
(
aux
.
Stringid
(
m
,
4
))
e
:
SetCategory
(
CATEGORY_DESTROY
)
e2
:
SetProperty
(
EFFECT_FLAG_CLIENT_HINT
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
g
,
1
,
0
,
0
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
else
e2
:
SetCode
(
EFFECT_PUBLIC
)
e
:
SetCategory
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e2
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
tc
:
RegisterEffect
(
e2
)
end
elseif
sel
==
3
then
end
tc
:
RegisterFlagEffect
(
10419703
,
RESET_EVENT
+
RESETS_STANDARD
-
RESET_TOFIELD
,
0
,
1
)
function
c40044918
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
--Public
local
c
=
e
:
GetHandler
()
local
e2
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
local
sel
=
e
:
GetLabel
()
e2
:
SetDescription
(
aux
.
Stringid
(
m
,
5
))
if
sel
==
1
then
e2
:
SetProperty
(
EFFECT_FLAG_CLIENT_HINT
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
local
ct
=
Duel
.
GetMatchingGroupCount
(
c40044918
.
ctfilter
,
tp
,
LOCATION_MZONE
,
0
,
c
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
local
g
=
Duel
.
GetMatchingGroup
(
c40044918
.
desfilter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
nil
)
e2
:
SetCode
(
EFFECT_PUBLIC
)
if
ct
>
0
and
g
:
GetCount
()
>
0
then
e2
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_DESTROY
)
tc
:
RegisterEffect
(
e2
)
local
dg
=
g
:
Select
(
tp
,
1
,
ct
,
nil
)
elseif
sel
==
4
then
Duel
.
HintSelection
(
dg
)
tc
:
RegisterFlagEffect
(
10419704
,
RESET_EVENT
+
RESETS_STANDARD
-
RESET_TOFIELD
,
0
,
1
)
Duel
.
Destroy
(
dg
,
REASON_EFFECT
)
--Public
end
local
e2
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
else
e2
:
SetDescription
(
aux
.
Stringid
(
m
,
6
))
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
e2
:
SetProperty
(
EFFECT_FLAG_CLIENT_HINT
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c40044918
.
schfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
if
g
:
GetCount
()
>
0
then
e2
:
SetCode
(
EFFECT_PUBLIC
)
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
e2
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
tc
:
RegisterEffect
(
e2
)
elseif
sel
==
5
then
tc
:
RegisterFlagEffect
(
10419705
,
RESET_EVENT
+
RESETS_STANDARD
-
RESET_TOFIELD
,
0
,
1
)
--Public
local
e2
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e2
:
SetDescription
(
aux
.
Stringid
(
m
,
7
))
e2
:
SetProperty
(
EFFECT_FLAG_CLIENT_HINT
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
e2
:
SetCode
(
EFFECT_PUBLIC
)
e2
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
tc
:
RegisterEffect
(
e2
)
end
end
end
end
end
end
expansions/script/c53734013.lua
View file @
75735548
...
@@ -41,7 +41,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
...
@@ -41,7 +41,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
Duel
.
RegisterEffect
(
e2
,
tp
)
Duel
.
RegisterEffect
(
e2
,
tp
)
end
end
function
cm
.
spfilter
(
c
,
e
,
tp
,
dis
)
function
cm
.
spfilter
(
c
,
e
,
tp
,
dis
)
return
(
c
:
IsSetCard
(
0x3536
)
or
c
:
IsCode
(
53734009
))
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEUP
,
tp
,
dis
)
return
(
c
:
IsSetCard
(
0x3536
)
or
c
:
IsCode
(
53734009
))
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEUP
,
tp
,
dis
)
and
not
Duel
.
IsExistingMatchingCard
(
function
(
c
,
tc
)
return
tc
:
IsCode
(
c
:
GetCode
())
and
c
:
IsFaceup
()
end
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
nil
,
c
)
end
end
function
cm
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
dis
=
e
:
GetLabel
()
local
dis
=
e
:
GetLabel
()
...
...
expansions/script/c77693530.lua
View file @
75735548
...
@@ -26,38 +26,21 @@ function c77693530.initial_effect(c)
...
@@ -26,38 +26,21 @@ function c77693530.initial_effect(c)
--deck fusion material
--deck fusion material
if
not
c77693530
.
globle_check
then
if
not
c77693530
.
globle_check
then
c77693530
.
globle_check
=
true
c77693530
.
globle_check
=
true
local
ge1
=
Effect
.
CreateEffect
(
c
)
_hack_fusion_check
=
Card
.
CheckFusionMaterial
ge1
:
SetType
(
EFFECT_TYPE_FIELD
)
function
Card
.
CheckFusionMaterial
(
card
,
Group_fus
,
Card_g
,
int_chkf
,
not_mat
)
ge1
:
SetCode
(
EFFECT_EXTRA_FUSION_MATERIAL
)
local
exg
=
Group
.
CreateGroup
()
ge1
:
SetProperty
(
EFFECT_FLAG_SET_AVAILABLE
)
if
card
:
GetOriginalCode
()
==
77693530
then
ge1
:
SetTargetRange
(
LOCATION_DECK
,
0
)
exg
=
Duel
.
GetMatchingGroup
(
c77693530
.
filter0
,
int_chkf
,
LOCATION_DECK
,
0
,
nil
)
ge1
:
SetTarget
(
c77693530
.
mttg
)
if
exg
:
GetCount
()
>
0
then
ge1
:
SetValue
(
c77693530
.
mtval
)
Group_fus
:
Merge
(
exg
)
Duel
.
RegisterEffect
(
ge1
,
0
)
end
local
ge2
=
ge1
:
Clone
()
end
Duel
.
RegisterEffect
(
ge2
,
1
)
return
_hack_fusion_check
(
card
,
Group_fus
,
Card_g
,
int_chkf
,
not_mat
)
end
--workaround
if
not
aux
.
fus_deck_mat_hack_check
then
aux
.
fus_deck_mat_hack_check
=
true
function
aux
.
fus_mat_deck_hack_exmat_filter
(
c
,
tp
)
return
c
:
IsHasEffect
(
EFFECT_EXTRA_FUSION_MATERIAL
,
tp
)
end
_GetFusionMaterial
=
Duel
.
GetFusionMaterial
function
Duel
.
GetFusionMaterial
(
tp
)
local
g1
=
_GetFusionMaterial
(
tp
)
local
g2
=
Duel
.
GetMatchingGroup
(
aux
.
fus_mat_deck_hack_exmat_filter
,
tp
,
LOCATION_DECK
,
0
,
nil
,
tp
)
g1
:
Merge
(
g2
)
return
g1
end
end
end
end
end
end
function
c77693530
.
mttg
(
e
,
c
)
function
c77693530
.
filter0
(
c
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAbleToGrave
()
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsCanBeFusionMaterial
()
end
function
c77693530
.
mtval
(
e
,
c
)
if
not
c
then
return
false
end
return
c
:
IsCode
(
77693530
)
end
end
function
c77693530
.
eqcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c77693530
.
eqcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
rp
==
1
-
tp
and
re
:
IsActiveType
(
TYPE_MONSTER
)
and
not
e
:
GetHandler
():
IsStatus
(
STATUS_BATTLE_DESTROYED
)
return
rp
==
1
-
tp
and
re
:
IsActiveType
(
TYPE_MONSTER
)
and
not
e
:
GetHandler
():
IsStatus
(
STATUS_BATTLE_DESTROYED
)
...
...
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