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
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
八宫一月
ygopro-scripts
Commits
3e92908c
Commit
3e92908c
authored
Mar 31, 2018
by
mercury233
Committed by
GitHub
Mar 31, 2018
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
eacd96e1
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
16 additions
and
16 deletions
+16
-16
c24010609.lua
c24010609.lua
+16
-16
No files found.
c24010609.lua
View file @
3e92908c
...
@@ -31,17 +31,12 @@ function c24010609.initial_effect(c)
...
@@ -31,17 +31,12 @@ function c24010609.initial_effect(c)
e4
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e4
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e4
:
SetCode
(
EVENT_CHAINING
)
e4
:
SetCode
(
EVENT_CHAINING
)
e4
:
SetRange
(
LOCATION_SZONE
)
e4
:
SetRange
(
LOCATION_SZONE
)
e4
:
SetLabelObject
(
e3
)
e4
:
SetOperation
(
c24010609
.
regop
)
e4
:
SetOperation
(
c24010609
.
regop
)
c
:
RegisterEffect
(
e4
)
c
:
RegisterEffect
(
e4
)
local
e5
=
e4
:
Clone
()
local
e5
=
e4
:
Clone
()
e5
:
SetCode
(
EVENT_CHAIN_NEGATED
)
e5
:
SetCode
(
EVENT_CHAIN_NEGATED
)
e5
:
SetOperation
(
c24010609
.
regop2
)
e5
:
SetOperation
(
c24010609
.
regop2
)
c
:
RegisterEffect
(
e5
)
c
:
RegisterEffect
(
e5
)
local
e6
=
e4
:
Clone
()
e6
:
SetCode
(
EVENT_PHASE_START
+
PHASE_DRAW
)
e6
:
SetOperation
(
c24010609
.
clearop
)
c
:
RegisterEffect
(
e6
)
end
end
function
c24010609
.
tgtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
function
c24010609
.
tgtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
local
c
=
e
:
GetHandler
()
local
c
=
e
:
GetHandler
()
...
@@ -73,27 +68,31 @@ function c24010609.chainlm(e,rp,tp)
...
@@ -73,27 +68,31 @@ function c24010609.chainlm(e,rp,tp)
return
tp
==
rp
return
tp
==
rp
end
end
function
c24010609
.
regop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c24010609
.
regop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
re
:
GetHandler
():
IsSetCard
(
0x115
)
and
re
:
IsActiveType
(
TYPE_SPELL
)
and
rp
==
tp
and
re
:
IsHasType
(
EFFECT_TYPE_ACTIVATE
)
then
if
re
:
GetHandler
():
IsSetCard
(
0x115
)
and
re
:
IsActiveType
(
TYPE_SPELL
)
and
rp
==
tp
and
re
:
IsHasType
(
EFFECT_TYPE_ACTIVATE
)
then
local
val
=
e
:
GetLabelObject
():
GetLabel
()
local
flag
=
c
:
GetFlagEffectLabel
(
24010609
)
e
:
GetLabelObject
():
SetLabel
(
val
+
1
)
if
flag
then
c
:
SetFlagEffectLabel
(
24010609
,
flag
+
1
)
else
c
:
RegisterFlagEffect
(
24010609
,
RESET_EVENT
+
0x1fe0000
+
RESET_PHASE
+
PHASE_END
,
0
,
1
,
1
)
end
end
end
end
end
function
c24010609
.
regop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c24010609
.
regop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
re
:
GetHandler
():
IsSetCard
(
0x115
)
and
re
:
IsActiveType
(
TYPE_SPELL
)
and
rp
==
tp
and
re
:
IsHasType
(
EFFECT_TYPE_ACTIVATE
)
then
if
re
:
GetHandler
():
IsSetCard
(
0x115
)
and
re
:
IsActiveType
(
TYPE_SPELL
)
and
rp
==
tp
and
re
:
IsHasType
(
EFFECT_TYPE_ACTIVATE
)
then
local
val
=
e
:
GetLabelObject
():
GetLabel
()
local
flag
=
c
:
GetFlagEffectLabel
(
24010609
)
if
val
==
0
then
val
=
1
end
if
flag
and
flag
>
0
then
e
:
GetLabelObject
():
SetLabel
(
val
-
1
)
c
:
SetFlagEffectLabel
(
24010609
,
flag
-
1
)
end
end
end
end
end
function
c24010609
.
clearop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
e
:
GetLabelObject
():
SetLabel
(
0
)
end
function
c24010609
.
setfilter
(
c
)
function
c24010609
.
setfilter
(
c
)
return
c
:
IsSetCard
(
0x115
)
and
c
:
IsType
(
TYPE_SPELL
)
and
c
:
IsSSetable
()
return
c
:
IsSetCard
(
0x115
)
and
c
:
IsType
(
TYPE_SPELL
)
and
c
:
IsSSetable
()
end
end
function
c24010609
.
settg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c24010609
.
settg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
ct
=
e
:
Get
Label
(
)
local
ct
=
e
:
Get
Handler
():
GetFlagEffectLabel
(
24010609
)
if
chk
==
0
then
return
ct
>
0
and
Duel
.
IsExistingMatchingCard
(
c24010609
.
setfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
)
end
if
chk
==
0
then
return
ct
and
ct
>
0
and
Duel
.
IsExistingMatchingCard
(
c24010609
.
setfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_LEAVE_GRAVE
,
nil
,
1
,
tp
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_LEAVE_GRAVE
,
nil
,
1
,
tp
,
0
)
end
end
function
c24010609
.
setop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c24010609
.
setop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
@@ -103,7 +102,7 @@ function c24010609.setop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -103,7 +102,7 @@ function c24010609.setop(e,tp,eg,ep,ev,re,r,rp)
if
g
:
GetCount
()
==
0
then
return
end
if
g
:
GetCount
()
==
0
then
return
end
local
field
=
false
local
field
=
false
if
g
:
IsExists
(
Card
.
IsType
,
1
,
nil
,
TYPE_FIELD
)
then
field
=
true
end
if
g
:
IsExists
(
Card
.
IsType
,
1
,
nil
,
TYPE_FIELD
)
then
field
=
true
end
local
ct
=
e
:
Get
Label
()
local
ct
=
e
:
Get
Handler
():
GetFlagEffectLabel
(
24010609
)
or
0
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
if
ct
>
ft
then
ct
=
ft
end
if
ct
>
ft
then
ct
=
ft
end
if
ct
<=
0
and
not
field
then
return
end
if
ct
<=
0
and
not
field
then
return
end
...
@@ -114,6 +113,7 @@ function c24010609.setop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -114,6 +113,7 @@ function c24010609.setop(e,tp,eg,ep,ev,re,r,rp)
tg
:
Merge
(
sg
)
tg
:
Merge
(
sg
)
g
:
Remove
(
Card
.
IsCode
,
nil
,
sg
:
GetFirst
():
GetCode
())
g
:
Remove
(
Card
.
IsCode
,
nil
,
sg
:
GetFirst
():
GetCode
())
if
sg
:
GetFirst
():
IsType
(
TYPE_FIELD
)
then
if
sg
:
GetFirst
():
IsType
(
TYPE_FIELD
)
then
g
:
Remove
(
Card
.
IsType
,
nil
,
TYPE_FIELD
)
field
=
false
field
=
false
else
else
ct
=
ct
-
1
ct
=
ct
-
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