Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Y
ygopro-scripts
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
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
MyCard
ygopro-scripts
Commits
f369a242
Commit
f369a242
authored
Oct 23, 2015
by
VanillaSalt
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
11637bcd
Changes
10
Hide whitespace changes
Inline
Side-by-side
Showing
10 changed files
with
169 additions
and
157 deletions
+169
-157
c63251695.lua
c63251695.lua
+61
-47
c645794.lua
c645794.lua
+11
-10
c64973287.lua
c64973287.lua
+10
-17
c75195825.lua
c75195825.lua
+4
-3
c76004142.lua
c76004142.lua
+13
-9
c76218313.lua
c76218313.lua
+4
-5
c76930964.lua
c76930964.lua
+16
-13
c77116346.lua
c77116346.lua
+34
-26
c77152542.lua
c77152542.lua
+12
-23
c77826734.lua
c77826734.lua
+4
-4
No files found.
c63251695.lua
View file @
f369a242
--Dynamist Rex
--ダイナミスト・レックス
--NOT A Dinasaur, Lame
--Scripted by Ragna_Edge
function
c63251695
.
initial_effect
(
c
)
function
c63251695
.
initial_effect
(
c
)
--pendulum summon
--pendulum summon
aux
.
AddPendulumProcedure
(
c
)
aux
.
AddPendulumProcedure
(
c
)
...
@@ -9,97 +7,113 @@ function c63251695.initial_effect(c)
...
@@ -9,97 +7,113 @@ function c63251695.initial_effect(c)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
--
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
63251695
,
0
))
e2
:
SetCategory
(
CATEGORY_DISABLE
)
e2
:
SetCategory
(
CATEGORY_DISABLE
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e2
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
)
e2
:
SetCode
(
EVENT_CHAINING
)
e2
:
SetCode
(
EVENT_CHAINING
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetCondition
(
c63251695
.
negcon
)
e2
:
SetCondition
(
c63251695
.
negcon
)
e2
:
SetTarget
(
c63251695
.
negtg
)
e2
:
SetOperation
(
c63251695
.
negop
)
e2
:
SetOperation
(
c63251695
.
negop
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
--
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_TODECK
)
e3
:
SetDescription
(
aux
.
Stringid
(
63251695
,
0
))
e3
:
SetDescription
(
aux
.
Stringid
(
63251695
,
0
))
e3
:
SetCategory
(
CATEGORY_TODECK
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetCode
(
EVENT_DAMAGE_STEP_END
)
e3
:
SetCode
(
EVENT_DAMAGE_STEP_END
)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetCondition
(
c63251695
.
effcon
)
e3
:
SetCondition
(
c63251695
.
effcon
)
e3
:
SetCost
(
c63251695
.
effcost
)
e3
:
SetTarget
(
c63251695
.
efftg
)
e3
:
SetTarget
(
c63251695
.
efftg
)
e3
:
SetOperation
(
c63251695
.
effop
)
e3
:
SetOperation
(
c63251695
.
effop
)
c
:
RegisterEffect
(
e3
)
c
:
RegisterEffect
(
e3
)
end
end
function
c63251695
.
tfilter
(
c
)
function
c63251695
.
tfilter
(
c
,
tp
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x
1e71
)
and
c
:
IsControler
(
tp
)
and
c
:
GetLocation
()
==
LOCATION_ONFIELD
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x
d8
)
and
c
:
IsControler
(
tp
)
and
c
:
IsOnField
()
end
end
function
c63251695
.
negcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c63251695
.
negcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
re
:
IsHasProperty
(
EFFECT_FLAG_CARD_TARGET
)
then
return
end
if
not
re
:
IsHasProperty
(
EFFECT_FLAG_CARD_TARGET
)
then
return
end
if
not
e
:
GetHandler
():
GetFlagEffect
(
63251695
)
==
0
then
return
end
if
not
e
:
GetHandler
():
GetFlagEffect
(
63251695
)
==
0
then
return
end
local
g
=
Duel
.
GetChainInfo
(
ev
,
CHAININFO_TARGET_CARDS
)
local
g
=
Duel
.
GetChainInfo
(
ev
,
CHAININFO_TARGET_CARDS
)
return
g
and
g
:
IsExists
(
c63251695
.
tfilter
,
1
,
nil
)
and
g
:
GetFirst
()
~=
e
:
GetHandler
()
and
Duel
.
IsChainDisablable
(
ev
)
return
g
and
g
:
IsExists
(
c63251695
.
tfilter
,
1
,
e
:
GetHandler
(),
tp
)
and
Duel
.
IsChainDisablable
(
ev
)
end
function
c63251695
.
negtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DISABLE
,
eg
,
1
,
0
,
0
)
end
end
function
c63251695
.
negop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c63251695
.
negop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
63251695
,
3
))
then
if
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
63251695
,
1
))
then
e
:
GetHandler
():
RegisterFlagEffect
(
63251695
,
RESET_EVENT
+
0x1fe0000
+
RESET_PHASE
+
PHASE_END
,
0
,
1
)
e
:
GetHandler
():
RegisterFlagEffect
(
63251695
,
RESET_EVENT
+
0x1fe0000
,
0
,
1
)
Duel
.
NegateEffect
(
ev
)
Duel
.
NegateEffect
(
ev
)
Duel
.
BreakEffect
()
Duel
.
Destroy
(
e
:
GetHandler
(),
REASON_EFFECT
)
Duel
.
Destroy
(
e
:
GetHandler
(),
REASON_EFFECT
)
e
lse
e
nd
end
end
end
function
c63251695
.
effcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c63251695
.
effcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
()
==
Duel
.
GetAttacker
()
return
e
:
GetHandler
()
==
Duel
.
GetAttacker
()
and
((
Duel
.
IsExistingMatchingCard
(
Card
.
IsAbleToDeck
,
tp
,
0
,
LOCATION_HAND
+
LOCATION_ONFIELD
,
1
,
nil
))
or
(
Duel
.
GetFieldGroupCount
(
tp
,
0
,
LOCATION_MZONE
)
~=
0
and
e
:
GetHandler
():
IsChainAttackable
(
2
,
true
)))
end
end
function
c63251695
.
eff
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c63251695
.
eff
cost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
CheckReleaseGroup
(
tp
,
Card
.
IsSetCard
,
1
,
e
:
GetHandler
(),
0x
1e71
)
end
if
chk
==
0
then
return
Duel
.
CheckReleaseGroup
(
tp
,
Card
.
IsSetCard
,
1
,
e
:
GetHandler
(),
0x
d8
)
end
local
g
=
Duel
.
SelectReleaseGroup
(
tp
,
Card
.
IsSetCard
,
1
,
1
,
e
:
GetHandler
(),
0x
1e71
)
local
g
=
Duel
.
SelectReleaseGroup
(
tp
,
Card
.
IsSetCard
,
1
,
1
,
e
:
GetHandler
(),
0x
d8
)
Duel
.
Release
(
g
,
REASON_COST
)
Duel
.
Release
(
g
,
REASON_COST
)
end
function
c63251695
.
efftg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
b1
=
e
:
GetHandler
():
IsChainAttackable
(
2
,
true
)
local
b2
=
Duel
.
IsExistingMatchingCard
(
Card
.
IsAbleToDeck
,
tp
,
0
,
LOCATION_ONFIELD
+
LOCATION_HAND
,
1
,
nil
)
if
chk
==
0
then
return
b1
or
b2
end
local
opt
=
0
local
opt
=
0
if
Duel
.
GetFieldGroupCount
(
tp
,
0
,
LOCATION_MZONE
)
==
0
then
if
b1
and
b2
then
opt
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
63251695
,
1
))
opt
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
63251695
,
2
),
aux
.
Stringid
(
63251695
,
3
))
elseif
b1
then
opt
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
63251695
,
2
))
else
else
opt
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
63251695
,
0
),
aux
.
Stringid
(
63251695
,
1
))
opt
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
63251695
,
3
))
+
1
end
end
e
:
SetLabel
(
opt
)
e
:
SetLabel
(
opt
)
if
opt
==
0
then
if
opt
==
1
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TODECK
,
nil
,
1
,
0
,
LOCATION_ONFIELD
+
LOCATION_HAND
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TODECK
,
nil
,
1
,
1
-
tp
,
LOCATION_ONFIELD
+
LOCATION_HAND
)
end
end
end
end
function
c63251695
.
effop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c63251695
.
effop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
e
:
GetLabel
()
==
1
then
local
c
=
e
:
GetHandler
()
local
g1
=
Duel
.
GetMatchingGroup
(
Card
.
IsAbleToDeck
,
tp
,
0
,
LOCATION_HAND
+
LOCATION_ONFIELD
,
nil
)
if
e
:
GetLabel
()
==
0
then
local
sg1
=
g1
:
RandomSelect
(
tp
,
1
)
local
tc
=
sg1
:
GetFirst
()
local
c
=
e
:
GetHandler
()
Duel
.
SendtoDeck
(
tc
,
nil
,
2
,
REASON_EFFECT
)
if
c
:
IsRelateToEffect
(
e
)
and
c
:
IsFaceup
()
then
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetProperty
(
EFFECT_FLAG_COPY_INHERIT
)
e1
:
SetCode
(
EFFECT_UPDATE_ATTACK
)
e1
:
SetValue
(
100
)
e1
:
SetReset
(
RESET_EVENT
+
0x1ff0000
)
c
:
RegisterEffect
(
e1
)
end
else
local
c
=
e
:
GetHandler
()
if
not
c
:
IsRelateToBattle
()
then
return
end
if
not
c
:
IsRelateToBattle
()
then
return
end
Duel
.
ChainAttack
()
Duel
.
ChainAttack
()
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_CANNOT_DIRECT_ATTACK
)
e1
:
SetCode
(
EFFECT_CANNOT_DIRECT_ATTACK
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
)
e1
:
SetReset
(
RESET_EVENT
+
0x1fe0000
+
RESET_PHASE
+
PHASE_
BATTLE
)
e1
:
SetReset
(
RESET_EVENT
+
0x1fe0000
+
RESET_PHASE
+
PHASE_
DAMAGE_CAL
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
e2
:
SetCode
(
EFFECT_PIERCE
)
e2
:
SetCode
(
EFFECT_PIERCE
)
e2
:
SetReset
(
RESET_EVENT
+
0x1fe0000
)
e2
:
SetReset
(
RESET_EVENT
+
0x1fe0000
+
RESET_PHASE
+
PHASE_DAMAGE_CAL
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
else
local
g1
=
Duel
.
GetMatchingGroup
(
Card
.
IsAbleToDeck
,
tp
,
0
,
LOCATION_ONFIELD
,
nil
)
local
g2
=
Duel
.
GetMatchingGroup
(
Card
.
IsAbleToDeck
,
tp
,
0
,
LOCATION_HAND
,
nil
)
local
opt
=
0
if
g1
:
GetCount
()
>
0
and
g2
:
GetCount
()
>
0
then
opt
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
63251695
,
4
),
aux
.
Stringid
(
63251695
,
5
))
elseif
g1
:
GetCount
()
>
0
then
opt
=
0
else
opt
=
1
end
local
sg
=
nil
if
opt
==
0
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TODECK
)
sg
=
g1
:
Select
(
tp
,
1
,
1
,
nil
)
else
sg
=
g2
:
RandomSelect
(
tp
,
1
)
end
Duel
.
SendtoDeck
(
sg
,
nil
,
2
,
REASON_EFFECT
)
if
sg
:
GetFirst
():
IsLocation
(
LOCATION_DECK
)
and
c
:
IsRelateToEffect
(
e
)
and
c
:
IsFaceup
()
then
Duel
.
BreakEffect
()
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetProperty
(
EFFECT_FLAG_COPY_INHERIT
)
e1
:
SetCode
(
EFFECT_UPDATE_ATTACK
)
e1
:
SetValue
(
100
)
e1
:
SetReset
(
RESET_EVENT
+
0x1ff0000
)
c
:
RegisterEffect
(
e1
)
end
end
end
end
end
c645794.lua
View file @
f369a242
--
Majespecter Frog
--
マジェスペクター・フロッグ
function
c645794
.
initial_effect
(
c
)
function
c645794
.
initial_effect
(
c
)
--pendulum summon
--pendulum summon
aux
.
AddPendulumProcedure
(
c
)
aux
.
AddPendulumProcedure
(
c
)
...
@@ -11,10 +11,9 @@ function c645794.initial_effect(c)
...
@@ -11,10 +11,9 @@ function c645794.initial_effect(c)
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_TRIGGER_O
+
EFFECT_TYPE_SINGLE
)
e2
:
SetType
(
EFFECT_TYPE_TRIGGER_O
+
EFFECT_TYPE_SINGLE
)
e2
:
SetCode
(
EVENT_SUMMON_SUCCESS
)
e2
:
SetCode
(
EVENT_SUMMON_SUCCESS
)
--e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e2
:
SetCountLimit
(
1
,
645794
)
e2
:
SetCountLimit
(
1
,
645794
)
e2
:
SetTarget
(
c645794
.
th
tg
)
e2
:
SetTarget
(
c645794
.
set
tg
)
e2
:
SetOperation
(
c645794
.
th
op
)
e2
:
SetOperation
(
c645794
.
set
op
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
local
e3
=
e2
:
Clone
()
local
e3
=
e2
:
Clone
()
e3
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e3
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
...
@@ -36,15 +35,17 @@ function c645794.initial_effect(c)
...
@@ -36,15 +35,17 @@ function c645794.initial_effect(c)
e5
:
SetValue
(
c645794
.
indval
)
e5
:
SetValue
(
c645794
.
indval
)
c
:
RegisterEffect
(
e5
)
c
:
RegisterEffect
(
e5
)
end
end
function
c645794
.
th
filter
(
c
)
function
c645794
.
filter
(
c
)
return
c
:
IsSetCard
(
0xd0
)
and
(
not
c
:
IsType
(
TYPE_MONSTER
)
)
and
c
:
IsSSetable
()
return
c
:
IsSetCard
(
0xd0
)
and
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
)
and
c
:
IsSSetable
()
end
end
function
c645794
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c645794
.
settg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c645794
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c645794
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
end
end
function
c645794
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c645794
.
setop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
<=
0
then
return
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOFIELD
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOFIELD
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c645794
.
th
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c645794
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
local
tc
=
g
:
GetFirst
()
local
tc
=
g
:
GetFirst
()
if
tc
then
if
tc
then
Duel
.
SSet
(
tp
,
tc
)
Duel
.
SSet
(
tp
,
tc
)
...
...
c64973287.lua
View file @
f369a242
--
Dinomist Stegosaurus
--
ダイナミスト・プテラン
function
c64973287
.
initial_effect
(
c
)
function
c64973287
.
initial_effect
(
c
)
--pendulum summon
--pendulum summon
aux
.
AddPendulumProcedure
(
c
)
aux
.
AddPendulumProcedure
(
c
)
...
@@ -18,39 +18,32 @@ function c64973287.initial_effect(c)
...
@@ -18,39 +18,32 @@ function c64973287.initial_effect(c)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
--search
--search
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
64973287
,
0
))
e3
:
SetDescription
(
aux
.
Stringid
(
64973287
,
1
))
e3
:
SetCategory
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e3
:
SetCategory
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetCode
(
EVENT_BATTLE_DESTROYING
)
e3
:
SetCode
(
EVENT_BATTLE_DESTROYING
)
e3
:
SetCountLimit
(
1
,
64973287
)
e3
:
SetCountLimit
(
1
,
64973287
)
e3
:
SetCondition
(
c64973287
.
conditi
on
)
e3
:
SetCondition
(
aux
.
bdoc
on
)
e3
:
SetTarget
(
c64973287
.
target
)
e3
:
SetTarget
(
c64973287
.
target
)
e3
:
SetOperation
(
c64973287
.
operation
)
e3
:
SetOperation
(
c64973287
.
operation
)
c
:
RegisterEffect
(
e3
)
c
:
RegisterEffect
(
e3
)
end
end
function
c64973287
.
filter
(
c
,
tp
)
function
c64973287
.
repfilter
(
c
,
tp
)
return
c
:
IsFaceup
()
and
c
:
IsControler
(
tp
)
and
c
:
IsSetCard
(
0x1e71
)
and
(
c
:
IsReason
(
REASON_BATTLE
)
or
c
:
IsReason
(
REASON_EFFECT
))
return
c
:
IsFaceup
()
and
c
:
IsControler
(
tp
)
and
c
:
IsOnField
()
and
c
:
IsSetCard
(
0xd8
)
and
(
c
:
IsReason
(
REASON_BATTLE
)
or
(
c
:
IsReason
(
REASON_EFFECT
)
and
c
:
GetReasonPlayer
()
~=
tp
))
end
end
function
c64973287
.
reptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c64973287
.
reptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
eg
:
IsExists
(
c64973287
.
filter
,
1
,
e
:
GetHandler
(),
tp
)
and
not
e
:
GetHandler
():
IsStatus
(
STATUS_DESTROY_CONFIRMED
)
end
if
chk
==
0
then
return
eg
:
IsExists
(
c64973287
.
rep
filter
,
1
,
e
:
GetHandler
(),
tp
)
and
not
e
:
GetHandler
():
IsStatus
(
STATUS_DESTROY_CONFIRMED
)
end
return
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
37752990
,
0
))
return
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
64973287
,
0
))
end
end
function
c64973287
.
repval
(
e
,
c
)
function
c64973287
.
repval
(
e
,
c
)
return
c64973287
.
filter
(
c
,
e
:
GetHandlerPlayer
())
return
c64973287
.
rep
filter
(
c
,
e
:
GetHandlerPlayer
())
end
end
function
c64973287
.
repop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c64973287
.
repop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Destroy
(
e
:
GetHandler
(),
REASON_EFFECT
+
REASON_REPLACE
)
Duel
.
Destroy
(
e
:
GetHandler
(),
REASON_EFFECT
+
REASON_REPLACE
)
end
end
function
c64973287
.
condition
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
bc
=
c
:
GetBattleTarget
()
return
c
:
IsRelateToBattle
()
and
bc
:
IsType
(
TYPE_MONSTER
)
end
function
c64973287
.
filter
(
c
)
function
c64973287
.
filter
(
c
)
return
c
:
IsSetCard
(
0x
1e71
)
and
c
:
IsAbleToHand
()
return
c
:
IsSetCard
(
0x
d8
)
and
c
:
IsAbleToHand
()
end
end
function
c64973287
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c64973287
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c64973287
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c64973287
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
...
...
c75195825.lua
View file @
f369a242
--
Supreme Warrior Ritual
--
竜剣士マスターP
function
c75195825
.
initial_effect
(
c
)
function
c75195825
.
initial_effect
(
c
)
--pendulum summon
--pendulum summon
aux
.
AddPendulumProcedure
(
c
)
aux
.
AddPendulumProcedure
(
c
)
...
@@ -7,9 +7,10 @@ function c75195825.initial_effect(c)
...
@@ -7,9 +7,10 @@ function c75195825.initial_effect(c)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
--
change scale
--
destroy
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
88757791
,
0
))
e2
:
SetDescription
(
aux
.
Stringid
(
75195825
,
0
))
e2
:
SetCategory
(
CATEGORY_DESTROY
)
e2
:
SetType
(
EFFECT_TYPE_IGNITION
)
e2
:
SetType
(
EFFECT_TYPE_IGNITION
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
+
EFFECT_FLAG_CARD_TARGET
)
e2
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
+
EFFECT_FLAG_CARD_TARGET
)
...
...
c76004142.lua
View file @
f369a242
--
Unlucky Blast
--
不運の爆弾
function
c76004142
.
initial_effect
(
c
)
function
c76004142
.
initial_effect
(
c
)
--Activate
--Activate
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetCategory
(
CATEGORY_D
ESTROY
+
CATEGORY_D
AMAGE
)
e1
:
SetCategory
(
CATEGORY_DAMAGE
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e1
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetHintTiming
(
0
,
0x1e1
)
e1
:
SetHintTiming
(
0
,
0x1e1
)
e1
:
SetCountLimit
(
1
,
76004142
+
EFFECT_COUNT_CODE_OATH
)
e1
:
SetTarget
(
c76004142
.
target
)
e1
:
SetTarget
(
c76004142
.
target
)
e1
:
SetOperation
(
c76004142
.
activate
)
e1
:
SetOperation
(
c76004142
.
activate
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
...
@@ -21,22 +22,25 @@ function c76004142.initial_effect(c)
...
@@ -21,22 +22,25 @@ function c76004142.initial_effect(c)
e2
:
SetOperation
(
c76004142
.
damop
)
e2
:
SetOperation
(
c76004142
.
damop
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
end
end
function
c76004142
.
filter
(
c
,
tp
)
function
c76004142
.
filter
(
c
)
return
c
:
IsFaceup
()
and
c
:
GetAttack
()
>
0
return
c
:
IsFaceup
()
and
c
:
GetAttack
()
>
0
end
end
function
c76004142
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
function
c76004142
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_MZONE
)
and
c76004142
.
filter
(
chkc
)
end
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_MZONE
)
and
c
hkc
:
IsControler
(
1
-
tp
)
and
c
76004142
.
filter
(
chkc
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
c76004142
.
filter
,
tp
,
0
,
LOCATION_MZONE
,
1
,
nil
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
c76004142
.
filter
,
tp
,
0
,
LOCATION_MZONE
,
1
,
nil
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_
DESTROY
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_
FACEUP
)
local
g
=
Duel
.
SelectTarget
(
tp
,
c76004142
.
filter
,
tp
,
0
,
LOCATION_MZONE
,
1
,
1
,
nil
)
Duel
.
SelectTarget
(
tp
,
c76004142
.
filter
,
tp
,
0
,
LOCATION_MZONE
,
1
,
1
,
nil
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DAMAGE
,
nil
,
0
,
tp
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DAMAGE
,
nil
,
0
,
PLAYER_ALL
,
0
)
end
end
function
c76004142
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c76004142
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
Duel
.
GetFirstTarget
()
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
and
tc
:
IsFaceup
()
then
if
tc
:
IsRelateToEffect
(
e
)
and
tc
:
IsFaceup
()
then
local
atk
=
tc
:
GetAttack
()
/
2
local
atk
=
tc
:
GetAttack
()
/
2
local
dam
=
Duel
.
Damage
(
tp
,
atk
,
REASON_EFFECT
)
local
val
=
Duel
.
Damage
(
tp
,
atk
,
REASON_EFFECT
)
Duel
.
Damage
(
1
-
tp
,
dam
,
REASON_EFFECT
)
if
val
>
0
and
Duel
.
GetLP
(
tp
)
>
0
then
Duel
.
BreakEffect
()
Duel
.
Damage
(
1
-
tp
,
val
,
REASON_EFFECT
)
end
end
end
end
end
function
c76004142
.
damcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c76004142
.
damcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
c76218313.lua
View file @
f369a242
--
Destruction Sword - Dragon Buster Blade
--
破壊剣-ドラゴンバスターブレード
function
c76218313
.
initial_effect
(
c
)
function
c76218313
.
initial_effect
(
c
)
--equip
--equip
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
...
@@ -9,6 +9,7 @@ function c76218313.initial_effect(c)
...
@@ -9,6 +9,7 @@ function c76218313.initial_effect(c)
e1
:
SetTarget
(
c76218313
.
eqtg
)
e1
:
SetTarget
(
c76218313
.
eqtg
)
e1
:
SetOperation
(
c76218313
.
eqop
)
e1
:
SetOperation
(
c76218313
.
eqop
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
--
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_EQUIP
+
EFFECT_TYPE_FIELD
)
e2
:
SetType
(
EFFECT_TYPE_EQUIP
+
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EFFECT_CANNOT_SPECIAL_SUMMON
)
e2
:
SetCode
(
EFFECT_CANNOT_SPECIAL_SUMMON
)
...
@@ -28,7 +29,7 @@ function c76218313.initial_effect(c)
...
@@ -28,7 +29,7 @@ function c76218313.initial_effect(c)
c
:
RegisterEffect
(
e3
)
c
:
RegisterEffect
(
e3
)
end
end
function
c76218313
.
filter
(
c
)
function
c76218313
.
filter
(
c
)
return
c
:
IsFaceup
()
and
c
:
GetCode
()
==
78193831
return
c
:
IsFaceup
()
and
c
:
IsCode
(
78193831
)
end
end
function
c76218313
.
eqtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
function
c76218313
.
eqtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_MZONE
)
and
chkc
:
IsControler
(
tp
)
and
c76218313
.
filter
(
chkc
)
end
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_MZONE
)
and
chkc
:
IsControler
(
tp
)
and
c76218313
.
filter
(
chkc
)
end
...
@@ -42,7 +43,7 @@ function c76218313.eqop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -42,7 +43,7 @@ function c76218313.eqop(e,tp,eg,ep,ev,re,r,rp)
if
not
c
:
IsRelateToEffect
(
e
)
then
return
end
if
not
c
:
IsRelateToEffect
(
e
)
then
return
end
if
c
:
IsLocation
(
LOCATION_MZONE
)
and
c
:
IsFacedown
()
then
return
end
if
c
:
IsLocation
(
LOCATION_MZONE
)
and
c
:
IsFacedown
()
then
return
end
local
tc
=
Duel
.
GetFirstTarget
()
local
tc
=
Duel
.
GetFirstTarget
()
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
<=
0
or
tc
:
GetControler
()
~=
tp
or
tc
:
IsFacedown
()
or
not
tc
:
IsRelateToEffect
(
e
)
or
not
c
:
CheckUniqueOnField
(
tp
)
then
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
<=
0
or
tc
:
GetControler
()
~=
tp
or
tc
:
IsFacedown
()
or
not
tc
:
IsRelateToEffect
(
e
)
then
Duel
.
SendtoGrave
(
c
,
REASON_EFFECT
)
Duel
.
SendtoGrave
(
c
,
REASON_EFFECT
)
return
return
end
end
...
@@ -58,7 +59,6 @@ end
...
@@ -58,7 +59,6 @@ end
function
c76218313
.
eqlimit
(
e
,
c
)
function
c76218313
.
eqlimit
(
e
,
c
)
return
c
==
e
:
GetLabelObject
()
return
c
==
e
:
GetLabelObject
()
end
end
function
c76218313
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c76218313
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
...
@@ -70,7 +70,6 @@ function c76218313.spop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -70,7 +70,6 @@ function c76218313.spop(e,tp,eg,ep,ev,re,r,rp)
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
end
function
c76218313
.
splimit
(
e
,
c
)
function
c76218313
.
splimit
(
e
,
c
)
return
c
:
IsLocation
(
LOCATION_EXTRA
)
return
c
:
IsLocation
(
LOCATION_EXTRA
)
end
end
c76930964.lua
View file @
f369a242
--
Twilight Ninja Shogun - Getsuga
--
黄昏の忍者将軍-ゲツガ
function
c76930964
.
initial_effect
(
c
)
function
c76930964
.
initial_effect
(
c
)
--normal summon with 1 tribute
--normal summon with 1 tribute
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
55690251
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
76930964
,
0
))
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_SUMMON_PROC
)
e1
:
SetCode
(
EFFECT_SUMMON_PROC
)
...
@@ -13,6 +13,7 @@ function c76930964.initial_effect(c)
...
@@ -13,6 +13,7 @@ function c76930964.initial_effect(c)
local
e2
=
e1
:
Clone
()
local
e2
=
e1
:
Clone
()
e2
:
SetCode
(
EFFECT_SET_PROC
)
e2
:
SetCode
(
EFFECT_SET_PROC
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
--
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e3
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
...
@@ -37,33 +38,35 @@ function c76930964.otop(e,tp,eg,ep,ev,re,r,rp,c)
...
@@ -37,33 +38,35 @@ function c76930964.otop(e,tp,eg,ep,ev,re,r,rp,c)
local
mg
=
Duel
.
GetMatchingGroup
(
c76930964
.
otfilter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
tp
)
local
mg
=
Duel
.
GetMatchingGroup
(
c76930964
.
otfilter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
tp
)
local
sg
=
Duel
.
SelectTribute
(
tp
,
c
,
1
,
1
,
mg
)
local
sg
=
Duel
.
SelectTribute
(
tp
,
c
,
1
,
1
,
mg
)
c
:
SetMaterial
(
sg
)
c
:
SetMaterial
(
sg
)
Duel
.
Release
(
sg
,
REASON_SUMMON
+
REASON_MATERIAL
)
Duel
.
Release
(
sg
,
REASON_SUMMON
+
REASON_MATERIAL
)
end
end
function
c76930964
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c76930964
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsPosition
(
POS_FACEUP_ATTACK
)
return
e
:
GetHandler
():
IsPosition
(
POS_FACEUP_ATTACK
)
end
end
function
c76930964
.
filter
(
c
,
e
,
tp
)
function
c76930964
.
filter
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x2b
)
and
c
:
GetCode
()
~=
76930964
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
return
c
:
IsSetCard
(
0x2b
)
and
not
c
:
IsCode
(
76930964
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
end
function
c76930964
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
function
c76930964
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsControler
(
tp
)
and
chkc
:
IsLocation
(
LOCATION_GRAVE
)
and
c76930964
.
filter
(
chkc
,
e
,
tp
)
end
if
chkc
then
return
chkc
:
IsControler
(
tp
)
and
chkc
:
IsLocation
(
LOCATION_GRAVE
)
and
c76930964
.
filter
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
1
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
1
and
Duel
.
IsExistingTarget
(
c76930964
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
2
,
nil
,
e
,
tp
)
end
and
Duel
.
IsExistingTarget
(
c76930964
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
2
,
nil
,
e
,
tp
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectTarget
(
tp
,
c76930964
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
2
,
2
,
nil
,
e
,
tp
)
local
g
=
Duel
.
SelectTarget
(
tp
,
c76930964
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
2
,
2
,
nil
,
e
,
tp
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
g
,
g
:
GetCount
()
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
g
,
2
,
0
,
0
)
end
end
function
c76930964
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c76930964
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
c
=
e
:
GetHandler
()
if
not
c
:
IsRelateToEffect
(
e
)
or
c
:
IsDefencePos
()
then
return
end
Duel
.
ChangePosition
(
c
,
POS_FACEUP_DEFENCE
)
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
if
ft
<=
0
then
return
end
if
ft
<=
0
then
return
end
local
g
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_CARDS
)
local
g
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_CARDS
)
:
Filter
(
Card
.
IsRelateToEffect
,
nil
,
e
)
local
sg
=
g
:
Filter
(
Card
.
IsRelateToEffect
,
nil
,
e
)
if
g
:
GetCount
()
==
0
then
return
end
if
sg
:
GetCount
()
==
0
then
return
end
if
g
:
GetCount
()
>
ft
then
if
c
:
IsRelateToEffect
(
e
)
and
c
:
IsPosition
(
POS_FACEUP_ATTACK
)
and
ft
>=
sg
:
GetCount
()
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
Duel
.
ChangePosition
(
c
,
POS_FACEUP_DEFENCE
)
local
sg
=
g
:
Select
(
tp
,
ft
,
ft
,
nil
)
Duel
.
SpecialSummon
(
sg
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
Duel
.
SpecialSummon
(
sg
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
else
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
end
\ No newline at end of file
c77116346.lua
View file @
f369a242
--
Dinomist Charge
--
ダイナミスト・チャージ
function
c77116346
.
initial_effect
(
c
)
function
c77116346
.
initial_effect
(
c
)
--Activate
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetCategory
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e1
:
SetCategory
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetCountLimit
(
1
,
77116346
+
EFFECT_COUNT_CODE_OATH
)
e1
:
SetCountLimit
(
1
,
77116346
+
EFFECT_COUNT_CODE_OATH
)
e1
:
SetTarget
(
c77116346
.
target
)
e1
:
SetOperation
(
c77116346
.
activate
)
e1
:
SetOperation
(
c77116346
.
activate
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
--tohand
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
+
EFFECT_FLAG_DELAY
)
e2
:
SetType
(
EFFECT_TYPE_TRIGGER_F
+
EFFECT_TYPE_FIELD
)
e2
:
SetType
(
EFFECT_TYPE_TRIGGER_F
+
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EVENT_TO_DECK
)
e2
:
SetCode
(
EVENT_TO_DECK
)
e2
:
SetRange
(
LOCATION_SZONE
)
e2
:
SetRange
(
LOCATION_SZONE
)
e2
:
SetCountLimit
(
1
)
e2
:
SetCountLimit
(
1
)
e2
:
SetCondition
(
c77116346
.
conditi
on
)
e2
:
SetCondition
(
c77116346
.
thc
on
)
e2
:
SetTarget
(
c77116346
.
t
arget
)
e2
:
SetTarget
(
c77116346
.
t
htg
)
e2
:
SetOperation
(
c77116346
.
ac
op
)
e2
:
SetOperation
(
c77116346
.
th
op
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
end
end
function
c77116346
.
dfilter
(
c
)
function
c77116346
.
filter
(
c
)
return
c
:
IsSetCard
(
0x1e71
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAbleToHand
()
return
c
:
IsSetCard
(
0xd8
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAbleToHand
()
end
function
c77116346
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c77116346
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
end
function
c77116346
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c77116346
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
local
g
=
Duel
.
GetMatchingGroup
(
c77116346
.
dfilter
,
tp
,
LOCATION_DECK
,
0
,
nil
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c77116346
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
if
g
:
GetCount
()
>
0
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
local
sg
=
g
:
Select
(
tp
,
1
,
1
,
nil
)
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
Duel
.
SendtoHand
(
sg
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
sg
)
end
end
end
end
function
c77116346
.
thfilter
(
c
,
tp
)
function
c77116346
.
filter
(
c
,
e
,
tp
)
return
c
:
IsFaceup
()
and
c
:
IsControler
(
tp
)
and
c
:
IsLocation
(
LOCATION_EXTRA
)
and
c
:
IsSetCard
(
0xd8
)
return
c
:
IsSetCard
(
0x1e71
)
and
c
:
IsPreviousLocation
(
LOCATION_ONFIELD
)
and
c
:
IsLocation
(
LOCATION_EXTRA
)
and
c
:
IsFaceup
()
and
c
:
IsControler
(
tp
)
and
c
:
IsPreviousLocation
(
LOCATION_ONFIELD
)
end
end
function
c77116346
.
conditi
on
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c77116346
.
thc
on
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
eg
:
IsExists
(
c77116346
.
filter
,
1
,
nil
,
tp
)
return
eg
:
IsExists
(
c77116346
.
th
filter
,
1
,
nil
,
tp
)
end
end
function
c77116346
.
t
arget
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c77116346
.
t
htg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
SetTargetCard
(
eg
)
local
g
=
eg
:
Filter
(
c77116346
.
thfilter
,
nil
,
tp
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TODECK
,
eg
,
1
,
0
,
0
)
Duel
.
SetTargetCard
(
g
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
g
,
1
,
0
,
0
)
end
end
function
c77116346
.
ac
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c77116346
.
th
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
eg
:
Filter
(
c77116346
.
filter
,
nil
,
e
,
tp
)
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
if
g
:
GetCount
()
==
0
then
return
end
local
g
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_CARDS
):
Filter
(
Card
.
IsRelateToEffect
,
nil
,
e
)
Duel
.
Hint
(
HINT_SELECTMSG
,
1
-
tp
,
HINTMSG_TODECK
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
rg
=
g
:
Select
(
tp
,
1
,
1
,
nil
)
local
rg
=
g
:
Select
(
tp
,
1
,
1
,
nil
)
Duel
.
SendtoHand
(
rg
,
nil
,
REASON_EFFECT
)
if
rg
:
GetCount
()
>
0
then
Duel
.
ConfirmCards
(
1
-
tp
,
rg
)
Duel
.
SendtoHand
(
rg
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
rg
)
end
end
end
c77152542.lua
View file @
f369a242
--B
lackwing – Harmattan the Sandstorm
--B
F-砂塵のハルマッタン
function
c77152542
.
initial_effect
(
c
)
function
c77152542
.
initial_effect
(
c
)
--special summon
--special summon
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
...
@@ -9,50 +9,39 @@ function c77152542.initial_effect(c)
...
@@ -9,50 +9,39 @@ function c77152542.initial_effect(c)
e1
:
SetCountLimit
(
1
,
77152542
)
e1
:
SetCountLimit
(
1
,
77152542
)
e1
:
SetCondition
(
c77152542
.
spcon
)
e1
:
SetCondition
(
c77152542
.
spcon
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
--
special summon
--
level
local
e2
=
Effect
.
CreateEffect
(
c
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e2
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e2
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetCode
(
EVENT_SUMMON_SUCCESS
)
e2
:
SetCode
(
EVENT_SUMMON_SUCCESS
)
e2
:
SetTarget
(
c77152542
.
target
)
e2
:
SetTarget
(
c77152542
.
target
)
e2
:
SetOperation
(
c77152542
.
operation
)
e2
:
SetOperation
(
c77152542
.
operation
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
--normal summon
local
e3
=
e2
:
Clone
()
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e3
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e3
:
SetTarget
(
c77152542
.
target
)
e3
:
SetOperation
(
c77152542
.
operation
)
c
:
RegisterEffect
(
e3
)
c
:
RegisterEffect
(
e3
)
end
end
function
c77152542
.
filter
(
c
)
function
c77152542
.
c
filter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x33
)
and
not
c
:
IsCode
(
77152542
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x33
)
and
not
c
:
IsCode
(
77152542
)
end
end
function
c77152542
.
spcon
(
e
,
c
)
function
c77152542
.
spcon
(
e
,
c
)
if
c
==
nil
then
return
true
end
if
c
==
nil
then
return
true
end
return
Duel
.
GetLocationCount
(
c
:
GetControler
(),
LOCATION_MZONE
)
>
0
return
Duel
.
GetLocationCount
(
c
:
GetControler
(),
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c77152542
.
filter
,
c
:
GetControler
(),
LOCATION_MZONE
,
0
,
1
,
nil
)
and
Duel
.
IsExistingMatchingCard
(
c77152542
.
c
filter
,
c
:
GetControler
(),
LOCATION_MZONE
,
0
,
1
,
nil
)
end
end
function
c77152542
.
filter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x33
)
and
c
:
GetLevel
()
>=
1
function
c77152542
.
filter2
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x33
)
and
c
:
GetLevel
()
>=
1
end
end
function
c77152542
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
function
c77152542
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
local
c
=
e
:
GetHandler
()
if
chkc
then
return
chkc
:
IsControler
(
tp
)
and
chkc
:
IsLocation
(
LOCATION_MZONE
)
and
c77152542
.
filter
(
chkc
)
and
chkc
~=
e
:
GetHandler
()
end
if
chkc
then
return
chkc
:
GetControler
()
==
tp
and
c77152542
.
filter2
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
c77152542
.
filter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
e
:
GetHandler
())
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
c77152542
.
filter2
,
tp
,
LOCATION_MZONE
,
0
,
1
,
c
,
e
,
tp
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_FACEUP
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_CONFIRM
)
Duel
.
SelectTarget
(
tp
,
c77152542
.
filter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
1
,
e
:
GetHandler
())
local
g
=
Duel
.
SelectTarget
(
tp
,
c77152542
.
filter2
,
tp
,
LOCATION_MZONE
,
0
,
1
,
1
,
c
,
e
,
tp
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
g
,
g
:
GetCount
(),
0
,
0
)
end
end
function
c77152542
.
operation
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c77152542
.
operation
(
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
tc
:
IsRelateToEffect
(
e
)
and
c
:
IsRelateToEffect
(
e
)
then
if
tc
:
IsRelateToEffect
(
e
)
and
tc
:
IsFaceup
()
and
c
:
IsRelateToEffect
(
e
)
and
c
:
IsFaceup
(
)
then
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_UPDATE_LEVEL
)
e1
:
SetCode
(
EFFECT_UPDATE_LEVEL
)
...
...
c77826734.lua
View file @
f369a242
--
P° Reborn
--
ペンデュラム・リボーン
function
c77826734
.
initial_effect
(
c
)
function
c77826734
.
initial_effect
(
c
)
--Activate
--Activate
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
...
@@ -11,11 +11,11 @@ function c77826734.initial_effect(c)
...
@@ -11,11 +11,11 @@ function c77826734.initial_effect(c)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
end
end
function
c77826734
.
filter
(
c
,
e
,
tp
)
function
c77826734
.
filter
(
c
,
e
,
tp
)
return
(
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_EXTRA
)
or
c
:
IsLocation
(
LOCATION_GRAVE
))
and
c
:
IsType
(
TYPE_PENDULUM
)
return
c
:
IsType
(
TYPE_PENDULUM
)
and
(
c
:
IsLocation
(
LOCATION_GRAVE
)
or
c
:
IsFaceup
()
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
and
not
c
:
IsHasEffect
(
EFFECT_NECRO_VALLEY
)
end
end
function
c77826734
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
function
c77826734
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_GRAVE
+
LOCATION_EXTRA
)
and
c77826734
.
filter
(
chkc
,
e
,
tp
)
end
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_GRAVE
+
LOCATION_EXTRA
)
and
c
hkc
:
IsControler
(
tp
)
and
c
77826734
.
filter
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingTarget
(
c77826734
.
filter
,
tp
,
LOCATION_GRAVE
+
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
)
end
and
Duel
.
IsExistingTarget
(
c77826734
.
filter
,
tp
,
LOCATION_GRAVE
+
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
...
...
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