Commit 95e2d4c9 authored by 聖園ミカ's avatar 聖園ミカ 🐟

byd

parent 5d73c006
Pipeline #30159 passed with stages
in 35 minutes and 35 seconds
...@@ -31,10 +31,8 @@ end ...@@ -31,10 +31,8 @@ end
function cm.cfilter(c) function cm.cfilter(c)
return (c:IsSetCard(0x820) and c:IsFaceup() and c:IsLevelAbove(7) and c:IsType(TYPE_FUSION)) return (c:IsSetCard(0x820) and c:IsFaceup() and c:IsLevelAbove(7) and c:IsType(TYPE_FUSION))
end end
function cm.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chkc then return chkc:IsLocation(LOCATION_ONFIELD or LOCATION_REMOVED) and cm.filter(chkc) and chkc~=e:GetHandler() end if chk==0 then return Duel.IsExistingTarget(cm.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
if chk==0 then return Duel.IsExistingTarget(cm.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler())
and Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,e:GetHandler()) end
local ct=1 local ct=1
if not Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_REMOVED,0,1,nil) then if not Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_REMOVED,0,1,nil) then
local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,ct,e:GetHandler()) local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,ct,e:GetHandler())
...@@ -59,10 +57,8 @@ end ...@@ -59,10 +57,8 @@ end
function cm.cfilter2(c) function cm.cfilter2(c)
return (c:IsSetCard(0x820) and c:IsFaceup() and c:IsLevelAbove(7) and c:IsType(TYPE_FUSION)) return (c:IsSetCard(0x820) and c:IsFaceup() and c:IsLevelAbove(7) and c:IsType(TYPE_FUSION))
end end
function cm.tdtg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.tdtg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chkc then return chkc:IsLocation(LOCATION_ONFIELD or LOCATION_REMOVED) and cm.filter2(chkc) and chkc~=e:GetHandler() end if chk==0 then return Duel.IsExistingTarget(cm.filter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,e:GetHandler()) end
if chk==0 then return Duel.IsExistingTarget(cm.filter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,e:GetHandler())
and Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,e:GetHandler()) end
local ct=1 local ct=1
if not Duel.IsExistingMatchingCard(cm.cfilter2,tp,LOCATION_ONFIELD+LOCATION_REMOVED,0,1,nil) then if not Duel.IsExistingMatchingCard(cm.cfilter2,tp,LOCATION_ONFIELD+LOCATION_REMOVED,0,1,nil) then
local g=Duel.SelectTarget(tp,cm.filter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,ct,e:GetHandler()) local g=Duel.SelectTarget(tp,cm.filter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,ct,e:GetHandler())
......
...@@ -102,9 +102,10 @@ function cm.spcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -102,9 +102,10 @@ function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
return ph==PHASE_MAIN1 or ph==PHASE_MAIN2 return ph==PHASE_MAIN1 or ph==PHASE_MAIN2
end end
function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.costfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,c) end local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(cm.costfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,c,c,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,cm.costfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,cm.costfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,c,c,e,tp)
Duel.Remove(g,POS_FACEUP,REASON_COST) Duel.Remove(g,POS_FACEUP,REASON_COST)
end end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
......
...@@ -185,20 +185,20 @@ function VHisc_Dragonk.xyzsm(ce,ccode) ...@@ -185,20 +185,20 @@ function VHisc_Dragonk.xyzsm(ce,ccode)
ce:RegisterEffect(e10) ce:RegisterEffect(e10)
end end
--xyz --xyz
function VHisc_Dragonk.ovfilter(c,code) function VHisc_Dragonk.ovfilter(c,code,og)
return c:IsFaceup() and c:IsCode(code) and c:GetEquipGroup():IsExists(function(ec) return ec:IsSetCard(0xc327) end,1,nil) return c:IsFaceup() and c:IsCode(code) and c:GetEquipGroup():IsExists(function(ec) return ec:IsSetCard(0xc327) end,1,nil) and (not og or og:IsContains(c))
end end
function VHisc_Dragonk.spcon(e,c) function VHisc_Dragonk.spcon(e,c,og,min,max)
if c==nil then return true end if c==nil then return true end
local tp=c:GetControler() local tp=c:GetControler()
local code=e:GetLabel() local code=e:GetLabel()
local id=e:GetHandler():GetOriginalCode() local id=e:GetHandler():GetOriginalCode()
return Duel.GetFlagEffect(tp,id)==0 and Duel.IsExistingMatchingCard(VHisc_Dragonk.ovfilter,tp,LOCATION_MZONE,0,1,nil,code) return Duel.GetFlagEffect(tp,id)==0 and Duel.IsExistingMatchingCard(VHisc_Dragonk.ovfilter,tp,LOCATION_MZONE,0,1,nil,code,og)
end end
function VHisc_Dragonk.spop(e,tp,eg,ep,ev,re,r,rp,c) function VHisc_Dragonk.spop(e,tp,eg,ep,ev,re,r,rp,c,og,min,max)
local code=e:GetLabel() local code=e:GetLabel()
local id=e:GetHandler():GetOriginalCode() local id=e:GetHandler():GetOriginalCode()
local g=Duel.SelectMatchingCard(tp,VHisc_Dragonk.ovfilter,tp,LOCATION_MZONE,0,1,1,nil,code) local g=Duel.SelectMatchingCard(tp,VHisc_Dragonk.ovfilter,tp,LOCATION_MZONE,0,1,1,nil,code,og)
local mc=g:GetFirst() local mc=g:GetFirst()
local mg=mc:GetOverlayGroup() local mg=mc:GetOverlayGroup()
local eqg=mc:GetEquipGroup() local eqg=mc:GetEquipGroup()
......
...@@ -19,13 +19,11 @@ function s.initial_effect(c) ...@@ -19,13 +19,11 @@ function s.initial_effect(c)
e4:SetOperation(s.getop) e4:SetOperation(s.getop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--imm --imm
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetCode(EFFECT_IMMUNE_EFFECT)
e3:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
e3:SetRange(LOCATION_MZONE)
e3:SetCondition(s.efcon) e3:SetCondition(s.efcon)
e3:SetValue(aux.imval1) e3:SetValue(s.efilter1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
-- --
...@@ -183,6 +181,9 @@ end ...@@ -183,6 +181,9 @@ end
function s.efcon(e) function s.efcon(e)
return Duel.IsExistingMatchingCard(s.efconf,e:GetHandlerPlayer(),LOCATION_SZONE,0,1,nil) return Duel.IsExistingMatchingCard(s.efconf,e:GetHandlerPlayer(),LOCATION_SZONE,0,1,nil)
end end
function s.efilter1(e,re)
return e:GetOwnerPlayer()~=re:GetOwnerPlayer()
end
-- --
function s.spfilter1(c,e,tp) function s.spfilter1(c,e,tp)
......
...@@ -106,13 +106,13 @@ function c60010137.decon(e,tp,eg,ep,ev,re,r,rp) ...@@ -106,13 +106,13 @@ function c60010137.decon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c60010137.ownerfilter,1,nil,tp) return eg:IsExists(c60010137.ownerfilter,1,nil,tp)
end end
function c60010137.detg(e,tp,eg,ep,ev,re,r,rp,chk) function c60010137.detg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_MZONE,1,nil) end
local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end end
function c60010137.deop(e,tp,eg,ep,ev,re,r,rp) function c60010137.deop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectMatchingCard(tp,nil,tp,0,LOCATION_ONFIELD,1,1,nil) local g=Duel.SelectMatchingCard(tp,nil,tp,0,LOCATION_MZONE,1,1,nil)
if #g>0 then if #g>0 then
Duel.HintSelection(g) Duel.HintSelection(g)
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
......
...@@ -54,8 +54,7 @@ function cm.tgfilter(c,e,tp) ...@@ -54,8 +54,7 @@ function cm.tgfilter(c,e,tp)
return c:IsCode(m) and c:GetOriginalCodeRule()~=m and (c:IsAbleToGrave() or (Duel.GetMatchingGroupCount(Card.IsFacedown,tp,LOCATION_REMOVED,0,nil)>=3 and c:IsCanBeSpecialSummoned(e,POS_FACEUP,tp,false,false))) return c:IsCode(m) and c:GetOriginalCodeRule()~=m and (c:IsAbleToGrave() or (Duel.GetMatchingGroupCount(Card.IsFacedown,tp,LOCATION_REMOVED,0,nil)>=3 and c:IsCanBeSpecialSummoned(e,POS_FACEUP,tp,false,false)))
end end
function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp,e:GetHandler())>0 if chk==0 then return Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
and Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
end end
function cm.tgop(e,tp,eg,ep,ev,re,r,rp) function cm.tgop(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -5,6 +5,7 @@ function cm.initial_effect(c) ...@@ -5,6 +5,7 @@ function cm.initial_effect(c)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(cm.cost) e1:SetCost(cm.cost)
......
...@@ -38,7 +38,7 @@ function cm.initial_effect(c) ...@@ -38,7 +38,7 @@ function cm.initial_effect(c)
e4:SetCategory(CATEGORY_CONTROL) e4:SetCategory(CATEGORY_CONTROL)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_TO_GRAVE) e4:SetCode(EVENT_TO_GRAVE)
e4:SetProperty(EFFECT_FLAG_DELAY) e4:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
e4:SetCountLimit(1,m+2) e4:SetCountLimit(1,m+2)
e4:SetTarget(cm.gctg2) e4:SetTarget(cm.gctg2)
e4:SetOperation(cm.gcop2) e4:SetOperation(cm.gcop2)
......
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