Skip to content

Y
ygopro-222DIY-cards
You need to sign in or sign up before continuing.
Commit 1ca7d864 authored by Tachibana's avatar Tachibana
Browse files
Options

ybb

parent 7cc2bf38
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 15 additions and 1171 deletions
.gitlab-ci.yml
View file @ 1ca7d864
...@@ -5,7 +5,7 @@ stages: ...@@ -5,7 +5,7 @@ stages:
variables: variables:
GIT_DEPTH: "1" GIT_DEPTH: "1"
LAST_UPDATE_DATE: "2022.3.14" LAST_UPDATE_DATE: "2022.3.14"
CURRENT_UPDATE_DATE: "2022.3.27" CURRENT_UPDATE_DATE: "2022.3.28"
redtext: redtext:
stage: prepare stage: prepare
......
deck/2022-03-27 3rd.ydk
View file @ 1ca7d864
...@@ -28,16 +28,6 @@ ...@@ -28,16 +28,6 @@
17032550 17032550
17032560 17032560
17032570 17032570
18020051
18020052
18020053
18020054
18020061
18020062
18020063
18020064
18020065
18020066
23001000 23001000
23001001 23001001
23001002 23001002
...@@ -67,12 +57,6 @@ ...@@ -67,12 +57,6 @@
17032480 17032480
17032490 17032490
!side !side
18020055
18020056
18020057
18020058
18020059
18020060
23001006 23001006
23001007 23001007
64800129 64800129
......
expansions/222DIY.cdb
View file @ 1ca7d864
No preview for this file type
expansions/lflist.conf
View file @ 1ca7d864
...@@ -86,12 +86,12 @@ ...@@ -86,12 +86,12 @@
09320009 0 --大波静流 09320009 0 --大波静流
09320233 1 --尸位素餐 09320233 1 --尸位素餐
09330001 1 --陷阵营首-高顺 09330001 1 --陷阵营首-高顺
09330008 1 --陷阵营地 09330003 0 --陷阵营统帅
09330003 1 --陷阵营统帅 09330008 0 --陷阵营地
09330012 0 --陷阵营·奔袭！ 09330012 0 --陷阵营·奔袭！
09330015 0 --冲锋陷阵！ 09330015 0 --冲锋陷阵！
09330016 1 --陷阵营的战前仪式 09330016 1 --陷阵营的战前仪式
09330019 2 --陷阵营花-吕姬 09330019 1 --陷阵营花-吕姬
09390010 0 --早见虹羽·礼 09390010 0 --早见虹羽·礼
09399400 1 --替身箭-寻资之矢 09399400 1 --替身箭-寻资之矢
09399420 1 --替身使者-大柳贤 09399420 1 --替身使者-大柳贤
...@@ -350,7 +350,8 @@ ...@@ -350,7 +350,8 @@
14010236 1 --微型黑洞 14010236 1 --微型黑洞
#141 #141
14140010 1 --祝祭初学 14140010 1 --祝祭初学
14140012 1 --永夜的灰度 14140011 0 --呜喵呜喵·啪啪啪
14140012 0 --永夜的灰度
#143 #143
14370004 0 --灰烬少女的原核 14370004 0 --灰烬少女的原核
#148 #148
...@@ -1219,7 +1220,7 @@ ...@@ -1219,7 +1220,7 @@
64800015 1 --杰作拼图7067-『太阳』 64800015 1 --杰作拼图7067-『太阳』
64800022 0 --杰作拼图1453-『皇帝』 64800022 0 --杰作拼图1453-『皇帝』
64800023 0 --杰作拼图0011-『正义』 64800023 0 --杰作拼图0011-『正义』
64800024 1 --杰作拼图8000-『塔』 64800024 0 --杰作拼图8000-『塔』
64800025 0 --杰作拼图0041-『倒吊人』 64800025 0 --杰作拼图0041-『倒吊人』
64800026 0 --土著神 都知久 64800026 0 --土著神 都知久
64800042 1 --星系守护神 半人马星神 64800042 1 --星系守护神 半人马星神
...@@ -1279,6 +1280,7 @@ ...@@ -1279,6 +1280,7 @@
64837017 0 --白色相册 64837017 0 --白色相册
64837018 0 --友希兰 64837018 0 --友希兰
64837023 0 --绝对宣言-独奏会- 64837023 0 --绝对宣言-独奏会-
64837027 0 --见习魔女 弦卷心
#650 #650
65001014 1 --魔梦夜之谜 司书 65001014 1 --魔梦夜之谜 司书
65001022 0 --血脉的二重暗影 65001022 0 --血脉的二重暗影
...@@ -1343,7 +1345,6 @@ ...@@ -1343,7 +1345,6 @@
72412350 0 --镜月花 72412350 0 --镜月花
72499010 1 --妖樱火 72499010 1 --妖樱火
#729 #729
72979221 1 --凋落的樱花
72979222 1 --雪之洗礼 72979222 1 --雪之洗礼
72979224 1 --雪之冥王 72979224 1 --雪之冥王
72979226 0 --雪之神圣 72979226 0 --雪之神圣
......
expansions/script/c13959994.lua
View file @ 1ca7d864
This diff is collapsed.
expansions/script/c13959996.lua
View file @ 1ca7d864
This source diff could not be displayed because it is too large. You can view the blob instead.
expansions/script/c18020051.lua deleted 100644 → 0
View file @ 7cc2bf38
--龙之咆哮-Dragon Breath-
local m=18020051
local cm=_G["c"..m]
Mechavanus=Mechavanus or {}
function Mechavanus.dresser(c,code)
aux.AddCodeList(c,m)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e0:SetCode(EVENT_SPSUMMON_SUCCESS)
e0:SetOperation(Mechavanus.roar_e1_op(nil))
c:RegisterEffect(e0)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_TODECK+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,code)
e1:SetTarget(Mechavanus.dresser_e1_tg)
e1:SetOperation(Mechavanus.dresser_e1_op)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetDescription(aux.Stringid(m,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetCountLimit(1,code+100)
e2:SetTarget(Mechavanus.dresser_e2_tg)
e2:SetOperation(Mechavanus.dresser_e2_op)
c:RegisterEffect(e2)
return e1,e2
end
function Mechavanus.roar(c,code,op1,tg2,op2)
aux.AddCodeList(c,m)
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsCode,m),aux.NonTuner(nil),1)
c:EnableReviveLimit()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetOperation(Mechavanus.roar_e1_op(op1))
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_DESTROYED)
e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_PLAYER_TARGET)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,code+100)
e2:SetCondition(Mechavanus.roar_e2_con)
e2:SetTarget(tg2)
e2:SetOperation(op2)
c:RegisterEffect(e2)
return e1,e2
end
function Mechavanus.D_roar(c,code,op1,op2)
aux.AddCodeList(c,code-3)
aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsSynchroType,TYPE_SYNCHRO),1)
c:EnableReviveLimit()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetOperation(Mechavanus.D_roar_e1_op(op1,op2))
c:RegisterEffect(e1)
return e1
end
----------------------------------------------
function Mechavanus.dresser_e1_tgf(c)
return c:IsCode(m) and c:IsAbleToHand()
end
function Mechavanus.dresser_e1_tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsPublic() and e:GetHandler():IsAbleToDeck() and Duel.IsExistingMatchingCard(Mechavanus.dresser_e1_tgf,tp,LOCATION_DECK,0,1,1,nil) end
Duel.ConfirmCards(1-tp,e:GetHandler())
Duel.ShuffleHand(tp)
Duel.SetOperationInfo(0,CATEGORY_TODECK,e:GetHandler(),1,0,0)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,0,LOCATION_DECK)
end
function Mechavanus.dresser_e1_op(e,tp,eg,ep,ev,re,r,rp)
if Duel.SendtoDeck(e:GetHandler(),nil,2,REASON_EFFECT)==0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,Mechavanus.dresser_e1_tgf,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
function Mechavanus.dresser_e2_tgf(c,e,tp)
return c:IsCode(m) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function Mechavanus.dresser_e2_tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not Duel.IsPlayerAffectedByEffect(tp,59822133)
and Duel.GetLocationCount(tp,LOCATION_MZONE)>1
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false)
and not e:GetHandler():IsPublic()
and Duel.IsExistingMatchingCard(Mechavanus.dresser_e2_tgf,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_HAND+LOCATION_GRAVE)
end
function Mechavanus.dresser_e2_op(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end
if Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
if Duel.GetLocationCount(tp,LOCATION_MZONE)<2 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,Mechavanus.dresser_e2_tgf,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then
g:AddCard(e:GetHandler())
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
function Mechavanus.roar_e1_op(op1)
return function(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
if op1 then op1(e,tp,eg,ep,ev,re,r,rp) end
end
end
function Mechavanus.roar_e2_conf(c,tp)
return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousControler(1-tp) and c:IsReason(REASON_BATTLE+REASON_EFFECT)
end
function Mechavanus.roar_e2_con(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(Mechavanus.roar_e2_conf,1,nil,tp)
end
function Mechavanus.D_roar_e1_op(op1,op2)
return function(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
if op1 then op1(e,tp,eg,ep,ev,re,r,rp) end
if c:IsSummonType(SUMMON_TYPE_SYNCHRO) then
c:RegisterFlagEffect(m+1,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,3))
if op2 then op2(e,tp,eg,ep,ev,re,r,rp) end
end
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,1))
e1:SetCategory(CATEGORY_TOEXTRA+CATEGORY_TODECK)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetTarget(Mechavanus.D_roar_e1_op_tg)
e1:SetOperation(Mechavanus.D_roar_e1_op_op)
c:RegisterEffect(e1)
end
end
function Mechavanus.D_roar_e1_op_tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():GetFlagEffect(m)>0 end
Duel.SetOperationInfo(0,CATEGORY_TOEXTRA,e:GetHandler(),1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end
function Mechavanus.D_roar_e1_op_opf(c,e,tp,code)
return c:IsCode(code-3) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function Mechavanus.D_roar_e1_op_opf1(c)
return c:IsCode(18020062) and c:IsAbleToGrave() and c:IsFaceup()
end
function Mechavanus.D_roar_e1_op_op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) or c:IsFacedown() then return end
Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
if not c:IsLocation(LOCATION_EXTRA) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,Mechavanus.D_roar_e1_op_opf,tp,LOCATION_GRAVE,0,1,1,nil,e,tp,c:GetCode())
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
----------------------------------------------
if not cm then return end
function cm.initial_effect(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
e0:SetValue(1)
c:RegisterEffect(e0)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE+LOCATION_HAND)
e1:SetCountLimit(1,m)
e1:SetCost(cm.cos1)
e1:SetTarget(cm.tg1)
e1:SetOperation(cm.op1)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(cm.con2)
e2:SetTarget(cm.tg2)
e2:SetOperation(cm.op2)
c:RegisterEffect(e2)
end
--e1
function cm.cos1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsReleasable() end
Duel.Release(e:GetHandler(),REASON_COST)
end
function cm.tgf11(c,att)
return c.Mechavanus and c:IsAbleToHand() and c:IsAttribute(att)
end
function cm.tgf1(c,tp)
return c.Mechavanus and c:IsType(TYPE_SYNCHRO) and Duel.IsExistingMatchingCard(cm.tgf11,tp,LOCATION_DECK,0,1,nil,c:GetAttribute())
end
function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgf1,tp,LOCATION_EXTRA,0,1,nil,tp) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function cm.op1(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
local tc=Duel.SelectMatchingCard(tp,cm.tgf1,tp,LOCATION_EXTRA,0,1,1,nil,tp):GetFirst()
Duel.ConfirmCards(1-tp,tc)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
tc=Duel.SelectMatchingCard(tp,cm.tgf11,tp,LOCATION_DECK,0,1,1,nil,tc:GetAttribute())
if tc then
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
end
end
--e2
function cm.con2(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_CHAINING) and Duel.GetTurnPlayer()~=tp
end
function cm.tgf2(c,tc)
return c.Mechavanus and c:IsSynchroSummonable(tc)
end
function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgf2,tp,LOCATION_EXTRA,0,1,nil,e:GetHandler()) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function cm.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:GetControler()~=tp or not c:IsRelateToEffect(e) then return end
local g=Duel.GetMatchingGroup(cm.tgf2,tp,LOCATION_EXTRA,0,nil,c)
if g:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:Select(tp,1,1,nil)
Duel.SynchroSummon(tp,sg:GetFirst(),c)
end
end
\ No newline at end of file
expansions/script/c18020052.lua deleted 100644 → 0
View file @ 7cc2bf38
--龙姬装者 安藤创世
local m=18020052
local cm=_G["c"..m]
if not pcall(function() require("expansions/script/c18020051") end) then require("script/c18020051") end
cm.Mechavanus=true
function cm.initial_effect(c)
local e1,e2=Mechavanus.dresser(c,m)
end
expansions/script/c18020053.lua deleted 100644 → 0
View file @ 7cc2bf38
--龙姬装者 寺岛诗织
local m=18020053
local cm=_G["c"..m]
if not pcall(function() require("expansions/script/c18020051") end) then require("script/c18020051") end
cm.Mechavanus=true
function cm.initial_effect(c)
local e1,e2=Mechavanus.dresser(c,m)
end
expansions/script/c18020054.lua deleted 100644 → 0
View file @ 7cc2bf38
--龙姬装者 板场弓美
local m=18020054
local cm=_G["c"..m]
if not pcall(function() require("expansions/script/c18020051") end) then require("script/c18020051") end
cm.Mechavanus=true
function cm.initial_effect(c)
local e1,e2=Mechavanus.dresser(c,m)
end
expansions/script/c18020055.lua deleted 100644 → 0
View file @ 7cc2bf38
--龙姬咆哮-安藤创世
local m=18020055
local cm=_G["c"..m]
if not pcall(function() require("expansions/script/c18020051") end) then require("script/c18020051") end
cm.Mechavanus=true
function cm.initial_effect(c)
local e1,e2=Mechavanus.roar(c,m,cm.op1,cm.tg2,cm.op2)
end
--e1
function cm.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_DISABLE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.optg1)
e1:SetOperation(cm.opop1)
c:RegisterEffect(e1)
end
function cm.optg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and aux.NegateAnyFilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
local g=Duel.SelectTarget(tp,aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
end
function cm.opop1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
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+RESET_PHASE+PHASE_END)
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+RESET_PHASE+PHASE_END)
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+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e3)
end
end
end
--e2
function cm.tgf2(c)
return (c.Mechavanus or c:IsCode(18020051)) and c:IsAbleToHand()
end
function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgf2,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
e:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
end
function cm.op2(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.tgf2,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/c18020056.lua deleted 100644 → 0
View file @ 7cc2bf38
--龙姬咆哮-寺岛诗织
local m=18020056
local cm=_G["c"..m]
if not pcall(function() require("expansions/script/c18020051") end) then require("script/c18020051") end
cm.Mechavanus=true
function cm.initial_effect(c)
local e1,e2=Mechavanus.roar(c,m,cm.op1,cm.tg2,cm.op2)
end
--e1
function cm.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_NEGATE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_CHAINING)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.optg1)
e1:SetOperation(cm.opop1)
c:RegisterEffect(e1)
end
function cm.optg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) end
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
end
function cm.opop1(e,tp,eg,ep,ev,re,r,rp)
Duel.NegateActivation(ev)
end
--e2
function cm.tgf2(c)
return (c.Mechavanus or c:IsCode(18020051)) and c:IsAbleToHand()
end
function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgf2,tp,LOCATION_GRAVE,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
e:SetCategory(CATEGORY_TOHAND)
end
function cm.op2(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.tgf2,tp,LOCATION_GRAVE,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
expansions/script/c18020057.lua deleted 100644 → 0
View file @ 7cc2bf38
--龙姬咆哮-板场弓美
local m=18020057
local cm=_G["c"..m]
if not pcall(function() require("expansions/script/c18020051") end) then require("script/c18020051") end
cm.Mechavanus=true
function cm.initial_effect(c)
local e1,e2=Mechavanus.roar(c,m,cm.op1,cm.tg2,cm.op2)
end
--e1
function cm.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.optg1)
e1:SetOperation(cm.opop1)
c:RegisterEffect(e1)
end
function cm.optg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() end
if chk==0 then return Duel.IsExistingTarget(nil,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
local g=Duel.SelectTarget(tp,nil,tp,0,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end
function cm.opop1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.Destroy(tc,REASON_EFFECT)
end
end
--e2
function cm.tgf2(c,e,tp)
return ((c.Mechavanus and c:IsType(TYPE_MONSTER)) or c:IsCode(18020051)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgf2,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
e:SetCategory(CATEGORY_SPECIAL_SUMMON)
end
function cm.op2(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,cm.tgf2,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
end
expansions/script/c18020058.lua deleted 100644 → 0
View file @ 7cc2bf38
--龙姬咆哮-D-安藤创世
local m=18020058
local cm=_G["c"..m]
if not pcall(function() require("expansions/script/c18020051") end) then require("script/c18020051") end
cm.Mechavanus=true
function cm.initial_effect(c)
local e1=Mechavanus.D_roar(c,m,cm.op1,cm.op2)
end
--e1
function cm.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_DISABLE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.optg1)
e1:SetOperation(cm.opop1)
c:RegisterEffect(e1)
end
function cm.optg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and aux.NegateAnyFilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
local g=Duel.SelectTarget(tp,aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
end
function cm.opop1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
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+RESET_PHASE+PHASE_END)
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+RESET_PHASE+PHASE_END)
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+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e3)
end
end
end
--e2
function cm.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,1))
e1:SetCategory(CATEGORY_DISABLE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCountLimit(1,m+100)
e1:SetTarget(cm.optg2)
e1:SetOperation(cm.opop2)
c:RegisterEffect(e1)
end
function cm.optg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_DISABLE,nil,1,0,0)
end
function cm.opop2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
local tc=Duel.SelectMatchingCard(tp,aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,1,nil):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+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1)
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+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e3)
end
end
end
\ No newline at end of file
expansions/script/c18020059.lua deleted 100644 → 0
View file @ 7cc2bf38
--龙姬咆哮-D-寺岛诗织
local m=18020059
local cm=_G["c"..m]
if not pcall(function() require("expansions/script/c18020051") end) then require("script/c18020051") end
cm.Mechavanus=true
function cm.initial_effect(c)
local e1=Mechavanus.D_roar(c,m,cm.op1,cm.op2)
end
--e1
function cm.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_NEGATE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_CHAINING)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.optg1)
e1:SetOperation(cm.opop1)
c:RegisterEffect(e1)
end
function cm.optg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) end
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
end
function cm.opop1(e,tp,eg,ep,ev,re,r,rp)
Duel.NegateActivation(ev)
end
--e2
function cm.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,1))
e1:SetCategory(CATEGORY_NEGATE+CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_CHAINING)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCountLimit(1,m+100)
e1:SetTarget(cm.optg2)
e1:SetOperation(cm.opop2)
c:RegisterEffect(e1)
end
function cm.optg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return aux.nbcon(tp,re) and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) end
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
if re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_REMOVE,eg,1,0,0)
end
end
function cm.opop2(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
\ No newline at end of file
expansions/script/c18020060.lua deleted 100644 → 0
View file @ 7cc2bf38
--龙姬咆哮-D-板场弓美
local m=18020060
local cm=_G["c"..m]
if not pcall(function() require("expansions/script/c18020051") end) then require("script/c18020051") end
cm.Mechavanus=true
function cm.initial_effect(c)
local e1=Mechavanus.D_roar(c,m,cm.op1,cm.op2)
end
--e1
function cm.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.optg1)
e1:SetOperation(cm.opop1)
c:RegisterEffect(e1)
end
function cm.optg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() end
if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end
function cm.opop1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.Destroy(tc,REASON_EFFECT)
end
end
--e2
function cm.op2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,1))
e1:SetCategory(CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCountLimit(1,m+100)
e1:SetTarget(cm.optg2)
e1:SetOperation(cm.opop2)
c:RegisterEffect(e1)
end
function cm.optg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,0,0)
end
function cm.opop2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local tc=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,1,nil):GetFirst()
if tc then
Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
end
end
\ No newline at end of file
expansions/script/c18020061.lua deleted 100644 → 0
View file @ 7cc2bf38
--少女的咆哮被黑暗吞噬
local m=18020061
local cm=_G["c"..m]
cm.Mechavanus=true
function cm.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
e1:SetCost(cm.cost)
e1:SetTarget(cm.target)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
end
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
e:SetLabel(100)
if chk==0 then return true end
end
function cm.cosf(c,e,tp)
return c.Mechavanus and c:IsType(TYPE_SYNCHRO) and Duel.IsExistingMatchingCard(cm.tgf,tp,LOCATION_EXTRA,0,1,nil,c,e,tp)
end
function cm.tgf(c,tc,e,tp)
return c.Mechavanus and c:IsType(TYPE_SYNCHRO) and aux.IsCodeListed(c,tc:GetCode())
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,tc,c)>0
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if e:GetLabel()~=100 then return false end
e:SetLabel(0)
return e:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.CheckReleaseGroup(tp,cm.cosf,1,nil,e,tp)
end
e:SetLabel(0)
local g=Duel.SelectReleaseGroup(tp,cm.cosf,1,1,nil,e,tp)
Duel.Release(g,REASON_COST)
Duel.SetTargetCard(g)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
tc=Duel.SelectMatchingCard(tp,cm.tgf,tp,LOCATION_EXTRA,0,1,1,nil,tc,e,tp):GetFirst()
if tc and Duel.SpecialSummon(tc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(1000)
tc:RegisterEffect(e1,true)
local e2=e1:Clone()
e2:SetCode(EFFECT_CHANGE_ATTRIBUTE)
e2:SetValue(ATTRIBUTE_DARK)
tc:RegisterEffect(e2,true)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_IMMUNE_EFFECT)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_IGNORE_IMMUNE)
e3:SetRange(LOCATION_MZONE)
e3:SetValue(cm.efilter)
tc:RegisterEffect(e3,true)
tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
tc:CompleteProcedure()
local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_PHASE+PHASE_END)
e2:SetCountLimit(1)
e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e2:SetLabelObject(tc)
e2:SetCondition(cm.descon)
e2:SetOperation(cm.desop)
Duel.RegisterEffect(e2,tp)
end
end
function cm.efilter(e,re)
return e:GetHandlerPlayer()~=re:GetOwnerPlayer() and re:IsActivated()
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffect(m)~=0 then
return true
else
e:Reset()
return false
end
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
Duel.Destroy(tc,REASON_EFFECT)
end
\ No newline at end of file
expansions/script/c18020062.lua deleted 100644 → 0
View file @ 7cc2bf38
--心怀骄傲的少女啊，将你的梦想化作歌声
local m=18020062
local cm=_G["c"..m]
cm.Mechavanus=true
function cm.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(cm.tg)
e1:SetOperation(cm.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EFFECT_DESTROY_REPLACE)
e2:SetRange(LOCATION_SZONE)
e2:SetTarget(cm.reptg)
e2:SetValue(cm.repval)
e2:SetOperation(cm.repop)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EFFECT_SEND_REPLACE)
e3:SetRange(LOCATION_SZONE)
e3:SetTarget(cm.reptg2)
e3:SetOperation(cm.repop)
e3:SetValue(cm.repval2)
c:RegisterEffect(e3)
end
function cm.tgf(c)
return c.Mechavanus and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
end
function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgf,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.tgf,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
function cm.repfilter(c,tp)
return c:IsFaceup() and c.Mechavanus and c:IsLocation(LOCATION_MZONE) and c:IsControler(tp) and c:IsReason(REASON_EFFECT+REASON_BATTLE) and not c:IsReason(REASON_REPLACE)
end
function cm.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGrave() and eg:IsExists(cm.repfilter,1,nil,tp) end
return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
end
function cm.repval(e,c)
return cm.repfilter(c,e:GetHandlerPlayer())
end
function cm.repop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT)
end
function cm.repfilter2(c,tp,re)
return c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and c.Mechavanus
and c:GetDestination()==LOCATION_DECK and re:GetOwner()==c
end
function cm.reptg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return bit.band(r,REASON_EFFECT)~=0 and re
and e:GetHandler():IsAbleToGrave() and eg:IsExists(cm.repfilter2,1,nil,tp,re) end
if Duel.SelectEffectYesNo(tp,e:GetHandler(),aux.Stringid(m,0)) then
return true
else return false end
end
function cm.repval2(e,c)
return c:IsControler(e:GetHandlerPlayer()) and c:IsLocation(LOCATION_MZONE) and c.Mechavanus
end
expansions/script/c18020063.lua deleted 100644 → 0
View file @ 7cc2bf38
--悲哀的命运、喀血的咆哮
local m=18020063
local cm=_G["c"..m]
cm.Mechavanus=true
function cm.initial_effect(c)
aux.AddCodeList(c,18020051)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(cm.target)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
end
function cm.tgf(c,e,tp)
return ((c.Mechavanus and c:IsType(TYPE_MONSTER)) or c:IsCode(18020051)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.tgf(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingTarget(cm.tgf,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,cm.tgf,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)>0 then
tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_PHASE+PHASE_END)
e2:SetCountLimit(1)
e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e2:SetLabelObject(tc)
e2:SetCondition(cm.descon)
e2:SetOperation(cm.desop)
Duel.RegisterEffect(e2,tp)
end
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffect(1845204)~=0 then
return true
else
e:Reset()
return false
end
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
Duel.SendtoHand(tc,nil,REASON_EFFECT)
end
expansions/script/c18020064.lua deleted 100644 → 0
View file @ 7cc2bf38
--朋友以上，英雄未满
local m=18020064
local cm=_G["c"..m]
cm.Mechavanus=true
function cm.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
c:RegisterEffect(e1)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetRange(LOCATION_FZONE)
e1:SetCountLimit(1)
e1:SetTarget(cm.tg)
e1:SetOperation(cm.op)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e2:SetRange(LOCATION_FZONE)
e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(cm.tg2)
e2:SetValue(aux.tgoval)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_UPDATE_ATTACK)
e3:SetRange(LOCATION_FZONE)
e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetTarget(cm.tg2)
e3:SetValue(cm.val3)
c:RegisterEffect(e3)
end
function cm.tgf(c,tp)
return c:IsLocation(LOCATION_MZONE) and c:IsFaceup() and c:IsSummonPlayer(tp) and c.Mechavanus
end
function cm.tgf1(c,att)
return c.Mechavanus and c:IsAbleToHand() and not c:IsAttribute(att) and c:IsType(TYPE_MONSTER)
end
function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local g=eg:Filter(cm.tgf,nil,tp)
local tc=g:GetFirst()
local sg=Group.CreateGroup()
while tc do
local temp=Duel.GetMatchingGroup(cm.tgf1,tp,LOCATION_DECK,0,nil,tc:GetAttribute())
if #temp>0 then
sg:Merge(temp)
tc=g:GetNext()
end
end
if chk==0 then return #sg>0 end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,0,LOCATION_DECK)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
local g=eg:Filter(cm.tgf,nil,tp)
local tc=g:GetFirst()
local sg=Group.CreateGroup()
while tc do
local temp=Duel.GetMatchingGroup(cm.tgf1,tp,LOCATION_DECK,0,nil,tc:GetAttribute())
if #temp>0 then
sg:Merge(temp)
tc=g:GetNext()
end
end
if #sg>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g1=sg:Select(tp,1,1,nil)
if g1:GetCount()>0 then
Duel.SendtoHand(g1,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g1)
end
end
end
--e2
function cm.tg2(e,c)
return c:GetFlagEffect(18020051)>0 and c.Mechavanus
end
function cm.valf3(c)
return c.Mechavanus and c:IsFaceup() and c:IsType(TYPE_MONSTER)
end
function cm.val3(e,c)
local g=Duel.GetMatchingGroup(cm.valf3,e:GetHandler():GetControler(),LOCATION_MZONE,0,nil)
return g:GetClassCount(Card.GetAttribute)*300-300
end
expansions/script/c18020065.lua deleted 100644 → 0
View file @ 7cc2bf38
--当不了主角的三人就够了
local m=18020065
local cm=_G["c"..m]
cm.Mechavanus=true
function cm.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(cm.target)
e1:SetOperation(cm.operation)
c:RegisterEffect(e1)
if not cm.global_check then
cm.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_TO_GRAVE)
ge1:SetOperation(cm.checkop)
Duel.RegisterEffect(ge1,0)
end
end
function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
while tc do
tc:RegisterFlagEffect(m+1,RESET_PHASE+PHASE_END,0,1)
tc=eg:GetNext()
end
end
function cm.filter(c,e,tp)
return c.Mechavanus and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:GetFlagEffect(m+1)>0 and c:IsType(TYPE_MONSTER)
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and c:IsLocation(LOCATION_GRAVE) and cm.filter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local sg=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_GRAVE,0,1,99,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,sg,sg:GetCount(),0,LOCATION_GRAVE)
end
function cm.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
if g:GetCount()>0 then
local fid=e:GetHandler():GetFieldID()
local tc=g:GetFirst()
while tc do
Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP)
tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1,fid)
tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,0))
tc=g:GetNext()
end
Duel.SpecialSummonComplete()
g:KeepAlive()
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetCountLimit(1)
e1:SetLabel(fid)
e1:SetLabelObject(g)
e1:SetCondition(cm.retcon)
e1:SetOperation(cm.retop)
Duel.RegisterEffect(e1,tp)
end
end
function cm.retfilter(c,fid)
return c:GetFlagEffectLabel(m)==fid
end
function cm.retcon(e,tp,eg,ep,ev,re,r,rp)
local g=e:GetLabelObject()
if not g:IsExists(cm.retfilter,1,nil,e:GetLabel()) then
g:DeleteGroup()
e:Reset()
return false
else return true end
end
function cm.retop(e,tp,eg,ep,ev,re,r,rp)
local g=e:GetLabelObject()
local tg=g:Filter(cm.retfilter,nil,e:GetLabel())
Duel.SendtoHand(tg,nil,REASON_EFFECT)
end
expansions/script/c18020066.lua deleted 100644 → 0
View file @ 7cc2bf38
--有谁可以做到的话、任何人也一定
local m=18020066
local cm=_G["c"..m]
cm.Mechavanus=true
function cm.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCategory(CATEGORY_DRAW+CATEGORY_REMOVE+CATEGORY_NEGATE)
e1:SetCode(EVENT_CHAINING)
e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
e1:SetCondition(cm.condition)
e1:SetTarget(cm.target)
e1:SetOperation(cm.operation)
c:RegisterEffect(e1)
end
function cm.cfilter(c)
return c:IsFaceup() and c.Mechavanus and c:GetFlagEffect(18020051)>0
end
function cm.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil)
and (re:IsActiveType(TYPE_MONSTER) or re:IsHasType(EFFECT_TYPE_ACTIVATE)) and Duel.IsChainNegatable(ev)
end
function cm.tgf(c)
return c:IsFaceup() and c.Mechavanus and c:IsType(TYPE_MONSTER)
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
local Can_Draw=Duel.IsPlayerCanDraw(tp,1)
local Can_Remove=aux.nbcon(tp,re)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
if re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_REMOVE,eg,1,0,0)
end
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end
function cm.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(cm.tgf,tp,LOCATION_MZONE,0,nil)
local count=g:GetClassCount(Card.GetAttribute)
local Can_Draw=Duel.IsPlayerCanDraw(tp,1)
local Can_Remove=aux.nbcon(tp,re) and re:GetHandler():IsRelateToEffect(re)
local x1=0
local x2=0
local x3=0
while count do
local off=1
local ops={}
local opval={}
if x1==0 then
ops[off]=aux.Stringid(m,0)
opval[off-1]=1
off=off+1
end
if Can_Remove and x2==0 then
ops[off]=aux.Stringid(m,1)
opval[off-1]=2
off=off+1
end
if Can_Draw and x3==0 then
ops[off]=aux.Stringid(m,2)
opval[off-1]=3
off=off+1
end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EFFECT)
local op=Duel.SelectOption(tp,table.unpack(ops))
if opval[op]==1 then
x1=1
elseif opval[op]==2 then
x2=1
elseif opval[op]==3 then
x3=1
end
count=count-1
if count<=0 or (x1==1 and not (Can_Remove and x2==0) and not (Can_Draw and x3==0)) or not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then
break
end
end
if x1==1 then
Duel.NegateActivation(ev)
end
if x2==1 then
Duel.Remove(eg,POS_FACEUP,REASON_EFFECT)
end
if x3==1 then
Duel.Draw(tp,1,REASON_EFFECT)
end
end
expansions/script/c33701370.lua
View file @ 1ca7d864
...@@ -27,7 +27,7 @@ end ...@@ -27,7 +27,7 @@ end
function cm.damcon(e,tp,eg,ep,ev,re,r,rp) function cm.damcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp return Duel.GetTurnPlayer()~=tp
end end
function cm.activate(e,tp,eg,ep,ev,re,r,rp) function cm.damop(e,tp,eg,ep,ev,re,r,rp)
Duel.Damage(tp,100,REASON_EFFECT,true) Duel.Damage(tp,100,REASON_EFFECT,true)
Duel.Damage(1-tp,100,REASON_EFFECT,true) Duel.Damage(1-tp,100,REASON_EFFECT,true)
Duel.RDComplete() Duel.RDComplete()
......
expansions/strings.conf
View file @ 1ca7d864
...@@ -559,7 +559,6 @@ ...@@ -559,7 +559,6 @@
#setcode="PseudoSoul" 拟魂 #setcode="PseudoSoul" 拟魂
#setcard="PhantomQuantum" 幻量子 #setcard="PhantomQuantum" 幻量子
#setcard="Shinkansen" 新干线 #setcard="Shinkansen" 新干线
#setname="Mechavanus" 龙姬
#魏良 1217826552 187 0xab0-0xabf #魏良 1217826552 187 0xab0-0xabf
!setname 0xab6 樱迷宫 !setname 0xab6 樱迷宫
......
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