Skip to content

Y
ygopro-222DIY-cards
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