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
Huangnan
no81cards
Commits
e1488f56
Commit
e1488f56
authored
Jul 05, 2020
by
Nemo Ma
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
0a0f3645
Changes
23
Expand all
Hide whitespace changes
Inline
Side-by-side
Showing
23 changed files
with
572 additions
and
768 deletions
+572
-768
expansions/no81.cdb
expansions/no81.cdb
+0
-0
expansions/script/c10199990.lua
expansions/script/c10199990.lua
+509
-639
expansions/script/c10199991.lua
expansions/script/c10199991.lua
+12
-65
expansions/script/c10199992.lua
expansions/script/c10199992.lua
+15
-31
expansions/script/c114707556.lua
expansions/script/c114707556.lua
+1
-0
expansions/script/c11662004.lua
expansions/script/c11662004.lua
+4
-4
expansions/script/c117485040.lua
expansions/script/c117485040.lua
+1
-0
expansions/script/c118824150.lua
expansions/script/c118824150.lua
+4
-3
expansions/script/c25000032.lua
expansions/script/c25000032.lua
+2
-2
expansions/script/c30000005.lua
expansions/script/c30000005.lua
+1
-1
expansions/script/c30000007.lua
expansions/script/c30000007.lua
+1
-1
expansions/script/c30000033.lua
expansions/script/c30000033.lua
+1
-1
expansions/script/c30000035.lua
expansions/script/c30000035.lua
+2
-2
expansions/script/c30000042.lua
expansions/script/c30000042.lua
+1
-1
expansions/script/c30000049.lua
expansions/script/c30000049.lua
+1
-1
expansions/script/c33405005.lua
expansions/script/c33405005.lua
+1
-1
expansions/script/c79029034.lua
expansions/script/c79029034.lua
+1
-1
expansions/script/c79029093.lua
expansions/script/c79029093.lua
+4
-4
expansions/script/c79029133.lua
expansions/script/c79029133.lua
+3
-3
expansions/script/c79029157.lua
expansions/script/c79029157.lua
+1
-1
expansions/script/c79029197.lua
expansions/script/c79029197.lua
+1
-2
expansions/script/c79029207.lua
expansions/script/c79029207.lua
+2
-1
expansions/script/c79029213.lua
expansions/script/c79029213.lua
+4
-4
No files found.
expansions/no81.cdb
View file @
e1488f56
No preview for this file type
expansions/script/c10199990.lua
View file @
e1488f56
This diff is collapsed.
Click to expand it.
expansions/script/c10199991.lua
View file @
e1488f56
--Real Scl Version - Variable
local
Version_Number
=
20200
409
local
Version_Number
=
20200
218
local
m
=
10199990
local
vm
=
10199991
rsv
=
{}
--"Base Function"
...
...
@@ -21,18 +21,11 @@ rsreset={} --"Reset Function"
rshint
=
{}
--"Hint Function"
rsloc
=
{}
--"Location Function"
rsdv
=
"Divide_Variable"
--Info Variable
rs
val
.
valinfo
=
{}
--"Value for inside series, inside type etc."
rs
ef
.
valinfo
=
{}
--"Value for inside series, inside type etc."
rscost
.
costinfo
=
{}
--"Cost information, for record cost value"
rsop
.
opinfo
=
{}
--"Operation information, for record something"
rsef
.
relationinfo
=
{}
--"Field,Pendulum,Continous leave field"
rstg
.
targetlist
=
{}
--"Target group list, for rstg.GetTargetAttribute"
rsef
.
attacheffect
=
{}
--"Effect information for attach effects"
rsef
.
attacheffectf
=
{}
rsef
.
solveeffect
=
{}
rsop
.
baseop
=
{}
rsef
.
targetlist
=
{}
--"Target group list, for rstg.GetTargetAttribute"
rsef
.
attachinfo
=
{}
--"Effect information for attach effects"
rscf
.
synchro_material_action
=
{}
--"Custom syn material's action"
rscf
.
xyz_material_action
=
{}
--"Custom xyz material's action"
...
...
@@ -58,17 +51,14 @@ rsreset.est_pend= rsreset.est + rsreset.pend
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
.
Phase_Leave_Flag
=
m
+
300
--"Summon Flag for SummonBuff"
rscode
.
Extra_Effect
=
m
+
100
--"Attach Effect"
rscode
.
Extra_Effect_FORCE
=
m
+
200
--"Attach Effect,Force"
rscode
.
Summon_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"
--Hint Message Variable
rshint
.
act
=
aux
.
Stringid
(
m
,
0
)
--"activate spell/trap"
...
...
@@ -79,22 +69,19 @@ rshint.spproc=aux.Stringid(m,4) --"SS by self produce"
rshint
.
negeffect
=
aux
.
Stringid
(
19502505
,
1
)
--"negate activation"
rshint
.
eq
=
aux
.
Stringid
(
68184115
,
0
)
--"cards will equip"
rshint
.
te
=
aux
.
Stringid
(
24094258
,
3
)
--"add to extra deck"
rshint
.
xyz
=
HINTMSG_XMATERIAL
--"cards will be
come
overlay cards"
rshint
.
xyz
=
HINTMSG_XMATERIAL
--"cards will be overlay cards"
rshint
.
diseffect
=
aux
.
Stringid
(
39185163
,
1
)
--"negate effect"
rshint
.
negsum
=
aux
.
Stringid
(
m
+
1
,
1
)
--"negate summon"
rshint
.
negsp
=
aux
.
Stringid
(
74892653
,
0
)
--"negate special summon"
rshint
.
darktuner
=
aux
.
Stringid
(
m
,
14
)
--"treat as dark tuner"
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"
--Property Variable
rsflag
.
flaglist
=
{
EFFECT_FLAG_CARD_TARGET
,
EFFECT_FLAG_PLAYER_TARGET
,
EFFECT_FLAG_DELAY
,
EFFECT_FLAG_DAMAGE_STEP
,
EFFECT_FLAG_DAMAGE_CAL
,
EFFECT_FLAG_IGNORE_IMMUNE
,
EFFECT_FLAG_SET_AVAILABLE
,
EFFECT_FLAG_IGNORE_RANGE
,
EFFECT_FLAG_SINGLE_RANGE
,
EFFECT_FLAG_BOTH_SIDE
,
EFFECT_FLAG_UNCOPYABLE
,
EFFECT_FLAG_CANNOT_DISABLE
,
EFFECT_FLAG_CANNOT_NEGATE
,
EFFECT_FLAG_CLIENT_HINT
,
EFFECT_FLAG_LIMIT_ZONE
,
EFFECT_FLAG_ABSOLUTE_TARGET
,
EFFECT_FLAG_SPSUM_PARAM
,
EFFECT_FLAG_EVENT_PLAYER
}
EFFECT_FLAG_ABSOLUTE_TARGET
,
EFFECT_FLAG_SPSUM_PARAM
}
rsflag
.
tg_d
=
EFFECT_FLAG_CARD_TARGET
+
EFFECT_FLAG_DELAY
rsflag
.
dsp_d
=
EFFECT_FLAG_DAMAGE_STEP
+
EFFECT_FLAG_DELAY
rsflag
.
dsp_tg
=
EFFECT_FLAG_DAMAGE_STEP
+
EFFECT_FLAG_CARD_TARGET
...
...
@@ -116,34 +103,22 @@ rscate.neg_des = CATEGORY_NEGATE+CATEGORY_DESTROY
rscf
.
typelist
=
{
TYPE_MONSTER
,
TYPE_NORMAL
,
TYPE_EFFECT
,
TYPE_DUAL
,
TYPE_UNION
,
TYPE_TOON
,
TYPE_TUNER
,
TYPE_RITUAL
,
TYPE_FUSION
,
TYPE_SYNCHRO
,
TYPE_XYZ
,
TYPE_LINK
,
TYPE_TOKEN
,
TYPE_PENDULUM
,
TYPE_SPSUMMON
,
TYPE_FLIP
,
TYPE_SPIRIT
,
TYPE_SPELL
,
TYPE_EQUIP
,
TYPE_FIELD
,
TYPE_CONTINUOUS
,
TYPE_QUICKPLAY
,
TYPE_TRAP
,
TYPE_COUNTER
,
TYPE_TRAPMONSTER
}
rscf
.
extype
=
TYPE_FUSION
+
TYPE_SYNCHRO
+
TYPE_XYZ
+
TYPE_LINK
rscf
.
extype
=
TYPE_FUSION
+
TYPE_SYNCHRO
+
TYPE_XYZ
+
TYPE_
PENDULUM
+
TYPE_
LINK
rscf
.
extype_r
=
rscf
.
extype
+
TYPE_RITUAL
rscf
.
extype_p
=
rscf
.
extype
+
TYPE_PENDULUM
rscf
.
extype_rp
=
rscf
.
extype
+
TYPE_RITUAL
+
TYPE_PENDULUM
rscf
.
extype_np
=
rscf
.
extype
-
TYPE_PENDULUM
rscf
.
exlist
=
{
TYPE_FUSION
,
TYPE_SYNCHRO
,
TYPE_XYZ
,
TYPE_LINK
}
rscf
.
exlist_r
=
{
TYPE_FUSION
,
TYPE_SYNCHRO
,
TYPE_XYZ
,
TYPE_LINK
,
TYPE_RITUAL
}
rscf
.
exlist_p
=
{
TYPE_FUSION
,
TYPE_SYNCHRO
,
TYPE_XYZ
,
TYPE_LINK
,
TYPE_PENDULUM
}
rscf
.
exlist_rp
=
{
TYPE_FUSION
,
TYPE_SYNCHRO
,
TYPE_XYZ
,
TYPE_LINK
,
TYPE_PENDULUM
,
TYPE_RITUAL
}
--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
rsloc
.
dgr
=
LOCATION_DECK
+
LOCATION_GRAVE
+
LOCATION_REMOVED
rsloc
.
hdg
=
LOCATION_HAND
+
LOCATION_DECK
+
LOCATION_GRAVE
rsloc
.
de
=
LOCATION_DECK
+
LOCATION_EXTRA
rsloc
.
mg
=
LOCATION_MZONE
+
LOCATION_GRAVE
rsloc
.
og
=
LOCATION_ONFIELD
+
LOCATION_GRAVE
rsloc
.
hmg
=
LOCATION_HAND
+
LOCATION_MZONE
+
LOCATION_GRAVE
rsloc
.
hog
=
LOCATION_HAND
+
LOCATION_ONFIELD
+
LOCATION_GRAVE
rsloc
.
all
=
0xff
--Escape Old Functions
function
rsof
.
Escape_Old_Functions
()
rsof
.
DefineCard
=
rscf
.
DefineCard
rscf
.
FilterFaceUp
=
rscf
.
fufilter
rsof
.
SendtoHand
=
rsop
.
SendtoHand
rsof
.
SendtoDeck
=
rsop
.
SendtoDeck
rsof
.
SendtoGrave
=
rsop
.
SendtoGrave
...
...
@@ -154,35 +129,7 @@ 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
--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
=
{}
if
attlist
then
for
index
,
par
in
pairs
(
attlist
)
do
if
par
then
if
index
==
1
then
att
=
"atkf"
end
if
index
==
2
then
att
=
"deff"
end
if
index
==
3
then
att
=
"lv"
end
table.insert
(
bufflist
,
att
)
table.insert
(
bufflist
,
par
)
end
end
end
if
isdis
then
table.insert
(
bufflist
,
"dis,dise"
)
table.insert
(
bufflist
,
true
)
end
if
isdistig
then
table.insert
(
bufflist
,
"tri"
)
table.insert
(
bufflist
,
true
)
end
if
selfleave
then
table.insert
(
bufflist
,
"leave"
)
table.insert
(
bufflist
,
selfleave
)
end
return
bufflist
end
rsof
.
IsSet
=
rscf
.
DefineSet
end
expansions/script/c10199992.lua
View file @
e1488f56
--Record Author
local
am
=
10199992
local
Version_Number
=
202003
23
local
Version_Number
=
202003
10
#
Scl
local
rsdka
=
Dakyria
local
rsdio
=
Diablo
...
...
@@ -13,8 +13,6 @@ local rssp = Stellar_Pearl
//
local
rsgd
=
Ghostdom_Dragon
local
rsed
=
Epic_Dragon
local
rsdh
=
Devil_Hunter
local
rsds
=
Dark_Souls
local
rsca
=
Corona
#
Scl
-
Special
Mode
local
rssm
=
Special_Mode
...
...
@@ -27,18 +25,18 @@ local rssmf = Special_Mode_Fast_Duel
local
rssmm
=
Special_Mode_Multiple_Duel
local
rssmu
=
Special_Mode_Universal_Duel
#
Gale
1472676207
#
Gale
local
rsve
=
Voison
local
rsneov
=
Neons
local
tfrsv
=
T
.
Fairies
local
rsss
=
Star_Spirit
#
ChiJiang
626386490
#
ChiJiang
local
rsnm
=
Nightmare
local
rslf
=
Little_Fox
local
rccv
=
Thermonuclear
#
XiaoMi
643865567
#
XiaoMi
local
rssg
=
Sex_Gun
local
rsps
=
Pseudo_Soul
local
rsdcc
=
Dragon_Chess_Corps
...
...
@@ -52,43 +50,29 @@ local rsvw = Virus_Wrom
local
rsia
=
Indolent_Angel
local
rsso
=
Simulated_Organism
#
NianBao
583322404
#
NianBao
local
rslap
=
Lapin
local
rskh
=
Karehana
#
XiaoDaoHeng
1614895649
#
XiaoDaoHeng
local
rslrd
=
Life_DeathRound_Dance
#
Huang
1184387005
#
Huang
local
rsts
=
Trinity_Sword
#
Luoxing
1151483512
#
Luoxing
local
rsdt
=
Dark_Tale
local
rsod
=
Order
#
YunZeZhun
1587361112
#
YunZeZhun
local
rsphh
=
Phantom_Thieves_Of_Hearts
local
rsgc
=
Guard_City
#
ZhenDong
#
ZhenDong
local
rsfv
=
Fgo
/
Assassin
#
JingJing
1772438857
#
JingJing
local
rsba
=
BlueAngel
#
Akashic
3204027606
local
rszg
=
Zogu
local
rsgs
=
Gran_Sphere
local
rsoc
=
Oligocene_Civilization
local
rsgol
=
Giant_of_Light
local
rssb
=
Space_Beasts
#
HeiBai
1172777968
local
rstm
=
Toaru_Majutsu_no_Index
#
2558566212
local
rsgod
=
God
--Set Code
#
Scl
--local = 0x1330
...
...
@@ -124,7 +108,7 @@ local Stellar_Pearl = 0xa333
local
Utoland
=
0xc333
--local = 0x1334
local
=
0x3334
local
=
0x3334
local
Summerlover
=
0x5334
local
Quasi_Beast
=
0x6334
local
Bite_Teech
=
0x9334
...
...
@@ -135,9 +119,9 @@ local = 0xc334
local
Oraclesmith
=
0x3335
local
DevilHunter
=
0x5335
local
DevilSlayer
=
0x6335
local
DMC
=
0x9335
local
Ashenone
=
0xa335
local
Cinderlord
=
0xc335
local
=
0x9335
local
=
0xa335
local
=
0xc335
--local = 0x1336
local
=
0x3336
...
...
expansions/script/c114707556.lua
View file @
e1488f56
...
...
@@ -22,6 +22,7 @@ function c114707556.target(e,tp,eg,ep,ev,re,r,rp,chk)
if
chk
==
0
then
return
Duel
.
GetFieldGroupCount
(
tp
,
LOCATION_PZONE
,
LOCATION_PZONE
)
>
0
end
local
g
=
Duel
.
GetFieldGroup
(
tp
,
LOCATION_PZONE
,
LOCATION_PZONE
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
g
,
g
:
GetCount
(),
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOGRAVE
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
function
c114707556
.
thfilter1
(
c
)
return
c
:
IsSetCard
(
0xc6
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAbleToGrave
()
...
...
expansions/script/c11662004.lua
View file @
e1488f56
...
...
@@ -95,11 +95,11 @@ function cm.lvop(e,tp,eg,ep,ev,re,r,rp)
Duel
.
RegisterEffect
(
e2
,
tp
)
end
end
function
cmcfilter
(
c
)
function
cm
.
cfilter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x79
)
and
c
:
IsType
(
TYPE_SYNCHRO
)
end
function
cm
.
condition1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
IsExistingMatchingCard
(
cmcfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
return
Duel
.
IsExistingMatchingCard
(
cm
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
end
function
cm
.
desfilter
(
c
)
return
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
)
and
c
:
IsAbleToGrave
()
...
...
@@ -108,9 +108,9 @@ function cm.handes(e,tp,eg,ep,ev,re,r,rp)
local
id
=
Duel
.
GetChainInfo
(
ev
,
CHAININFO_CHAIN_ID
)
if
ep
==
tp
or
id
==
cm
[
0
]
or
not
re
:
IsActiveType
(
TYPE_MONSTER
)
then
return
end
cm
[
0
]
=
id
if
Duel
.
IsExistingMatchingCard
(
cm
.
desfilter
,
1
-
tp
,
LOCATION_HAND
+
LOCATION_
SZONE
,
0
,
1
,
nil
)
and
Duel
.
SelectYesNo
(
1
-
tp
,
aux
.
Stringid
(
m
,
3
))
then
if
Duel
.
IsExistingMatchingCard
(
cm
.
desfilter
,
1
-
tp
,
LOCATION_HAND
+
LOCATION_
ONFIELD
,
0
,
1
,
nil
)
and
Duel
.
SelectYesNo
(
1
-
tp
,
aux
.
Stringid
(
m
,
3
))
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOGRAVE
)
local
g
=
Duel
.
SelectMatchingCard
(
1
-
tp
,
cm
.
desfilter
,
1
-
tp
,
LOCATION_HAND
+
LOCATION_
SZONE
,
0
,
1
,
1
,
nil
)
local
g
=
Duel
.
SelectMatchingCard
(
1
-
tp
,
cm
.
desfilter
,
1
-
tp
,
LOCATION_HAND
+
LOCATION_
ONFIELD
,
0
,
1
,
1
,
nil
)
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
Duel
.
BreakEffect
()
else
...
...
expansions/script/c117485040.lua
View file @
e1488f56
...
...
@@ -19,6 +19,7 @@ function c117485040.initial_effect(c)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e3
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e3
:
SetRange
(
LOCATION_SZONE
)
e3
:
SetCountLimit
(
1
,
117485040
)
e3
:
SetCondition
(
c117485040
.
pencon
)
e3
:
SetOperation
(
c117485040
.
penop
)
c
:
RegisterEffect
(
e3
)
...
...
expansions/script/c118824150.lua
View file @
e1488f56
...
...
@@ -107,7 +107,7 @@ function c118824150.sccost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
Remove
(
c
,
POS_FACEUP
,
REASON_COST
)
end
function
c118824150
.
scfilter
(
c
,
e
,
tp
)
return
c
:
IsAttribute
(
ATTRIBUTE_LIGHT
)
and
c
:
IsRace
(
RACE_DRAGON
)
and
c
:
IsType
(
TYPE_SYNCHRO
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
SUMMON_TYPE_SYNCHRO
,
tp
,
false
,
fals
e
)
return
c
:
IsAttribute
(
ATTRIBUTE_LIGHT
)
and
c
:
IsRace
(
RACE_DRAGON
)
and
c
:
IsType
(
TYPE_SYNCHRO
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
SUMMON_TYPE_SYNCHRO
,
tp
,
false
,
tru
e
)
end
function
c118824150
.
sctg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c118824150
.
scfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
...
...
@@ -117,5 +117,6 @@ end
function
c118824150
.
scop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_CARDS
)
if
not
g
or
g
:
FilterCount
(
Card
.
IsRelateToEffect
,
nil
,
e
)
~=
1
then
return
end
Duel
.
SpecialSummon
(
g
,
SUMMON_TYPE_SYNCHRO
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
\ No newline at end of file
Duel
.
SpecialSummon
(
g
,
SUMMON_TYPE_SYNCHRO
,
tp
,
tp
,
false
,
true
,
POS_FACEUP
)
g
:
GetFirst
():
CompleteProcedure
()
end
expansions/script/c25000032.lua
View file @
e1488f56
...
...
@@ -20,7 +20,7 @@ function cm.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function
cm
.
negop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
Duel
.
NegateActivation
(
ev
)
then
return
end
if
Duel
.
IsExistingMatchingCard
(
Card
.
IsCanTurnSet
,
tp
,
0
,
LOCATION_MZONE
,
1
,
nil
)
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
m
,
0
))
>
0
then
if
Duel
.
IsExistingMatchingCard
(
Card
.
IsCanTurnSet
,
tp
,
0
,
LOCATION_MZONE
,
1
,
nil
)
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
m
,
0
))
then
Duel
.
BreakEffect
()
rsop
.
SelectSolve
(
HINTMSG_POSCHANGE
,
tp
,
Card
.
IsCanTurnSet
,
tp
,
0
,
LOCATION_MZONE
,
1
,
1
,
nil
,
cm
.
solvefun
)
end
...
...
@@ -38,7 +38,7 @@ function cm.actval(e,re)
return
rc
:
IsLocation
(
LOCATION_GRAVE
)
end
function
cm
.
atkval
(
e
,
c
)
return
Duel
.
GetMatchingGroupCount
(
cm
.
afilter
,
tp
,
rsloc
.
og
,
rsloc
.
og
,
nil
)
*
100
return
Duel
.
GetMatchingGroupCount
(
cm
.
afilter
,
tp
,
rsloc
.
og
,
rsloc
.
og
,
nil
)
*
-
100
end
function
cm
.
afilter
(
c
)
return
c
:
IsFacedown
()
or
c
:
IsLocation
(
LOCATION_GRAVE
)
...
...
expansions/script/c30000005.lua
View file @
e1488f56
...
...
@@ -23,7 +23,7 @@ function c30000005.initial_effect(c)
e2
:
SetCode
(
EVENT_SUMMON_SUCCESS
)
e2
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e2
:
SetRange
(
LOCATION_SZONE
)
e2
:
SetCountLimit
(
1
)
e2
:
SetCountLimit
(
99
)
e2
:
SetTarget
(
c30000005
.
sptg
)
e2
:
SetOperation
(
c30000005
.
spop
)
c
:
RegisterEffect
(
e2
)
...
...
expansions/script/c30000007.lua
View file @
e1488f56
...
...
@@ -43,7 +43,7 @@ function c30000007.op(e,tp,eg,ep,ev,re,r,rp)
while
gc
do
local
e3
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e3
:
SetType
(
EFFECT_TYPE_SINGLE
)
e3
:
SetCode
(
EFFECT_CANNOT_T
RIGGER
)
e3
:
SetCode
(
EFFECT_CANNOT_T
O_GRAVE
)
e3
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
gc
:
RegisterEffect
(
e3
)
gc
=
sg
:
GetNext
()
...
...
expansions/script/c30000033.lua
View file @
e1488f56
...
...
@@ -158,7 +158,7 @@ function c30000033.target(e,tp,eg,ep,ev,re,r,rp,chk)
end
function
c30000033
.
thfilter
(
c
)
return
c
:
IsDefenseBelow
(
22
00
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAttribute
(
ATTRIBUTE_DARK
)
and
c
:
IsAbleToHand
()
return
c
:
IsDefenseBelow
(
80
00
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAttribute
(
ATTRIBUTE_DARK
)
and
c
:
IsAbleToHand
()
end
function
c30000033
.
operation
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
expansions/script/c30000035.lua
View file @
e1488f56
...
...
@@ -113,9 +113,9 @@ function c30000035.thfilter(c)
return
c
:
IsAbleToRemoveAsCost
()
and
not
c
:
IsCode
(
30000035
)
end
function
c30000035
.
thcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c30000035
.
thfilter
,
tp
,
LOCATION_HAND
+
LOCATION_ONFIELD
+
LOCATION_GRAVE
,
0
,
7
,
nil
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c30000035
.
thfilter
,
tp
,
LOCATION_HAND
+
LOCATION_ONFIELD
+
LOCATION_GRAVE
,
0
,
5
,
nil
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_REMOVE
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c30000035
.
thfilter
,
tp
,
LOCATION_HAND
+
LOCATION_ONFIELD
+
LOCATION_GRAVE
,
0
,
7
,
7
,
nil
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c30000035
.
thfilter
,
tp
,
LOCATION_HAND
+
LOCATION_ONFIELD
+
LOCATION_GRAVE
,
0
,
5
,
5
,
nil
)
Duel
.
Remove
(
g
,
POS_FACEUP
,
REASON_COST
)
end
function
c30000035
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
...
...
expansions/script/c30000042.lua
View file @
e1488f56
--终焉邪魂 感染源核
function
c30000042
.
initial_effect
(
c
)
--link summon
aux
.
AddLinkProcedure
(
c
,
c30000042
.
mfilter
,
4
)
aux
.
AddLinkProcedure
(
c
,
c30000042
.
mfilter
,
3
)
c
:
EnableReviveLimit
()
--tohand
local
e1
=
Effect
.
CreateEffect
(
c
)
...
...
expansions/script/c30000049.lua
View file @
e1488f56
...
...
@@ -40,7 +40,7 @@ function c30000049.initial_effect(c)
end
function
c30000049
.
lcheck
(
g
)
return
g
:
IsExists
(
Card
.
Is
LinkSetCard
,
1
,
nil
,
0x920
)
and
g
:
IsExists
(
Card
.
Is
AttackAbove
,
2
,
nil
,
2400
)
return
g
:
IsExists
(
Card
.
IsAttackAbove
,
2
,
nil
,
2400
)
end
function
c30000049
.
spcon1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
expansions/script/c33405005.lua
View file @
e1488f56
...
...
@@ -35,7 +35,7 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
DiscardHand
(
tp
,
Card
.
IsDiscardable
,
1
,
1
,
REASON_COST
+
REASON_DISCARD
)
end
function
cm
.
filter
(
c
)
return
c
:
IsSetCard
(
0x9da0
)
and
((
c
:
IsType
(
TYPE_FIELD
)
or
c
:
IsType
(
TYPE_CONTINUOUS
))
and
not
c
:
IsForbidden
()
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
)
or
((
c
:
IsType
(
TYPE_QUICKPLAY
)
or
c
:
GetType
()
==
TYPE_SPELL
or
c
:
GetType
()
==
TYPE_TRAP
)
and
c
:
CheckActivateEffect
(
false
,
true
,
false
)
~=
nil
)
return
c
:
IsSetCard
(
0x9da0
)
and
((
(
c
:
IsType
(
TYPE_FIELD
)
or
c
:
IsType
(
TYPE_CONTINUOUS
))
and
not
c
:
IsForbidden
()
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
)
or
((
c
:
IsType
(
TYPE_QUICKPLAY
)
or
c
:
GetType
()
==
TYPE_SPELL
or
c
:
GetType
()
==
TYPE_TRAP
)
and
c
:
CheckActivateEffect
(
false
,
true
,
false
)
~=
nil
)
)
end
function
cm
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
...
...
expansions/script/c79029034.lua
View file @
e1488f56
...
...
@@ -118,7 +118,7 @@ function c79029034.tgfilter(c)
return
c
:
IsType
(
TYPE_MONSTER
)
end
function
c79029034
.
tgcon
(
e
)
return
Duel
.
IsExistingMatchingCard
(
c79029034
.
tgfilter
,
e
:
GetHandlerPlayer
(),
LOCATION_MZONE
,
0
,
1
,
e
:
GetHandler
())
return
Duel
.
IsExistingMatchingCard
(
aux
.
TRUE
,
e
:
GetHandlerPlayer
(),
LOCATION_MZONE
,
0
,
1
,
e
:
GetHandler
())
end
function
c79029034
.
discon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
rp
==
1
-
tp
and
not
e
:
GetHandler
():
IsStatus
(
STATUS_BATTLE_DESTROYED
)
and
Duel
.
IsChainNegatable
(
ev
)
...
...
expansions/script/c79029093.lua
View file @
e1488f56
...
...
@@ -129,13 +129,13 @@ function c79029093.sprop1(e,tp,eg,ep,ev,re,r,rp,c)
end
end
function
c79029093
.
copycost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
e
:
GetHandler
():
GetFlagEffect
(
79029093
)
==
0
and
Duel
.
IsCanRemoveCounter
(
tp
,
1
,
0
,
0x1099
,
790290
10
,
REASON_COST
)
end
e
:
GetHandler
():
RegisterFlagEffect
(
c
79029093
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
0
,
1
)
Duel
.
RemoveCounter
(
tp
,
1
,
0
,
0x1099
,
790290
10
,
REASON_COST
)
if
chk
==
0
then
return
e
:
GetHandler
():
GetFlagEffect
(
79029093
)
==
0
and
Duel
.
IsCanRemoveCounter
(
tp
,
1
,
0
,
0x1099
,
10
,
REASON_COST
)
end
e
:
GetHandler
():
RegisterFlagEffect
(
79029093
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
0
,
1
)
Duel
.
RemoveCounter
(
tp
,
1
,
0
,
0x1099
,
10
,
REASON_COST
)
end
function
c79029093
.
copycost1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
e
:
GetHandler
():
GetFlagEffect
(
79029093
)
==
0
and
Duel
.
CheckLPCost
(
tp
,
6000
)
end
e
:
GetHandler
():
RegisterFlagEffect
(
c
79029093
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
0
,
1
)
e
:
GetHandler
():
RegisterFlagEffect
(
79029093
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
0
,
1
)
Duel
.
PayLPCost
(
tp
,
6000
)
end
function
c79029093
.
copyfilter
(
c
)
...
...
expansions/script/c79029133.lua
View file @
e1488f56
...
...
@@ -11,7 +11,7 @@ function c79029133.initial_effect(c)
c
:
RegisterEffect
(
e1
)
--Activate
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_
TRIGGER_F
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_
CONTINUOUS
)
e2
:
SetCategory
(
CATEGORY_TOGRAVE
+
CATEGORY_HANDES
)
e2
:
SetCode
(
EVENT_DRAW
)
e2
:
SetRange
(
LOCATION_MZONE
)
...
...
@@ -63,13 +63,13 @@ function c79029133.adjustop(e,tp,eg,ep,ev,re,r,rp)
if
(
phase
==
PHASE_DAMAGE
and
not
Duel
.
IsDamageCalculated
())
or
phase
==
PHASE_DAMAGE_CAL
then
return
end
local
sg
=
Group
.
CreateGroup
()
for
p
=
1
,
1
do
local
g
=
Duel
.
GetMatchingGroup
(
Card
.
IsFaceup
,
p
,
LOCATION_MZONE
,
0
,
nil
)
local
g
=
Duel
.
GetMatchingGroup
(
Card
.
IsFaceup
,
1
-
t
p
,
LOCATION_MZONE
,
0
,
nil
)
local
race
=
1
while
bit
.
band
(
RACE_ALL
,
race
)
~=
0
do
local
rg
=
g
:
Filter
(
Card
.
IsRace
,
nil
,
race
)
local
rc
=
rg
:
GetCount
()
if
rc
>
1
then
Duel
.
Hint
(
HINT_SELECTMSG
,
p
,
HINTMSG_TOGRAVE
)
Duel
.
Hint
(
HINT_SELECTMSG
,
1
-
t
p
,
HINTMSG_TOGRAVE
)
local
dg
=
rg
:
Select
(
p
,
rc
-
1
,
rc
-
1
,
nil
)
sg
:
Merge
(
dg
)
end
...
...
expansions/script/c79029157.lua
View file @
e1488f56
...
...
@@ -63,7 +63,7 @@ function c79029157.econ(e)
ct
=
ct
+
1
end
end
return
e
:
GetHandler
():
GetFlagEffect
(
c
79029157
+
e
:
GetLabel
())
>=
ct
return
e
:
GetHandler
():
GetFlagEffect
(
79029157
+
e
:
GetLabel
())
>=
ct
end
function
c79029157
.
elimit
(
e
,
re
,
tp
)
return
re
:
IsActiveType
(
TYPE_MONSTER
)
...
...
expansions/script/c79029197.lua
View file @
e1488f56
...
...
@@ -57,8 +57,7 @@ end
function
c79029197
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
SelectYesNo
(
1
-
tp
,
aux
.
Stringid
(
1474910
,
0
))
then
if
Duel
.
Remove
(
e
:
GetHandler
(),
POS_FACEUP
,
REASON_COST
)
then
local
p
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_PLAYER
)
local
ht
=
Duel
.
GetFieldGroupCount
(
p
,
LOCATION_HAND
,
0
)
local
ht
=
Duel
.
GetFieldGroupCount
(
tp
,
LOCATION_HAND
,
0
)
Duel
.
Draw
(
p
,
4
-
ht
,
REASON_EFFECT
)
local
ht1
=
Duel
.
GetFieldGroupCount
(
1
-
tp
,
LOCATION_HAND
,
0
)
Duel
.
Draw
(
1
-
tp
,
4
-
ht1
,
REASON_EFFECT
)
...
...
expansions/script/c79029207.lua
View file @
e1488f56
...
...
@@ -44,7 +44,7 @@ function c79029207.initial_effect(c)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
)
e3
:
SetCode
(
EFFECT_CANNOT_BE_BATTLE_TARGET
)
e3
:
SetValue
(
aux
.
tgoval
)
e3
:
SetValue
(
aux
.
imval1
)
e3
:
SetCondition
(
c79029207
.
ctcon
)
c
:
RegisterEffect
(
e3
)
local
e4
=
e3
:
Clone
()
...
...
@@ -80,6 +80,7 @@ function c79029207.sprop(e,tp,eg,ep,ev,re,r,rp,c)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_XMATERIAL
)
local
g2
=
g
:
FilterSelect
(
tp
,
c79029207
.
sprfilter2
,
1
,
1
,
mc
,
tp
,
mc
,
c
,
mc
:
GetLink
())
g1
:
Merge
(
g2
)
e
:
GetHandler
():
SetMaterial
(
g1
)
Duel
.
Overlay
(
e
:
GetHandler
(),
g1
)
Duel
.
MoveToField
(
e
:
GetHandler
(),
tp
,
tp
,
LOCATION_MZONE
,
POS_FACEUP
,
true
)
Debug
.
Message
(
"说不定我会偷偷溜到其他地方去呢。"
)
...
...
expansions/script/c79029213.lua
View file @
e1488f56
...
...
@@ -77,7 +77,7 @@ function c79029213.activate(e,tp,eg,ep,ev,re,r,rp)
tc
:
CompleteProcedure
()
if
tc
:
IsType
(
TYPE_PENDULUM
)
then
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetDescription
(
aux
.
Stringid
(
20004
,
5
))
e1
:
SetDescription
(
aux
.
Stringid
(
79029213
,
2
))
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_EXTRA_PENDULUM_SUMMON
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
...
...
@@ -124,11 +124,11 @@ function c79029213.spop(e,tp,eg,ep,ev,re,r,rp)
local
b1
=
not
Duel
.
IsExistingMatchingCard
(
c79029213
.
bfil1
,
tp
,
LOCATION_SZONE
,
0
,
1
,
nil
)
local
b2
=
not
Duel
.
IsExistingMatchingCard
(
c79029213
.
bfil2
,
tp
,
LOCATION_SZONE
,
0
,
1
,
nil
)
if
b1
and
b2
then
op
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
20004
,
7
),
aux
.
Stringid
(
20004
,
6
))
op
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
79029213
,
1
),
aux
.
Stringid
(
79029213
,
0
))
elseif
b1
then
op
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
20004
,
7
))
op
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
79029213
,
1
))
elseif
b2
then
op
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
20004
,
6
))
+
1
op
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
79029213
,
0
))
+
1
else
return
false
end
...
...
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