攻略
Combo
考据
好物分享
卡图故事
支缓
盘点整理
Duel Links
--混沌帝龍 -終焉の使者- function c82301904.initial_effect(c) c:EnableReviveLimit() --cannot special summon local e1=Effect.CreateEffect(c) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_SPSUMMON_CONDITION) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetDescription(aux.Stringid(82301904,0)) e2:SetType(EFFECT_TYPE_FIELD) e2:SetCode(EFFECT_SPSUMMON_PROC) e2:SetProperty(EFFECT_FLAG_UNCOPYABLE) e2:SetRange(LOCATION_HAND) e2:SetCondition(c82301904.spcon) e2:SetOperation(c82301904.spop) c:RegisterEffect(e2) --to grave local e3=Effect.CreateEffect(c) e3:SetDescription(aux.Stringid(82301904,1)) e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DAMAGE) e3:SetType(EFFECT_TYPE_IGNITION) e3:SetRange(LOCATION_MZONE) e3:SetCountLimit(1) e3:SetCost(c82301904.sgcost) e3:SetTarget(c82301904.sgtg) e3:SetOperation(c82301904.sgop) c:RegisterEffect(e3) Duel.AddCustomActivityCounter(82301904,ACTIVITY_CHAIN,aux.FALSE) end function c82301904.spcostfilter(c) return c:IsAbleToRemoveAsCost() and c:IsAttribute(ATTRIBUTE_LIGHT+ATTRIBUTE_DARK) end function c82301904.spcon(e,c) if c==nil then return true end local tp=c:GetControler() if Duel.GetMZoneCount(tp)<=0 then return false end local g=Duel.GetMatchingGroup(c82301904.spcostfilter,tp,LOCATION_GRAVE,0,nil) return g:CheckSubGroup(aux.gfcheck,2,2,Card.IsAttribute,ATTRIBUTE_LIGHT,ATTRIBUTE_DARK) end function c82301904.spop(e,tp,eg,ep,ev,re,r,rp,c) local g=Duel.GetMatchingGroup(c82301904.spcostfilter,tp,LOCATION_GRAVE,0,nil) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) local sg=g:SelectSubGroup(tp,aux.gfcheck,false,2,2,Card.IsAttribute,ATTRIBUTE_LIGHT,ATTRIBUTE_DARK) Duel.Remove(sg,POS_FACEUP,REASON_COST) end function c82301904.sgcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.CheckLPCost(tp,1000) and Duel.GetCustomActivityCount(82301904,tp,ACTIVITY_CHAIN)==0 end Duel.PayLPCost(tp,1000) local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_FIELD) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH) e1:SetCode(EFFECT_CANNOT_ACTIVATE) e1:SetTargetRange(1,0) e1:SetValue(aux.TRUE) e1:SetReset(RESET_PHASE+PHASE_END) Duel.RegisterEffect(e1,tp) end function c82301904.damfilter(c,p) return c:GetOwner()==p and c:IsAbleToGrave() end function c82301904.sgtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end local g=Duel.GetFieldGroup(tp,0xe,0xe) local dc=g:FilterCount(c82301904.damfilter,nil,1-tp) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,g:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,0,0,1-tp,dc*300) end function c82301904.sgfilter(c,p) return c:IsLocation(LOCATION_GRAVE) and c:IsControler(p) end function c82301904.sgop(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetFieldGroup(tp,0xe,0xe) Duel.SendtoGrave(g,REASON_EFFECT) local og=Duel.GetOperatedGroup() local ct=og:FilterCount(c82301904.sgfilter,nil,1-tp) if ct>0 then Duel.BreakEffect() Duel.Damage(1-tp,ct*300,REASON_EFFECT) end end