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
f79b9f58
Commit
f79b9f58
authored
Jul 06, 2025
by
POLYMER
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
1d82a989
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
522 additions
and
2 deletions
+522
-2
expansions/script/c65809191.lua
expansions/script/c65809191.lua
+261
-1
expansions/script/c65809201.lua
expansions/script/c65809201.lua
+261
-1
No files found.
expansions/script/c65809191.lua
View file @
f79b9f58
--策略 人口贩卖
Duel
.
LoadScript
(
"STATS_CHANGED.lua"
)
--Global handlings
--代码引用:游戏王edopro/proc_unofficial.lua
UnofficialProc
=
{}
PROC_STATS_CHANGED
=
false
function
UnofficialProc
.
statsChanged
()
local
function
op5
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
--ATK = 285, prev ATK = 284
--LVL = 585, prev LVL = 584
--DEF = 385, prev DEF = 384
local
g
=
Duel
.
GetMatchingGroup
(
nil
,
tp
,
0xff
,
0xff
,
nil
)
for
tc
in
aux
.
Next
(
g
)
do
if
tc
:
GetFlagEffect
(
285
)
==
0
and
tc
:
GetFlagEffect
(
585
)
==
0
then
local
atk
=
tc
:
GetAttack
()
local
def
=
tc
:
GetDefense
()
if
atk
<
0
then
atk
=
0
end
if
def
<
0
then
def
=
0
end
tc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
atk
)
tc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
atk
)
tc
:
RegisterFlagEffect
(
385
,
0
,
0
,
1
,
def
)
tc
:
RegisterFlagEffect
(
384
,
0
,
0
,
1
,
def
)
local
lv
=
tc
:
GetLevel
()
tc
:
RegisterFlagEffect
(
585
,
0
,
0
,
1
,
lv
)
tc
:
RegisterFlagEffect
(
584
,
0
,
0
,
1
,
lv
)
end
end
end
local
function
atkcfilter
(
c
)
if
c
:
GetFlagEffect
(
285
)
==
0
then
return
false
end
return
c
:
GetAttack
()
~=
c
:
GetFlagEffectLabel
(
285
)
end
local
function
defcfilter
(
c
)
if
c
:
GetFlagEffect
(
385
)
==
0
then
return
false
end
return
c
:
GetDefense
()
~=
c
:
GetFlagEffectLabel
(
385
)
end
local
function
lvcfilter
(
c
)
if
c
:
GetFlagEffect
(
585
)
==
0
then
return
false
end
return
c
:
GetLevel
()
~=
c
:
GetFlagEffectLabel
(
585
)
end
local
function
atkraiseeff
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
GetMatchingGroup
(
atkcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
local
g1
=
Group
.
CreateGroup
()
--change atk
local
g2
=
Group
.
CreateGroup
()
--gain atk
local
g3
=
Group
.
CreateGroup
()
--lose atk
local
g4
=
Group
.
CreateGroup
()
--gain atk from original
local
g9
=
Group
.
CreateGroup
()
--lose atk from original
local
dg
=
Duel
.
GetMatchingGroup
(
defcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
local
g5
=
Group
.
CreateGroup
()
--change def
local
g6
=
Group
.
CreateGroup
()
--gain def
--local g7=Group.CreateGroup() --lose def
--local g8=Group.CreateGroup() --gain def from original
for
tc
in
aux
.
Next
(
g
)
do
local
prevatk
=
0
if
tc
:
GetFlagEffect
(
285
)
>
0
then
prevatk
=
tc
:
GetFlagEffectLabel
(
285
)
end
g1
:
AddCard
(
tc
)
if
prevatk
>
tc
:
GetAttack
()
then
g3
:
AddCard
(
tc
)
else
g2
:
AddCard
(
tc
)
if
prevatk
<=
tc
:
GetBaseAttack
()
and
tc
:
GetAttack
()
>
tc
:
GetBaseAttack
()
then
g4
:
AddCard
(
tc
)
end
if
prevatk
>=
tc
:
GetBaseAttack
()
and
tc
:
GetAttack
()
<
tc
:
GetBaseAttack
()
then
g9
:
AddCard
(
tc
)
end
end
tc
:
ResetFlagEffect
(
284
)
tc
:
ResetFlagEffect
(
285
)
if
prevatk
>
0
then
tc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
prevatk
)
else
tc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
0
)
end
if
tc
:
GetAttack
()
>
0
then
tc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
tc
:
GetAttack
())
else
tc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
0
)
end
end
for
dc
in
aux
.
Next
(
dg
)
do
local
prevdef
=
0
if
dc
:
GetFlagEffect
(
385
)
>
0
then
prevdef
=
dc
:
GetFlagEffectLabel
(
385
)
end
g5
:
AddCard
(
dc
)
if
prevdef
>
dc
:
GetDefense
()
then
--g7:AddCard(dc)
else
g6
:
AddCard
(
dc
)
if
prevdef
<=
dc
:
GetBaseDefense
()
and
dc
:
GetDefense
()
>
dc
:
GetBaseDefense
()
then
--g8:AddCard(dc)
end
end
dc
:
ResetFlagEffect
(
384
)
dc
:
ResetFlagEffect
(
385
)
if
prevdef
>
0
then
dc
:
RegisterFlagEffect
(
384
,
0
,
0
,
1
,
prevdef
)
else
dc
:
RegisterFlagEffect
(
384
,
0
,
0
,
1
,
0
)
end
if
dc
:
GetDefense
()
>
0
then
dc
:
RegisterFlagEffect
(
385
,
0
,
0
,
1
,
dc
:
GetDefense
())
else
dc
:
RegisterFlagEffect
(
385
,
0
,
0
,
1
,
0
)
end
end
if
#
g1
>
0
then
Duel
.
RaiseEvent
(
g1
,
511001265
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
Duel
.
RaiseEvent
(
g1
,
511001441
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g2
>
0
then
Duel
.
RaiseEvent
(
g2
,
511000377
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
Duel
.
RaiseEvent
(
g2
,
511001762
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g3
>
0
then
Duel
.
RaiseEvent
(
g3
,
511000883
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
Duel
.
RaiseEvent
(
g3
,
511009110
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g4
>
0
then
Duel
.
RaiseEvent
(
g4
,
511002546
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g5
>
0
then
Duel
.
RaiseEvent
(
g5
,
511009053
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
Duel
.
RaiseEvent
(
g5
,
511009565
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g9
>
0
then
Duel
.
RaiseEvent
(
g9
,
511010103
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
--Duel.RaiseEvent(g6,,re,REASON_EFFECT,rp,ep,0)
local
lvg
=
Duel
.
GetMatchingGroup
(
lvcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
if
#
lvg
>
0
then
for
lvc
in
lvaux
.
Next
(
g
)
do
local
prevlv
=
lvc
:
GetFlagEffectLabel
(
585
)
lvc
:
ResetFlagEffect
(
584
)
lvc
:
ResetFlagEffect
(
585
)
lvc
:
RegisterFlagEffect
(
584
,
0
,
0
,
1
,
prevlv
)
lvc
:
RegisterFlagEffect
(
585
,
0
,
0
,
1
,
lvc
:
GetLevel
())
end
Duel
.
RaiseEvent
(
lvg
,
511002524
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
Duel
.
RegisterFlagEffect
(
tp
,
285
,
RESET_CHAIN
,
0
,
1
)
Duel
.
RegisterFlagEffect
(
1
-
tp
,
285
,
RESET_CHAIN
,
0
,
1
)
end
local
function
atkraiseadj
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
GetFlagEffect
(
tp
,
285
)
~=
0
or
Duel
.
GetFlagEffect
(
1
-
tp
,
285
)
~=
0
then
return
end
local
g
=
Duel
.
GetMatchingGroup
(
atkcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
local
g1
=
Group
.
CreateGroup
()
--change atk
local
g2
=
Group
.
CreateGroup
()
--gain atk
local
g3
=
Group
.
CreateGroup
()
--lose atk
local
g4
=
Group
.
CreateGroup
()
--gain atk from original
local
g9
=
Group
.
CreateGroup
()
--lose atk from original
local
dg
=
Duel
.
GetMatchingGroup
(
defcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
local
g5
=
Group
.
CreateGroup
()
--change def
--local g6=Group.CreateGroup() --gain def
--local g7=Group.CreateGroup() --lose def
--local g8=Group.CreateGroup() --gain def from original
for
tc
in
aux
.
Next
(
g
)
do
local
prevatk
=
0
if
tc
:
GetFlagEffect
(
285
)
>
0
then
prevatk
=
tc
:
GetFlagEffectLabel
(
285
)
end
g1
:
AddCard
(
tc
)
if
prevatk
>
tc
:
GetAttack
()
then
g3
:
AddCard
(
tc
)
else
g2
:
AddCard
(
tc
)
if
prevatk
<=
tc
:
GetBaseAttack
()
and
tc
:
GetAttack
()
>
tc
:
GetBaseAttack
()
then
g4
:
AddCard
(
tc
)
end
if
prevatk
>=
tc
:
GetBaseAttack
()
and
tc
:
GetAttack
()
<
tc
:
GetBaseAttack
()
then
g9
:
AddCard
(
tc
)
end
end
tc
:
ResetFlagEffect
(
284
)
tc
:
ResetFlagEffect
(
285
)
if
prevatk
>
0
then
tc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
prevatk
)
else
tc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
0
)
end
if
tc
:
GetAttack
()
>
0
then
tc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
tc
:
GetAttack
())
else
tc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
0
)
end
end
for
dc
in
aux
.
Next
(
dg
)
do
local
prevdef
=
0
if
dc
:
GetFlagEffect
(
385
)
>
0
then
prevdef
=
dc
:
GetFlagEffectLabel
(
385
)
end
g5
:
AddCard
(
dc
)
if
prevdef
>
dc
:
GetDefense
()
then
--g7:AddCard(dc)
else
--g6:AddCard(dc)
if
prevdef
<=
dc
:
GetBaseDefense
()
and
dc
:
GetDefense
()
>
dc
:
GetBaseDefense
()
then
--g8:AddCard(dc)
end
end
dc
:
ResetFlagEffect
(
284
)
dc
:
ResetFlagEffect
(
285
)
if
prevdef
>
0
then
dc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
prevdef
)
else
dc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
0
)
end
if
dc
:
GetAttack
()
>
0
then
dc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
dc
:
GetAttack
())
else
dc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
0
)
end
end
if
#
g1
>
0
then
Duel
.
RaiseEvent
(
g1
,
511001265
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g2
>
0
then
Duel
.
RaiseEvent
(
g2
,
511001762
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g3
>
0
then
Duel
.
RaiseEvent
(
g3
,
511009110
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g4
>
0
then
Duel
.
RaiseEvent
(
g4
,
511002546
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g5
>
0
then
Duel
.
RaiseEvent
(
g5
,
511009053
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g9
>
0
then
Duel
.
RaiseEvent
(
g9
,
511010103
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
local
lvg
=
Duel
.
GetMatchingGroup
(
lvcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
if
#
lvg
>
0
then
for
lvc
in
lvaux
.
Next
(
g
)
do
local
prevlv
=
lvc
:
GetFlagEffectLabel
(
585
)
lvc
:
ResetFlagEffect
(
584
)
lvc
:
ResetFlagEffect
(
585
)
lvc
:
RegisterFlagEffect
(
584
,
0
,
0
,
1
,
prevlv
)
lvc
:
RegisterFlagEffect
(
585
,
0
,
0
,
1
,
lvc
:
GetLevel
())
end
Duel
.
RaiseEvent
(
lvg
,
511002524
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
end
local
e5
=
Effect
.
GlobalEffect
()
e5
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e5
:
SetCode
(
EVENT_ADJUST
)
e5
:
SetOperation
(
op5
)
Duel
.
RegisterEffect
(
e5
,
0
)
local
atkeff
=
Effect
.
GlobalEffect
()
atkeff
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
atkeff
:
SetCode
(
EVENT_CHAIN_SOLVED
)
atkeff
:
SetOperation
(
atkraiseeff
)
Duel
.
RegisterEffect
(
atkeff
,
0
)
local
atkadj
=
Effect
.
GlobalEffect
()
atkadj
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
atkadj
:
SetCode
(
EVENT_ADJUST
)
atkadj
:
SetOperation
(
atkraiseadj
)
Duel
.
RegisterEffect
(
atkadj
,
0
)
end
if
not
PROC_STATS_CHANGED
then
PROC_STATS_CHANGED
=
true
UnofficialProc
.
statsChanged
()
...
...
expansions/script/c65809201.lua
View file @
f79b9f58
--资源获取·奴隶
Duel
.
LoadScript
(
"STATS_CHANGED.lua"
)
--Global handlings
--代码引用:游戏王edopro/proc_unofficial.lua
UnofficialProc
=
{}
PROC_STATS_CHANGED
=
false
function
UnofficialProc
.
statsChanged
()
local
function
op5
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
--ATK = 285, prev ATK = 284
--LVL = 585, prev LVL = 584
--DEF = 385, prev DEF = 384
local
g
=
Duel
.
GetMatchingGroup
(
nil
,
tp
,
0xff
,
0xff
,
nil
)
for
tc
in
aux
.
Next
(
g
)
do
if
tc
:
GetFlagEffect
(
285
)
==
0
and
tc
:
GetFlagEffect
(
585
)
==
0
then
local
atk
=
tc
:
GetAttack
()
local
def
=
tc
:
GetDefense
()
if
atk
<
0
then
atk
=
0
end
if
def
<
0
then
def
=
0
end
tc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
atk
)
tc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
atk
)
tc
:
RegisterFlagEffect
(
385
,
0
,
0
,
1
,
def
)
tc
:
RegisterFlagEffect
(
384
,
0
,
0
,
1
,
def
)
local
lv
=
tc
:
GetLevel
()
tc
:
RegisterFlagEffect
(
585
,
0
,
0
,
1
,
lv
)
tc
:
RegisterFlagEffect
(
584
,
0
,
0
,
1
,
lv
)
end
end
end
local
function
atkcfilter
(
c
)
if
c
:
GetFlagEffect
(
285
)
==
0
then
return
false
end
return
c
:
GetAttack
()
~=
c
:
GetFlagEffectLabel
(
285
)
end
local
function
defcfilter
(
c
)
if
c
:
GetFlagEffect
(
385
)
==
0
then
return
false
end
return
c
:
GetDefense
()
~=
c
:
GetFlagEffectLabel
(
385
)
end
local
function
lvcfilter
(
c
)
if
c
:
GetFlagEffect
(
585
)
==
0
then
return
false
end
return
c
:
GetLevel
()
~=
c
:
GetFlagEffectLabel
(
585
)
end
local
function
atkraiseeff
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
GetMatchingGroup
(
atkcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
local
g1
=
Group
.
CreateGroup
()
--change atk
local
g2
=
Group
.
CreateGroup
()
--gain atk
local
g3
=
Group
.
CreateGroup
()
--lose atk
local
g4
=
Group
.
CreateGroup
()
--gain atk from original
local
g9
=
Group
.
CreateGroup
()
--lose atk from original
local
dg
=
Duel
.
GetMatchingGroup
(
defcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
local
g5
=
Group
.
CreateGroup
()
--change def
local
g6
=
Group
.
CreateGroup
()
--gain def
--local g7=Group.CreateGroup() --lose def
--local g8=Group.CreateGroup() --gain def from original
for
tc
in
aux
.
Next
(
g
)
do
local
prevatk
=
0
if
tc
:
GetFlagEffect
(
285
)
>
0
then
prevatk
=
tc
:
GetFlagEffectLabel
(
285
)
end
g1
:
AddCard
(
tc
)
if
prevatk
>
tc
:
GetAttack
()
then
g3
:
AddCard
(
tc
)
else
g2
:
AddCard
(
tc
)
if
prevatk
<=
tc
:
GetBaseAttack
()
and
tc
:
GetAttack
()
>
tc
:
GetBaseAttack
()
then
g4
:
AddCard
(
tc
)
end
if
prevatk
>=
tc
:
GetBaseAttack
()
and
tc
:
GetAttack
()
<
tc
:
GetBaseAttack
()
then
g9
:
AddCard
(
tc
)
end
end
tc
:
ResetFlagEffect
(
284
)
tc
:
ResetFlagEffect
(
285
)
if
prevatk
>
0
then
tc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
prevatk
)
else
tc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
0
)
end
if
tc
:
GetAttack
()
>
0
then
tc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
tc
:
GetAttack
())
else
tc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
0
)
end
end
for
dc
in
aux
.
Next
(
dg
)
do
local
prevdef
=
0
if
dc
:
GetFlagEffect
(
385
)
>
0
then
prevdef
=
dc
:
GetFlagEffectLabel
(
385
)
end
g5
:
AddCard
(
dc
)
if
prevdef
>
dc
:
GetDefense
()
then
--g7:AddCard(dc)
else
g6
:
AddCard
(
dc
)
if
prevdef
<=
dc
:
GetBaseDefense
()
and
dc
:
GetDefense
()
>
dc
:
GetBaseDefense
()
then
--g8:AddCard(dc)
end
end
dc
:
ResetFlagEffect
(
384
)
dc
:
ResetFlagEffect
(
385
)
if
prevdef
>
0
then
dc
:
RegisterFlagEffect
(
384
,
0
,
0
,
1
,
prevdef
)
else
dc
:
RegisterFlagEffect
(
384
,
0
,
0
,
1
,
0
)
end
if
dc
:
GetDefense
()
>
0
then
dc
:
RegisterFlagEffect
(
385
,
0
,
0
,
1
,
dc
:
GetDefense
())
else
dc
:
RegisterFlagEffect
(
385
,
0
,
0
,
1
,
0
)
end
end
if
#
g1
>
0
then
Duel
.
RaiseEvent
(
g1
,
511001265
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
Duel
.
RaiseEvent
(
g1
,
511001441
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g2
>
0
then
Duel
.
RaiseEvent
(
g2
,
511000377
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
Duel
.
RaiseEvent
(
g2
,
511001762
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g3
>
0
then
Duel
.
RaiseEvent
(
g3
,
511000883
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
Duel
.
RaiseEvent
(
g3
,
511009110
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g4
>
0
then
Duel
.
RaiseEvent
(
g4
,
511002546
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g5
>
0
then
Duel
.
RaiseEvent
(
g5
,
511009053
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
Duel
.
RaiseEvent
(
g5
,
511009565
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g9
>
0
then
Duel
.
RaiseEvent
(
g9
,
511010103
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
--Duel.RaiseEvent(g6,,re,REASON_EFFECT,rp,ep,0)
local
lvg
=
Duel
.
GetMatchingGroup
(
lvcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
if
#
lvg
>
0
then
for
lvc
in
lvaux
.
Next
(
g
)
do
local
prevlv
=
lvc
:
GetFlagEffectLabel
(
585
)
lvc
:
ResetFlagEffect
(
584
)
lvc
:
ResetFlagEffect
(
585
)
lvc
:
RegisterFlagEffect
(
584
,
0
,
0
,
1
,
prevlv
)
lvc
:
RegisterFlagEffect
(
585
,
0
,
0
,
1
,
lvc
:
GetLevel
())
end
Duel
.
RaiseEvent
(
lvg
,
511002524
,
re
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
Duel
.
RegisterFlagEffect
(
tp
,
285
,
RESET_CHAIN
,
0
,
1
)
Duel
.
RegisterFlagEffect
(
1
-
tp
,
285
,
RESET_CHAIN
,
0
,
1
)
end
local
function
atkraiseadj
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
GetFlagEffect
(
tp
,
285
)
~=
0
or
Duel
.
GetFlagEffect
(
1
-
tp
,
285
)
~=
0
then
return
end
local
g
=
Duel
.
GetMatchingGroup
(
atkcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
local
g1
=
Group
.
CreateGroup
()
--change atk
local
g2
=
Group
.
CreateGroup
()
--gain atk
local
g3
=
Group
.
CreateGroup
()
--lose atk
local
g4
=
Group
.
CreateGroup
()
--gain atk from original
local
g9
=
Group
.
CreateGroup
()
--lose atk from original
local
dg
=
Duel
.
GetMatchingGroup
(
defcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
local
g5
=
Group
.
CreateGroup
()
--change def
--local g6=Group.CreateGroup() --gain def
--local g7=Group.CreateGroup() --lose def
--local g8=Group.CreateGroup() --gain def from original
for
tc
in
aux
.
Next
(
g
)
do
local
prevatk
=
0
if
tc
:
GetFlagEffect
(
285
)
>
0
then
prevatk
=
tc
:
GetFlagEffectLabel
(
285
)
end
g1
:
AddCard
(
tc
)
if
prevatk
>
tc
:
GetAttack
()
then
g3
:
AddCard
(
tc
)
else
g2
:
AddCard
(
tc
)
if
prevatk
<=
tc
:
GetBaseAttack
()
and
tc
:
GetAttack
()
>
tc
:
GetBaseAttack
()
then
g4
:
AddCard
(
tc
)
end
if
prevatk
>=
tc
:
GetBaseAttack
()
and
tc
:
GetAttack
()
<
tc
:
GetBaseAttack
()
then
g9
:
AddCard
(
tc
)
end
end
tc
:
ResetFlagEffect
(
284
)
tc
:
ResetFlagEffect
(
285
)
if
prevatk
>
0
then
tc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
prevatk
)
else
tc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
0
)
end
if
tc
:
GetAttack
()
>
0
then
tc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
tc
:
GetAttack
())
else
tc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
0
)
end
end
for
dc
in
aux
.
Next
(
dg
)
do
local
prevdef
=
0
if
dc
:
GetFlagEffect
(
385
)
>
0
then
prevdef
=
dc
:
GetFlagEffectLabel
(
385
)
end
g5
:
AddCard
(
dc
)
if
prevdef
>
dc
:
GetDefense
()
then
--g7:AddCard(dc)
else
--g6:AddCard(dc)
if
prevdef
<=
dc
:
GetBaseDefense
()
and
dc
:
GetDefense
()
>
dc
:
GetBaseDefense
()
then
--g8:AddCard(dc)
end
end
dc
:
ResetFlagEffect
(
284
)
dc
:
ResetFlagEffect
(
285
)
if
prevdef
>
0
then
dc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
prevdef
)
else
dc
:
RegisterFlagEffect
(
284
,
0
,
0
,
1
,
0
)
end
if
dc
:
GetAttack
()
>
0
then
dc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
dc
:
GetAttack
())
else
dc
:
RegisterFlagEffect
(
285
,
0
,
0
,
1
,
0
)
end
end
if
#
g1
>
0
then
Duel
.
RaiseEvent
(
g1
,
511001265
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g2
>
0
then
Duel
.
RaiseEvent
(
g2
,
511001762
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g3
>
0
then
Duel
.
RaiseEvent
(
g3
,
511009110
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g4
>
0
then
Duel
.
RaiseEvent
(
g4
,
511002546
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g5
>
0
then
Duel
.
RaiseEvent
(
g5
,
511009053
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
if
#
g9
>
0
then
Duel
.
RaiseEvent
(
g9
,
511010103
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
local
lvg
=
Duel
.
GetMatchingGroup
(
lvcfilter
,
tp
,
0x7f
,
0x7f
,
nil
)
if
#
lvg
>
0
then
for
lvc
in
lvaux
.
Next
(
g
)
do
local
prevlv
=
lvc
:
GetFlagEffectLabel
(
585
)
lvc
:
ResetFlagEffect
(
584
)
lvc
:
ResetFlagEffect
(
585
)
lvc
:
RegisterFlagEffect
(
584
,
0
,
0
,
1
,
prevlv
)
lvc
:
RegisterFlagEffect
(
585
,
0
,
0
,
1
,
lvc
:
GetLevel
())
end
Duel
.
RaiseEvent
(
lvg
,
511002524
,
e
,
REASON_EFFECT
,
rp
,
ep
,
0
)
end
end
local
e5
=
Effect
.
GlobalEffect
()
e5
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e5
:
SetCode
(
EVENT_ADJUST
)
e5
:
SetOperation
(
op5
)
Duel
.
RegisterEffect
(
e5
,
0
)
local
atkeff
=
Effect
.
GlobalEffect
()
atkeff
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
atkeff
:
SetCode
(
EVENT_CHAIN_SOLVED
)
atkeff
:
SetOperation
(
atkraiseeff
)
Duel
.
RegisterEffect
(
atkeff
,
0
)
local
atkadj
=
Effect
.
GlobalEffect
()
atkadj
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
atkadj
:
SetCode
(
EVENT_ADJUST
)
atkadj
:
SetOperation
(
atkraiseadj
)
Duel
.
RegisterEffect
(
atkadj
,
0
)
end
if
not
PROC_STATS_CHANGED
then
PROC_STATS_CHANGED
=
true
UnofficialProc
.
statsChanged
()
...
...
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