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
ece6d07a
Commit
ece6d07a
authored
Aug 06, 2022
by
Nemo Ma
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
e206a8df
Changes
13
Hide whitespace changes
Inline
Side-by-side
Showing
13 changed files
with
164 additions
and
150 deletions
+164
-150
expansions/script/c115025.lua
expansions/script/c115025.lua
+17
-15
expansions/script/c115031.lua
expansions/script/c115031.lua
+1
-13
expansions/script/c115043.lua
expansions/script/c115043.lua
+1
-1
expansions/script/c14010234.lua
expansions/script/c14010234.lua
+8
-3
expansions/script/c15000065.lua
expansions/script/c15000065.lua
+1
-1
expansions/script/c25000032.lua
expansions/script/c25000032.lua
+110
-96
expansions/script/c25000080.lua
expansions/script/c25000080.lua
+1
-1
expansions/script/c29065508.lua
expansions/script/c29065508.lua
+2
-2
expansions/script/c29065509.lua
expansions/script/c29065509.lua
+2
-2
expansions/script/c29065510.lua
expansions/script/c29065510.lua
+3
-4
expansions/script/c33200911.lua
expansions/script/c33200911.lua
+1
-1
expansions/script/c60002053.lua
expansions/script/c60002053.lua
+16
-11
expansions/script/c67210103.lua
expansions/script/c67210103.lua
+1
-0
No files found.
expansions/script/c115025.lua
View file @
ece6d07a
...
@@ -5,7 +5,7 @@ function c115025.initial_effect(c)
...
@@ -5,7 +5,7 @@ function c115025.initial_effect(c)
aux
.
EnablePendulumAttribute
(
c
)
aux
.
EnablePendulumAttribute
(
c
)
--XDestroy
--XDestroy
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetCategory
(
CATEGORY_
SPECIAL_SUMMON
)
e2
:
SetCategory
(
CATEGORY_
ATKCHANGE
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
+
EFFECT_FLAG_DELAY
)
e2
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
+
EFFECT_FLAG_DELAY
)
e2
:
SetCode
(
EVENT_DESTROYED
)
e2
:
SetCode
(
EVENT_DESTROYED
)
...
@@ -15,7 +15,7 @@ function c115025.initial_effect(c)
...
@@ -15,7 +15,7 @@ function c115025.initial_effect(c)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
--SpecialSummon P
--SpecialSummon P
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_DESTROY
+
CATEGORY_TOHAND
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_DESTROY
+
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e3
:
SetType
(
EFFECT_TYPE_IGNITION
)
e3
:
SetType
(
EFFECT_TYPE_IGNITION
)
e3
:
SetRange
(
LOCATION_PZONE
)
e3
:
SetRange
(
LOCATION_PZONE
)
e3
:
SetCountLimit
(
1
,
115026
)
e3
:
SetCountLimit
(
1
,
115026
)
...
@@ -57,7 +57,8 @@ function c115025.xdtg(e,tp,eg,ep,ev,re,r,rp,chk)
...
@@ -57,7 +57,8 @@ function c115025.xdtg(e,tp,eg,ep,ev,re,r,rp,chk)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
end
end
function
c115025
.
xdop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c115025
.
xdop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
local
c
=
e
:
GetHandler
()
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetCode
(
EVENT_PHASE
+
PHASE_BATTLE_START
)
e1
:
SetCode
(
EVENT_PHASE
+
PHASE_BATTLE_START
)
e1
:
SetCountLimit
(
1
)
e1
:
SetCountLimit
(
1
)
...
@@ -72,21 +73,22 @@ function c115025.xdop(e,tp,eg,ep,ev,re,r,rp,chk)
...
@@ -72,21 +73,22 @@ function c115025.xdop(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
RegisterEffect
(
e1
,
tp
)
Duel
.
RegisterEffect
(
e1
,
tp
)
end
end
function
c115025
.
atkcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c115025
.
atkcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
(
Duel
.
GetTurnCount
()
~=
e
:
GetLabel
()
or
Duel
.
IsAbleToEnterBP
())
and
Duel
.
GetTurnPlayer
()
==
tp
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
return
(
Duel
.
GetTurnCount
()
~=
e
:
GetLabel
()
or
Duel
.
IsAbleToEnterBP
())
and
Duel
.
GetTurnPlayer
()
==
tp
and
Duel
.
IsExistingMatchingCard
(
Card
.
IsFaceup
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
and
Duel
.
IsExistingMatchingCard
(
Card
.
IsFaceup
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
end
end
function
c115025
.
atkop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c115025
.
atkop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_CARD
,
0
,
115025
)
local
g
=
Duel
.
GetMatchingGroup
(
Card
.
IsFaceup
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
Card
.
IsFaceup
,
tp
,
LOCATION_MZONE
,
0
,
1
,
1
,
nil
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
97453744
,
2
)
)
if
g
:
GetCount
()
>
0
then
if
g
:
GetCount
()
>
0
then
local
tc
=
g
:
GetFirst
()
local
sg
=
g
:
Select
(
tp
,
1
,
1
,
nil
)
local
e1
=
Effect
.
CreateEffect
(
c
)
Duel
.
HintSelection
(
sg
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
local
tc
=
sg
:
GetFirst
()
e1
:
SetCode
(
EFFECT_SET_ATTACK_FINAL
)
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetValue
(
tc
:
GetAttack
()
*
2
)
e1
:
SetCode
(
EFFECT_SET_ATTACK_FINAL
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
)
tc
:
RegisterEffect
(
e1
)
e1
:
SetValue
(
tc
:
GetAttack
()
*
2
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
tc
:
RegisterEffect
(
e1
)
end
end
end
end
...
...
expansions/script/c115031.lua
View file @
ece6d07a
...
@@ -3,7 +3,6 @@ c115031.named_with_Arknight=1
...
@@ -3,7 +3,6 @@ c115031.named_with_Arknight=1
function
c115031
.
initial_effect
(
c
)
function
c115031
.
initial_effect
(
c
)
--pendulum summon
--pendulum summon
aux
.
EnablePendulumAttribute
(
c
)
aux
.
EnablePendulumAttribute
(
c
)
--draw
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
115031
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
115031
,
0
))
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
...
@@ -14,9 +13,8 @@ function c115031.initial_effect(c)
...
@@ -14,9 +13,8 @@ function c115031.initial_effect(c)
e1
:
SetTarget
(
c115031
.
sptg2
)
e1
:
SetTarget
(
c115031
.
sptg2
)
e1
:
SetOperation
(
c115031
.
spop2
)
e1
:
SetOperation
(
c115031
.
spop2
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
--to hand
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_
TOHAND
)
e2
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_
DESTROY
+
CATEGORY_DRAW
)
e2
:
SetType
(
EFFECT_TYPE_IGNITION
)
e2
:
SetType
(
EFFECT_TYPE_IGNITION
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetCountLimit
(
1
,
115032
)
e2
:
SetCountLimit
(
1
,
115032
)
...
@@ -25,16 +23,6 @@ function c115031.initial_effect(c)
...
@@ -25,16 +23,6 @@ function c115031.initial_effect(c)
e2
:
SetOperation
(
c115031
.
spop
)
e2
:
SetOperation
(
c115031
.
spop
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
end
end
function
c115031
.
drtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsPlayerCanDraw
(
tp
,
1
)
end
Duel
.
SetTargetPlayer
(
tp
)
Duel
.
SetTargetParam
(
1
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DRAW
,
nil
,
0
,
tp
,
1
)
end
function
c115031
.
drop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
p
,
d
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_PLAYER
,
CHAININFO_TARGET_PARAM
)
Duel
.
Draw
(
p
,
d
,
REASON_EFFECT
)
end
function
c115031
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c115031
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
IsExistingMatchingCard
(
nil
,
tp
,
LOCATION_PZONE
,
0
,
1
,
e
:
GetHandler
())
return
Duel
.
IsExistingMatchingCard
(
nil
,
tp
,
LOCATION_PZONE
,
0
,
1
,
e
:
GetHandler
())
end
end
...
...
expansions/script/c115043.lua
View file @
ece6d07a
...
@@ -24,7 +24,7 @@ function c115043.initial_effect(c)
...
@@ -24,7 +24,7 @@ function c115043.initial_effect(c)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
--SpecialSummon P
--SpecialSummon P
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_DESTROY
+
CATEGORY_TOHAND
)
e3
:
SetCategory
(
CATEGORY_DESTROY
+
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e3
:
SetType
(
EFFECT_TYPE_IGNITION
)
e3
:
SetType
(
EFFECT_TYPE_IGNITION
)
e3
:
SetRange
(
LOCATION_PZONE
)
e3
:
SetRange
(
LOCATION_PZONE
)
e3
:
SetCountLimit
(
1
,
115043
)
e3
:
SetCountLimit
(
1
,
115043
)
...
...
expansions/script/c14010234.lua
View file @
ece6d07a
...
@@ -71,8 +71,12 @@ end
...
@@ -71,8 +71,12 @@ end
function
cm
.
desfilter
(
c
,
e
)
function
cm
.
desfilter
(
c
,
e
)
return
c
:
IsSetCard
(
0xa001
)
and
c
:
GetOriginalType
()
&
TYPE_MONSTER
and
(
c
:
IsLocation
(
LOCATION_HAND
)
or
c
:
IsFaceup
())
and
not
c
:
IsImmuneToEffect
(
e
)
return
c
:
IsSetCard
(
0xa001
)
and
c
:
GetOriginalType
()
&
TYPE_MONSTER
and
(
c
:
IsLocation
(
LOCATION_HAND
)
or
c
:
IsFaceup
())
and
not
c
:
IsImmuneToEffect
(
e
)
end
end
function
cm
.
desfilter1
(
c
,
e
,
tp
)
function
cm
.
desfilter3
(
c
)
return
c
:
IsSetCard
(
0xa001
)
and
c
:
GetOriginalType
()
&
TYPE_MONSTER
and
(
c
:
IsLocation
(
LOCATION_HAND
)
or
c
:
IsFaceup
())
and
Duel
.
IsExistingMatchingCard
(
cm
.
spfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
,
c
:
GetAttack
())
return
c
:
IsSetCard
(
0xa001
)
and
c
:
GetOriginalType
()
&
TYPE_MONSTER
and
(
c
:
IsLocation
(
LOCATION_HAND
)
or
c
:
IsFaceup
())
end
function
cm
.
fselect3
(
g
,
e
,
tp
)
local
atk
=
g
:
GetSum
(
Card
.
GetAttack
)
return
Duel
.
IsExistingMatchingCard
(
cm
.
spfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
,
atk
)
end
end
function
cm
.
desfilter2
(
c
)
function
cm
.
desfilter2
(
c
)
return
c
:
IsLocation
(
LOCATION_MZONE
)
and
Duel
.
GetMZoneCount
(
tp
,
c
)
>
0
return
c
:
IsLocation
(
LOCATION_MZONE
)
and
Duel
.
GetMZoneCount
(
tp
,
c
)
>
0
...
@@ -85,7 +89,8 @@ function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
...
@@ -85,7 +89,8 @@ function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
local
loc
=
LOCATION_HAND
+
LOCATION_ONFIELD
+
LOCATION_EXTRA
local
loc
=
LOCATION_HAND
+
LOCATION_ONFIELD
+
LOCATION_EXTRA
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
if
ft
<=
0
then
loc
=
LOCATION_MZONE
end
if
ft
<=
0
then
loc
=
LOCATION_MZONE
end
return
Duel
.
IsExistingMatchingCard
(
cm
.
desfilter1
,
tp
,
loc
,
0
,
1
,
nil
,
e
,
tp
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
local
g
=
Duel
.
GetMatchingGroup
(
cm
.
desfilter3
,
tp
,
loc
,
0
,
nil
)
return
#
g
>
0
and
g
:
CheckSubGroup
(
cm
.
fselect3
,
1
,
2
,
e
,
tp
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
end
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_DECK
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_DECK
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
nil
,
1
,
tp
,
LOCATION_HAND
+
LOCATION_ONFIELD
+
LOCATION_EXTRA
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
nil
,
1
,
tp
,
LOCATION_HAND
+
LOCATION_ONFIELD
+
LOCATION_EXTRA
)
...
...
expansions/script/c15000065.lua
View file @
ece6d07a
...
@@ -71,7 +71,7 @@ function c15000065.descon(e,tp,eg,ep,ev,re,r,rp)
...
@@ -71,7 +71,7 @@ function c15000065.descon(e,tp,eg,ep,ev,re,r,rp)
return
eg
:
IsExists
(
c15000065
.
desfilter
,
1
,
nil
,
tp
)
return
eg
:
IsExists
(
c15000065
.
desfilter
,
1
,
nil
,
tp
)
end
end
function
c15000065
.
desop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c15000065
.
desop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
SelectMatchingCard
(
e
:
GetHandlerPlayer
(),
c15000065
.
desfilter
,
e
:
GetHandlerPlayer
(),
LOCATION_ONFIELD
,
0
,
1
,
1
,
nil
)
local
g
=
Duel
.
SelectMatchingCard
(
e
:
GetHandlerPlayer
(),
c15000065
.
desfilter
,
e
:
GetHandlerPlayer
(),
LOCATION_ONFIELD
,
0
,
1
,
1
,
nil
,
e
:
GetHandlerPlayer
()
)
if
g
:
GetCount
()
~=
0
then
if
g
:
GetCount
()
~=
0
then
Duel
.
Destroy
(
g
,
REASON_EFFECT
)
Duel
.
Destroy
(
g
,
REASON_EFFECT
)
Duel
.
BreakEffect
()
Duel
.
BreakEffect
()
...
...
expansions/script/c25000032.lua
View file @
ece6d07a
--铠武龙 什锦将军
local
m
=
25000032
function
c25000032
.
initial_effect
(
c
)
local
cm
=
_G
[
"c"
..
m
]
--pendulum summon
cm
.
name
=
"铠武龙 什锦将军"
if
not
pcall
(
function
()
require
(
"expansions/script/c53702500"
)
end
)
then
require
(
"script/c53702500"
)
end
function
cm
.
initial_effect
(
c
)
aux
.
EnablePendulumAttribute
(
c
,
false
)
aux
.
EnablePendulumAttribute
(
c
,
false
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsType
,
TYPE_PENDULUM
),
aux
.
NonTuner
(
Card
.
IsType
,
TYPE_PENDULUM
),
1
)
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsType
,
TYPE_PENDULUM
),
aux
.
NonTuner
(
Card
.
IsType
,
TYPE_PENDULUM
),
1
)
c
:
EnableReviveLimit
()
c
:
EnableReviveLimit
()
--to hand
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
25000032
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
m
,
0
))
e1
:
SetCategory
(
CATEGORY_TOHAND
)
e1
:
SetCategory
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e1
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e1
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetCountLimit
(
1
,
25000032
)
e1
:
SetCountLimit
(
1
,
m
)
e1
:
SetCost
(
c25000032
.
thcost
)
e1
:
SetCost
(
cm
.
thcost
)
e1
:
SetTarget
(
c25000032
.
thtg
)
e1
:
SetTarget
(
cm
.
thtg
)
e1
:
SetOperation
(
c25000032
.
thop
)
e1
:
SetOperation
(
cm
.
thop
)
c
:
RegisterEffect
(
e1
)
--p set and SpecialSummon
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
25000032
,
1
))
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetCountLimit
(
1
,
15000032
)
e1
:
SetTarget
(
c25000032
.
psptg
)
e1
:
SetOperation
(
c25000032
.
pspop
)
c
:
RegisterEffect
(
e1
)
--special summon
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
25000032
,
0
))
e1
:
SetCategory
(
CATEGORY_DESTROY
+
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetType
(
EFFECT_TYPE_IGNITION
)
e1
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e1
:
SetRange
(
LOCATION_PZONE
)
e1
:
SetCountLimit
(
1
,
35000032
)
e1
:
SetTarget
(
c25000032
.
sptg
)
e1
:
SetOperation
(
c25000032
.
spop
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
m
,
1
))
e2
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e2
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e2
:
SetCode
(
EVENT_FREE_CHAIN
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetCountLimit
(
1
,
m
+
10000
)
e2
:
SetTarget
(
cm
.
psptg
)
e2
:
SetOperation
(
cm
.
pspop
)
c
:
RegisterEffect
(
e2
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
m
,
2
))
e3
:
SetCategory
(
CATEGORY_DESTROY
+
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetType
(
EFFECT_TYPE_IGNITION
)
e3
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e3
:
SetRange
(
LOCATION_PZONE
)
e3
:
SetCountLimit
(
1
,
m
+
20000
)
e3
:
SetTarget
(
cm
.
sptg
)
e3
:
SetOperation
(
cm
.
spop
)
c
:
RegisterEffect
(
e3
)
end
end
function
c
25000032
.
ctfil
(
c
)
function
c
m
.
ctfil
(
c
)
return
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsAbleTo
Extra
()
return
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsAbleTo
DeckOrExtraAsCost
()
end
end
function
c
25000032
.
thcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c
m
.
thcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c
25000032
.
ctfil
,
tp
,
LOCATION_HAND
,
0
,
1
,
nil
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c
m
.
ctfil
,
tp
,
LOCATION_HAND
,
0
,
1
,
nil
)
end
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c
25000032
.
ctfil
,
tp
,
LOCATION_HAND
,
0
,
1
,
1
,
nil
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c
m
.
ctfil
,
tp
,
LOCATION_HAND
,
0
,
1
,
1
,
nil
)
Duel
.
SendtoExtraP
(
g
,
tp
,
REASON_COST
)
Duel
.
SendtoExtraP
(
g
,
tp
,
REASON_COST
)
end
end
function
c
25000032
.
thfil
(
c
)
function
c
m
.
thfil
(
c
)
return
c
:
IsAbleToHand
()
and
c
:
IsType
(
TYPE_PENDULUM
)
return
c
:
IsAbleToHand
()
and
c
:
IsType
(
TYPE_PENDULUM
)
end
end
function
c
25000032
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c
m
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c
25000032
.
thfil
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c
m
.
thfil
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
end
function
c
25000032
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
m
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
c
=
e
:
GetHandler
()
local
g
=
Duel
.
GetMatchingGroup
(
c
25000032
.
thfil
,
tp
,
LOCATION_DECK
,
0
,
nil
)
local
g
=
Duel
.
GetMatchingGroup
(
c
m
.
thfil
,
tp
,
LOCATION_DECK
,
0
,
nil
)
if
g
:
GetCount
()
>
0
then
if
g
:
GetCount
()
>
0
then
local
sg
=
g
:
Select
(
tp
,
1
,
1
,
nil
)
local
sg
=
g
:
Select
(
tp
,
1
,
1
,
nil
)
Duel
.
SendtoHand
(
sg
,
tp
,
REASON_EFFECT
)
Duel
.
SendtoHand
(
sg
,
tp
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
sg
)
Duel
.
ConfirmCards
(
1
-
tp
,
sg
)
end
end
end
end
function
c25000032
.
spfil
(
c
,
e
,
tp
)
function
cm
.
spfil
(
c
,
e
,
tp
,
ft1
,
ft2
)
if
c
:
IsLocation
(
LOCATION_EXTRA
)
and
not
c
:
IsFaceup
()
then
return
false
end
return
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
SUMMON_TYPE_PENDULUM
,
tp
,
false
,
false
)
and
(
c
:
IsLocation
(
LOCATION_HAND
)
or
c
:
IsFaceup
())
and
((
c
:
IsLocation
(
LOCATION_HAND
)
and
ft2
>
0
)
or
(
c
:
IsLocation
(
LOCATION_EXTRA
)
and
ft1
>
0
))
return
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
SUMMON_TYPE_PENDULUM
,
tp
,
false
,
false
)
end
end
function
c25000032
.
sgck
(
g
)
function
cm
.
psptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
sg1
=
g
:
Filter
(
Card
.
IsLocation
,
nil
,
LOCATION_HAND
)
local
ft1
=
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
e
:
GetHandler
(),
TYPE_PENDULUM
)
local
sg2
=
g
:
Filter
(
Card
.
IsLocation
,
nil
,
LOCATION_EXTRA
)
local
ft2
=
Duel
.
GetMZoneCount
(
tp
,
e
:
GetHandler
())
local
ft1
=
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
nil
,
TYPE_PENDULUM
)
local
g
=
Duel
.
GetMatchingGroup
(
cm
.
spfil
,
tp
,
LOCATION_HAND
+
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
ft1
,
ft2
)
local
ft2
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
if
chk
==
0
then
return
#
g
>
0
and
(
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
or
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
))
end
if
g
:
GetClassCount
(
Card
.
GetCode
)
~=
2
then
return
false
end
return
ft2
>=
sg1
:
GetCount
()
and
ft1
>=
sg2
:
GetCount
()
end
function
c25000032
.
psptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
g
=
Duel
.
GetMatchingGroup
(
c25000032
.
spfil
,
tp
,
LOCATION_HAND
+
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
)
if
chk
==
0
then
return
#
g
>
0
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
(
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
or
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
))
end
local
ag
=
Group
.
CreateGroup
()
local
ag
=
Group
.
CreateGroup
()
local
codes
=
{}
local
codes
=
{}
for
c
in
aux
.
Next
(
g
)
do
for
c
in
aux
.
Next
(
g
)
do
...
@@ -89,10 +80,8 @@ function c25000032.psptg(e,tp,eg,ep,ev,re,r,rp,chk)
...
@@ -89,10 +80,8 @@ function c25000032.psptg(e,tp,eg,ep,ev,re,r,rp,chk)
end
end
end
end
table.sort
(
codes
)
table.sort
(
codes
)
--c:IsCode(codes[1])
local
afilter
=
{
codes
[
1
],
OPCODE_ISCODE
}
local
afilter
=
{
codes
[
1
],
OPCODE_ISCODE
}
if
#
codes
>
1
then
if
#
codes
>
1
then
--or ... or c:IsCode(codes[i])
for
i
=
2
,
#
codes
do
for
i
=
2
,
#
codes
do
table.insert
(
afilter
,
codes
[
i
])
table.insert
(
afilter
,
codes
[
i
])
table.insert
(
afilter
,
OPCODE_ISCODE
)
table.insert
(
afilter
,
OPCODE_ISCODE
)
...
@@ -100,49 +89,74 @@ function c25000032.psptg(e,tp,eg,ep,ev,re,r,rp,chk)
...
@@ -100,49 +89,74 @@ function c25000032.psptg(e,tp,eg,ep,ev,re,r,rp,chk)
end
end
end
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_CODE
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_CODE
)
local
code1
=
Duel
.
AnnounceCard
(
tp
,
table.unpack
(
afilter
))
local
code1
=
Duel
.
AnnounceCard
(
tp
,
table.unpack
(
afilter
))
getmetatable
(
e
:
GetHandler
()).
announce_filter
=
{
code1
,
OPCODE_ISCODE
,
OPCODE_NOT
}
Duel
.
SetTargetParam
(
code1
)
local
code2
=
Duel
.
AnnounceCard
(
tp
,
table.unpack
(
afilter
))
local
code2
=
0
e
:
SetLabel
(
code1
,
code2
)
local
sg
=
g
:
Filter
(
Card
.
IsCode
,
nil
,
code1
)
local
codes2
=
{}
for
tc
in
aux
.
Next
(
sg
)
do
local
g2
=
Group
.
CreateGroup
()
if
tc
:
IsLocation
(
LOCATION_HAND
)
then
g2
=
Duel
.
GetMatchingGroup
(
cm
.
spfil
,
tp
,
LOCATION_HAND
+
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
ft1
,
ft2
-
1
):
Filter
(
aux
.
NOT
(
Card
.
IsCode
),
nil
,
code1
)
else
g2
=
Duel
.
GetMatchingGroup
(
cm
.
spfil
,
tp
,
LOCATION_HAND
+
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
ft1
-
1
,
ft2
):
Filter
(
aux
.
NOT
(
Card
.
IsCode
),
nil
,
code1
)
end
local
ag2
=
Group
.
CreateGroup
()
for
xc
in
aux
.
Next
(
g2
)
do
local
code
=
xc
:
GetCode
()
if
not
ag2
:
IsExists
(
Card
.
IsCode
,
1
,
nil
,
code
)
then
ag2
:
AddCard
(
xc
)
table.insert
(
codes2
,
code
)
end
end
end
if
#
codes2
>
0
and
Duel
.
SelectYesNo
(
tp
,
210
)
then
table.sort
(
codes2
)
local
afilter2
=
{
codes2
[
1
],
OPCODE_ISCODE
}
if
#
codes2
>
1
then
for
i
=
2
,
#
codes2
do
table.insert
(
afilter2
,
codes2
[
i
])
table.insert
(
afilter2
,
OPCODE_ISCODE
)
table.insert
(
afilter2
,
OPCODE_OR
)
end
end
code2
=
Duel
.
AnnounceCard
(
tp
,
table.unpack
(
afilter2
))
end
e
:
SetLabel
(
code2
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_ANNOUNCE
,
nil
,
0
,
tp
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_HAND
+
LOCATION_EXTRA
)
end
function
cm
.
spfil2
(
c
,
e
,
tp
,
ft1
,
ft2
,
code1
,
code2
)
return
cm
.
spfil
(
c
,
e
,
tp
,
ft1
,
ft2
)
and
c
:
IsCode
(
code1
,
code2
)
end
end
function
c25000032
.
sgck1
(
g
,
code1
,
code2
)
function
cm
.
sgck
(
g
,
ft1
,
ft2
)
local
sg1
=
g
:
Filter
(
Card
.
IsLocation
,
nil
,
LOCATION_HAND
)
return
ft1
>=
g
:
FilterCount
(
Card
.
IsLocation
,
nil
,
LOCATION_EXTRA
)
and
ft2
>=
g
:
FilterCount
(
Card
.
IsLocation
,
nil
,
LOCATION_HAND
)
and
aux
.
dncheck
(
g
)
local
sg2
=
g
:
Filter
(
Card
.
IsLocation
,
nil
,
LOCATION_EXTRA
)
local
ft1
=
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
nil
,
TYPE_PENDULUM
)
local
ft2
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
return
ft2
>=
sg1
:
GetCount
()
and
ft1
>=
sg2
:
GetCount
()
and
g
:
IsExists
(
Card
.
IsCode
,
1
,
nil
,
code1
)
and
g
:
IsExists
(
Card
.
IsCode
,
1
,
nil
,
code2
)
and
(
#
g
==
1
or
g
:
GetClassCount
(
Card
.
GetCode
)
==
2
)
end
end
function
c25000032
.
pspop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
fselect
(
g
,
ft1
,
ft2
)
return
aux
.
dncheck
(
g
)
and
(
g
:
GetClassCount
(
Card
.
GetLocation
)
==
2
or
(
not
g
:
IsExists
(
Card
.
IsLocation
,
1
,
nil
,
LOCATION_EXTRA
)
and
ft2
>
1
)
or
(
not
g
:
IsExists
(
Card
.
IsLocation
,
1
,
nil
,
LOCATION_HAND
)
and
ft1
>
1
))
end
function
cm
.
pspop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
c
=
e
:
GetHandler
()
if
(
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
or
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
))
then
if
(
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
or
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
))
then
Duel
.
MoveToField
(
c
,
tp
,
tp
,
LOCATION_PZONE
,
POS_FACEUP
,
true
)
Duel
.
MoveToField
(
e
:
GetHandler
(),
tp
,
tp
,
LOCATION_PZONE
,
POS_FACEUP
,
true
)
local
code1
,
code2
=
e
:
GetLabel
()
local
code1
,
code2
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_PARAM
),
e
:
GetLabel
()
local
g
=
Duel
.
GetMatchingGroup
(
c25000032
.
spfil
,
tp
,
LOCATION_HAND
+
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
)
local
ft1
=
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
nil
,
TYPE_PENDULUM
)
local
ct
=
2
local
ft2
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
then
ct
=
1
end
local
g
=
Duel
.
GetMatchingGroup
(
cm
.
spfil2
,
tp
,
LOCATION_HAND
+
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
ft1
,
ft2
,
code1
,
code2
)
ct
=
math.min
(
ct
,
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
))
local
ct
=
g
:
GetClassCount
(
Card
.
GetCode
)
if
g
:
CheckSubGroup
(
c25000032
.
sgck1
,
ct
,
ct
,
code1
,
code2
)
then
if
ct
==
0
then
return
end
local
sg
=
g
:
SelectSubGroup
(
tp
,
c25000032
.
sgck1
,
false
,
ct
,
ct
,
code1
,
code2
)
if
not
g
:
CheckSubGroup
(
cm
.
fselect
,
2
,
2
,
ft1
,
ft2
)
then
ct
=
1
end
Duel
.
SpecialSummon
(
sg
,
SUMMON_TYPE_PENDULUM
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
then
ct
=
1
end
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
sg
=
g
:
SelectSubGroup
(
tp
,
cm
.
sgck
,
false
,
ct
,
ct
,
ft1
,
ft2
)
if
#
sg
>
0
then
Duel
.
SpecialSummon
(
sg
,
SUMMON_TYPE_PENDULUM
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
end
end
function
c
25000032
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
function
c
m
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
c
25000032
.
desfil
,
tp
,
LOCATION_PZONE
,
0
,
1
,
e
:
GetHandler
())
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
c
m
.
desfil
,
tp
,
LOCATION_PZONE
,
0
,
1
,
e
:
GetHandler
())
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_DESTROY
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_DESTROY
)
local
tc
=
Duel
.
SelectTarget
(
tp
,
c
25000032
.
desfil
,
tp
,
LOCATION_PZONE
,
0
,
1
,
1
,
e
:
GetHandler
())
local
tc
=
Duel
.
SelectTarget
(
tp
,
c
m
.
desfil
,
tp
,
LOCATION_PZONE
,
0
,
1
,
1
,
e
:
GetHandler
())
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
tc
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
tc
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
e
:
GetHandler
(),
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
e
:
GetHandler
(),
1
,
0
,
0
)
end
end
function
c
25000032
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
m
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
c
=
e
:
GetHandler
()
local
tc
=
Duel
.
GetFirstTarget
()
local
tc
=
Duel
.
GetFirstTarget
()
if
c
:
IsRelateToEffect
(
e
)
and
tc
:
IsRelateToEffect
(
e
)
then
if
tc
:
IsRelateToEffect
(
e
)
and
Duel
.
Destroy
(
tc
,
REASON_EFFECT
)
~=
0
and
c
:
IsRelateToEffect
(
e
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
then
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
Duel
.
Destroy
(
tc
,
REASON_EFFECT
)
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<=
0
then
return
end
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
expansions/script/c25000080.lua
View file @
ece6d07a
...
@@ -2,7 +2,7 @@ local m=25000080
...
@@ -2,7 +2,7 @@ local m=25000080
local
cm
=
_G
[
"c"
..
m
]
local
cm
=
_G
[
"c"
..
m
]
cm
.
name
=
"ZGMF-X20A 强袭自由"
cm
.
name
=
"ZGMF-X20A 强袭自由"
function
cm
.
initial_effect
(
c
)
function
cm
.
initial_effect
(
c
)
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsSynchroType
,
TYPE_SYNCHRO
),
aux
.
NonTuner
(
Card
.
IsSynchroType
,
TYPE_SYNCHRO
)
,
1
)
aux
.
AddSynchroProcedure
(
c
,
nil
,
aux
.
NonTuner
(
Card
.
IsSynchroType
,
TYPE_SYNCHRO
),
1
,
1
)
c
:
EnableReviveLimit
()
c
:
EnableReviveLimit
()
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
m
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
m
,
0
))
...
...
expansions/script/c29065508.lua
View file @
ece6d07a
...
@@ -28,8 +28,8 @@ function c29065508.ovfilter(c)
...
@@ -28,8 +28,8 @@ function c29065508.ovfilter(c)
return
c
:
IsFaceup
()
and
(
c
:
IsSetCard
(
0x87af
)
or
(
_G
[
"c"
..
c
:
GetCode
()]
and
_G
[
"c"
..
c
:
GetCode
()].
named_with_Arknight
))
return
c
:
IsFaceup
()
and
(
c
:
IsSetCard
(
0x87af
)
or
(
_G
[
"c"
..
c
:
GetCode
()]
and
_G
[
"c"
..
c
:
GetCode
()].
named_with_Arknight
))
end
end
function
c29065508
.
xyzop
(
e
,
tp
,
chk
)
function
c29065508
.
xyzop
(
e
,
tp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsCanRemoveCounter
(
tp
,
1
,
1
,
0x10ae
,
2
,
REASON_COST
)
and
Duel
.
GetFlagEffect
(
tp
,
29065508
)
==
0
end
if
chk
==
0
then
return
Duel
.
IsCanRemoveCounter
(
tp
,
1
,
0
,
0x10ae
,
2
,
REASON_COST
)
and
Duel
.
GetFlagEffect
(
tp
,
29065508
)
==
0
end
Duel
.
RemoveCounter
(
tp
,
1
,
1
,
0x10ae
,
2
,
REASON_RULE
)
Duel
.
RemoveCounter
(
tp
,
1
,
0
,
0x10ae
,
2
,
REASON_RULE
)
Duel
.
RegisterFlagEffect
(
tp
,
29065508
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_OATH
,
1
)
Duel
.
RegisterFlagEffect
(
tp
,
29065508
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_OATH
,
1
)
end
end
function
c29065508
.
discon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c29065508
.
discon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
expansions/script/c29065509.lua
View file @
ece6d07a
...
@@ -28,8 +28,8 @@ function c29065509.ovfilter(c)
...
@@ -28,8 +28,8 @@ function c29065509.ovfilter(c)
return
c
:
IsFaceup
()
and
(
c
:
IsSetCard
(
0x87af
)
or
(
_G
[
"c"
..
c
:
GetCode
()]
and
_G
[
"c"
..
c
:
GetCode
()].
named_with_Arknight
))
return
c
:
IsFaceup
()
and
(
c
:
IsSetCard
(
0x87af
)
or
(
_G
[
"c"
..
c
:
GetCode
()]
and
_G
[
"c"
..
c
:
GetCode
()].
named_with_Arknight
))
end
end
function
c29065509
.
xyzop
(
e
,
tp
,
chk
)
function
c29065509
.
xyzop
(
e
,
tp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsCanRemoveCounter
(
tp
,
1
,
1
,
0x10ae
,
2
,
REASON_COST
)
and
Duel
.
GetFlagEffect
(
tp
,
29065509
)
==
0
end
if
chk
==
0
then
return
Duel
.
IsCanRemoveCounter
(
tp
,
1
,
0
,
0x10ae
,
2
,
REASON_COST
)
and
Duel
.
GetFlagEffect
(
tp
,
29065509
)
==
0
end
Duel
.
RemoveCounter
(
tp
,
1
,
1
,
0x10ae
,
2
,
REASON_RULE
)
Duel
.
RemoveCounter
(
tp
,
1
,
0
,
0x10ae
,
2
,
REASON_RULE
)
Duel
.
RegisterFlagEffect
(
tp
,
29065509
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_OATH
,
1
)
Duel
.
RegisterFlagEffect
(
tp
,
29065509
,
RESET_PHASE
+
PHASE_END
,
EFFECT_FLAG_OATH
,
1
)
end
end
function
c29065509
.
discon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c29065509
.
discon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
expansions/script/c29065510.lua
View file @
ece6d07a
...
@@ -25,7 +25,6 @@ function c29065510.initial_effect(c)
...
@@ -25,7 +25,6 @@ function c29065510.initial_effect(c)
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e2
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EVENT_TO_GRAVE
)
e2
:
SetCode
(
EVENT_TO_GRAVE
)
e2
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
)
e2
:
SetRange
(
LOCATION_FZONE
)
e2
:
SetRange
(
LOCATION_FZONE
)
e2
:
SetOperation
(
c29065510
.
counter
)
e2
:
SetOperation
(
c29065510
.
counter
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
...
@@ -59,11 +58,11 @@ function c29065510.thop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -59,11 +58,11 @@ function c29065510.thop(e,tp,eg,ep,ev,re,r,rp)
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
end
end
end
end
function
c29065510
.
cfilter
(
c
)
function
c29065510
.
cfilter
(
c
,
tp
)
return
c
:
IsPrevious
Location
(
LOCATION_ONFIELD
)
and
(
c
:
IsSetCard
(
0x87af
)
or
(
_G
[
"c"
..
c
:
GetCode
()]
and
_G
[
"c"
..
c
:
GetCode
()].
named_with_Arknight
))
and
c
:
IsType
(
TYPE_MONSTER
)
return
c
:
IsPrevious
Controler
(
tp
)
and
c
:
IsPreviousPosition
(
POS_FACEUP
)
and
c
:
IsPreviousLocation
(
LOCATION_MZONE
)
and
(
c
:
IsPreviousSetCard
(
0x87af
)
or
(
_G
[
"c"
..
c
:
GetCode
()]
and
_G
[
"c"
..
c
:
GetCode
()].
named_with_Arknight
)
)
end
end
function
c29065510
.
counter
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c29065510
.
counter
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
ct
=
eg
:
FilterCount
(
c29065510
.
cfilter
,
nil
)
local
ct
=
eg
:
FilterCount
(
c29065510
.
cfilter
,
nil
,
tp
)
if
ct
>
0
then
if
ct
>
0
then
e
:
GetHandler
():
AddCounter
(
0x10ae
,
ct
)
e
:
GetHandler
():
AddCounter
(
0x10ae
,
ct
)
end
end
...
...
expansions/script/c33200911.lua
View file @
ece6d07a
...
@@ -17,7 +17,7 @@ function c33200911.initial_effect(c)
...
@@ -17,7 +17,7 @@ function c33200911.initial_effect(c)
e2
:
SetCategory
(
CATEGORY_TOHAND
)
e2
:
SetCategory
(
CATEGORY_TOHAND
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e2
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e2
:
SetRange
(
LOCATION_HAND
)
e2
:
SetRange
(
LOCATION_HAND
+
LOCATION_MZONE
)
e2
:
SetProperty
(
EFFECT_FLAG_DELAY
+
EFFECT_FLAG_DAMAGE_STEP
)
e2
:
SetProperty
(
EFFECT_FLAG_DELAY
+
EFFECT_FLAG_DAMAGE_STEP
)
e2
:
SetCountLimit
(
1
,
33210911
)
e2
:
SetCountLimit
(
1
,
33210911
)
e2
:
SetCondition
(
c33200911
.
thcon
)
e2
:
SetCondition
(
c33200911
.
thcon
)
...
...
expansions/script/c60002053.lua
View file @
ece6d07a
...
@@ -30,17 +30,22 @@ function cm.dscost(e,tp,eg,ep,ev,re,r,rp,chk)
...
@@ -30,17 +30,22 @@ function cm.dscost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
DiscardHand
(
tp
,
Card
.
IsDiscardable
,
1
,
1
,
REASON_COST
,
nil
)
Duel
.
DiscardHand
(
tp
,
Card
.
IsDiscardable
,
1
,
1
,
REASON_COST
,
nil
)
end
end
function
cm
.
dsop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
dsop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
--disable
local
g
=
Duel
.
GetMatchingGroup
(
aux
.
NegateMonsterFilter
,
tp
,
0
,
LOCATION_MZONE
,
nil
)
local
e2
=
Effect
.
CreateEffect
(
c
)
local
tc
=
g
:
GetFirst
()
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
while
tc
do
e2
:
SetCode
(
EFFECT_DISABLE
)
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e2
:
SetTargetRange
(
0
,
LOCATION_MZONE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e2
:
SetReset
(
RESET_PHASE
+
PHASE_END
,
2
)
e1
:
SetCode
(
EFFECT_DISABLE
)
e2
:
SetTarget
(
cm
.
distarget
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
2
)
Duel
.
RegisterEffect
(
e2
,
tp
)
tc
:
RegisterEffect
(
e1
)
end
local
e2
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
function
cm
.
distarget
(
e
,
c
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
return
c
~=
e
:
GetHandler
()
and
c
:
IsType
(
TYPE_MONSTER
)
e2
:
SetCode
(
EFFECT_DISABLE_EFFECT
)
e2
:
SetValue
(
RESET_TURN_SET
)
e2
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
2
)
tc
:
RegisterEffect
(
e2
)
tc
=
g
:
GetNext
()
end
end
end
function
cm
.
condition
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
condition
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
rc
=
re
:
GetHandler
()
local
rc
=
re
:
GetHandler
()
...
...
expansions/script/c67210103.lua
View file @
ece6d07a
--夏乡追忆 灯下烟火
--夏乡追忆 灯下烟火
function
c67210103
.
initial_effect
(
c
)
function
c67210103
.
initial_effect
(
c
)
aux
.
EnablePendulumAttribute
(
c
)
--setP
--setP
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
67210103
,
1
))
e2
:
SetDescription
(
aux
.
Stringid
(
67210103
,
1
))
...
...
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