攻略
Combo
考据
好物分享
卡图故事
支缓
盘点整理
Duel Links
--クインテット・マジシャン function c84433295.initial_effect(c) --fusion material c:EnableReviveLimit() aux.AddFusionProcFunRep(c,aux.FilterBoolFunction(Card.IsRace,RACE_SPELLCASTER),5,true) --spsummon condition local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e1:SetCode(EFFECT_SPSUMMON_CONDITION) e1:SetValue(aux.fuslimit) c:RegisterEffect(e1) --destroy local e2=Effect.CreateEffect(c) e2:SetCategory(CATEGORY_DESTROY) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetCondition(c84433295.descon) e2:SetTarget(c84433295.destg) e2:SetOperation(c84433295.desop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE) e3:SetCode(EFFECT_MATERIAL_CHECK) e3:SetValue(c84433295.valcheck) e3:SetLabelObject(e2) c:RegisterEffect(e3) --cannot release local e4=Effect.CreateEffect(c) e4:SetType(EFFECT_TYPE_SINGLE) e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e4:SetRange(LOCATION_MZONE) e4:SetCode(EFFECT_UNRELEASABLE_SUM) e4:SetValue(1) c:RegisterEffect(e4) local e5=e4:Clone() e5:SetCode(EFFECT_UNRELEASABLE_NONSUM) c:RegisterEffect(e5) --cannot be fusion material local e6=e4:Clone() e6:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL) c:RegisterEffect(e6) --indes local e7=e4:Clone() e7:SetCode(EFFECT_INDESTRUCTABLE_EFFECT) c:RegisterEffect(e7) end function c84433295.valcheck(e,c) local g=c:GetMaterial():Filter(Card.IsRace,nil,RACE_SPELLCASTER) if g:GetClassCount(Card.GetCode)==5 then e:GetLabelObject():SetLabel(1) end end function c84433295.descon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION) and e:GetLabel()==1 end function c84433295.destg(e,tp,eg,ep,ev,re,r,rp,chk) local g=Duel.GetFieldGroup(tp,0,LOCATION_ONFIELD) if chk==0 then return g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0) end function c84433295.desop(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetFieldGroup(tp,0,LOCATION_ONFIELD) if g:GetCount()>0 then Duel.Destroy(g,REASON_EFFECT) end end