Commit 0196a13b authored by Satty's avatar Satty

fix

parent 495ef369
Pipeline #36996 passed with stages
in 32 minutes and 6 seconds
......@@ -85,13 +85,14 @@ end
function s.filter2(c,e,tp,m,f,gc,chkf)
return c:IsType(TYPE_FUSION) and c:IsSetCard(0x5540) and (not f or f(c))
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,true) and c:CheckFusionMaterial(m,gc,chkf)
and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
end
function s.distg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then
local chkf=tp
local mg1=Duel.GetMatchingGroup(s.filter0,tp,LOCATION_HAND+LOCATION_MZONE+LOCATION_PZONE,0,nil)
mg1:AddCard(c)
local res=Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,c,chkf)
if not res then
local ce=Duel.GetChainMaterial(tp)
......@@ -112,6 +113,7 @@ function s.disop(e,tp,eg,ep,ev,re,r,rp)
local chkf=tp
if not c:IsRelateToEffect(e) or c:IsImmuneToEffect(e) then return end
local mg1=Duel.GetMatchingGroup(s.filter1,tp,LOCATION_HAND+LOCATION_MZONE+LOCATION_PZONE,0,nil,e)
mg1:AddCard(c)
local sg1=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,c,chkf)
local mg2=nil
local sg2=nil
......
--启灵元神·秋露星河
function c16372016.initial_effect(c)
aux.AddCodeList(c,16372004,16372005,16372006)
aux.AddCodeList(c,16372007,16372008,16372009)
c:EnableReviveLimit()
--special summon rule
local e0=Effect.CreateEffect(c)
......@@ -43,7 +43,7 @@ function c16372016.initial_effect(c)
e3:SetOperation(c16372016.spop2)
c:RegisterEffect(e3)
end
c16372016.spchecks=aux.CreateChecks(Card.IsCode,{16372004,16372005,16372006})
c16372016.spchecks=aux.CreateChecks(Card.IsCode,{16372007,16372008,16372009})
function c16372016.sprfilter(c,tp)
return c:IsFaceup() and c:IsAbleToGraveAsCost()
end
......
......@@ -5,7 +5,7 @@ function s.initial_effect(c)
aux.AddCodeList(c,5012604)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_DECKDES)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
--e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
......
......@@ -20,7 +20,7 @@ function s.initial_effect(c)
e2:SetRange(LOCATION_MZONE)
e2:SetTargetRange(0,1)
e2:SetCondition(s.limcon)
e2:SetValue(s.aclimit)
e2:SetValue(s.aclimit1)
c:RegisterEffect(e2)
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_FIELD)
......@@ -28,7 +28,7 @@ function s.initial_effect(c)
e8:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e8:SetRange(LOCATION_MZONE)
e8:SetTargetRange(0,1)
e8:SetValue(s.aclimit)
e8:SetValue(s.aclimit2)
c:RegisterEffect(e8)
--selfdes
local e3=Effect.CreateEffect(c)
......@@ -69,10 +69,10 @@ end
function s.limcon(e)
return Duel.GetTurnPlayer()==e:GetHandlerPlayer()
end
function s.aclimit(e,re,tp)
function s.aclimit1(e,re,tp)
return re:GetHandler():IsOnField() or re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function s.aclimit(e,re,tp)
function s.aclimit2(e,re,tp)
return re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function s.descon(e,tp)
......
......@@ -20,6 +20,16 @@ function c88178030.initial_effect(c)
e3:SetCondition(c88178030.damcon)
e3:SetOperation(c88178030.damop)
c:RegisterEffect(e3)
--spsummon
local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_DESTROY)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_DESTROYED)
e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetCountLimit(1,88278030)
e4:SetTarget(c88178030.destg)
e4:SetOperation(c88178030.desop)
c:RegisterEffect(e4)
end
function c88178030.desfilter(c,tp)
return Duel.GetMZoneCount(tp,c)>0
......@@ -47,4 +57,17 @@ function c88178030.damcon(e,tp,eg,ep,ev,re,r,rp)
end
function c88178030.damop(e,tp,eg,ep,ev,re,r,rp)
Duel.ChangeBattleDamage(ep,ev*3)
end
function c88178030.destg(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
if chk==0 then return g:GetCount()>0 end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end
function c88178030.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
if g:GetCount()>0 then
Duel.HintSelection(g)
Duel.Destroy(g,REASON_EFFECT)
end
end
\ No newline at end of file
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