Skip to content

Y
ygopro-222DIY-cards
Commit a9cad018 authored by 聖園ミカ's avatar 聖園ミカ 🐟
Browse files
Options

byd

parent 1962ada4
Hide whitespace changes
Inline Side-by-side
Showing with 35 additions and 1345 deletions
expansions/FiNALE.cdb
View file @ a9cad018
No preview for this file type
expansions/lflist.conf
View file @ a9cad018
#[2024.7 DIY]
!2024.7 DIY
#[2024.8 DIY]
!2024.8 DIY
#002
00200001 1 --魔王的剑
......@@ -62,30 +62,30 @@
04241010 0 --手冲魔女-白兔爱丽丝
04241011 2 --手冲魔女-黑兔爱丽丝
04270001 1 --狐巫女神乐舞
04270002 2 --猫巫女神乐舞
04270003 1 --狼巫女神乐舞
04270020 1 --神主狐巫女神乐舞
04270021 0 --巫女神乐舞拔祓双福狐
04295003 0 --宫水静香·奏乐先啦
04295012 1 --宫水静香·偷懒小妙招
04295017 0 --宫水静香·庆典时刻
04295017 1 --宫水静香·庆典时刻
#050
05013300 0 --宇智波斑
05012601 1 --茵蒂克丝
05012603 1 --一方通行
05012601 0 --茵蒂克丝
05012603 0 --一方通行
05012604 0 --上条当麻
05012605 0 --奥雷欧斯·伊萨德
05012609 1 --滨面仕上
05012613 0 --欧提努斯
05012615 1 --学院都市
05012615 0 --学院都市
05012616 0 --欧雷尔斯
05012622 0 --月咏小萌
05012622 1 --月咏小萌
05012628 1 --科隆尊
05012630 1 --圣日耳曼
05012638 1 --大霸星祭
05012729 0 --裂开
05012731 0 --炽剑补天
05012732 0 --息吹风暴
05084011 2 --尤娜·希斯的周末
#093
09300004 0 --对折相叠
09300010 1 --降阶魔法-牝堕之力
......@@ -104,13 +104,11 @@
09320004 0 --三首翼龙王
09320233 1 --尸位素餐
09330001 0 --陷阵营首-高顺
09330003 0 --陷阵营统帅
09330005 0 --陷阵营都督
09330008 0 --陷阵营地
09330008 1 --陷阵营地
09330012 0 --陷阵营·奔袭！
09330015 0 --冲锋陷阵！
09330016 1 --陷阵营的战前仪式
09330019 1 --陷阵营花-吕姬
09360018 0 --三十六计·擒贼擒王
09390010 0 --早见虹羽·礼
09390014 1 --早见虹羽·浪
......@@ -228,29 +226,32 @@
11500022 0 --红从者蔷薇·诱惑角
11500026 0 --血从者蔷薇·秋
#116
11600051 2 --璃月 申鹤
11600054 2 --璃月 辛焱
11600081 0 --贸易的契约
11600152 1 --稻妻 神里绫华
11600158 1 --稻妻 久岐忍
11600156 1 --八重神子
11600157 1 --雷电将军
11600181 1 --稻妻 永恒国度
11601105 0 --逐火十三英桀·阿波尼亚
11601110 1 --逐火十三英桀·爱莉希雅
11601115 1 --逐火十三英桀·格蕾修
11601120 1 --逐火十三英桀·华
11601105 1 --逐火十三英桀·阿波尼亚
11601110 2 --逐火十三英桀·爱莉希雅
11601115 2 --逐火十三英桀·格蕾修
11601120 2 --逐火十三英桀·华
11601125 1 --逐火十三英桀·凯文
11601130 0 --逐火十三英桀·科斯魔
11601135 0 --逐火十三英桀·梅比乌斯
11601130 1 --逐火十三英桀·科斯魔
11601135 1 --逐火十三英桀·梅比乌斯
11601140 1 --逐火十三英桀·帕朵菲莉丝
11601145 1 --逐火十三英桀·千劫
11601150 1 --逐火十三英桀·苏
11601155 1 --逐火十三英桀·维尔薇
11601160 1 --逐火十三英桀·伊甸
11601165 1 --逐火十三英桀·樱
11601170 0 --妖精爱莉
11601175 1 --逐火十三英桀通向明日的旅途
11601180 1 --逐火十三英桀的开端·往世乐土
11601170 1 --妖精爱莉
11601175 2 --逐火十三英桀通向明日的旅途
11601180 2 --逐火十三英桀的开端·往世乐土
11601185 1 --逐火十三英桀的殿堂·永世乐土
11601190 0 --逐火十三英桀绘世者的觉悟
11601190 1 --逐火十三英桀绘世者的觉悟
11601220 1 --『浮生』之铭 华
11601240 2 --『空梦』之铭 帕朵菲莉丝
11601270 0 --『未知』之铭 爱莉希雅
......@@ -351,15 +352,15 @@
12400013 1 --澄净闪耀 澄闪-充沛
12400014 0 --澄净闪耀 澄闪-女仆
12400021 1 --幽灵的歧路·拉卡德勒
12400027 0 --沉溺的罪人·赛菲
12400027 1 --沉溺的罪人·赛菲
12400042 0 --弹哭的执行者·克里萨尔
12400057 0 --帕祖祖
12400057 1 --帕祖祖
12400065 0 --火枪的誓言
12400071 1 --回响之心·枷薇
12400075 1 --提线人偶·朵叶
12400080 0 --灾祸模式
12400081 1 --灾祸的终结
12400085 1 --神盾的创造物
12400085 0 --神盾的创造物
12400087 1 --连结之心·奥契丝
#128
12800000 0 --提灯剑舞姬
......@@ -368,7 +369,7 @@
12812006 1 --恋爱头脑战-藤原千花
12825601 2 --铳影-殷妮
12825613 1 --铳影-蛇
12825616 0 --铳影-代号反攻
12825616 2 --铳影-代号反攻
12844102 1 --业狱火 障目侍
12847039 1 --恐怖☆暴走☆袭击☆三点式！
12852101 1 --尤菲莉亚千金
......@@ -446,11 +447,8 @@
#164
16400010 2 --止境之司-审判
16400011 2 --止境之司-思考
16400012 2 --止境之司-支配
16400013 2 --止境之司-懒散
16400014 2 --止境之司-玩耍
16400015 2 --止境之司-血式
16400016 2 --止境之司-街遇
16400017 2 --止境之司-总攻
16400039 1 --独裁者的计谋
16400040 1 --Geass-逃避的战斗
......@@ -548,7 +546,6 @@
17243300 0 --米勒山谷 狼王
17243303 0 --米勒山谷 隐狼
17243306 0 --米勒山谷 狼巫
17243322 2 --基金会 编号682
17243327 0 --基金会 编号173
17243329 2 --基金会 编号294
17243339 0 --基金会 博士Clef
......@@ -612,7 +609,6 @@
21185584 1 --迷沼异声 蔓古
21185586 0 --魔灵守卫
21185588 0 --翔空鱼灵
21185590 2 --库拉小恶魔
21185593 0 --神理的未来之盒
21185595 2 --苍星之理
21185601 0 --星见的种草姬
......@@ -668,7 +664,6 @@
21520150 1 --星宇的涟漪
21520151 1 --星宇成像-宇宙巨眼
21520152 1 --星宇成像-幻影魔龙
21520155 2 --星宇圣装
21520157 1 --星宇圣装-苍龙
21520158 1 --星宇圣装-玄龟
21520159 1 --星宇圣装-白虎
......@@ -789,7 +784,6 @@
30900637 1 --陷阱塔防
30900656 0 --贪婪的代价
30900712 1 --混沌病毒·炸弹
30901016 2 --花园的陆莲花少女 麦丽丝
#312
31200000 0 --复合工程机龙
31200010 1 --机骸少女·惩戒
......@@ -1226,8 +1220,9 @@
47364400 0 --拟尘妖巢穴
47364406 0 --升阶魔法-拟尘妖升变
47390001 1 --LCB=司机 卡戎
47390157 0 --LCB=E.G.O 液囊-浮士德
47390254 0 --Dieci协会南部4科 鸿璐
47390004 1 --In Hell We Live, Lament
47390157 1 --LCB=E.G.O 液囊-浮士德
47390254 1 --Dieci协会南部4科 鸿璐
#475
47500000 0 --大神机 伊奥丁
47530003 0 --吉姆夜巡者II
......@@ -1265,7 +1260,7 @@
50221425 1 --符龙王-魔咒
50223155 1 --天王数码兽 钢铁海龙兽
#504
50424220 1 --英灵宝具-必胜黄金之剑-Calibur
50424220 2 --英灵宝具-必胜黄金之剑-Calibur
#514
51414050 1 --地底幽魂的断罪之魂
51414052 1 --审判所有的黑白阎罗
......@@ -1522,11 +1517,7 @@
65080043 0 --失落之妖精 艾尔兰缇娅
65080044 0 --幻想之大妖精 艾尔希萝娅
#657
65710111 1 --许愿神灯 灯之魔精
#658
65810030 0 --盛夏回忆·天牛
65810035 0 --盛夏回忆·瓢虫
65810055 0 --盛夏回忆·蝴蝶
65710111 2 --许愿神灯 灯之魔精
#666
66600000 0 --夜行的领路人 滑头鬼
#672
......@@ -1569,7 +1560,8 @@
#756
75640052 0 --旅人 伊蕾娜
75641008 1 --星之少女骑士 希尔媞
75642000 2 --云图计划 教授
75642000 1 --云图计划 教授
75642012 0 --云图计划 晨曦
75646054 1 --忆梦长廊 琪亚娜
75646135 0 --白虎姬 璐娅
75646159 0 --崩坏神格 樱华
......@@ -1625,7 +1617,7 @@
81010015 1 --真实的一瞬
81010036 2 --湖畔的温柔乡
81010042 1 --情人节的狂恋
81010043 1 --融化的彼此
81010043 0 --融化的彼此
81011001 1 --静谧青龙 拉斯托克
81027019 0 --灯火之苍钟
81030002 1 --单独行动·爱米莉
......@@ -1645,7 +1637,7 @@
81066023 1 --万圣物语 千幽
81066024 1 --多彩记忆 千幽
81066026 1 --甜点猫猫 千幽
81066028 2 --幽灵摇滚 千幽
81066028 1 --幽灵摇滚 千幽
81066031 1 --白色情人节 千幽
81078004 0 --不被吓个半死是不可能的
#819
......
expansions/script/c98633000.lua deleted 100644 → 0
View file @ 1962ada4
wochaoyuan={}
wco=wochaoyuan
POS_FACEUP_DEFENCE=POS_FACEUP_DEFENSE
POS_FACEDOWN_DEFENCE=POS_FACEDOWN_DEFENSE
RACE_CYBERS=RACE_CYBERSE
--通用自肃
function wochaoyuan.slp(c,id)
--spsummon limit
local id=id
if id==0 then return false end
--extra summon
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetOperation(wochaoyuan.sumlimitop)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e2)
end
function wochaoyuan.sumlimitop(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetTarget(wochaoyuan.splimit)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
function wochaoyuan.splimit(e,c,sump,sumtype,sumpos,targetp,se)
return not c:IsSetCard(0x87d)
end
--通用自特召效果
function wochaoyuan.snp(c,id)
local id=id
--SpecialSummon
local e3=Effect.CreateEffect(c)
e3:SetDescription(2)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e3:SetCountLimit(1,id)
e3:SetCost(wochaoyuan.spsumnomalcost)
e3:SetTarget(wochaoyuan.spsumnomalsptg)
e3:SetOperation(wochaoyuan.spsumnomalspop)
c:RegisterEffect(e3)
end
function wochaoyuan.spsumnomalcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function wochaoyuan.spsumnomalsptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function wochaoyuan.spsumnomalspop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end
--通用自特召效果2
function wochaoyuan.snp2(c,id)
local id=id
--SpecialSummon
local e3=Effect.CreateEffect(c)
e3:SetDescription(2)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e3:SetCountLimit(1,id)
e3:SetCost(wochaoyuan.spsumnomalcost2)
e3:SetTarget(wochaoyuan.spsumnomalsptg)
e3:SetOperation(wochaoyuan.spsumnomalspop)
c:RegisterEffect(e3)
end
function wochaoyuan.spsumnomalcost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) end
Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD,e:GetHandler())
end
--通用自特召效果3
function wochaoyuan.snp3(c,id)
local id=id
--SpecialSummon
local e3=Effect.CreateEffect(c)
e3:SetDescription(2)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e3:SetCountLimit(1,id)
e3:SetTarget(wochaoyuan.spsumnomalsptg3)
e3:SetOperation(wochaoyuan.spsumnomalspop3)
c:RegisterEffect(e3)
end
function wochaoyuan.spsumnomalsptg3(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(1-tp,1) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetTargetPlayer(1-tp)
Duel.SetTargetParam(1)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function wochaoyuan.spsumnomalspop3(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
local d=Duel.GetChainInfo(0,CHAININFO_TARGET_PARAM)
if Duel.Draw(1-tp,d,REASON_EFFECT)~=0 then
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end
end
--通用自特召效果(特殊)
function wochaoyuan.ssp(c,id)
local id=id
--SpecialSummon
local e3=Effect.CreateEffect(c)
e3:SetDescription(2)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e3:SetCountLimit(1,id)
e3:SetCost(wochaoyuan.spsumnomalcost)
e3:SetTarget(wochaoyuan.spsumspecialsptg)
e3:SetOperation(wochaoyuan.spsumspecialspop)
c:RegisterEffect(e3)
end
function wochaoyuan.spsumspecialsptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function wochaoyuan.spsumspecialspop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
if Duel.SpecialSummonStep(c,0,tp,tp,false,false,POS_FACEUP) and Duel.SelectYesNo(tp,1370) then
local lv=Duel.AnnounceLevel(tp,1,4,nil)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetValue(lv)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1)
end
Duel.SpecialSummonComplete()
end
--damage（测试用）
function wochaoyuan.dap(c,dam)
local dam=dam
--damage
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DAMAGE)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetTarget(wochaoyuan.damtg(dam))
e1:SetOperation(wochaoyuan.damop)
c:RegisterEffect(e1)
end
function wochaoyuan.damtg(dam)
return function(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetTargetPlayer(1-tp)
Duel.SetTargetParam(dam)
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,dam)
end
end
function wochaoyuan.damop(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Damage(p,d,REASON_EFFECT)
end
--通用同调自肃
function wochaoyuan.sslp(c)
--cannot special summon
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION)
e1:SetRange(LOCATION_EXTRA)
e1:SetValue(wochaoyuan.synlimit)
c:RegisterEffect(e1)
end
function wochaoyuan.synlimit(e,se,sp,st)
return st&SUMMON_TYPE_SYNCHRO==SUMMON_TYPE_SYNCHRO and not se
end
\ No newline at end of file
expansions/script/c98633010.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·西莉斯特
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633010)
wco.ssp(c,98633010)
--double
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_CHAINING)
e1:SetRange(LOCATION_HAND)
e1:SetCondition(s.discon)
e1:SetCost(s.discost)
e1:SetTarget(s.distg)
e1:SetOperation(s.disop)
c:RegisterEffect(e1)
end
function s.discon(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsOnField() and re:GetHandler():IsRelateToEffect(re) and (re:IsActiveType(TYPE_MONSTER)
or (re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and not re:IsHasType(EFFECT_TYPE_ACTIVATE)))
end
function s.discfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsAbleToGraveAsCost()
end
function s.discost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost()
and Duel.IsExistingMatchingCard(s.discfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,e:GetHandler()) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,s.discfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,e:GetHandler())
g:AddCard(e:GetHandler())
Duel.SendtoGrave(g,REASON_COST)
end
function s.distg(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
function s.disop(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateEffect(ev) and re:GetHandler():IsRelateToEffect(re) then
local tc=eg:GetFirst()
if tc:IsOnField() and tc:IsType(TYPE_MONSTER) and tc:IsLocation(LOCATION_MZONE) and tc:IsControler(1-tp) then
Duel.Remove(tc,0,REASON_EFFECT+REASON_TEMPORARY)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCountLimit(1)
e1:SetLabelObject(tc)
e1:SetOperation(s.retop)
Duel.RegisterEffect(e1,tp)
else
Duel.Remove(eg,POS_FACEUP,REASON_EFFECT)
end
end
end
function s.retop(e,tp,eg,ep,ev,re,r,rp)
Duel.ReturnToField(e:GetLabelObject())
end
\ No newline at end of file
expansions/script/c98633020.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·娜奥米亚
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633020)
wco.snp(c,98633020)
--damage
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(1557341,0))
e1:SetCategory(CATEGORY_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_BATTLE_DAMAGE)
e1:SetCondition(s.condition)
e1:SetOperation(s.operation)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EVENT_DAMAGE)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(s.condition2)
c:RegisterEffect(e2)
--damage
local e3=Effect.CreateEffect(c)
e3:SetDescription(1005)
e3:SetCategory(CATEGORY_REMOVE+CATEGORY_DAMAGE)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,98633021)
e3:SetTarget(s.damtg)
e3:SetOperation(s.damop)
c:RegisterEffect(e3)
end
function s.condition(e,tp,eg,ep,ev,re,r,rp)
return ep~=tp
end
function s.condition2(e,tp,eg,ep,ev,re,r,rp)
return ep~=tp and bit.band(r,REASON_BATTLE)==0 and re:GetHandler()==e:GetHandler()
end
function s.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsFacedown() or not c:IsRelateToEffect(e) then return end
local ct=1
local sel=nil
if c:IsLevel(1) then
sel=Duel.SelectOption(tp,aux.Stringid(21915012,1))
else
sel=Duel.SelectOption(tp,aux.Stringid(21915012,1),aux.Stringid(21915012,2))
end
if sel==1 then
ct=ct*-1
end
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetValue(ct)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1)
end
function s.rmfilter(c)
return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsAbleToRemove()
end
function s.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.rmfilter,tp,LOCATION_HAND,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_DECK)
end
function s.damop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,s.rmfilter,tp,LOCATION_HAND,0,1,1,nil)
local tg=g:GetFirst()
if tg==nil then return end
Duel.Remove(tg,POS_FACEDOWN,REASON_EFFECT)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
getmetatable(e:GetHandler()).announce_filter={TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK,OPCODE_ISTYPE,OPCODE_NOT}
local ac=Duel.AnnounceCard(1-tp,table.unpack(getmetatable(e:GetHandler()).announce_filter))
Duel.ConfirmCards(tp,tg)
if tg:GetCode()==ac then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(1-tp,Card.IsAbleToHand,1-tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
else
Duel.SendtoHand(tg,nil,REASON_EFFECT)
Duel.Damage(1-tp,tg:GetLevel()*100,REASON_EFFECT)
end
end
\ No newline at end of file
expansions/script/c98633030.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·伊塔吉雅
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633030)
wco.snp(c,98633030)
--damage
local e3=Effect.CreateEffect(c)
e3:SetDescription(2)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOGRAVE+CATEGORY_TODECK)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,98633031)
e3:SetCost(wco.spsumnomalcost2)
e3:SetTarget(s.sptg)
e3:SetOperation(s.spop)
c:RegisterEffect(e3)
end
function s.spfilter1(c,e,tp)
return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function s.spfilter2(c,e,tp)
return c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,1-tp,false,false)
end
function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
local ft2=Duel.GetLocationCount(1-tp,LOCATION_MZONE)
return ft>0 and ft2>0 and not Duel.IsPlayerAffectedByEffect(tp,59822133)
and Duel.IsExistingMatchingCard(s.spfilter1,tp,LOCATION_DECK,0,2,nil,e,tp)
and Duel.IsExistingMatchingCard(s.spfilter2,1-tp,LOCATION_DECK,0,2,nil,e,tp)
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_DECK)
end
function s.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
if Duel.GetLocationCount(1-tp,LOCATION_MZONE)<1 then return end
local g1=Duel.GetMatchingGroup(s.spfilter1,tp,LOCATION_DECK,0,nil,e,tp)
local g2=Duel.GetMatchingGroup(s.spfilter2,1-tp,LOCATION_DECK,0,nil,e,tp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg1=g1:Select(tp,1,1,nil)
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_SPSUMMON)
local sg2=g2:Select(1-tp,1,1,nil)
local tc1=sg1:GetFirst()
Duel.SpecialSummonStep(tc1,0,tp,tp,false,false,POS_FACEUP)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc1:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_DISABLE_EFFECT)
e2:SetValue(RESET_TURN_SET)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
tc1:RegisterEffect(e2)
local tc2=sg2:GetFirst()
Duel.SpecialSummonStep(tc2,0,1-tp,1-tp,false,false,POS_FACEUP)
local e3=e1:Clone()
tc2:RegisterEffect(e3)
local e4=e2:Clone()
tc2:RegisterEffect(e4)
Duel.SpecialSummonComplete()
if tc1:GetAttack()>tc2:GetAttack() then
Duel.SendtoHand(tc1,nil,REASON_EFFECT)
Duel.SendtoGrave(tc2,REASON_EFFECT)
elseif tc2:GetAttack()>tc1:GetAttack() then
Duel.SendtoHand(tc2,nil,REASON_EFFECT)
Duel.SendtoGrave(tc1,REASON_EFFECT)
else
local tg=Group.FromCards(tc1,tc2)
Duel.SendtoDeck(tg,nil,SEQ_DECKBOTTOM,REASON_EFFECT)
end
end
expansions/script/c98633040.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·艾瑞丽尔
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633040)
wco.snp(c,98633040)
--damage
local e3=Effect.CreateEffect(c)
e3:SetDescription(2)
e3:SetCategory(CATEGORY_DRAW)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,98633041)
e3:SetTarget(s.drtg)
e3:SetOperation(s.drop)
c:RegisterEffect(e3)
--tuner
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(14169843,1))
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCode(EVENT_RECOVER)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,98633042)
e2:SetCondition(s.tncon)
e2:SetTarget(s.tntg)
e2:SetOperation(s.tnop)
c:RegisterEffect(e2)
end
function s.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local h1=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
if e:GetHandler():IsLocation(LOCATION_HAND) then h1=h1-1 end
local h2=Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)
local d1=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)
local d2=Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)
return h1>1 and h2>1 and d1>1 and d2>1
end
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,PLAYER_ALL,2)
end
function s.drop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)<2 or Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)<2 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
local g1=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_HAND,0,2,2,nil)
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_DISCARD)
local g2=Duel.SelectMatchingCard(1-tp,aux.TRUE,1-tp,LOCATION_HAND,0,2,2,nil)
g1:Merge(g2)
Duel.SendtoGrave(g1,REASON_EFFECT+REASON_DISCARD)
Duel.BreakEffect()
Duel.Draw(tp,2,REASON_EFFECT)
local dc1=Duel.GetOperatedGroup()
Duel.Draw(1-tp,2,REASON_EFFECT)
local dc2=Duel.GetOperatedGroup()
dc1:Merge(dc2)
local atk=0
local tc=dc1:GetFirst()
while tc do
Duel.ConfirmCards(tp,tc)
Duel.ConfirmCards(1-tp,tc)
if tc:IsType(TYPE_MONSTER) then
atk=atk+tc:GetAttack()
end
tc=dc1:GetNext()
end
Duel.Recover(tp,atk,REASON_EFFECT)
Duel.ShuffleHand(tp)
Duel.ShuffleHand(1-tp)
end
function s.tncon(e,tp,eg,ep,ev,re,r,rp)
return ep==tp
end
function s.tnfilter(c)
return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_LIGHT)
end
function s.tntg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and s.tnfilter(chkc) end
if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,s.tnfilter,tp,LOCATION_MZONE,0,1,1,nil)
end
function s.tnop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) and tc:IsFaceup() then
local ct=1
local sel=nil
if tc:IsLevel(1) then
sel=Duel.SelectOption(tp,aux.Stringid(21915012,1))
else
sel=Duel.SelectOption(tp,aux.Stringid(21915012,1),aux.Stringid(21915012,2))
end
if sel==1 then
ct=ct*-1
end
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetValue(ct)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
tc:RegisterEffect(e1)
if not tc:IsType(TYPE_TUNER) and Duel.SelectYesNo(tp,aux.Stringid(98633040,0)) then
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetCode(EFFECT_ADD_TYPE)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
e2:SetValue(TYPE_TUNER)
tc:RegisterEffect(e2)
end
end
end
\ No newline at end of file
expansions/script/c98633050.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·贝利嘉德
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633050)
wco.snp2(c,98633050)
--damage
local e3=Effect.CreateEffect(c)
e3:SetDescription(1005)
e3:SetCategory(CATEGORY_REMOVE)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,98633051)
e3:SetTarget(s.rmtg)
e3:SetOperation(s.rmop)
c:RegisterEffect(e3)
end
function s.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_HAND,1,nil,tp,POS_FACEDOWN) end
Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,1-tp,LOCATION_HAND)
end
function s.rmop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_HAND,nil,tp,POS_FACEDOWN)
if g:GetCount()==0 then return end
local sg=g:RandomSelect(tp,1)
local tc=sg:GetFirst()
Duel.Remove(tc,POS_FACEDOWN,REASON_EFFECT)
tc:RegisterFlagEffect(32013448,RESET_EVENT+RESETS_STANDARD,0,1)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetCountLimit(1)
e1:SetCondition(s.retcon)
e1:SetOperation(s.retop)
e1:SetLabelObject(tc)
e1:SetReset(RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
Duel.RegisterEffect(e1,tp)
end
function s.retcon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffect(32013448)==0 then
e:Reset()
return false
else
return Duel.GetTurnPlayer()~=tp
end
end
function s.retop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
Duel.SendtoHand(tc,nil,REASON_EFFECT)
end
\ No newline at end of file
expansions/script/c98633060.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·普拉薇安
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633060)
wco.snp2(c,98633060)
--tohand
local e3=Effect.CreateEffect(c)
e3:SetDescription(1109)
e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,98633061)
e3:SetCost(s.thcost)
e3:SetTarget(s.thtg)
e3:SetOperation(s.thop)
c:RegisterEffect(e3)
end
function s.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemoveAsCost,tp,LOCATION_GRAVE,0,4,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemoveAsCost,tp,LOCATION_GRAVE,0,4,4,nil)
Duel.Remove(g,POS_FACEUP,REASON_COST)
end
function s.thfilter(c)
return c:IsSetCard(0x87d) and c:IsAbleToHand()
end
function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function s.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
expansions/script/c98633070.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·莎尔索斯
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633070)
wco.snp2(c,98633070)
--ret&draw
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(581014,1))
e1:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1,98633071)
e1:SetTarget(s.target1)
e1:SetOperation(s.operation1)
c:RegisterEffect(e1)
end
function s.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and chkc:IsAbleToDeck() end
if chk==0 then return Duel.IsPlayerCanDraw(tp,1) and Duel.IsExistingTarget(s.filter1,tp,LOCATION_REMOVED,0,3,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectTarget(tp,Card.IsAbleToDeck,tp,LOCATION_REMOVED,0,3,3,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end
function s.operation1(e,tp,eg,ep,ev,re,r,rp)
local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
if not tg or tg:FilterCount(Card.IsRelateToEffect,nil,e)~=3 then return end
Duel.SendtoDeck(tg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
local g=Duel.GetOperatedGroup()
if g:IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then Duel.ShuffleDeck(tp) end
local ct=g:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
if ct==3 then
Duel.BreakEffect()
Duel.Draw(tp,1,REASON_EFFECT)
end
end
\ No newline at end of file
expansions/script/c98633080.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·帕尔妮兹
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633080)
wco.snp2(c,98633080)
--destroy
local e2=Effect.CreateEffect(c)
e2:SetDescription(1131)
e2:SetCategory(CATEGORY_DISABLE)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,98633081)
e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
e2:SetTarget(s.distg)
e2:SetOperation(s.disop)
c:RegisterEffect(e2)
end
function s.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingTarget(aux.NegateEffectMonsterFilter,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_DISABLE,nil,1,0,0)
end
function s.disop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
local g=Duel.SelectTarget(tp,aux.NegateEffectMonsterFilter,tp,0,LOCATION_ONFIELD,1,1,nil)
local tc=g:GetFirst()
if ((tc:IsFaceup() and not tc:IsDisabled()) or tc:IsType(TYPE_TRAPMONSTER)) and tc:IsRelateToEffect(e) then
Duel.NegateRelatedChain(tc,RESET_TURN_SET)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EFFECT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetCode(EFFECT_DISABLE_EFFECT)
e2:SetValue(RESET_TURN_SET)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e2)
if tc:IsType(TYPE_TRAPMONSTER) then
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EFFECT_DISABLE_TRAPMONSTER)
e3:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e3)
end
end
Duel.BreakEffect()
Duel.Destroy(tc,REASON_EFFECT)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_DISABLE)
e4:SetTargetRange(LOCATION_ONFIELD,LOCATION_ONFIELD)
e4:SetTarget(s.distg1)
e4:SetLabelObject(tc)
e4:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e4,tp)
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e5:SetCode(EVENT_CHAIN_SOLVING)
e5:SetCondition(s.discon2)
e5:SetOperation(s.disop2)
e5:SetLabelObject(tc)
e5:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e5,tp)
local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_FIELD)
e6:SetCode(EFFECT_DISABLE_TRAPMONSTER)
e6:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e6:SetTarget(s.distg2)
e6:SetLabelObject(tc)
e6:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e6,tp)
end
function s.distg1(e,c)
local tc=e:GetLabelObject()
if c:IsType(TYPE_SPELL+TYPE_TRAP) then
return c:IsOriginalCodeRule(tc:GetOriginalCodeRule())
else
return c:IsOriginalCodeRule(tc:GetOriginalCodeRule()) and (c:IsType(TYPE_EFFECT) or c:GetOriginalType()&TYPE_EFFECT~=0)
end
end
function s.distg2(e,c)
local tc=e:GetLabelObject()
return c:IsOriginalCodeRule(tc:GetOriginalCodeRule())
end
function s.discon2(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
return re:GetHandler():IsOriginalCodeRule(tc:GetOriginalCodeRule())
end
function s.disop2(e,tp,eg,ep,ev,re,r,rp)
Duel.NegateEffect(ev)
end
\ No newline at end of file
expansions/script/c98633090.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·玛奇尤姆
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633090)
wco.snp3(c,98633090)
--Destroy
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(76774528,0))
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCountLimit(1,98633091)
e1:SetRange(LOCATION_MZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCategory(CATEGORY_DESTROY)
e1:SetTarget(s.destg)
e1:SetOperation(s.desop)
c:RegisterEffect(e1)
--to hand
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(21915012,2))
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET)
e2:SetCode(EVENT_DESTROYED)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,98633092)
e2:SetCondition(s.lvcon)
e2:SetTarget(s.lvtg)
e2:SetOperation(s.lvop)
c:RegisterEffect(e2)
end
function s.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end
if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,0,1,nil)
and Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g1=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,0,1,1,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g2=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,1,nil)
g1:Merge(g2)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g1,2,0,0)
end
function s.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
local tg=g:Filter(Card.IsRelateToEffect,nil,e)
if tg:GetCount()>0 then
Duel.Destroy(tg,REASON_EFFECT)
end
end
function s.cfilter(c,tp)
return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsPreviousControler(1-tp) and c:IsPreviousLocation(LOCATION_ONFIELD)
end
function s.lvcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(s.cfilter,1,nil,tp)
end
function s.lvfilter(c)
return c:IsFaceup() and c:IsSetCard(0x87d)
end
function s.lvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.lvfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(s.lvfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,s.lvfilter,tp,LOCATION_MZONE,0,1,1,nil,tp)
end
function s.lvop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
local lv=tc:GetLevel()
local alv=8
if lv<8 then alv=lv end
local clv=Duel.AnnounceLevel(tp,1,alv,nil)
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetValue(-clv)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
end
\ No newline at end of file
expansions/script/c98633100.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·库托里希
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633100)
wco.snp3(c,98633100)
--recover
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(21915012,2))
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,98633101)
e1:SetOperation(s.lvop)
c:RegisterEffect(e1)
end
function s.lvop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local lv=c:GetLevel()
local alv=10
if lv<10 then alv=lv end
local clv=Duel.AnnounceLevel(tp,1,alv,nil)
if c:IsRelateToEffect(e) and c:IsFaceup() then
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_UPDATE_LEVEL)
e4:SetValue(-clv)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE)
e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e4)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x87d))
e1:SetValue(clv*100)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_UPDATE_DEFENSE)
Duel.RegisterEffect(e2,tp)
end
end
\ No newline at end of file
expansions/script/c98633110.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·露泽莫尔
Duel.LoadScript("c98633000.lua")
function c98633110.initial_effect(c)
wco.slp(c,98633110)
wco.snp3(c,98633110)
--recover
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(21915012,2))
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,98633111)
e1:SetOperation(c98633110.lvop)
c:RegisterEffect(e1)
end
function c98633110.lvop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local lv=c:GetLevel()
local alv=11
if lv<alv then alv=lv end
local clv=Duel.AnnounceLevel(tp,1,alv,nil)
if c:IsRelateToEffect(e) and c:IsFaceup() then
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_UPDATE_LEVEL)
e4:SetValue(-clv)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE)
e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e4)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetValue(-clv*200)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_UPDATE_DEFENSE)
Duel.RegisterEffect(e2,tp)
--disable
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_DISABLE)
e3:SetRange(LOCATION_PZONE)
e3:SetTargetRange(0,LOCATION_MZONE)
e3:SetTarget(c98633110.distg)
Duel.RegisterEffect(e3,tp)
end
end
function c98633110.distg(e,c)
return c:IsAttack(0)
end
\ No newline at end of file
expansions/script/c98633120.lua deleted 100644 → 0
View file @ 1962ada4
--炽光圣堂
local s,id,o=GetID()
function s.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,98633120+EFFECT_COUNT_CODE_OATH)
e1:SetOperation(s.activate)
c:RegisterEffect(e1)
--cannot target
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_FZONE)
e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e2:SetCondition(s.ndcon)
e2:SetValue(aux.tgoval)
c:RegisterEffect(e2)
--indes
local e3=e2:Clone()
e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e3:SetValue(aux.indoval)
c:RegisterEffect(e3)
--Recover
local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_RECOVER)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e4:SetCode(EVENT_PHASE+PHASE_END)
e4:SetRange(LOCATION_FZONE)
e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e4:SetCountLimit(1)
e4:SetTarget(s.rectg)
e4:SetOperation(s.recop)
c:RegisterEffect(e4)
--special summon
local e5=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(44887817,0))
e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
e5:SetType(EFFECT_TYPE_IGNITION)
e5:SetCountLimit(1,98633121)
e5:SetRange(LOCATION_FZONE)
e5:SetTarget(s.sptg)
e5:SetOperation(s.spop)
c:RegisterEffect(e5)
end
function s.thfilter(c)
return c:IsSetCard(0x87d) and c:IsAbleToHand()
end
function s.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(s.thfilter,tp,LOCATION_DECK,0,nil)
if g:GetCount()>0 and Duel.SelectYesNo(tp,1109) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:Select(tp,1,1,nil)
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
end
end
function s.ndcfilter(c)
return c:IsFaceup() and c:IsSetCard(0x87d) and c:IsType(TYPE_SYNCHRO)
end
function s.ndcon(e)
return Duel.IsExistingMatchingCard(s.ndcfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end
function s.rccfilter(c)
return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_LIGHT)
end
function s.rectg(e,tp,eg,ep,ev,re,r,rp,chk)
local sg=Duel.GetMatchingGroup(s.rccfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if chk==0 then return #sg>0 and Duel.IsExistingMatchingCard(s.ndcfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(#sg*500)
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,#sg*500)
end
function s.recop(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Recover(p,d,REASON_EFFECT)
end
function s.spfilter(c,e,tp)
return c:IsSetCard(0x87d) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.spfilter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp)
and Duel.IsExistingMatchingCard(s.ndcfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end
function s.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
end
end
\ No newline at end of file
expansions/script/c98633130.lua deleted 100644 → 0
View file @ 1962ada4
--圣律之智慧·克洛托
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.sslp(c,98633130)
--synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x87d),aux.NonTuner(Card.IsAttribute,ATTRIBUTE_LIGHT),2)
c:EnableReviveLimit()
--indes
local e1=Effect.CreateEffect(c)
e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetRange(LOCATION_MZONE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(aux.TargetBoolFunction(Card.IsAttribute,ATTRIBUTE_LIGHT))
e1:SetValue(1)
c:RegisterEffect(e1)
--negate
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(84815190,1))
e2:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_CHAINING)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,98633130)
e2:SetCondition(s.discon)
e2:SetTarget(s.distg)
e2:SetOperation(s.disop)
c:RegisterEffect(e2)
--to hand
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(22842126,1))
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,98633131)
e3:SetTarget(s.thtg)
e3:SetOperation(s.thop)
c:RegisterEffect(e3)
end
function s.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
end
function s.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
e:GetHandler():RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(84815190,3))
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
end
end
function s.disop(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Remove(eg,POS_FACEUP,REASON_EFFECT)
end
end
function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,LOCATION_DECK,0,3,nil)
and Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,0,LOCATION_DECK,3,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function s.thop(e,tp,eg,ep,ev,re,r,rp)
local g1=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,LOCATION_DECK,0,nil)
local g2=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,0,LOCATION_DECK,nil)
if #g1<3 then return end
if #g2<3 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT)
local sg1=g1:Select(tp,3,3,nil)
Duel.ConfirmCards(1-tp,sg1)
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_ATOHAND)
local tg1=sg1:Select(1-tp,1,1,nil)
tg1:GetFirst():SetStatus(STATUS_TO_HAND_WITHOUT_CONFIRM,true)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT)
local sg2=g2:Select(1-tp,3,3,nil)
Duel.ConfirmCards(tp,sg2)
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_ATOHAND)
local tg2=sg2:Select(tp,1,1,nil)
tg2:GetFirst():SetStatus(STATUS_TO_HAND_WITHOUT_CONFIRM,true)
tg1:Merge(tg2)
local rmg=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_HAND,nil)
if Duel.SendtoHand(tg1,nil,REASON_EFFECT)~=0 and #rmg>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local rg=rmg:Select(tp,1,1,nil)
Duel.Remove(rg,POS_FACEDOWN,REASON_EFFECT)
end
end
\ No newline at end of file
expansions/script/c98633140.lua deleted 100644 → 0
View file @ 1962ada4
--圣律之力量·拉克希斯
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.sslp(c,98633140)
--synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x87d),aux.NonTuner(Card.IsAttribute,ATTRIBUTE_LIGHT),2)
c:EnableReviveLimit()
--indes
local e1=Effect.CreateEffect(c)
e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetRange(LOCATION_MZONE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(aux.TargetBoolFunction(Card.IsAttribute,ATTRIBUTE_LIGHT))
e1:SetValue(1)
c:RegisterEffect(e1)
--draw
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetCode(EVENT_BATTLE_DESTROYING)
e2:SetCondition(aux.bdocon)
e2:SetTarget(s.destg)
e2:SetOperation(s.desop)
c:RegisterEffect(e2)
--destroy
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,98633141)
e3:SetCost(s.cost)
e3:SetTarget(s.tdestg)
e3:SetOperation(s.tdesop)
c:RegisterEffect(e3)
end
function s.desfilter(c)
return c:IsFaceup()
end
function s.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.desfilter,tp,0,LOCATION_MZONE,1,nil) end
local g=Duel.GetMatchingGroup(s.desfilter,tp,0,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
end
function s.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(s.desfilter,tp,0,LOCATION_MZONE,nil)
Duel.Destroy(g,REASON_EFFECT)
end
function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
e:SetLabel(100)
return true
end
end
function s.tdestg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
local rg=Duel.GetMatchingGroup(Card.IsDiscardable,tp,LOCATION_HAND,0,nil)
if chkc then return false end
if chk==0 then
if e:GetLabel()~=100 then return false end
e:SetLabel(0)
return g:GetCount()>0 and rg:GetCount()>0
end
e:SetLabel(0)
local ct=math.min(#g,#rg)
local pay_list = {}
for p=1,ct do
if #rg>=ct then table.insert(pay_list,p) end
end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(98633140,0))
local pay=Duel.AnnounceNumber(tp,table.unpack(pay_list))
Duel.DiscardHand(tp,Card.IsDiscardable,pay,pay,REASON_COST+REASON_DISCARD)
local sg=g:Select(tp,pay,pay,nil)
Duel.SetTargetCard(sg)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,sg,sg:GetCount(),0,0)
end
function s.tdesop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
local ct=Duel.Destroy(g,REASON_EFFECT)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END,2)
e1:SetValue(ct*1000)
c:RegisterEffect(e1)
end
expansions/script/c98633150.lua deleted 100644 → 0
View file @ 1962ada4
--圣律之信仰·阿特洛波斯
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.sslp(c,98633150)
--synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x87d),aux.NonTuner(Card.IsAttribute,ATTRIBUTE_LIGHT),2)
c:EnableReviveLimit()
--indes
local e1=Effect.CreateEffect(c)
e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetRange(LOCATION_MZONE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(aux.TargetBoolFunction(Card.IsAttribute,ATTRIBUTE_LIGHT))
e1:SetValue(aux.tgoval)
c:RegisterEffect(e1)
--destroy
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_LEAVE_FIELD)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,98633150)
e2:SetCondition(s.descon)
e2:SetTarget(s.destg)
e2:SetOperation(s.desop)
c:RegisterEffect(e2)
--damage conversion
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_REVERSE_DAMAGE)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetTargetRange(1,0)
e3:SetValue(s.rev)
c:RegisterEffect(e3)
end
function s.drcfilter(c,tp)
return c:IsReason(REASON_EFFECT) and c:GetReasonPlayer()==1-tp
end
function s.descon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(s.drcfilter,1,nil,tp)
end
function s.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() end
if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end
function s.desop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then Duel.Destroy(tc,REASON_EFFECT) end
end
function s.rev(e,re,r,rp,rc)
return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
end
\ No newline at end of file
expansions/script/c98633160.lua deleted 100644 → 0
View file @ 1962ada4
--圣律·萨普戴伊
Duel.LoadScript("c98633000.lua")
local s,id,o=GetID()
function s.initial_effect(c)
wco.slp(c,98633160)
wco.snp3(c,98633160)
--recover
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(21915012,2))
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,98633161)
e1:SetOperation(s.lvop)
c:RegisterEffect(e1)
end
function s.lvop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local lv=c:GetLevel()
local alv=9
if lv<alv then alv=lv end
local clv=Duel.AnnounceLevel(tp,1,alv,nil)
if c:IsRelateToEffect(e) and c:IsFaceup() then
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_UPDATE_LEVEL)
e4:SetValue(-clv)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE)
e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e4)
local e3=e4:Clone()
e3:SetCode(EFFECT_EXTRA_ATTACK_MONSTER)
e3:SetValue(clv)
c:RegisterEffect(e3)
end
end
\ No newline at end of file
expansions/strings.conf
View file @ a9cad018
......@@ -1140,9 +1140,6 @@
#举火人 3146095889 657
#AddCodeList(c,65710000) 万象笔记卡名记述
#乳主份子 858329915 658 0xa3 0xa30-0xa3f
!setname 0xa31 盛夏回忆
#今晚有宵夜吗 3080579137 666 0x660-0x66f
!setname 0x5660 百鬼夜行
!setname 0x666 幻星集
......@@ -1413,8 +1410,6 @@
##持剑者 380518667 221
##◇兔锅 1874883039 222
##◇星空璀璨之地 3077843411 280-281
#◇礟襪 2829508765 330-331
!setname 0x87d 圣律
##虹霓文花 2538420075 395
##雾羽小姐 185591910 471
##◇花糖 2236141431 573-574
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment