Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Y
ygopro-222DIY-cards
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
alstroemeria-silentlove
ygopro-222DIY-cards
Commits
0a7e3b55
Commit
0a7e3b55
authored
Aug 09, 2020
by
TanakaKotoha
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
d2659f87
Pipeline
#503
passed with stages
in 44 minutes and 22 seconds
Changes
13
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
Showing
13 changed files
with
1048 additions
and
927 deletions
+1048
-927
expansions/script/c10199990.lua
expansions/script/c10199990.lua
+924
-866
expansions/script/c10199991.lua
expansions/script/c10199991.lua
+40
-11
expansions/script/c10199992.lua
expansions/script/c10199992.lua
+28
-18
expansions/script/c10222044.lua
expansions/script/c10222044.lua
+2
-1
expansions/script/c33310103.lua
expansions/script/c33310103.lua
+7
-7
expansions/script/c33310104.lua
expansions/script/c33310104.lua
+9
-9
expansions/script/c33330102.lua
expansions/script/c33330102.lua
+8
-5
expansions/script/c33500615.lua
expansions/script/c33500615.lua
+4
-0
expansions/script/c65010508.lua
expansions/script/c65010508.lua
+3
-1
expansions/script/c65020166.lua
expansions/script/c65020166.lua
+1
-1
expansions/script/c65050229.lua
expansions/script/c65050229.lua
+3
-3
expansions/script/c65050250.lua
expansions/script/c65050250.lua
+1
-1
expansions/script/c65060057.lua
expansions/script/c65060057.lua
+18
-4
No files found.
expansions/script/c10199990.lua
View file @
0a7e3b55
This source diff could not be displayed because it is too large. You can
view the blob
instead.
expansions/script/c10199991.lua
View file @
0a7e3b55
...
...
@@ -21,6 +21,8 @@ rsreset={} --"Reset Function"
rshint
=
{}
--"Hint Function"
rsloc
=
{}
--"Location Function"
rsdv
=
"Divide_Variable"
--Info Variable
rsval
.
valinfo
=
{}
--"Value for inside series, inside type etc."
rscost
.
costinfo
=
{}
--"Cost information, for record cost value"
...
...
@@ -57,20 +59,22 @@ rsreset.ered = RESET_EVENT+RESETS_REDIRECT
--Code Variable
rscode
.
Extra_Effect_Activate
=
m
+
100
--"Attach Effect"
rscode
.
Extra_Effect_BSolve
=
m
+
200
rscode
.
Extra_Effect_ASolve
=
m
+
800
rscode
.
Extra_Effect_BSolve
=
m
+
101
rscode
.
Extra_Effect_ASolve
=
m
+
102
rscode
.
Phase_Leave_Flag
=
m
+
200
--"Summon Flag for SummonBuff"
rscode
.
Extra_Synchro_Material
=
m
+
300
--"Extra Synchro Material"
rscode
.
Extra_Xyz_Material
=
m
+
301
--"Extra Xyz Material"
rscode
.
Utility_Xyz_Material
=
m
+
400
--"Utility Xyz Material"
rscode
.
Previous_Set_Code
=
m
+
500
--"Previous Set Code"
rscode
.
Synchro_Material
=
m
+
600
--"Record synchro proceudre target"
rscode
.
Pre_Complete_Proc
=
m
+
700
--"Previous c:CompleteProcedure"
rscode
.
Phase_Leave_Flag
=
m
+
300
--"Summon Flag for SummonBuff"
rscode
.
Extra_Synchro_Material
=
m
+
400
--"Extra Synchro Material"
rscode
.
Extra_Xyz_Material
=
m
+
401
--"Extra Xyz Material"
rscode
.
Utility_Xyz_Material
=
m
+
500
--"Utility Xyz Material"
rscode
.
Previous_Set_Code
=
m
+
600
--"Previous Set Code"
rscode
.
Synchro_Material
=
m
+
700
--"Record synchro proceudre target"
rscode
.
Pre_Complete_Proc
=
m
+
900
--"Previous c:CompleteProcedure"
rscode
.
Set
=
m
+
800
--"EVENT_SET"
--Hint Message Variable
rshint
.
act
=
aux
.
Stringid
(
m
,
0
)
--"activate spell/trap"
rshint
.
dis
=
aux
.
Stringid
(
m
,
1
)
--"cards will be disable effects "
rshint
.
dis
=
aux
.
Stringid
(
38265153
,
3
)
--"cards will be disable effects "
rshint
.
ad
=
aux
.
Stringid
(
m
,
2
)
--"cards will be change Atk/Def"
rshint
.
rtg
=
aux
.
Stringid
(
48976825
,
0
)
--"return to grave"
rshint
.
spproc
=
aux
.
Stringid
(
m
,
4
)
--"SS by self produce"
...
...
@@ -86,6 +90,22 @@ rshint.darksynchro=aux.Stringid(m,15) --"treat as dark synchro"
rshint
.
choose
=
aux
.
Stringid
(
23912837
,
1
)
--"choose 1 effect"
rshint
.
epleave
=
aux
.
Stringid
(
m
,
3
)
--"end phase leave field"
rshint
.
finshcopy
=
aux
.
Stringid
(
43387895
,
1
)
--"reset copy effect"
rshint
.
act2
=
aux
.
Stringid
(
m
,
1
)
--"select card to activate"
rshint
.
tgct
=
aux
.
Stringid
(
83531441
,
2
)
--"select send to the GY number"
rshint
.
drct
=
aux
.
Stringid
(
m
,
5
)
--"select draw number"
--[[
rshint.isss=aux.Stringid(17535764,1) --"would you SS a monster?"
rshint.istg=aux.Stringid(62834295,2) --"would you send to GY?"
rshint.isdes=aux.Stringid(20590515,2) --"would you destroy?"
rshint.istd=aux.Stringid(m,1) --"would you send to Deck?"
rshint.isrm=aux.Stringid(93191801,2) --"would you reomve?"
rshint.isset=aux.Stringid(m,5) --"would you set?"
rshint.istf=aux.Stringid(m,6) --"would you place to field?"
rshint.isth=aux.Stringid(26118970,1) --"would you send to hand?"
rshint.isrh=aux.Stringid(31102447,2) --"would you return to hand"
rshint.isdr=aux.Stringid(3679218,1) --"would you draw?"
--]]
--Property Variable
rsflag
.
flaglist
=
{
EFFECT_FLAG_CARD_TARGET
,
EFFECT_FLAG_PLAYER_TARGET
,
EFFECT_FLAG_DELAY
,
EFFECT_FLAG_DAMAGE_STEP
,
EFFECT_FLAG_DAMAGE_CAL
,
...
...
@@ -125,6 +145,7 @@ rscf.exlist_rp = { TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_LINK,TYPE_PENDULUM,
--Location Variable
rsloc
.
hd
=
LOCATION_HAND
+
LOCATION_DECK
rsloc
.
ho
=
LOCATION_HAND
+
LOCATION_ONFIELD
rsloc
.
hg
=
LOCATION_HAND
+
LOCATION_GRAVE
rsloc
.
dg
=
LOCATION_DECK
+
LOCATION_GRAVE
rsloc
.
gr
=
LOCATION_GRAVE
+
LOCATION_REMOVED
...
...
@@ -139,6 +160,7 @@ rsloc.all=0xff
--Escape Old Functions
function
rsof
.
Escape_Old_Functions
()
--//
rsof
.
DefineCard
=
rscf
.
DefineCard
rscf
.
FilterFaceUp
=
rscf
.
fufilter
rsof
.
SendtoHand
=
rsop
.
SendtoHand
...
...
@@ -151,7 +173,10 @@ function rsof.Escape_Old_Functions()
rsof
.
SelectOption_Page
=
rsop
.
SelectOption_Page
rsof
.
SelectNumber
=
rsop
.
AnnounceNumber
rsof
.
SelectNumber_List
=
rsop
.
AnnounceNumber_List
rsof
.
IsSet
=
rscf
.
DefineSet
rsof
.
IsSet
=
rscf
.
DefineSet
rscf
.
GetRelationThisCard
=
rscf
.
GetFaceUpSelf
rsop
.
eqop
=
rsop
.
Equip
--//
--some card use old SummonBuff's phase leave field parterment, must fix them in their luas
rssf
.
SummonBuff
=
function
(
attlist
,
isdis
,
isdistig
,
selfleave
,
phaseleave
)
local
bufflist
=
{}
...
...
@@ -180,6 +205,10 @@ function rsof.Escape_Old_Functions()
end
return
bufflist
end
--//
rscf
.
SetSpecialSummonProduce
=
function
(
reg_list
,
range
,
con
,
op
,
desc_list
,
lim_list
,
reset_list
)
return
rscf
.
AddSpecialSummonProcdure
(
reg_list
,
range
,
con
,
nil
,
op
,
desc_list
,
lim_list
,
nil
,
reset_list
)
end
end
expansions/script/c10199992.lua
View file @
0a7e3b55
--Record Author
local
am
=
10199992
local
Version_Number
=
20200323
--
Scl
#
Scl
local
rsdka
=
Dakyria
local
rsdio
=
Diablo
local
rsnr
=
Night_Raven
...
...
@@ -10,12 +10,13 @@ local rsem = Eridiument
local
rsxb
=
XB
local
rsos
=
Oracle_Smith
local
rssp
=
Stellar_Pearl
--
local rsgd = Ghostdom_Dragon
//
local
rsgd
=
Ghostdom_Dragon
local
rsed
=
Epic_Dragon
local
rsdh
=
Devil_Hunter
local
rsds
=
Dark_Souls
local
rsca
=
Corona
--
Scl - Special Mode
#
Scl
-
Special
Mode
local
rssm
=
Special_Mode
local
rssmb
=
Special_Mode_Change_Base_Function
local
rssmt
=
Special_Mode_Turbo_Duel
...
...
@@ -26,18 +27,18 @@ local rssmf = Special_Mode_Fast_Duel
local
rssmm
=
Special_Mode_Multiple_Duel
local
rssmu
=
Special_Mode_Universal_Duel
--
Gale 1472676207
#
Gale
1472676207
local
rsve
=
Voison
local
rsneov
=
Neons
local
tfrsv
=
T
.
Fairies
local
rsss
=
Star_Spirit
--
ChiJiang 626386490
#
ChiJiang
626386490
local
rsnm
=
Nightmare
local
rslf
=
Little_Fox
local
rccv
=
Thermonuclear
--
XiaoMi 643865567
#
XiaoMi
643865567
local
rssg
=
Sex_Gun
local
rsps
=
Pseudo_Soul
local
rsdcc
=
Dragon_Chess_Corps
...
...
@@ -50,50 +51,59 @@ local rsik = Infernal_Knight
local
rsvw
=
Virus_Wrom
local
rsia
=
Indolent_Angel
local
rsso
=
Simulated_Organism
local
rstr
=
True_Ritual
--
NianBao 583322404
#
NianBao
583322404
local
rslap
=
Lapin
local
rskh
=
Karehana
--
XiaoDaoHeng 1614895649
#
XiaoDaoHeng
1614895649
local
rslrd
=
Life_DeathRound_Dance
--
Huang 1184387005
#
Huang
1184387005
local
rsts
=
Trinity_Sword
--
Luoxing 1151483512
#
Luoxing
1151483512
local
rsdt
=
Dark_Tale
local
rsod
=
Order
--
YunZeZhun 1587361112
#
YunZeZhun
1587361112
local
rsphh
=
Phantom_Thieves_Of_Hearts
local
rsgc
=
Guard_City
--
ZhenDong
#
ZhenDong
local
rsfv
=
Fgo
/
Assassin
--
JingJing 1772438857
#
JingJing
1772438857
local
rsba
=
BlueAngel
--
Akashic 3204027606
#
Akashic
3204027606
local
rszg
=
Zogu
local
rsgs
=
Gran_Sphere
local
rsoc
=
Oligocene_Civilization
local
rsgol
=
Giant_of_Light
local
rssb
=
Space_Beasts
--
HeiBai 1172777968
#
HeiBai
1172777968
local
rstm
=
Toaru_Majutsu_no_Index
--
2558566212
#
2558566212
local
rsgod
=
God
#
02
1164477469
local
rsva
=
VR_Aqua
//
local
=
Tian_Zhi
#
ReiKai
2404873791
local
rsch
=
Churck
--Set Code
--
Scl
#
Scl
--local = 0x1330
local
Alchement_Bio
=
0x3330
local
Chaos_Alchemy
=
0x5330
local
Azure
_
Wing_Mercenary
=
0x6330
local
Azure
-
Wing_Mercenary
=
0x6330
local
Oracleoath
=
0x9330
local
Zrouf_Mantra
=
0xa330
local
Autumntale
=
0xc330
...
...
expansions/script/c10222044.lua
View file @
0a7e3b55
...
...
@@ -68,7 +68,8 @@ function cm.pop(e,tp,eg,ep,ev,re,r,rp)
end
function
cm
.
refilter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsType
(
TYPE_CONTINUOUS
+
TYPE_TRAP
)
and
c
:
IsAbleToRemove
()
return
c
:
IsFaceup
()
and
c
:
IsAbleToRemove
()
and
c
:
IsType
(
TYPE_CONTINUOUS
)
and
c
:
IsType
(
TYPE_TRAP
)
end
function
cm
.
retg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
cm
.
refilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
nil
)
end
...
...
expansions/script/c33310103.lua
View file @
0a7e3b55
--可可莉柯特·兽耳布偶
if
not
pcall
(
function
()
require
(
"expansions/script/c10199990"
)
end
)
then
require
(
"script/c10199990"
)
end
local
m
,
cm
=
rs
o
f
.
DefineCard
(
33310103
,
"Cochrot"
)
local
m
,
cm
=
rs
c
f
.
DefineCard
(
33310103
,
"Cochrot"
)
function
cm
.
initial_effect
(
c
)
c
:
EnableReviveLimit
()
local
e1
=
rsef
.
I
(
c
,{
m
,
0
},{
1
,
m
},
"se,th,sp,dish,ga"
,
nil
,
LOCATION_HAND
,
nil
,
nil
,
rsop
.
target
({
aux
.
FilterBoolFunction
(
Card
.
IsDiscardable
,
REASON_EFFECT
),
"dish"
,
LOCATION_HAND
},{
cm
.
thfilter
,
"th"
,
LOCATION_DECK
}),
cm
.
thop
)
local
e1
=
rsef
.
I
(
c
,{
m
,
0
},{
1
,
m
},
"se,th,sp,dish,ga"
,
nil
,
LOCATION_HAND
,
nil
,
nil
,
rsop
.
target
({
1
,
"dish"
},{
cm
.
thfilter
,
"th"
,
LOCATION_DECK
}),
cm
.
thop
)
local
e2
=
rsef
.
FC
(
c
,
EVENT_SPSUMMON_SUCCESS
)
e2
:
SetOperation
(
cm
.
limitop
)
local
e3
=
rsef
.
RegisterClone
(
c
,
e2
,
"code"
,
EVENT_SUMMON_SUCCESS
)
...
...
@@ -16,17 +16,17 @@ end
function
cm
.
thfilter
(
c
)
return
c
:
IsCode
(
33310102
)
and
c
:
IsAbleToHand
()
end
function
cm
.
thop
(
e
,
tp
)
function
cm
.
thop
(
e
,
tp
)
local
ct
=
Duel
.
DiscardHand
(
tp
,
Card
.
IsDiscardable
,
1
,
1
,
REASON_EFFECT
,
nil
,
REASON_EFFECT
)
if
ct
==
0
then
return
end
rs
of
.
SelectHin
t
(
tp
,
"th"
)
rs
hint
.
Selec
t
(
tp
,
"th"
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
cm
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
#
g
<=
0
or
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
<=
0
then
return
end
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
local
sg
=
Duel
.
GetMatchingGroup
(
aux
.
NecroValleyFilter
(
cm
.
spfilter
),
tp
,
0
,
LOCATION_GRAVE
,
nil
,
e
,
tp
)
if
#
sg
>
0
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
m
,
2
))
then
Duel
.
BreakEffect
()
rs
of
.
SelectHin
t
(
tp
,
"sp"
)
rs
hint
.
Selec
t
(
tp
,
"sp"
)
local
sc
=
sg
:
Select
(
tp
,
1
,
1
,
nil
):
GetFirst
()
if
Duel
.
SpecialSummon
(
sc
,
0
,
tp
,
1
-
tp
,
false
,
false
,
POS_FACEUP
)
>
0
then
local
e1
,
e2
=
rsef
.
SV_LIMIT
({
e
:
GetHandler
(),
sc
,
true
},
"dis,dise"
,
nil
,
nil
,
rsreset
.
est
)
...
...
@@ -71,7 +71,7 @@ function cm.thfilter2(c)
return
c
:
IsAbleToHand
()
and
c
:
GetType
()
&
0x82
==
0x82
end
function
cm
.
thop2
(
e
,
tp
)
rs
of
.
SelectHin
t
(
tp
,
"th"
)
rs
hint
.
Selec
t
(
tp
,
"th"
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
NecroValleyFilter
(
cm
.
thfilter2
),
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
)
rso
f
.
SendtoHand
(
g
)
rso
p
.
SendtoHand
(
g
)
end
\ No newline at end of file
expansions/script/c33310104.lua
View file @
0a7e3b55
--可
可 莉 柯 特 · 地 狱 尖 啸
者
--可
可莉柯特·地狱尖啸
者
if
not
pcall
(
function
()
require
(
"expansions/script/c10199990"
)
end
)
then
require
(
"script/c10199990"
)
end
local
m
,
cm
=
rs
o
f
.
DefineCard
(
33310104
,
"Cochrot"
)
local
m
,
cm
=
rs
c
f
.
DefineCard
(
33310104
,
"Cochrot"
)
function
cm
.
initial_effect
(
c
)
c
:
EnableReviveLimit
()
local
e1
=
rsef
.
QO
(
c
,
nil
,{
m
,
0
},{
1
,
m
},
"se,th,rm,dish,ga"
,
nil
,
LOCATION_HAND
,
nil
,
nil
,
rsop
.
target
({
aux
.
FilterBoolFunction
(
Card
.
IsDiscardable
,
REASON_EFFECT
),
"dish"
,
LOCATION_HAND
},{
cm
.
thfilter
,
"th"
,
LOCATION_DECK
+
LOCATION_GRAVE
}),
cm
.
thop
)
local
e1
=
rsef
.
QO
(
c
,
nil
,{
m
,
0
},{
1
,
m
},
"se,th,rm,dish,ga"
,
nil
,
LOCATION_HAND
,
nil
,
nil
,
rsop
.
target
({
1
,
"dish"
},{
cm
.
thfilter
,
"th"
,
LOCATION_DECK
}),
cm
.
thop
)
--act limit
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
...
...
@@ -22,16 +22,16 @@ end
function
cm
.
thop
(
e
,
tp
)
local
ct
=
Duel
.
DiscardHand
(
tp
,
Card
.
IsDiscardable
,
1
,
1
,
REASON_EFFECT
,
nil
,
REASON_EFFECT
)
if
ct
==
0
then
return
end
rs
of
.
SelectHin
t
(
tp
,
"th"
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
cm
.
thfilter
,
tp
,
LOCATION_DECK
+
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
)
rs
hint
.
Selec
t
(
tp
,
"th"
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
cm
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
#
g
<=
0
or
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
<=
0
then
return
end
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
local
rg
=
Duel
.
GetMatchingGroup
(
aux
.
NecroValleyFilter
(
Card
.
IsAbleToRemove
),
tp
,
LOCATION_GRAVE
,
0
,
nil
)
if
#
rg
>
0
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
m
,
2
))
then
Duel
.
BreakEffect
()
rs
of
.
SelectHin
t
(
tp
,
"rm"
)
rs
hint
.
Selec
t
(
tp
,
"rm"
)
rg
=
rg
:
Select
(
tp
,
1
,
1
,
nil
)
rso
f
.
Remove
(
rg
)
rso
p
.
Remove
(
rg
)
end
end
function
cm
.
con
(
e
)
...
...
@@ -42,7 +42,7 @@ function cm.aclimit(e,re,tp)
return
not
re
:
GetOwnerPlayer
()
~=
e
:
GetOwnerPlayer
()
end
function
cm
.
tdop
(
e
,
tp
)
rs
of
.
SelectHin
t
(
tp
,
"td"
)
rs
hint
.
Selec
t
(
tp
,
"td"
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
NecroValleyFilter
(
Card
.
IsAbleToDeck
),
tp
,
LOCATION_GRAVE
+
LOCATION_REMOVED
,
0
,
1
,
1
,
nil
)
rso
f
.
SendtoDeck
(
g
)
rso
p
.
SendtoDeck
(
g
)
end
\ No newline at end of file
expansions/script/c33330102.lua
View file @
0a7e3b55
...
...
@@ -42,8 +42,8 @@ end
function
cm
.
matfilter
(
c
)
return
c
:
IsLinkType
(
TYPE_EFFECT
)
and
not
c
:
IsLinkRace
(
RACE_MACHINE
)
end
function
cm
.
thfilter
(
c
,
e
)
local
se
=
e
:
GetHandler
():
GetSequence
()
function
cm
.
thfilter
(
c
,
e
,
tp
)
local
se
=
e
:
GetHandler
():
GetSequence
()
if
se
==
5
then
se
=
1
elseif
se
==
6
then
...
...
@@ -55,16 +55,19 @@ function cm.thfilter(c,e)
elseif
seq
==
6
then
seq
=
3
end
if
c
:
IsControler
(
1
-
tp
)
then
seq
=
math.abs
(
seq
-
4
)
end
return
math.abs
(
se
-
seq
)
==
1
--g:IsContains(c)
end
function
cm
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
cm
.
thfilter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
1
,
nil
,
e
)
end
local
g
=
Duel
.
GetMatchingGroup
(
cm
.
thfilter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
nil
,
e
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
cm
.
thfilter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
1
,
nil
,
e
,
tp
)
end
local
g
=
Duel
.
GetMatchingGroup
(
cm
.
thfilter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
nil
,
e
,
tp
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOGRAVE
,
g
,
g
:
GetCount
(),
0
,
0
)
end
function
cm
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
g
=
Duel
.
GetMatchingGroup
(
cm
.
thfilter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
nil
,
e
)
local
g
=
Duel
.
GetMatchingGroup
(
cm
.
thfilter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
nil
,
e
,
tp
)
local
atj
=
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
if
atj
~=
0
then
--atkup
...
...
expansions/script/c33500615.lua
View file @
0a7e3b55
...
...
@@ -35,6 +35,7 @@ function cm.initial_effect(c)
e3
:
SetCode
(
EVENT_DAMAGE
)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetCountLimit
(
1
,
m
)
e3
:
SetCondition
(
cm
.
condition
)
e3
:
SetTarget
(
cm
.
rectg2
)
e3
:
SetOperation
(
cm
.
recop2
)
c
:
RegisterEffect
(
e3
)
...
...
@@ -53,6 +54,9 @@ function cm.recop(e,tp,eg,ep,ev,re,r,rp)
Duel
.
Damage
(
p
,
d
,
REASON_RULE
)
end
--e2
function
cm
.
condition
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
ep
==
tp
and
ev
>=
1
end
function
cm
.
rectg2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
Duel
.
SetTargetPlayer
(
tp
)
...
...
expansions/script/c65010508.lua
View file @
0a7e3b55
...
...
@@ -74,8 +74,9 @@ function c65010508.op(e,tp,eg,ep,ev,re,r,rp)
if
Duel
.
SpecialSummon
(
e
:
GetHandler
(),
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
~=
0
and
Duel
.
IsExistingMatchingCard
(
Card
.
IsCanBeSpecialSummoned
,
tp
,
0
,
LOCATION_EXTRA
,
1
,
nil
,
e
,
0
,
1
-
tp
,
true
,
false
)
and
Duel
.
GetLocationCountFromEx
(
1
-
tp
)
>
0
then
local
g
=
Duel
.
GetMatchingGroup
(
Card
.
IsCanBeSpecialSummoned
,
tp
,
0
,
LOCATION_EXTRA
,
nil
,
e
,
0
,
1
-
tp
,
true
,
false
)
local
sg
=
g
:
RandomSelect
(
1
-
tp
,
1
)
Duel
.
SpecialSummon
(
sg
,
0
,
1
-
tp
,
1
-
tp
,
true
,
false
,
POS_FACEUP
)
local
tc
=
sg
:
GetFirst
()
Duel
.
SpecialSummonStep
(
tc
,
0
,
1
-
tp
,
1
-
tp
,
true
,
false
,
POS_FACEUP
)
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_DISABLE
)
...
...
@@ -87,6 +88,7 @@ function c65010508.op(e,tp,eg,ep,ev,re,r,rp)
e2
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
tc
:
RegisterEffect
(
e2
)
tc
:
RegisterFlagEffect
(
65010508
,
RESET_EVENT
+
RESETS_STANDARD
,
0
,
1
)
Duel
.
SpecialSummonComplete
()
local
e3
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e3
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
...
...
expansions/script/c65020166.lua
View file @
0a7e3b55
...
...
@@ -109,7 +109,7 @@ end
function
c65020166
.
activate1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
eg
:
GetFirst
()
if
tc
and
tc
:
IsRelateToEffect
(
e
)
and
tc
:
IsFaceup
()
then
Duel
.
Destroy
(
tc
,
REASON_EFFECT
,
LOCATION_REMOVED
)
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
end
end
function
c65020166
.
filter20
(
c
,
tp
)
...
...
expansions/script/c65050229.lua
View file @
0a7e3b55
--星月转夜 至高之月
function
c65050229
.
initial_effect
(
c
)
--xyz summon
aux
.
AddXyzProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsRace
,
RACE_FAIRY
),
8
,
2
)
aux
.
AddXyzProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsRace
,
RACE_FAIRY
),
10
,
2
)
c
:
EnableReviveLimit
()
--special summon
local
e1
=
Effect
.
CreateEffect
(
c
)
...
...
@@ -9,7 +9,7 @@ function c65050229.initial_effect(c)
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
+
EFFECT_FLAG_CARD_TARGET
)
e1
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e1
:
SetCountLimit
(
1
+
EFFECT_COUNT_CODE_SINGLE
)
e1
:
SetCondition
(
c65050229
.
spcon
)
...
...
@@ -63,7 +63,7 @@ function c65050229.spop(e,tp,eg,ep,ev,re,r,rp)
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<=
0
then
return
end
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
and
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
~=
0
then
if
tc
:
IsType
(
TYPE_XYZ
)
and
Duel
.
IsExistingMatchingCard
(
Card
.
IsSetCard
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
0x5da9
)
and
Duel
.
SelectYesNo
(
aux
.
Stringid
(
65050229
,
0
))
then
if
tc
:
IsType
(
TYPE_XYZ
)
and
Duel
.
IsExistingMatchingCard
(
Card
.
IsSetCard
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
0x5da9
)
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
65050229
,
0
))
then
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
Card
.
IsSetCard
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
0x5da9
)
Duel
.
Overlay
(
tc
,
g
)
end
...
...
expansions/script/c65050250.lua
View file @
0a7e3b55
...
...
@@ -98,7 +98,7 @@ function c65050250.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
SendtoGrave
(
e
:
GetHandler
(),
REASON_COST
+
REASON_DISCARD
)
end
function
c65050250
.
filter
(
c
)
return
(
c
:
IsSetCard
(
0x5da9
)
or
c
:
IsSetCard
(
0x9da9
))
and
c
:
IsAbleToHand
()
return
(
c
:
IsSetCard
(
0x5da9
)
or
c
:
IsSetCard
(
0x9da9
))
and
c
:
IsAbleToHand
()
and
c
:
IsType
(
TYPE_MONSTER
)
end
function
c65050250
.
tgfilter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsLevelAbove
(
1
)
...
...
expansions/script/c65060057.lua
View file @
0a7e3b55
...
...
@@ -32,6 +32,19 @@ function c65060057.initial_effect(c)
e4
:
SetCode
(
EFFECT_UPDATE_DEFENSE
)
e4
:
SetValue
(
c65060057
.
val2
)
c
:
RegisterEffect
(
e4
)
--without release
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
)
e0
:
SetCode
(
EFFECT_SUMMON_PROC
)
e0
:
SetRange
(
LOCATION_FZONE
)
e0
:
SetCondition
(
c65060057
.
ntcon
)
e0
:
SetValue
(
SUMMON_TYPE_NORMAL
)
c
:
RegisterEffect
(
e0
)
e2
:
SetLabelObject
(
e0
)
end
function
c65060057
.
ntcon
(
e
,
c
,
minc
)
if
c
==
nil
then
return
true
end
return
minc
==
0
and
Duel
.
CheckTribute
(
c
,
0
)
end
function
c65060057
.
valfil
(
c
)
return
c
:
IsFaceup
()
and
bit
.
band
(
c
:
GetOriginalType
(),
TYPE_MONSTER
)
==
TYPE_MONSTER
...
...
@@ -79,19 +92,20 @@ function c65060057.fil(c,e)
return
c
:
IsSetCard
(
0x5daa
)
and
c
:
IsSummonable
(
true
,
e
)
end
function
c65060057
.
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c65060057
.
fil
,
tp
,
LOCATION_HAND
,
0
,
1
,
nil
,
e
)
and
Duel
.
IsPlayerCanDraw
(
tp
)
end
local
ce
=
e
:
GetLabelObject
()
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c65060057
.
fil
,
tp
,
LOCATION_HAND
,
0
,
1
,
nil
,
ce
)
and
Duel
.
IsPlayerCanDraw
(
tp
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SUMMON
,
nil
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DRAW
,
nil
,
0
,
tp
,
1
)
end
function
c65060057
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
local
ce
=
e
:
GetLabelObject
()
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SUMMON
)
if
Duel
.
Draw
(
tp
,
1
,
REASON_EFFECT
)
~=
0
then
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c65060057
.
fil
,
tp
,
LOCATION_HAND
,
0
,
1
,
1
,
nil
,
e
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c65060057
.
fil
,
tp
,
LOCATION_HAND
,
0
,
1
,
1
,
nil
,
c
e
)
local
tc
=
g
:
GetFirst
()
if
tc
then
Duel
.
Summon
(
tp
,
tc
,
true
,
e
)
Duel
.
Summon
(
tp
,
tc
,
true
,
ce
)
end
end
end
\ No newline at end of file
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